Running the TPEC to Trading Manager

About this task

Creating the TPEC Partner Extract file

About this task

The conversion tool requires a specific file from TPEC. It can be generated by running the following JCL:

//USERIEXT JOB ()

//****************************************************************

//** TPJ - DATABASE EXTRACT

//****************************************************************

//*

//DBEXT EXEC PGM=TPBDRIVE,REGION=4M,

// PARM='DATABASE-EXTRACT,PROD'

//REPORT DD SYSOUT=*

//TPSVSRT DD SYSOUT=*

//SYSOUT DD SYSOUT=*

//SYSPRINT DD SYSOUT=*

//SYSUDUMP DD SYSOUT=*

//*TEPLIB DD DSN=TSI.TP31.GAI.XA.LOAD,DISP=SHR

//STEPLIB DD DSN=TSI.TP31.DEV.XA.LOAD,DISP=SHR

// DD DSN=TSI.TP31.DST.XA.LOAD,DISP=SHR

//TPFORM1 DD DSN=TSI.TP31.D3.DEV.TPFORM1,DISP=SHR

//TPDATA1 DD DSN=TSI.TP31.D3.DEV.TPDATA1,DISP=SHR

//TPFIL11 DD DSN=TSI.TP31.D3.DEV.TPFIL11,DISP=SHR

//TPFIL21 DD DSN=TSI.TP31.D3.DEV.TPFIL21,DISP=SHR

//TPFIL31 DD DSN=TSI.TP31.D3.DEV.TPFIL31,DISP=SHR

//TPSTWK01 DD UNIT=SYSDA,SPACE=(CYL,(10,1))

//* ------------------------------------------------------------ *

//* EBCDIC OUTPUT FILE USED BY THE TPEC2CM CONVERSION TOOL *

//* ------------------------------------------------------------ *

//EXTRACT DD DSN=USER.TP31.EXTRACT,

// DISP=(NEW,CATLG),

// UNIT=SYSDA,

// SPACE=(TRK,(50,50),RLSE)

//* ------------------------------------------------------------ *

//* ASCII OUTPUT FILE NOT USED *

//* ------------------------------------------------------------ *

//DBXTBLE DD DSN=USER.TP31.DBXTBLE,

// DISP=(NEW,CATLG),

// UNIT=SYSDA,

// SPACE=(TRK,(50,50),RLSE)

//CONTROL DD *

EXTRACT PARTNERS

/*

Once the job completes FTP the file created by the EXTRACT DD name in ASCII mode and place it in the C:\install_dir\tmgr_vn.n_beta\platform_support\tpec2cm\ folder. Records are fixed length, make sure no trailing spaces are removed during the FTP.