//JOB CARD
//**********************************************************************
//* DELETE PRE-EXISTING FILES
//**********************************************************************
//DEL1 EXEC PGM=IEFBR14
//DD1 DD DSN=userid.TDF.OUTPUT.DATA,
// DISP=(MOD,DELETE,DELETE),
// UNIT=USERDA,SPACE=(TRK,1)
//DD2 DD DSN=userid.TDF.OUTPUT.DATA,
// DISP=(MOD,DELETE,DELETE),
// UNIT=USERDA,SPACE=(TRK,1)
//*
//**********************************************************************
//* TDF STEP VERSION YYMM
//**********************************************************************
//*
//GDYN EXEC PGM=TDFYYMM,REGION=0K
//STEPLIB DD DSN=G5BHP.GEODYN2.LOAD,DISP=SHR
//*
//**********************************************************************
//* SEE SETUP EXAMPLES
//**********************************************************************
//*
//GO.FT05F001 DD userid.UNIT05.TDF.DATA,DISP=SHR
//*
//**********************************************************************
//* GENERAL PRINTER OUTPUT
//**********************************************************************
//*
//GO.FT06F001 DD SYSOUT=*
//*
//**********************************************************************
//* POLAR MOTION, BIH TABLES, SOLAR AND GEOMAGNETIC FLUX INPUT
//**********************************************************************
//*
//GO.FT02F001 DD DSN=ZCSBL.GDNTABLE.BIH.DATA,DISP=SHR,DCB=BUFNO=1
//*
//**********************************************************************
//* ALTIMETRY CROSSOVERS SCRATCH FILE
//* DUMMY IN CASE OF A NON - CROSSOVER RUN
//**********************************************************************
//*
//GO.FT20F001 DD DSN=&&UNIT20,DISP=(NEW,PASS),
// UNIT=SYSDA,SPACE=(CYL,(20,10),RLSE),
// DCB=(RECFM=VBS,LRECL=X,BLKSIZE=15476)
//**********************************************************************
//* SCRATCH FILE
//**********************************************************************
//FT21F001 DD DSN=&&SCRATCH,DISP=(NEW,DELETE),
// UNIT=SYSDA,SPACE=(CYL,20),DCB=(RECFM=U,BLKSIZE=18880)
//*
//**********************************************************************
//* TDF INPUT DATA IN THE FORMAT SPECIFIED ON COL 17 OF THE FORMAT CARD
//* THIS COULD BE ANY FILE WITHIN THE RANGE 22-40 BUT ONLY UP TO SIX (6)
//* UNITS CAN BE USED IN ONE RUN AT THE SAME TIME
//**********************************************************************
//*
//FT40F001 DD DSN=userid.TDF.INPUT.DATA,DISP=SHR
//*
//**********************************************************************
//* TDF OUTPUT DATA IN BLOCKED GEODYN II BINARY FORMAT.
//**********************************************************************
//*
//GO.FT41F001 DD DSN=userid.TDF.OUTPUT.DATA,DISP=(NEW,CATLG,DELETE),
// UNIT=USERDA,SPACE=(CYL,(20,10),RLSE),
// DCB=(RECFM=VBS,LRECL=X,BLKSIZE=15476)
//*
//**********************************************************************
//* COPY OF UNIT SETUP FROM UNIT 05
//**********************************************************************
//*
//GO.FT50F001 DD DSN=&&UNIT50,DISP=(NEW,DELETE),UNIT=SYSDA,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000),SPACE=(TRK,2,RLSE)
//*
//**********************************************************************
//* SUMMARY OF BLOCKED OUTPUT DATA
//**********************************************************************
//*
//FT90F001 DD SYSOUT=*
//*
Patrick Dahiroc
1998-09-10