Either the TMINPUT data set or the ACTIVITY and DEFAULTS data sets can be input to TMSCONVR to produce TMSUPDTE control statements. The VOL and REP control statements are generated. However, VER control statements are not generated. Omit unused DD statements. DD DUMMY is an active file.
We recommend that you take whatever precaution is necessary to ensure the accuracy of the volume serial number and the data being replaced.
The minimum data that is required as input to TMSCONVR is the data set name and volume serial number.
//stepname EXEC PGM=TMSCONVR, // PARM='parm' //STEPLIB DD DSN=CAI.CTAPLINK,DISP=SHR //TMOUTPUT DD DSN=tmsupdte.control.statements,DISP=(NEW,CATLG,DELETE), // UNIT=SYSDA,SPACE=(space1), // [DCB=BLKSIZE=n*80] *NOTE //SORTOUT DD UNIT=SYSDA,SPACE=(space2) //TMSRPT DD SYSOUT=A //SORTLIB DD DSN=SYS1.SORTLIB,DISP=SHR //SYSOUT DD SYSOUT=A //SORTWK01 DD UNIT=SYSDA,SPACE=(TRK,(space),,CONTIG) //SORTWK02 DD UNIT=SYSDA,SPACE=(TRK,(space),,CONTIG) //SORTWK03 DD UNIT=SYSDA,SPACE=(TRK,(space),,CONTIG) //SORTWK04 DD UNIT=SYSDA,SPACE=(TRK,(space),,CONTIG) //SORTWK05 DD UNIT=SYSDA,SPACE=(TRK,(space),,CONTIG) //SORTWK06 DD UNIT=SYSDA,SPACE=(TRK,(space),,CONTIG) //TMINPUT DD DSN=input,DISP=OLD [//ACTIVITY DD DSN=master,DISP=OLD ] [//DEFAULTS DD DSN=defaults,DISP=OLD] //SYSWK01 DD UNIT=SYSDA,SPACE=(space2) //SYSIN DD * (control statements here) /*
Note: The BLKSIZE can be any multiple of the LRECL, 80. If no BLKSIZE is specified, the BLKSIZE defaults to 800.
Parameter Definitions
You can specify the following parameters in any order in the PARM= field. You can specify each parameter only once.
(Optional) Specifies the preferred output date format for date fields being converted. If no value is specified, DATEFMT=(DEFAULT) is used. This date format is also used as the SYSIN input date format, unless a different date format is specified in SYSIN. The date pattern that (fmt) indicates is limited to 10 bytes and must be enclosed in parentheses. For more information on valid date formats, see Overriding the Preferred Date Pattern.
Identifies the output record format. This parameter is required.
(Optional) Identifies the user exit load module name that TMSCONVR should use. You can rename this module but the new name cannot be TMSUPDTE, TMSEXPDT, or TMRECORD. The name can be a maximum of 8 bytes and must follow MVS naming conventions.
(Optional) Relates to the TMINPUT data set. Cannot be used with DEFAULTS=nn and/or MASTER=nn parameters. The value of nn specifies the number of physical records that make one logical record.
Default: 1
(Optional) Relates to the ACTIVITY data set. Cannot be used with the TMINPUT=nn parameter. The value of nn specifies the number of physical records that make one logical record.
Default: 1
(Optional) Relates to the DEFAULTS data set. Cannot be used with the TMINPUT=nn parameter. The value of nn specifies the number of physical records that make one logical record.
Default: 1
Causes NOCHAIN to be placed on the VOL control statement. This parameter indicates that the volume to be updated is the second or higher volume sequence of a multivolume data set.
Causes NODSN to be placed on the VOL control statement. This parameter indicates that you do not have to verify the data set name.
Causes NODSN and SCRATCH to be placed on the VOL control statement. This parameter indicates that updates to the TMC Volume record should be made only if the volume is in scratch status.
Causes the UNEXPIRE keyword to be placed on TMSUPDTE volume control statements, allowing the scratch bit to be turned off when TMSUPDTE is later executed.
(Optional) Specifies the number of errors that are accepted before the job takes a U0006 abend. The default is 50 and the maximum is 99999.
Default: 50
Limits: 99999
(Optional) Causes the default values to be placed into fields that are not specified on the input files. See Keywords and Their Use for valid keywords. The assigning of default values is based upon the keywords that the input data sets do not use.
Causes the NOINTAL keyword to be placed on TMSUPDTE volume control statements allowing the bypass of turning on the internally updated indicator.
JCL Considerations
Is the amount of space that is required for the number of records to be generated. The output record block size is 800 (80-byte records blocked by 10).
Is the amount of space that is required for records 386 bytes long, blocked 10 records per block. The product uses approximately one output record for each logical input record.
The input data set can reside on any input device as a sequential data set. If it is a member of a PDS (partitioned data set), it must be called as DSN=dsname (member) in the JCL. If it is statement input, it must be called as *,DCB=BLKSIZE=80 in the JCL. If it is NL tapes, the DCB data must be provided.
An example PARM list is:
PARM='TMSUPDTE,DATEFMT=(MMMDD YYYY),MASTER=02,NODSN,HEXZEROS'
TMSCONVR creates output records in TMSUPDTE format. All output dates are formatted according to the date pattern MMMDD YYYY. The ACTIVITY data set is read twice to make one logical record. The DEFAULTS data set is read one time to make one logical record. The VOL control statement in the output contains the keyword NODSN. Default values are assigned to fields not specified on the input files.
If there is no PARM list, TMSUPDTE default records are written to the TMOUTPUT data set. One physical record on the input data set is equal to one logical record.
Note: TMSCONVR does not create REP statements for the ZZUSER fields. If the statements are required, perform a manual update using TMSUPDTE.
|
Copyright © 2013 CA Technologies.
All rights reserved.
|
|