//JOB CARD
//**********************************************************************
//* DELETE PRE-EXISTING FILES
//**********************************************************************
//DEL1 EXEC PGM=IEFBR14
//DD1 DD DSN=userid.IFFILE.DATA,
// DISP=(MOD,DELETE,DELETE),
// UNIT=USERDA,SPACE=(TRK,1)
//DD2 DD DSN=userid.IFDATA.DATA,
// DISP=(MOD,DELETE,DELETE),
// UNIT=USERDA,SPACE=(TRK,1)
//DEL2 EXEC PGM=IEFBR14
//DD1 DD DSN=userid.IFFILE.DATA,
// DISP=(MOD,DELETE,DELETE),
// UNIT=USERDA,SPACE=(TRK,1)
//DD2 DD DSN=userid.IFDATA.DATA,
// DISP=(MOD,DELETE,DELETE),
// UNIT=USERDA,SPACE=(TRK,1)
//*
//**********************************************************************
//* GEODYN IIS STEP VERSION YYMM
//**********************************************************************
//*
//GDYN EXEC PGM=GIISyymm,REGION=0K
//STEPLIB DD DSN=G5BHP.GEODYN2.LOAD,DISP=SHR
//*
//**********************************************************************
//* SEE SETUP EXAMPLES
//**********************************************************************
//*
//GO.FT05F001 DD userid.UNIT05.DATA,DISP=SHR
//*
//**********************************************************************
//* GENERAL PRINTER OUTPUT
//**********************************************************************
//*
//GO.FT06F001 DD SYSOUT=*
//*
//**********************************************************************
//* JPL PLANETARY EPHEMERIS
//* FOR AVAILABLE EPHEMERIDES SEE VOLUME 3 SECTION 3.3
//**********************************************************************
//*
//GO.FT01F001 DD DSN=ZCSBL.EPHEMERS.DE200.DATA,DISP=SHR,DCB=BUFNO=1
//*
//**********************************************************************
//* POLAR MOTION, BIH TABLES, SOLAR AND GEOMAGNETIC FLUX INPUT
//**********************************************************************
//*
//GO.FT02F001 DD DSN=ZCSBL.GDNTABLE.BIH.DATA,DISP=SHR,DCB=BUFNO=1
//*
//**********************************************************************
//* OUTPUT INTERFACE FILE
//* CHANGE THE DCB TO FIXED BLOCK FOR ASCII FORMATTED FILE AND
//* ADD A "1" IN COL. 8 ON THE I64G2E INPUT CARD
//* DCB=(RECFM=FB,LRECL=132,BLKSIZE=15048,BUFNO=1)
//**********************************************************************
//*
//GO.FT11F001 DD DSN=userid.IFFILE.DATA,
// DISP=(NEW,CATLG,DELETE),
// UNIT=USERDA,SPACE=(TRK,400,RLSE),
// DCB=(RECFM=VBS,LRECL=X,BLKSIZE=15476,BUFNO=1)
//*
//**********************************************************************
//* DEFAULT GRAVITY FIELD (REQUIRED IF NO INPUT ON UNIT05)
//* NOTE THAT THIS IS A FILE WHICH HAS BEEN CREATED BY IIS
//* AUXILLIARY PROGRAM "GRAVITY" FROM NORMALIZED RECOEF CARDS
//* (GEODYN) OR GCOEF CARDS (GEODYN II)
//* THE USER MUST SPECIFY THE APPROPRIATE FILE NAME
//**********************************************************************
//*
//GO.FT12F001 DD DISP=SHR,DSN=userid.GRAVITY.FILE.DATA
//*
//**********************************************************************
//* INPUT DEFAULT AREA & MASS TABLE
//* THIS FILE IS NOT USED PRESENTLY IN GEODYN. ITS ORIGINAL PURPOSE
//* WAS TO PROVIDE DEFAULT SATELLITE PARAMETERS IN CASE THEY WERE NOT
//* PROVIDED BY THE USER ON THE SATPAR CARD
//**********************************************************************
//*
//GO.FT15F001 DD DUMMY
//*
//**********************************************************************
//* STATION GEODETIC FILE (OPTIONAL)
//* GEODYN READS THE STATIONS FROM THIS FILE IF THERE IS A ZERO ON
//* COLUMN 8 OF THE STAPOS CARD AND NO STATION COORDINATES ARE PROVIDED
//* ON UNIT 5. NOTE THAT THE STATION GEODETIC FILE ON UNIT 16 CAN NOT
//* HANDLE ADJUSTMENT INFORMATION CARDS OR STATION VELOCITY CARDS.
//**********************************************************************
//*
//GO.FT16F001 DD DUMMY
//*
//**********************************************************************
//* SIMULATED DATA SCHEDULING INFORMATION ONLY FOR SIMULATED DATA
//* GENERATION CAPABILITY. OTHERWISE DUMMY. SEE SETUP EXAMPLES.
//* IN CASE OF MEASUREMENT TYPES WHERE TRACKING STATIONS ARE NOT
//* INVOLVED THIS FILE IS DUMMY
//**********************************************************************
//*
//GO.FT17F001 DD DSN=userid.SIMDAT.DATA,DISP=SHR
//*
//**********************************************************************
//* WORK SPACE (FOR PLANETARY EPHEMERIS PROCESSING)
//**********************************************************************
//*
//GO.FT30F001 DD DSN=&&EPHM01,
// UNIT=SYSDA,DCB=(RECFM=VBS,LRECL=X,BLKSIZE=7384,BUFNO=1),
// SPACE=(TRK,250,RLSE)
//*
//**********************************************************************
//* INPUT DATA FILE CREATED BY THE TRACKING DATA FORMATTER
//* IN CASE OF ORBIT GENERATION ONLY OR SIMULATED DATA GENERATION
//* THIS FILE IS DUMMY
//**********************************************************************
//*
//GO.FT40F001 DD DSN=userid.TDF.INPUT.DATA,DISP=SHR
//*
//**********************************************************************
//* OUTPUT DATA IN GEODYN II BINARY FORMAT
//* IN CASE OF ORBIT GENERATION ONLY OR IN CASE OF SIMULATED DATA
//* GENERATION ONLY THIS FILE IS DUMMY.
//* CHANGE THE DCB TO FIXED BLOCK FOR ASCII FORMATTED FILE AND
//* ADD A "1" IN COL. 8 ON THE I64G2E INPUT CARD
//* DCB=(RECFM=FB,LRECL=132,BLKSIZE=15048,BUFNO=1)
//**********************************************************************
//*
//GO.FT41F001 DD DSN=userid.IFDATA.DATA,
// DISP=(NEW,CATLG,DELETE),
// UNIT=USERDA,SPACE=(TRK,20,RLSE),
// DCB=(RECFM=VBS,LRECL=X,BLKSIZE=15476,BUFNO=1)
//*
//**********************************************************************
//* WORK SPACE (OBSERVATION DIRECTORY RECORDS)
//**********************************************************************
//*
//GO.FT42F001 DD DSN=&&OBDR,
// UNIT=SYSDA,SPACE=(400,200),
// DCB=(RECFM=U,BLKSIZE=32000)
//*
//**********************************************************************
//* WORK SPACE (PASS BY PASS FILE)
//**********************************************************************
//*
//GO.FT43F001 DD DSN=&&PBIAS,
// UNIT=SYSDA,SPACE=(TRK,2,RLSE),
// DCB=(RECFM=VBS,LRECL=X,BLKSIZE=15476,BUFNO=1)
//*
//**********************************************************************
//* COPY OF INPUT SETUP FROM UNIT05
//**********************************************************************
//*
//GO.FT50F001 DD UNIT=SYSDA,DCB=(RECFM=FB,LRECL=80,BLKSIZE=3520,
// BUFNO=1),SPACE=(TRK,1)
//*
//**********************************************************************
//* SCRATCH FILE FOR ARC INFORMATION
//**********************************************************************
//*
//GO.FT52F001 DD DSN=&&ARCCOM,
// UNIT=SYSDA,
// SPACE=(TRK,2,RLSE),
// DCB=(RECFM=VBS,LRECL=X,BLKSIZE=15476,BUFNO=1)
//*
//GO.FT53F001 DD DSN=&&GDN53,
// UNIT=SYSDA,
// SPACE=(TRK,2,RLSE),
// DCB=(RECFM=VBS,LRECL=X,BLKSIZE=15476,BUFNO=1)
//*
//**********************************************************************
//* DEBUG OUTPUT
//**********************************************************************
//*
//GO.FT89F001 DD DUMMY
//GO.FT90F001 DD DUMMY
//GO.FT91F001 DD DUMMY
//
Patrick Dahiroc
1998-09-10