Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

is there any standard routine to reformat the date?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
useit

Active User


Joined: 05 Oct 2006
Posts: 144

PostPosted: Tue Dec 20, 2011 5:11 pm    Post subject: is there any standard routine to reformat the date?
Reply with quote

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
Back to top
View user's profile Send private message

dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Tue Dec 20, 2011 6:42 pm    Post subject:
Reply with quote

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'.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Tue Dec 20, 2011 11:35 pm    Post subject:
Reply with quote

Quote:
please let me know incase if any standard routines or utilities


I really don't understand what you're looking for. Are you looking for a non-DFSORT solution or a DFSORT solution? What do you mean by "a standard routine"?
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Wed Dec 21, 2011 1:14 am    Post subject:
Reply with quote

Useit,

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

//STEP0100 EXEC PGM=SORT       
//SYSOUT   DD SYSOUT=*         
//SORTIN   DD *                 
111212                         
//SORTOUT  DD SYSOUT=*         
//SYSIN    DD *                 
  OPTION COPY,Y2PAST=1980       
  INREC OVERLAY=(10:1,6,Y2T(-))
//*
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm
No new posts Validate date and numeric fields and ... Rick Silvers DFSORT/ICETOOL 6 Thu May 11, 2017 6:51 pm
No new posts LISTIDR compiled date/time jerryte IBM Tools 3 Thu Apr 20, 2017 7:37 pm
No new posts SUBSTR for Date functions Shaheen Shaik DB2 4 Thu Apr 06, 2017 2:14 pm
No new posts Date and time format in CICS Chandru3183 CICS 2 Sat Mar 18, 2017 12:46 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us