Execute the OUTMOD Routine - FastExport

Teradata FastExport Reference

Product
FastExport
Release Number
16.10
Published
May 2017
Language
English (United States)
Last Update
2018-05-22
dita:mapPath
fmk1488824663357.ditamap
dita:ditavalPath
Audience_PDF_include.ditaval
dita:id
B035-2410
lifecycle
previous
Product Category
Teradata Tools and Utilities

Use the following z/OS JCL to execute FastExport and either the IBM C or the COBOL OUTMOD routine. The JOBLIB statements define both runtime libraries.

The IBM C procedures are required to support FastExport. The COBOL procedures are required only if an OUTMOD routine written in COBOL exists.

 //USEREXP   JOB (20750000),'USERNAME',MSGCLASS=A,NOTIFY=USER,
      //               CLASS=A,MSGLEVEL=(1,1),REGION=4096K
      //JOBLIB    DD DSN=TERADATA.TRLOAD,DSP=SHR
      //          DD DSN=TERADATA.APPLOAD,DISP=SHR
      //          DD DSN=SYS1.VSCOLIB,DISP=SHR
      //EXP       EXEC PGM=XPORT,REGION=4096K
      //SYSPRINT  DD  SYSOUT=*
      //SYSOUT    DD  SYSOUT=*
      //SYSTERM   DD  SYSOUT=*
      //OUTNAME   DD  DSN=USER.EXPORT.TEST1,DISP=(NEW,CATLG,DELETE),
      //          DCB=(NCP=20,RECFM=FB,LRECL=20,BLKSIZE=3200,DSORG=PS),
      //              UNIT=SYSDA,SPACE=(3200,(300,1))
      //FILE1OUT  DD  DSN=USER.EXPORT.TEST2,DISP=(NEW,CATLG,DELETE),
      //          DCB=(NCP=20,RECFM=FB,LRECL=20,BLKSIZE=3200,DSORG=PS),
      //              UNIT=SYSDA,SPACE=(3200,(1,1))
      //FILE2OUT  DD  DSN=USER.EXPORT.TEST3,DISP=(NEW,CATLG,DELETE),
      //              DCB=(NCP=20,RECFM=FB,LRECL=20,BLKSIZE=3200,DSORG=PS),
      //              UNIT=SYSDA,SPACE=(3200,(1,1))
      //SYSIN     DD  *
      .LOGTABLE TranLog;         /* define restart log              */
      .LOGON TDPV/USER,USER;     /* the logon string                */
      .BEGIN EXPORT              /* Specify export function         */
      SESSIONS 20;               /* number of sessions to be used   */
      .EXPORT OUTFILE OutName    /* identify the destination        */
      OUTMOD ChkTran;            /* file and the procedure          */
                                 /* to receive the records.         */
      SELECTRegion,              /* provide the SQL SELECT          */
         ProdCode,
         Quantity,
         Price
      From TranLogTable
      WHERE TranDate BETWEEN 911231 and 920701
      ORDER BY Region, ProdCode;
      .END EXPORT;               /* terminate FastExport            */
      .LOGOFF                    /* disconnect from the DBC         */