Previous Topic: Dialog RESD3Next Topic: Employee-Record Report Application

CA ADS Batch Sample Applications › Employee-Record Restore Application › Executing the Application

Executing the Application

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

You should be able to use the same JCL and control statements that you used in the archive application (presented earlier in this section), with the exception of the ENTRY POINT control statement, which is shown below for the restore application:

ENTRY POINT TASK RESAPPL.

The contents of INFILE1 before the application is executed, and the contents of REPFILE1, SUSFILE1, and ADSLOGA after the application is executed are shown below.

Note: The restore application assumes that both the input file of employee ids and the archive file are ordered by employee id. Make sure that your input file is ordered properly.

INFILE1

3000
3010
4000
5001

REPFILE1

                TRANSACTION REPORT   DATE: 10/18/99   PAGE:  001
 EMPLOYEE ID    NAME                         STATUS

      3000      STERNS          JOSEPH       EMPLOYEE RESTORED
      3010      PETERSON        RUTH         EMPLOYEE ALREADY ON DATABASE
      4000                                   EMPLOYEE NOT FOUND
      5001      WATSON          BRIAN        EMPLOYEE RESTORED

SUSFILE1

3010
4000

ADSLOGA

IDMS DC506801 V1 SUSPENSE FILE SUSFILE1 ──  RECORD#   1  ──  IMAGE IS  '3010'
IDMS DC506801 V1 SUSPENSE FILE SUSFILE1 ──  RECORD#   2  ──  IMAGE IS  '4000'
***EOF ON INPUT***
IDMS DC507001 V1 BASE FILE INFILE1 CLOSED.
IDMS DC507003 V1   4 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   2 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.
IDMS DC507003 V1   3 LOGICAL RECORDS READ.
IDMS DC507001 V1 BASE FILE ARCFILE CLOSED.
IDMS DC507003 V1   3 LOGICAL RECORDS READ.
IDMS DC507002 V1 BASE DATASET MEN.C0600.MPK.ARCFILE CLOSED.
IDMS DC507003 V1   1 PHYSICAL RECORDS READ.
IDMS DC507001 V1 BASE FILE REPFILE1 CLOSED.
IDMS DC507004 V1   6 LOGICAL RECORDS WRITTEN.
IDMS DC507002 V1 BASE DATASET MEN.C0600.MPK.REPFILE1 CLOSED.
IDMS DC507004 V1   1 PHYSICAL RECORDS WRITTEN.