is there any standard routine to reformat the date?

useit · Active User Joined: 05 Oct 2006 Posts: 152

hi,
i have a date in the below format.
(yymmdd)-111212, i want to change this to 2011-12-12.
i know we can reformat and change accordinglyusing outrec builds. but is there any standard routine which can convert the above dates?

please let me know incase if any standard routines or utilities

Regds,
useit

dbzTHEdinosauer · Posted: Tue Dec 20, 2011 6:42 pm

unlike MS software which has gazillions of add-ons/extensions
or IBM COBOL for which a site can create their own instructions
(to be added to thier compiler)
or DB2 where User Defined Functions are part and parcel of the product,
I don't think DFSORT allows one to mess with it too much,
beyond the E15's.
Frank or Kolusu will have to comment.

But what you are looking for is not E15 stuff,
but the ability to create some build/parse 'functions'.

that being said,
i have a suggestion, if you want to read on.

I have libraries (PDS-Es) of REXX, COBOL, ASM, SORTPARMS, SEARCHPARMS.

in each library i have a member named #LIST.
I have a macro (REXX).
==#MBRLIST which EDITs member #LIST and populates member #LIST
=with the contents of every member of the PDS with a 'header record' containing the pds member name,
=executes a SAVE and then end.
While I am coding my sort parms and need syntax or an example of something of which i a have a working copy
and #LIST not upto date, i execute #MBRLIST
then on command line EDIT #LIST
X ALL
#LFIND 'what ever command or search key that i have'
ISPF CUT the lines I need
END
ISPF PASTE my example into my current code.

==#LFIND
=X ALL
=F ALL argument
='find all header lines that go with previously found'
=END

That is the closest that I have come to creating a 'code snipet prompt'.

Frank Yaeger · Posted: Tue Dec 20, 2011 11:35 pm

Skolusu · Posted: Wed Dec 21, 2011 1:14 am

Useit,

You can use the following DFSORT JCL which will give you the desired results