03.03.2015 Views

CA Dynam for VSE User Guide

CA Dynam for VSE User Guide

CA Dynam for VSE User Guide

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Disk File Maintenance Utilities<br />

Output:<br />

// JOB PAYROLL WEEKLY RUN<br />

// DLBL PAYIN,'COMPANY NO.5 PAYROLL MASTER IN',2099/365<br />

// EXTENT SYS010,PAYPAK,1,0,1,16924<br />

// DLBL PAYOUT,'COMPANY NO.5 PAYROLL MASTER OUT',2099/365<br />

// EXTENT SYS010,PAYPAK,1,0,1,16924<br />

// ASSGN SYS010,DISK,VOL=PAYPAK,SHR<br />

// DLBL TRNIN,'COMPANY NO.5 TRANSACTIONS'<br />

// EXTENT SYS010,PAYPAK,1,0,1,484<br />

// EXEC PAYUPD<br />

/*<br />

/&<br />

Example 2:<br />

You have determined that a 2:1 allocation ratio is required <strong>for</strong> the files in a job<br />

stream. The files are already controlled by <strong>CA</strong> <strong>Dynam</strong>/D.<br />

Input:<br />

// JOB DYNCONV DYNAMIC JCL<br />

// ASSGN SYS001,READER<br />

// ASSGN SYSPCH,PUNCH<br />

// EXEC DYNCONV<br />

CONVERT OLDDEV=2 NEWDEV=1<br />

// JOB EDIT RUN<br />

// DLBL INPUT,'INPUT.TRANSACTIONS'<br />

// EXTENT SYS010,POOL01,1,0,1,19<br />

// DLBL OUTPUT,'EDITED.TRANSACTIONS'<br />

// EXTENT SYS010,POOL01,1,0,1,19<br />

// DLBL REJECTS,'EDIT.ERROR.TRANSACTIONS'<br />

// EXTENT SYS010,POOL01,1,0,1,8<br />

// EXEC EDITPROG<br />

/&<br />

*END<br />

/&<br />

Output:<br />

// JOB EDIT RUN<br />

// DLBL INPUT,'INPUT.TRANSACTIONS'<br />

// EXTENT SYS010,POOL01,1,0,1,38<br />

// DLBL OUTPUT,'EDITED.TRANSACTIONS'<br />

// EXTENT SYS010,POOL01,1,0,1,38<br />

// DLBL REJECTS,'EDIT.ERROR.TRANSACTIONS'<br />

// EXTENT SYS010,POOL01,1,0,1,16<br />

// EXEC EDITPROG<br />

/&<br />

5–6 <strong>User</strong> <strong>Guide</strong>

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!