Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
SYNCSORT needed to get current plus 1 date in SORTOUT file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
shrinivas_3
Warnings : 1

New User


Joined: 05 Sep 2006
Posts: 34

PostPosted: Fri Dec 22, 2006 10:47 am    Post subject: SYNCSORT needed to get current plus 1 date in SORTOUT file
Reply with quote

Hi All

I need JCL syntax to get current date + 1 in sort out file .
My sort-in file is 80 lrecl FB having only current date.
Now I want the sortout file to have current +1 date .

Solution could be provided with any type of date format .

Thanks
Shrinivas D
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: Fri Dec 22, 2006 9:10 pm    Post subject:
Reply with quote

Here's a DFSORT job that will do what you asked for:

Code:

//S1 EXEC PGM=ICEMAN           
//SYSOUT DD SYSOUT=*           
//SORTIN DD *                 
20061222                       
//SORTOUT DD SYSOUT=*         
//SYSIN DD *                   
  OPTION COPY                 
  INREC OVERLAY=(1:DATE1+1)   
/*                             


Today, SORTOUT would have:

20061223

You'll need z/OS DFSORT V1R5 PTF UK90007 or DFSORT R14 PTF UK90006 (April, 2006) in order to use DFSORT's DATE1+1 function. If you don't have April, 2006 PTF, ask your System Programmer to install it (it's free). For complete details on all of the new DFSORT and ICETOOL functions available with the April, 2006 PTF, see:

www.ibm.com/servers/storage/support/software/sort/mvs/peug/
Back to top
View user's profile Send private message
Rajen

New User


Joined: 05 May 2005
Posts: 61

PostPosted: Thu Dec 28, 2006 8:24 pm    Post subject: Re: syntax needed to get current plus 1 date in sort-out fil
Reply with quote

Hi Frank,
i tried your jcl but it abended with RC=16 and gave below mentioned error message.

SYNCSORT FOR Z/OS 1.2.0.1R U.S. PATENTS: 4210961, 5117495
PRODUCT LICENSED FOR CPU SERIAL NUMBER 6522F, MODEL 2064 106
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Thu Dec 28, 2006 8:36 pm    Post subject:
Reply with quote

Never mind...Just checked the programmers guide and no mention of intelligent date functions.....
BTW, If Frank ever says to check for a PTF, it's a (almost) sure bet that Syncsort won't be able to do it (yet?)..... icon_cry.gif
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Thu Dec 28, 2006 8:41 pm    Post subject:
Reply with quote

I think the Syncsort messages (including errors) have a "WER" prefix - usually these can help identify what caused the RC=16....
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts ISSUE IN copying Sequential file reco... thesumitk JCL & VSAM 2 Wed Dec 13, 2017 3:07 pm
No new posts File Tailoring -- Temporary dataset i... samzee71 CLIST & REXX 3 Fri Dec 01, 2017 3:12 am
No new posts Rexx - File tailoring samzee71 CLIST & REXX 10 Thu Nov 30, 2017 10:47 pm
No new posts Fetching data from JHS as per the cur... arunsoods All Other Mainframe Topics 4 Wed Nov 22, 2017 1:54 pm
No new posts Moving a PS file as body of a mail! Vignesh Sid JCL & VSAM 4 Tue Nov 21, 2017 9:23 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us