Utilities › TMSVMEDT Utility—Validate the Vault Pattern Description Data Set › Report Description › Job Control Statements

Job Control Statements

//TMSVMEDT EXEC PGM=TMSVMEDT
//             [,PARM='[DATEFMT=(fmt)][,IGNERRS][,TEST]']
//STEPLIB  DD  DSN=CAI.CTAPLINK,DISP=SHR
//TMSRPT   DD  SYSOUT=A                          <-- TMS REPORT 23
//VMSVPD   DD  DSN=&.&VMSVPD.,                     <-- OUTPUT FOR     *NOTES
//             DISP=(NEW,PASS,DELETE),               TMSVMVLT
//             UNIT=SYSDA,
//             SPACE=(CYL,(10,2)),
//             DCB=BLKSIZE=2640
//VMSTMC   DD  UNIT=SYSDA,
//             SPACE=(CYL,(10,2))
//VMSTMC2  DD  DSN=&.&VMSTMC2.,                    <-- OUTPUT FOR     *NOTES
//             DISP=(NEW,PASS,DELETE),               TMSVMVLT
//             UNIT=SYSDA,
//             SPACE=(CYL,(10,2)),
//             DCB=BLKSIZE=3960
//SYSOUT   DD  SYSOUT=A
//SYSPRINT DD  SYSOUT=A
//SORTLIB  DD  DSN=SYS1.SORTLIB,
//             DISP=SHR
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(2,2),,CONTIG)
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(2,2),,CONTIG)
//SORTWK03 DD  UNIT=SYSDA,SPACE=(CYL,(2,2),,CONTIG)
//SORTWK04 DD  UNIT=SYSDA,SPACE=(CYL,(2,2),,CONTIG)
//SORTWK05 DD  UNIT=SYSDA,SPACE=(CYL,(2,2),,CONTIG)
//SORTWK06 DD  UNIT=SYSDA,SPACE=(CYL,(2,2),,CONTIG)
//SYSIN    DD  *
(control statements here)
/*
//

Notes:

• The maximum record length for this file is 2636, variable block.
• The LRECL for this file is 396, fixed block.

Parameter Definitions

Three optional PARM values are available for use with TMSVMEDT:

DATEFMT=(fmt)

Specifies the date format to be printed on TMS Report 23. The date pattern indicated by (fmt) is limited to 10 bytes and must be enclosed in parentheses. This parameter is optional. For more information on valid date formats, see Overriding the Preferred Date Pattern.

Note: If a date pattern is defined and then subsequently revised, it may be necessary to reflect the pattern change in the VPD wherever the optional keyword, E=preferred date, appears in a Vault Pattern control statement. Read the caution text on Vault Pattern Control Statement and then revise the format of preferred date as necessary.

IGNERRS

Specifies error handling processes:

• Vault name errors will result in U4000-0006 ABEND.
• Duplicate data set names will result in a condition code of 8. The pattern associated with the first occurrence of the data set name is used.
• Any other errors will result in a condition code of 4.

TEST

Validates the VPD only. The output data sets VMSVPD, VMSTMC and VMSTMC2 are not created.

Completion Codes

When executed without any PARM values, TMSVMEDT will abend with a U4000-0006 if any error exists in the VPD. In a production mode, you are advised not to use any PARM values except DATEFMT.