RPGNext
Take Your RPG Development to theNextLevel
Site Links
Home
RPG Programming
xRPG Downloads
xRPG Docs
About This Site
About Me

RPG Gurus
Bob Cozzi
Brad Stone
Scott Klement
Jon Paris

iSeries Links
Alpha Works
Midrange.com
FAQ@Midrange.com
MidrangeServer.com
IBM Docs
iSeries Infocenter
MCPress
Easy400
API Finder

xRPG Core Library Procedures - RNBDATES: getDateStrMIL()


Receives a date and returns a Military formatted date string.

Mililtary date formats are day month year with the Month spelled out. The third parameter "verbose" specifies whether or not to use the entire Month name or the 3 letter abbreviation.

ex: verbose = 3 JANUARY 1998, not verbose (format = 'Mixed') = 3 Jan 1998.

Updated in v1.08 to return 50A. Previous versions return 10A.

Usage:

getDateStrMIL( {dateIn} : {zeroSuppress} : {verbose} : {format} );

Name Type Options Opt/Req Description
dateIn D Const Opt The date. If not sent then %date() is used.
zeroSuppress N Const Opt Suppresses zeros in day field only. If not sent then *OFF.
verbose N Const Opt Determines full name vs 3 letter abbreviation. If not sent then verbose is *ON.
format 5A Const Opt 'upper' returns name in all upper case; 'lower' returns name in all lower case; 'mixed' returns name in mixed case. If not sent then 'upper' is default.
Returns: 50A Varying n/a The string representation of the date.

This site conforms with the following W3C specifications:

Web Essentials

Contact