diff --git a/DCRTMDL6V.cmd b/DCRTMDL6V.cmd new file mode 100644 index 0000000..a8fecff --- /dev/null +++ b/DCRTMDL6V.cmd @@ -0,0 +1,36 @@ +CMD PROMPT('Create MEDDFN - 6 volumes') + +PARM KWD(MEDDFN) TYPE(*NAME) LEN(10) MIN(1) + + PROMPT('Media definition') + +PARM KWD(LIB) TYPE(*NAME) LEN(10) DFT(*CURLIB) + + SPCVAL((*CURLIB)) + + PROMPT('Library') + +PARM KWD(DEV) TYPE(*NAME) LEN(10) MIN(1) + + PROMPT('Tape library/device') + +PARM KWD(VOL1) TYPE(*CHAR) LEN(6) MIN(1) + + PROMPT('Volume 1') + +PARM KWD(VOL2) TYPE(*CHAR) LEN(6) MIN(1) + + PROMPT('Volume 2') + +PARM KWD(VOL3) TYPE(*CHAR) LEN(6) MIN(1) + + PROMPT('Volume 3') + +PARM KWD(VOL4) TYPE(*CHAR) LEN(6) MIN(1) + + PROMPT('Volume 4') + +PARM KWD(VOL5) TYPE(*CHAR) LEN(6) MIN(1) + + PROMPT('Volume 5') + +PARM KWD(VOL6) TYPE(*CHAR) LEN(6) MIN(1) + + PROMPT('Volume 6') + +PARM KWD(TEXT) TYPE(*CHAR) LEN(50) DFT(*BLANKS) + + PROMPT('Text description') + +PARM KWD(REPLACE) TYPE(*CHAR) LEN(4) RSTD(*YES) + + DFT(*NO) SPCVAL((*YES) (*NO)) + + PROMPT('Replace existing') \ No newline at end of file