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
 
To add dynamic month/year on the output file generated

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

New User


Joined: 11 Sep 2009
Posts: 10
Location: chennai

PostPosted: Wed Aug 25, 2010 11:48 am    Post subject: To add dynamic month/year on the output file generated
Reply with quote

Hi ,

My requirement is to add the mmyyyy (on all the records appended at the last position)on the file generated in the output through dfsort . Can we add through PARM (as i know that parm can be used to pass the data on cobol programs).
//step1 exec pgm=sort,PARM='&MMYYYY'

or while creating o/p file with the outrec command to have the mmyyyy appended on each record in the file at last position.
Back to top
View user's profile Send private message

smijoss

Active User


Joined: 30 Aug 2007
Posts: 114
Location: pune

PostPosted: Wed Aug 25, 2010 1:34 pm    Post subject:
Reply with quote

how do you plan to implement this date... show us ur job
Back to top
View user's profile Send private message
RAJA-RAJA

New User


Joined: 11 Sep 2009
Posts: 10
Location: chennai

PostPosted: Wed Aug 25, 2010 1:51 pm    Post subject: Reply to: To add dynamic month/year on the output file gener
Reply with quote

Hi,

The date replacement will be done by the job scheduler.

Thanks.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Aug 25, 2010 7:28 pm    Post subject:
Reply with quote

Hello,

To repeat. . .
Quote:
how do you plan to implement this date... show us ur job
Back to top
View user's profile Send private message
sqlcode1

Active Member


Joined: 08 Apr 2010
Posts: 578
Location: USA

PostPosted: Wed Aug 25, 2010 7:55 pm    Post subject:
Reply with quote

RAJA-RAJA,
Quote:
while creating o/p file with the outrec command to have the mmyyyy appended on each record in the file at last position.


I am assuming you want current year and month appended at 81st position for an 80 byte FB input file. This will create 86 byte output file.

Code:
//SORT01   EXEC PGM=SORT                 
//SORTIN   DD  YOUR INPUT FILE FB80     
//SORTOUT  DD  YOUR OUTPUT FILE FB86...       
//SYSIN    DD  *                         
 INREC BUILD=(81:DATE2)                 
 SORT FIELDS=COPY                       
 OUTREC BUILD=(1,80,81:85,2,83:81,4)     
//SYSOUT   DD  SYSOUT=*                 
//SYSPRINT DD  SYSOUT=*                 
//SYSUDUMP DD  SYSOUT=D                 


Thanks,
Back to top
View user's profile Send private message
smijoss

Active User


Joined: 30 Aug 2007
Posts: 114
Location: pune

PostPosted: Wed Aug 25, 2010 9:06 pm    Post subject:
Reply with quote

well your it requirement was to pass date fro JOB scheduler
so i guess RAJA_RAJA should make things more clear !!
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 Subtract the ZD fields to provide neg... Balaryan DFSORT/ICETOOL 4 Wed Oct 11, 2017 10:51 pm
No new posts Execute JCL step based on the content... sprikitik JCL & VSAM 2 Tue Oct 03, 2017 10:03 am
This topic is locked: you cannot edit posts or make replies. PS file data should be passed as symb... d_sarlie JCL & VSAM 15 Tue Oct 03, 2017 5:18 am
No new posts Where is output from PARM ABEXIT (SNA... packerm CA Products 3 Thu Sep 28, 2017 4:06 pm
No new posts Garbage on output file Hervey Martinez SYNCSORT 4 Wed Sep 27, 2017 12:50 am

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