On Sat, 15 Nov 2008 08:25:18 -0000, Terry Sambrooks 
<[EMAIL PROTECTED]> wrote:

>Hi Frank,
>
>In answer to your query about the default UNIT and SPACE in the following:
[deleted]

>If the output listing is checked it might help explain what has happened.
>The SYSUT1 override should appear ahead of its equivalent within the
>procedure indicating that an override has indeed taken place. The actual
>override statement supplied does not specify any parameter therefore it does
>not affect any existing parameter nor does it and any new ones. THEREFORE
>THE DEFAULTS ARE WHAT ARE CODED ON THE STATEMENT WITHIN THE 
PROCEDURE.

>As indicated in an earlier posting, null override statements are permitted
>to allow correct positioning within a concatenation. In the above example
>SYSUT1 has been treated as the first statement of a concatenation override
>even though there is no concatenation.

>Whilst Tom's comments about SMS are generically true, they do not apply in
>this case as the required information is supplied via a DD statement, albeit
>the one in the procedure, NOT THE OVERRIDE.

Hi Terry,

This latest question has not to do with null override DD statements.  It had to 
do with null DD statements within the procedure itself.  Specifically:

//IGYWC    PROC LNGPRFX='IGY.V3R3M0',SYSLBLK=3200
//COBOL    EXEC PGM=IGYCRCTL,REGION=2048K        
//STEPLIB  DD  DSNAME=&LNGPRFX..SIGYCOMP,        
//             DISP=SHR                          
//SYSLIB   DD  DISP=SHR,DSN=APPL.PROD.COPYLIB    
//SYSPRINT DD  SYSOUT=*                          
//SYSLIN   DD  DSNAME=&&amp;LOADSET,UNIT=SYSALLDA,   
//             DISP=(MOD,PASS),SPACE=(TRK,(3,3)),
//             DCB=(BLKSIZE=&SYSLBLK)            
//SYSUT1   DD                                    
//SYSUT2   DD                                    
//SYSUT3   DD                                    
//SYSUT4   DD                                    
//SYSUT5   DD                                    
//SYSUT6   DD                                    
//SYSUT7   DD                                    
//         PEND                                  

My execution of the proc is simply:
//S1       EXEC PROC=IGYWC,LNGPRFX=IGY            
//COBOL.SYSIN DD DISP=SHR,DSN=FJS.PDSE.COBOL(OBJ1)

This works, in that all of the SYSUTx DD's seem to have some sort of default 
space allocation.  I was just wondering what sort of space allocation it was 
defaulting to.  (I have not yet checked with my systems programmers.)

Frank

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to