Re: Built in Function ILE RPG

["Eric DeLong"<eric.delong@xxxxxxxxxxxxxxxxx>]

     Raj,
     Take a look at the MOVE opcode. There was a lot of extended support 
     added for moving numeric/character dates and times into date and 
     time fields. All you'll need is your *ISO date field and a 
     statement like:
     
     C         *USA       Move     NUMDAT         NEWDATE
     
     eric.delong@pmsi-services.com


______________________________ Reply Separator _________________________________
Subject: Built in Function ILE RPG 
Author:  <MIDRANGE-L@midrange.com > at INET_WACO
Date:    1/22/99 1:43 PM


Friends,
                       Could you please help me on this.  Actually, I am
trying to  convert a  numerical  variable from
MMDDCCYY  format to  CCYYMMDD  .  ( and Vice versa )
Even though , we can do this by  using data structure, I would rather like
to use the new functioanality of ILE RPG.

For that,  I  have tried using date stamp field.

1. Moving   the numerical  value ( 8, 0)  to    DATE STAMP Field with  (
Date format  *USA)

2.  Moving   Date Stamp Field ( *USA)     TO    another date stamp field
(*ISO)

3.  Finally,  moving  Date Stamp Filed (*ISO)     TO     Result  Field (
Numerical variable with 8, 0 )


The above method works fine.


 I was looking around for other better methods, because  in RPG/400, it is
just  one  statement ( multiplying by  10000.01),
but in  ILE RPG it  takes three statement and two more additional  work
field declaration ( Date stamp field).


Could  you please tell me , is there any other better methods  like  using
Built in function.?

Can we create our  own built-in function?.

Any help is greatly appriciated.

Thanks

Regards
Raj







+---
| 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
+---



+---
| 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
+---