RE: Udate Processing

[Neil Palmer <npalmer@xxxxxxxxxxx>]

Don't know about RPGII, but if they are on an Advanced/36 or in the
S/36EE  (this MAY also work on a S/36 Classic with VASP installed) you
can use OCL substitution expression ?LONGDATE? to return 8 digit date.
You could use that in OCL and store it in the LDA for the RPGII program.


Neil Palmer                                AS/400~~~~~      
NxTrend Technology - Canada   ____________          ___  ~     
Thornhill, Ontario,  Canada   |OOOOOOOOOO| ________  o|__||=   
Phone: (905) 731-9000  x238   |__________|_|______|_|______)   
Cell.: (416) 565-1682  x238    oo      oo   oo  oo   OOOo=o\   
Fax:   (905) 731-9202       ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 
mailto:NPalmer@NxTrend.com    AS/400  The Ultimate Business Server      
http://www.NxTrend.com

> -----Original Message-----
> From: Pete Massiello [SMTP:pmassiello@os-solutions.com]
> Sent: Wednesday, June 17, 1998 9:58 AM
> To:   MIDRANGE-L@midrange.com
> Subject:      Udate Processing 
> 
> I have a customer that is trying to do Udate processing on their
> machine.  They are a small shop, still using S/36 (which I am not
> familiar with).  They are on V3R2, and are trying to get the 4 digit
> year, but always comes up with 2 digit year.
> 
> Is the 4 digit option only available in the 400 version of RPG. 
> 
>   Thanks in advance.
> -- 
> Pete Massiello
> 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---