Previous Topic: Job Control StatementsNext Topic: Creating TMSEXPDT Output


Creating TMRECORD Output

Either the TMINPUT data set or the ACTIVITY and DEFAULTS data sets can be input to TMSCONVR to produce TMC record images. These records can then be input to TMSFORMT or TMSGRW.

The minimum data 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=tmrecord.images,
 //             DISP=(NEW,CATLG,DELETE),
 //             UNIT=SYSDA,SPACE=(space1),
 //             [DCB=BLKSIZE=N*340]                            *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=input,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, 340. If no BLKSIZE is specified, the BLKSIZE defaults to 6800.

Parameter Definitions

The following parameters may be specified in any order in the PARM= field. Each parameter may be specified only once.

DATEFMT=(fmt)

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 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.

TMRECORD

Identifies the output record format. This parameter is required.

UXCO=exit_name1

Identifies the user exit load module name that TMSCONVR uses. The UXCO module can be named anything. The name can be a maximum of eight bytes and must follow MVS naming conventions. This parameter is optional.

XITU=exit_name2

When using Alpha Numeric exits TMSXITU and TMSXITE, code the XITU exit name as a parameter. The name can be a maximum of eight bytes and must follow MVS naming conventions. This parameter is optional.

TMINPUT=[1|nn]

Relates to the TMINPUT data set. Cannot be used with the DEFAULTS=nn and/or ACTIVITY=nn parameters. The value of nn specifies the number of physical records that make one logical record. The default is 1. This parameter is optional.

MASTER=[1|nn]

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. The default is 1. This parameter is optional.

DEFAULTS=[1|nn]

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. The default is 1. This parameter is optional.

MAXERR=[50|nnnnn]

Specifies the number of errors accepted before the job takes a U0006 abend. The default is 50 and the maximum is 99999. This parameter is optional.

HEXZEROS

Causes the default values to be placed into fields not specified on the input file(s). See Keywords and Their Use. Optional.

JCL Considerations

space1

Is the amount of space required for the number of records to be generated. The output record block size is 3400 (340-byte records blocked by 10).

space2

Is the amount of space required for records 386-bytes long, blocked 10 records per block. There is approximately one output record for each logical input record.

TMINPUT or ACTIVITY DEFAULTS

The input data set may 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 on NL tapes, the DCB data must be provided. If it is statement input, it must be called as *,DCB=BLKSIZE=80 in the JCL.

An example PARM list is:

PARM='DATEFMT=(MMMDD YYYY),TMRECORD,MAXERR=99,HEXZEROS'

TMSCONVR creates output records in TMRECORD image format. All output dates are formatted according to the date pattern MMMDD YYYY. A maximum of 99 errors is accepted before the job terminates with a U006 abend. Values are assigned to fields not specified on the input files.