Wednesday 13 March 2013

EDIT Line commands - CREATE


EDIT LINE commands - CREATE

CREATE is used to move or copy data from dataset we are editing to a new dataset.

Suppose we are working with below JCL:

***************************** Top of Data ******************************
//TESTJCL1 JOB (XXXX),'TEST JCL',NOTIFY=&SYSUID                        
//teststep EXEC PGM=TESTPGM1                                           
//STEPLIB DD DSN=CMN.TEST.STGO.#001621.LOD,DISP=SHR                    
//MINPUT  DD DSN=SUKULR.TESTFILE.MASTER2,DISP=(OLD,CATLG,CATLG),       
//SYSIN   DD *                                                         
12  sukul mahadik                                                      
35000 Y 30 DUKINGNT                                                    
JADAV 67000 Y 40                                                       
MAHENDRA GAREWAL                                                       
20000 N                                                                
/*                                                                     
**************************** Bottom of Data ****************************

And we wish to copy the lines 4 to 8 to a new dataset named COPYJCL1.

To perform this we would first copy the lines using the C or CC commands. If we want to move the data from original datasets then we use the M or MM commands.

Then we type 'CREATE membername' or just 'CREATE' on the command line and hit enter.

If we don’t specify the member name then we get a selection panel where we can choose which panel to copy and what should be the name of new member.

Command ===> create copyjcl1                                  Scroll ===> CSR 
****** ***************************** Top of Data ******************************
000001 //TESTJCL1 JOB (XXXX),'TEST JCL',NOTIFY=&SYSUID                        
000002 //teststep EXEC PGM=TESTPGM1                                           
000003 //STEPLIB DD DSN=CMN.TEST.STGO.#001621.LOD,DISP=SHR                    
CC     //MINPUT  DD DSN=SUKULR.TESTFILE.MASTER2,DISP=(OLD,CATLG,CATLG),       
000005 //SYSIN   DD *                                                         
000006 12  sukul mahadik                                                      
000007 35000 Y 30 DUKINGNT                                                    
CC     JADAV 67000 Y 40                                                       
000009 MAHENDRA GAREWAL                                                       
000010 20000 N                                                                
000011 /*                                                                     
****** **************************** Bottom of Data ****************************

After we hit enter we get a message on the right had top corner - "Member COPYJCL1 created"
Which indicates that the create function was successful.

No comments:

Post a Comment