On Mon, 11 Jan 2021 16:17:43 +0000, Lars Höglund wrote:

>Example of ISPF-proc
>
>//*                                              PROC ISPFBAT      
>//ISPFBAT  PROC                                                    
>//*                                                                
>//*--------------------------------------------------------------  
>//* STEPNAME: CREPROF                                              
>//* STEPINFO: CREATE ISPPROF                                       
>//*--------------------------------------------------------------  
>//CREPROF  EXEC PGM=IEFBR14           
>
Couldn't these allocations be done in the BATCHPDF proc step, saving
one step?
                             
>//ISPTLIB  DD DISP=(NEW,PASS),                                     
>//            SPACE=(TRK,(15,15,5)),                               
>//            LRECL=80,BLKSIZE=0,DSORG=PO,RECFM=FB,                
>//            DSN=&&ISPTLIB                
>
Where iSPTLIB used?
                        
>//ISPTABL  DD DISP=(NEW,PASS),                                     
>//            SPACE=(TRK,(15,15,5)),                               
>//            LRECL=80,BLKSIZE=0,DSORG=PO,RECFM=FB,                
>//            DSN=&&ISPTABL                                        
>//*                                                                
>//*--------------------------------------------------------------  
>//* STEPNAME: BATCHPDF                                             
>//* STEPINFO: EXECUTE ISPF IN BATCH                                
>//*--------------------------------------------------------------  
>//BATCHPDF EXEC PGM=IKJEFT01,DYNAMNBR=128,                         
>//         PARM='ISPSTART CMD(&ISPFREX &ISPFPRM)'                  
>//SYSEXEC  DD  DISP=SHR,DSN=YOUR.ISPEXEC    <---                   
>//         DD  DISP=SHR,DSN=ISP.SISPEXEC      
>
At times I've made SYSEXEC a temp DSN, with the BATCH step an IKJEFT*
beginning with a REPRO to copy SYSIN to a SYSEXEC member.  This makes
the JCL self-contained.
                    
>//SYSPROC  DD  DISP=SHR,DSN=ISP.SISPCLIB                           
>//ISPPLIB  DD  DISP=SHR,DSN=ISP.SISPPENU                           
>//ISPSLIB  DD  DISP=SHR,DSN=YUOR.ISPSLIB    <---                   
>//         DD  DISP=SHR,DSN=ISP.SISPSLIB                           
>//         DD  DISP=SHR,DSN=ISP.SISPSENU                           
>//ISPMLIB  DD  DISP=SHR,DSN=YOUR.ISPMLIB    <---                   
>//         DD  DISP=SHR,DSN=ISP.SISPMENU                           
>//         DD  DISP=SHR,DSN=ISF.SISFMLIB                           
>//         DD  DISP=SHR,DSN=SYSU.XMITIP.MSGS                       
>//ISPLLIB  DD  DUMMY                                               
>//ISPPROF  DD  UNIT=WORK,SPACE=(TRK,(9,1,4)),                      
>//             LRECL=80,BLKSIZE=3120,RECFM=FB,DSORG=PO     
> 
I endorse such use of a temp DSN for ISPPROF, avoiding ENQ conflicts
and making the PROC more useful to the general public.
        
>//ISPTABL  DD  DISP=(OLD,DELETE),DSN=&&amp;ISPTABL                     
>
Is DELETE necessary?  Isn't that automatic for temp DSNs?

Are all the allocations above necessary in batch?  How is ISPMLIB useful?
Could they be made temp DSNs?

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to