1
0
mirror of https://github.com/moshix/mvs.git synced 2026-02-28 00:55:52 +00:00

Create FormatVSAM_on_VM.rexx

This commit is contained in:
moshix
2024-05-13 02:46:05 -05:00
committed by GitHub
parent 9ad8d7e1bf
commit 6eed6788d7

13
FormatVSAM_on_VM.rexx Normal file
View File

@@ -0,0 +1,13 @@
/* REXX EXEC to format a disk for a VSAM catalog*/
100.MAINLINE:
/* Direct your PUNCH to an unused RDR class*/
SPOOL PUNCH '*' CLASS P CONT
/* Put IPL FMT and its batch commands into your RDR */
'PUNCH IPL FMT * (NOH'
'PUNCH FORMAT DATA A (NOH'
SPOOL PUNCH '*' CLASS P CLOSE
/* Make sure IPL FMT heads the RDR queue */
'ORDER RDR CLASS P'
/* Invoke IPL FMT by IPLing your RDA */
'IPLOOC'
EXIT