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
 

 

How to add a Header in the file thru JCL

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
k_kirru
Currently Banned

New User


Joined: 14 Sep 2005
Posts: 16

PostPosted: Wed Sep 14, 2005 8:04 pm    Post subject: How to add a Header in the file thru JCL
Reply with quote

Hi,
I want to add a Header in the file that means filed names to be add, could you give some JCL.

Thanks & Regards,
Kiran
Back to top
View user's profile Send private message

radhakrishnan82

Active User


Joined: 31 Mar 2005
Posts: 436
Location: chennai, India

PostPosted: Wed Sep 14, 2005 8:28 pm    Post subject:
Reply with quote

Code:
//aaab5   EXEC PROC=SORT,                                             
//            COND=(0,NE)                                             
//*                                                                   
//SORTIN       DD  DSN=ddname
//            DISP=SHR                                                 
//*  ***  INFILE IS JUST USED AS A DUMMY ***                           
//*                                                                   
//SORTOUT      DD  DSN=ddname,                           
//            DISP=(OLD,CATLG,DELETE),                                 
//            UNIT=SYSDA,SPACE=(CYL,(250,100),RLSE),                   
//            DCB=(RECFM=FB,LRECL=90,BLKSIZE=900)                     
//*  ***  OUTPUT FILE WILL JUST HAVE WHAT EVER IS IN OUTREC FIELD *** 
//*  ***  SINCE STOPAFT (STOP AFTER) OPTION IS = 1 ***                 
//*                                                                   
//SYSIN        DD  * *** CONSTANT CONTROL CARDS ***                   
  OPTION COPY,                                                         
  STOPAFT=1                                                           
   OUTREC FIELDS=(C'TCKT NUM',
                               field names
                         C'ACCUM PLN DRVR')       
 /*    END OF INPUT                         
//


this will create a header file.merge this file with the data file.

hope this helps.
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 SORTJOIN - Copy Matched and Unmatched... Steve Ironmonger DFSORT/ICETOOL 5 Tue Jan 17, 2017 4:26 pm
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm


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