In a message dated 9/13/2006 6:02:04 A.M. Central Standard Time,
[EMAIL PROTECTED] writes:
he LE callable service CEEDYWK returns an integer
for the day of the week for any date. This integer
can be passed as your return code. A program to
invoke this service may be written in Assembler,
COBOL, PL/I, or C.
>>
REXX is available too!
>From REXX Reference:
Here are some examples, assuming today is November 20, 2001:
| DATE() -> '20 Nov 2001'
| DATE(,'20020609','S') -> '9 Jun 2002'
| DATE('B') -> '730808'
| DATE('B','25 Sep 2001') -> '730752'
| DATE('C') -> '690'
| DATE('E') -> '20/11/01'
| DATE('J') -> '01324'
| DATE('M') -> 'November'
| DATE('N') -> '20 Nov 2001'
| DATE('N','1438','C') -> '8 Dec 2003'
| DATE('O') -> '01/11/20'
| DATE('S') -> '20011120'
| DATE('U') -> '11/20/01'
| DATE('U','25,May,2001') -> '05/25/01'
| DATE('U','25,MAY,2001') -> ERROR, month not in mixed case
| DATE('W') -> 'Tuesday'
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
