Your Browser is not longer supported

Please use Google Chrome, Mozilla Firefox or Microsoft Edge to view the page correctly
Loading...

{{viewport.spaceProperty.prod}}

Using /ADD-FILE-LINK

&pagelevel(3)&pagelevel

Prior to calling TPCOMP2, the user must define a file link name for each tape file to be compared (/ADD-FILE-LINK):

First tape: LINK-NAME=COM001
Second tape: LINK-NAME=COM002

For non-cataloged tape files, a catalog entry must first be generated by means of /IMPORT-FILE.

The following parameters of the required commands can be specified:

Cataloged tape file
/ADD-FILE-LINK
   LINK-NAME=COM00X
   ,FILE-NAME=dateiname
   [,SUPPORT=*TAPE(VOLUME-LIST=*CATALOG(VOL-SEQ-NUM=n))]
Non-cataloged tape file
/IMPORT-FILE
   SUPPORT=*TAPE
   (VOLUME=archivnummer
   ,DEVICE-TYPE=XXXX
   ,FILE-NAME=dateiname
   [,PREMOUNT-LIST=n])
/ADD-FILE-LINK
   LINK-NAME=COM00X
   ,FILE-NAME=dateiname

In addition, the following operands may be specified in /ADD-FILE-LINK:

[,SUPPORT=*TAPE(LABEL-PROCESSNG=*PAR(LABEL-TYPE=...))]

When comparing two master tapes, LABEL-TYPE=*NON-STD must be entered. The type of labeling has to be specified via the program parameters in this case.

Examples

  1. The preset compare option is to be applied to a cataloged and a non-cataloged tape file.

    /ADD-FILE-LINK LINK-NAME=COM001,FILE-NAME=DATEI1
    /IMPORT-FILE SUPPORT=*TAPE(VOLUME=BAND1,DEVICE-TYPE=<device-type>, -
    /            FILE-NAME=DATEI2)
    /ADD-FILE-LINK LINK-NAME=COM002,FILE-NAME=DATEI2
    /START-EXECUTABLE-PROGRAM FROM-FILE=$TPCOMP2
    END
    

  2. Data located between the 4th and 5th tape marks on one magnetic tape is to be compared with data between the first 2 tape marks on another magnetic tape. Any discrepancies are to be output in EBCDIC mode on a 160-character printer. The tape files to be compared have both been cataloged.

    /ADD-FILE-LINK LINK-NAME=COM001,FILE-NAME=DATEI1
    /ADD-FILE-LINK LINK-NAME=COM002,FILE-NAME=DATEI2
    /START-EXECUTABLE-PROGRAM FROM-FILE=$.SYSPRG.TPCOMP2.210
    POS1 FTM00004,POS2 FTM00001
    COM  1GT00001
    END