CA ADS Batch Sample Applications › Employee-record Archive Application › Executing the Application

Executing the Application

You execute the application by executing the batch program ADSBATCH, as described in Runtime Considerations.

Physical File Characteristics

Characteristics of the physical files that the application accesses are shown below. Under z/OS, the JCL specifications or data set label for each file should specify the record formats, logical record lengths, and block sizes indicated. Under z/VSE, these characteristics should be specified in IDMSFILE control statements. The JCL for executing an CA ADS Batch application is provided in Runtime Considerations.

Control statements

The JCL can also include control statements. In the following sample set of control statements, you specify the application entry point, the requestor's id, and the ddname of the log file:

ENTRY POINT DIALOG ARCD1.
REQUESTOR MPK.
LOG FILE1= ADSLOGA.

The contents of INFILE1 before the application is executed, and the contents of REPFILE1, SUSFILE1, ARCFILE, and ADSLOGA after the application has been executed are shown below:

Note: The employee-record restore application, implemented later in this appendix, assumes that the archive file is ordered by employee id. Therefore, make sure that your input file for this application is also ordered by employee id.

INFILE1

3000
4000
5001

REPFILE1

1               TRANSACTION REPORT   DATE: 10/18/99   PAGE:  001
-EMPLOYEE ID    NAME                         STATUS
0     3000      STERNS          JOSEPH       RECORD ARCHIVED
      4000                                   RECORD NOT FOUND
      5001      WATSON          BRIAN        RECORD ARCHIVED

SUSFILE1

4000

ARCFILE

E40000123000JOSEPH    STERMS            100 HANGER DRIVE     BOSTON ...
C800101830102M232
C830103850601M232
E40000125001BRIAN     WATSON            300 ST CATHERINE W.  MONTREAL ...
C850101      D123

ADSLOGA

IDMS DC506801 V1 SUSPENSE FILE SUSFILE1 ──  RECORD#   1  ──  IMAGE IS  '4000'
***EOF ON INPUT***
IDMS DC507001 V1 BASE FILE INFILE1 CLOSED.
IDMS DC507003 V1   3 LOGICAL RECORDS READ.
IDMS DC507002 V1 BASE DATASET MEN.C0600.MPK.INFILE1 CLOSED.
IDMS DC507003 V1   1 PHYSICAL RECORDS READ.
IDMS DC507001 V1 BASE FILE ISUSFILE1 CLOSED.
IDMS DC507004 V1   1 LOGICAL RECORDS WRITTEN.
IDMS DC507002 V1 BASE DATASET MEN.C0600.MPK.SUSFILE1 CLOSED.
IDMS DC507004 V1   1 PHYSICAL RECORDS WRITTEN.
IDMS DC507001 V1 SUPPLEMENTARY FILE ARCFILE CLOSED.T
IDMS DC507004 V1   2 LOGICAL RECORDS WRITTEN.
IDMS DC507001 V1 BASE FILE ARCFILE CLOSED.E
IDMS DC507004 V1   3 LOGICAL RECORDS WRITTEN.
IDMS DC507002 V1 BASE DATASET MEN.C0600.MPK.ARCFILE CLOSED.
IDMS DC507004 V1   1 PHYSICAL RECORDS WRITTEN.
IDMS DC507001 V1 BASE FILE REPFILE1 CLOSED.
IDMS DC507004 V1   5 LOGICAL RECORDS WRITTEN.
IDMS DC507002 V1 BASE DATASET MEN.C0600.MPK.REPFILE1 CLOSED.
IDMS DC507004 V1   1 PHYSICAL RECORDS WRITTEN.