TimeStamp move

[VENU YAMAJALA <venu_yamajala@xxxxxxxxxxxx>]

Hi All,

 I have a question - Is there anyway, we can output the 26 char timestamp from
an ILE RPG? My requirement is that I have a date in a certain format and I want
to convert this to *ISO Time Stamp format to send to some other module. From
the format, I want to build a 30 char fiel in *ISO TimeStamp field. I have a
format table which tells me that a particular format has the atomic values YY,
MM, DD, HH, SS, MN and separators. It gives me the positions of each atomic
value in that format. For example we have a format called YMD with '/'
separators which has

Format                     AtomicValue
FromPos                         Length
YMD                             YY
1                                         2
YMD
/
3                                         1
YMD                             MM
4                                         2
YMD
/
6                                         1
YMD                             DD
7                                         2

 So from this table, I will split my date value into YY, MM, DD, ... pieces by
using SUBSTRING with FromPos and
Length from the above table. Then from the pieces I collected, I want to build
a  30 char field which is in *ISO TimeStamp format (with extra positions as
zeros). I have a logic to get the century value (if it is not there in the
original date I received).

I tried many ways, but getting errors. Can anybody explain me this??
TIA

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