gtpi1m7bSystem Installation Support Reference

JCL Control Cards

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:

vv
The user's version of the TPF system

ssid
The user's subsystem ID

BSS
The basic subsystem.
Note:
All library names are referred to as per the TPF System Initialization Process (see TPF System Generation).

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:

MSG
This DD statement is used for error messages to the user.

SYSPRINT
This DD statement is used for messages from the MVS Sort/Merge program,which is invoked by VCRS.

SORTLIB
This DD statement points to the data set in which the modules of the Sort/Merge program reside.

SORTIN
This is a work data set through which VCRS passes records to the sort/merge program. A BLKSIZE value must be supplied.

SORTOUT
This is a work data set in which VCRS receives sorted records from the Sort/Merge program. You must supply DCB parameters with LRECL=28 plus a BLKSIZE value.

SORTWK01-3
These are DD statements for work space used by the Sort/Merge program.

PDS
This is a DD statement for the data set to be scanned. In the example, it is a concatenated data set of all TPF source libraries produced from SIP Stage II. As an alternative, if the referenced programs in the SYSIN data definition resided in a single data set, only that data set need to be specified. Normal MVS restrictions apply to the maximum number of concatenated data sets.

SYSLIB
This DD statement points to partitioned data sets in which VCRS looks for members named in COPY statements found in the primary input. Nested COPY statements are ignored, for example, code referred to by a COPY statement cannot have a COPY statement in itself. The SYSLIB DD statement is not needed if there are no COPY statements in the primary input. When searching TPF segments in the PDS data definition (when the PDS DD statement is included), the SYSLIB DD statement must include, at least, the library (ACP.SYMACRO.RELvv.ssid) that contains the SYGLB and SYSET segments. See TPF System Generation for more information.

SYSIN
This is a DD statement for the control card data set. These control cards are described below, in Control Card Input.

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
 

Control Card Input

The control card options provide the following facilities:

  1. Scan the entire PDS for every type of global variable.
  2. Scan a list of members for every type of global variable.
  3. Scan the entire PDS for 1 to 3 types of variables.
  4. Scan a list of members for 1 to 3 types of variables.
  5. Sort and print the globals found in the order specified.

Scan the Entire PDS for Every Type of Variable

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   *
/*
 

Scan a List of Members

 Format: 

LIST=name
LIST=(name1,name2,name3,...name(n))

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:

 Format: 

LIST=(BMGL,BMP0,CRTBC,
CRSM, CLWA,
CZXP,
CYYA)

Note:
A list must be enclosed in parentheses (if more than one name is supplied). If continued on the next line, the last name of the previous line must be followed by a comma. Only columns 1-71 can be used.

Subset of Variable Types Option

 Format: 

GLOBAL=type
GLOBAL=(type1,type2)
GLOBAL=(type1,type2,type3)
GLOBAL=(type)

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.

Note:
The list must be enclosed in parentheses (if more than one type is supplied). If continued on the next line, the last type of the previous line must be followed by a comma. Only columns 1-71 can be used.

Print the Globals Found in the Order Specified

 Format: 
SORT=how

where:

 how 
= TYP, or GLB, or SIP

Option Defaults

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.

Examples of Control Card Options

Example 1:
LIST=SYSEQ

List all global variables used in member SYSEQ.

Example 2:
LIST=SYCON,GLOBAL=A

List all type-A global variables used in member SYCON.

Example 3:
LIST=(EB0EB,RTCEQ,BACKC)

List all global variables used in EB0EB, RTCEQ, and BACKC.

Example 4:

LIST=(EB0EB,
RTCEQ,
BACKC)

An alternate way of showing Example 3.

Example 5:
GLOBAL=(A,C)

List all type-A and type C global variables in the PDS.

Example 6:
GLOBAL=(A, C)

An alternate way of showing Example 5.

Example 7:
LIST=(ST0TM,CINFC),GLOBAL=(A,B)

List all type-A and B global variables occurring in members ST0TM and CINFC.

Example 8:
SORT=GLB

List all of the variables referred in alphabetic order. Can be used with any of the other examples.