CA Dynam for VSE User Guide

Disk File Maintenance Utilities
Example 3:
Convert a job stream to relative track/block 1 without performing the
conversion of number of tracks/blocks.
Input:
// JOB DYNCONV TO REL TRACK 1
// EXEC DYNCONV
// JOB UPDATE
// DLBL MASTER,'MASTER FILE INPUT',2099/365
// EXTENT SYS010,111111,1,0,19,38
// DLBL RPTS,'UPDATE REPORT FILE',0
// EXTENT SYS010,111111,1,0,57,19
// ASSGN SYS010,DISK,VOL=111111,SHR
// EXEC UPDPROG
/*
/&
// JOB PRINT UPDATE RPTS
// DLBL RPTS,'UPDATE REPORT FILE'
// EXTENT SYS010,111111,1,0,57,19
// ASSGN SYS010,DISK,VOL=111111,SHR
// EXEC REPORTS
/&
*END
/&
Output:
// JOB UPDATE
// DLBL MASTER,'MASTER FILE INPUT',2099/365
// EXTENT SYS010,111111,1,0,1,38
// DLBL RPTS,'UPDATE REPORT FILE',0
// EXTENT SYS010,111111,1,0,1,19
// ASSGN SYS010,DISK,VOL=111111,SHR
// EXEC UPDPROG
/*
/&
// JOB PRINT UPDATE RPTS
// DLBL RPTS,'UPDATE REPORT FILE'
// EXTENT SYS010,111111,0,1,1,19
// ASSGN SYS010,DISK,VOL=111111,SHR
// EXEC REPORTS
/&
Chapter 5: Supporting Disk File Management 5–7