The Tape Volume Accounting Interface › Sample Reports › JR70TVA2 Report Sample › JR70TVA2 Execution Description

JR70TVA2 Execution Description

The control statements used in JR70TVA2 are described below. Complete descriptions of all CA JARS Wizard control statements can be found in the CA JARS Wizard Reference Guide.

PARAMETER

This control statement specifies options for a CA JARS Wizard run. XREF creates a cross reference of the data fields used in the run and the statements they are found in. This cross reference listing is printed in addition to the control statements and the report for the run.

INPUT

The INPUT statement lists the JR70CBF glossary as as the glossary for the primary input file for the run.

DEFINE

The three DEFINE statements define the following fields:

RENTDAYS:

Six byte field. Used to hold the number of days of tape volume usage.

CRTDT:

Three byte field. Used to hold the creation date (YYDDD) of the tape volume.

SCRDT:

Three byte field. Used to hold the expiration date (YYDDD) for the tape volume.

SELECT

The SELECT statement identifies the record type and subrecord type for the TVA billing record.

COMPUTE

The first COMPUTE statement evaluates the value of the account number contained in the billing record. It also defines a new field, OACCT (16 bytes), and assigns a value to it based on the results of the evaluation. If the account number is blank, OACCT is assigned the value of MISC.ACCOUNT. Otherwise, OACCT is assigned the value of the account number.

Notice the (P) suffix code appended to the first compute statement. This suffix indicates that the COMPUTE should take place before the primary input file is sorted. This is needed since the SORT occurs on OACCT field.

The remaining COMPUTE statements assign values to the fields: CRTDT, SCRTDT, and RENTDAYS.

SORT

This statement identifies the sequence in which the input records should be sorted prior to processing. Here the sort is performed on OACCT (the account number) and T.VOLUME/SERIAL (the tape's volume serial number).

BREAK

BREAK statements define logical groups of records. Here data is split into groups by account number. Records with the same account number is grouped together.

HEADING

HEADING specifies a title for the report. Here the title for the report is TAPE VOLUME USAGE BY ACCOUNT.

LIST

The LIST statement identifies the data elements to be printed. This includes:

• Account number
• Creation date (YYDDD)
• Expiration date (YYDDD)
• Days of volume usage