:JOB IOCDRD0,FIELD.SUPPORT,HP32002;RESTART;OUTCLASS=,2
:COMMENT
:COMMENT
:COMMENT     IOCDRD0 - MODULE 20
:COMMENT
:COMMENT
:PURGE P20P002C
:PURGE U20U002C
:BUILD U20U002C;CODE=USL;DISC=127,16
:FILE NEW=TEXT,NEW;TEMP;REC=-80,16,F,ASCII;DISC=2000,16,16
:SPL M20M002C.HP32002.SUPPORT,U20U002C,,S20S002C.HP32002.SUPPORT,*NEW
:RUN CROSSREF.PUB.SUPPORT
:PREP U20U002C,P20P002C;PMAP; &
:PATCH=128
:PURGE U20U002C
:SAVE P20P002C
:EOJ
