gtpi1m7b | System Installation Support Reference |
Input to the program is the partitioned data set to be scanned. Sort modules from SYS1.LINKLIB and SYS1.SORTLIB are also required. If the code being scanned contains any COPY statements, the PDS containing the members to be copied must also be included as the SYSLIB data set.
Figure 35 shows the JCL required to run the VCRS program.
Figure 35. JCL Required to Run VCRS
//VCROSS EXEC PGM=VCRSvv,REGION=256K,TIME=20 //STEPLIB DD DSN=ACP.LINK.RELvv.ssid,DISP=SHR //MSG DD SYSOUT=A //SYSPRINT DD SYSOUT=A //SYSOUT DD SYSOUT=A //SORTLIB DD DSN=SYS1.SORTLIB,DISP=SHR //SORTIN DD UNIT=SYSDA,SPACE=(TRK,(5,10)),DCB=BLKSIZE=5600 //SORTOUT DD UNIT=SYSDA,SPACE=(TRK,(5,10)), // DCB=(RECFM=FB,LRECL=28,BLKSIZE=5600) //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,10,,CONTIG) //SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,10,,CONTIG) //SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,10,,CONTIG) //PDS DD DISP=SHR,DSN=ACP.SYMACRO.RELvv.ssid // DD DISP=SHR,DSN=ACP.MACRO.RELvv // DD DISP=SHR,DSN=ACP.SIPGEN.RELvv // DD DISP=SHR,DSN=ACP.SYSRCE.RELvv.ssid // DD DISP=SHR,DSN=ACP.SRCE.CP.RELvv (note - BSS only) // DD DISP=SHR,DSN=ACP.SRCE.RT1.RELvv // DD DISP=SHR,DSN=ACP.SRCE.RT2.RELvv // DD DISP=SHR,DSN=ACP.SRCE.RT3.RELvv // DD DISP=SHR,DSN=ACP.SRCE.OL.RELvv //SYSLIB DD DISP=SHR,DSN=ACP.SYMACRO.RELvv.ssid // DD DISP=SHR,DSN=ACP.MACRO.RELvv // DD DISP=SHR,DSN=ACP.SIPGEN.RELvv // DD DISP=SHR,DSN=ACP.SYSRCE.RELvv.ssid // DD DISP=SHR,DSN=ACP.SRCE.CP.RELvv (note - BSS only) // DD DISP=SHR,DSN=ACP.SRCE.RT1.RELvv // DD DISP=SHR,DSN=ACP.SRCE.RT2.RELvv // DD DISP=SHR,DSN=ACP.SRCE.RT3.RELvv // DD DISP=SHR,DSN=ACP.SRCE.OL.RELvv //SYSIN DD * LIST=(PROGRAM1,PROGRAM9) SORT=SIP GLOBAL=A /*
where:
The region or partition in which the job is run should be at least 82KB. A STEPLIB or JOBLIB card is needed if the VCRS program is in a user's library rather than in SYS1.LINKLIB. The rest of the JCL is described as follows:
The JCL for running this program can be simplified by using a cataloged or instream procedure. The sample JCL that follows shows use of an instream procedure:
//VCROSS PROC TYPE=OL,REL=95 //VCROSS EXEC PGM=VCRS,REGION=256K,TIME=20 //STEPLIB DD DSN=TPF.LINK.REL&REL //MSG DD SYSOUT=A //SYSPRINT DD SYSOUT=A //SYSOUT DD SYSOUT=A //SORTLIB DD DSN=SYS1.SORTLIB,DISP=SHR //SORTIN DD UNIT=SYSDA,SPACE=(TRK,(5,10)),DCB=BLKSIZE=5600 //SORTOUT DD UNIT=SYSDA,SPACE=(TRK,(5,10)), // DCB=(RECFM=FB,LRECL=28,BLKSIZE=5600) //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,10,,CONTIG) //SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,10,,CONTIG) //SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,10,,CONTIG) //PDS DD DISP=SHR,DSN=TPF.SRCE.&TYPE..REL&REL //SYSLIB DD DISP=SHR,DSN=TPF.SYMACRO.REL&REL // DD DISP=SHR,DSN=TPF.SRCE.&TYPE..REL&REL //SYSIN DD DUMMY // PEND //X EXEC VCROSS
The control card options provide the following facilities:
If no control cards are specified, all members in the PDS directory will be scanned for every variable type with default options. The SYSIN DD card can appear as one of the following:
//SYSIN DD DUMMY
or
//SYSIN DD * /*
One or more members can be supplied in the LIST option. If there is only one member in the list, parentheses are not required. The names are not required to be in any order.
A list can appear on several lines. The following example shows a list continued on more than one line:
where:
type = A, B, or C
One or more global variable types can be supplied in the GLOBAL option. If there is only one global type in the list, parentheses can be omitted. The types do not need to be in any order. Only the types specified will be searched for.
where:
The global variables found will be printed in alphabetic order in global type (first A, then B, then C).
The global variables found will be printed in global name alphabetic order, regardless of global type.
Only the SIP global variable found (for example, &X... and &S...) will be printed and in SIP alphabetic order (disregarding the first 3 characters of the name).
If you do not request options (see Scan The Entire PDS For Every Type Of Variable), the LIST option is not in effect (will scan entire PDS data definition, except PL/I members) (see Scan a List of Members), the GLOBAL option is set to GLOBAL=(A,B,C) (see Subset Of Variable Types Option), and the SORT=GLB option (see Print The Globals Found In the Order Specified) is in effect.
List all global variables used in member SYSEQ.
List all type-A global variables used in member SYCON.
List all global variables used in EB0EB, RTCEQ, and BACKC.
An alternate way of showing Example 3.
List all type-A and type C global variables in the PDS.
An alternate way of showing Example 5.
List all type-A and B global variables occurring in members ST0TM and CINFC.
List all of the variables referred in alphabetic order. Can be used with any of the other examples.