CA Dynam for VSE User Guide

Disk File Maintenance Utilities
Open an ISAM output file with Catalog Management:
// DLBL ISFILE,'ACCT.FILE',10
// EXEC DYNOPEN
OPEN FILE=ISFILE MODE=OUTPUT TYPE=IS DISK=3340 UNIT=SYS002
/*
Examples of Restarting Files:
Restart trigger-driven multi-extent files:
// JOB EXAMPLE1
// DLBL UIN,'TEST.INPUT'
// EXTENT SYS040,335000,1,0,1,3
// EXTENT SYS040,335000,1,3,1,2
// DLBL UOUT,'TEST.OUTPUT'
// EXTENT SYS041,335001,1,0,1,3
// EXTENT SYS041,335001,1,1,1,2
// ASSGN SYS007,181
// TLBL CHKPT
// MTC REW,SYS007
// EXEC DYNOPEN,SIZE=DYNOPEN
OPEN FILE=UIN,UNIT=SYS040,MODE=INPUT
OPEN FILE=UOUT,UNIT=SYS041,MODE=INPUT
/*
// RSTRT SYS007,10,CHKPT
/*
/&
* $$ EOJ
Restart a catalog-controlled generation data set:
// JOB EXAMPLE2
* ADD CHECKPOINTED GDG #3 AS CURRENT VERSION FOR RESTART *
// EXEC DYNCAT,SIZE=128K
ADD 'TEST.OUTPUT.CAT' DISK VOL=335001 GDSID=03 VER=001
/*
// DLBL UIN,'TEST.INPUT.CAT'
// DLBL UOUT,'TEST.OUTPUT.CAT'
// ASSGN SYS007,181
// TLBL CHKPT
// MTC REW,SYS007
// EXEC DYNOPEN,SIZE=DYNOPEN
OPEN FILE=UIN,UNIT=SYS040,MODE=INPUT
OPEN FILE=UOUT,UNIT=SYS041,MODE=INPUT
/*
// RSTRT SYS007,10,CHKPT
/*
/&
* $$ EOJ
5–10 User Guide