开云体育

ctrl + shift + ? for shortcuts
© 2025 开云体育
  1. H390-MVS
  2. Topics

Why is this job asking for another 3350?

 

Working on getting CMD1 installed on a freshly genned MVS 3.8 (Jay Moseley instructions).

I am having trouble assembling; the job keeps asking me to mount a volume; the addresses are for 3350s, so apparently none of the 3350s I have mounted are appropriate, but I'll be darned if I can figure out what's wrong:

The proc:

//#ASML   PROC MEMBER=,
//             ASMLIB='CBT249.FILE266',
//             LINKLIB='MVS.CMDSBSYS.LINKLIB'
//#ASM    EXEC PGM=IFOX00,PARM=(DECK,TERM,NOLIST)
//SYSLIB   DD  DISP=SHR,DSN=&ASMLIB,DCB=BLKSIZE=32720
//         DD  DISP=SHR,DSN=SYS1.HASPSRC
//         DD  DISP=SHR,DSN=SYS1.MACLIB
//         DD  DISP=SHR,DSN=SYS1.AMODGEN
//SYSUT1   DD  UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50))
//SYSUT2   DD  UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50))
//SYSUT3   DD  UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50))
//SYSTERM  DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSPUNCH DD  DISP=(,PASS),UNIT=3350,VOL=SER=WORK00,
//             SPACE=(TRK,(90,50))
//SYSIN    DD  DISP=SHR,DSN=&ASMLIB.(&MEMBER.)
//#LINK  EXEC PGM=IEWL,
//             PARM='XREF,LET,LIST,AC=1,SIZE=(140K,6400)'
//SYSLIN   DD  DISP=(OLD,DELETE),DSN=*.#ASM.SYSPUNCH
//         DD  DDNAME=SYSIN
//SYSLIB   DD  DISP=SHR,DSN=&LINKLIB.
//SYSLMOD  DD  DISP=SHR,DSN=&LINKLIB.(&MEMBER.)
//SYSUT1   DD  UNIT=3350,VOL=SER=WORK00,SPACE=(TRK,(50,20))
//SYSPRINT DD  SYSOUT=*
//        PEND

The DASD allocations:

IEE450I 17.00.54 UNIT STATUS 157                                                  
 UNIT TYPE STATUS  VOLSER VOLSTATE   UNIT TYPE STATUS  VOLSER VOLSTATE             
 150  3350 S       MVSRES PRIV/RSDNT 151  3350 A       MVS000 PRIV/RSDNT           
 152  3350 A       PAGE00 PRIV/RSDNT 153  3350 A       SPOOL1 PRIV/RSDNT           
 180  3380 O       PUB000 PRIV/RSERV 190  3390 O       PUB001 PRIV/RSERV           
 220  2314 O       SORTW1  PUB/RSERV 221  2314 O       SORTW2  PUB/RSERV           
 222  2314 O       SORTW3  PUB/RSERV 223  2314 O       SORTW4  PUB/RSERV           
 224  2314 O       SORTW5  PUB/RSERV 225  2314 O       SORTW6  PUB/RSERV           
 251  3350 O       WORK00 STRG/RSDNT 252  3350 O       WORK01 PRIV/RSDNT           
 350  3350 O       SMP000 PRIV/RSDNT 700  3350 O       JES200  PUB/RSDNT           
 701  3350 O       JES201  PUB/RSDNT 702  3350 O       JES202  PUB/RSDNT           
 750  3350 O       CBT000 PRIV/RSDNT 751  3350 O       CBT001 PRIV/RSDNT           
 752  3350 O       CBT002 PRIV/RSDNT 753  3350 O       CBT003 PRIV/RSDNT           
 754  3350 A       SYSCPK PRIV/RSDNT

and the request for allocation

 IEF677I WARNING MESSAGE(S) FOR JOB MVS0290  ISSUED                                
 $HASP373 MVS0290  STARTED - INIT  1 - CLASS A - SYS HMVS                          
 IEF403I MVS0290 - STARTED - TIME=17.01.11                                         
 IEF244I INIT MVS0290 - UNABLE TO ALLOCATE 1 UNIT(S)                               
         AT LEAST 1 OFFLINE UNIT(S) NEEDED.                                        
 IEF489I INIT - 1 UNIT(S) NEEDED FOR SYS00001                                      
 IEF247I INIT - 154,155,156,157,250,253,254,255,256,257,351,352 OFFLINE            
 IEF247I INIT - 353,354,355,356,357,358,359,35A,35B,35C,35D,35E OFFLINE            
 IEF247I INIT - 35F,703,704,705,706,707,708,709,70A,70B,70C,70D OFFLINE            
 IEF247I INIT - 70E,70F,755,756,757,758,759,75A,75B,75C,75D,75E OFFLINE            
 IEF247I INIT - 75F OFFLINE                                                        
*02 IEF238D INIT - REPLY DEVICE NAME OR 'CANCEL'.

Those addresses are all 3350s...

I suspect I don't have my VATLST set up correctly, but I've tried every combination of attributes that I can think off.

WHAT AM I DOING WRONG?
 

Show us the whole job's JCL? It's not in the proc steps you have there.


On Sat, Jun 10, 2023 at 5:07?PM Doug Wegscheid <dwegscheid@...> wrote:

Working on getting CMD1 installed on a freshly genned MVS 3.8 (Jay Moseley instructions).

I am having trouble assembling; the job keeps asking me to mount a volume; the addresses are for 3350s, so apparently none of the 3350s I have mounted are appropriate, but I'll be darned if I can figure out what's wrong:

The proc:

//#ASML   PROC MEMBER=,
//             ASMLIB='CBT249.FILE266',
//             LINKLIB='MVS.CMDSBSYS.LINKLIB'
//#ASM    EXEC PGM=IFOX00,PARM=(DECK,TERM,NOLIST)
//SYSLIB   DD  DISP=SHR,DSN=&ASMLIB,DCB=BLKSIZE=32720
//         DD  DISP=SHR,DSN=SYS1.HASPSRC
//         DD  DISP=SHR,DSN=SYS1.MACLIB
//         DD  DISP=SHR,DSN=SYS1.AMODGEN
//SYSUT1   DD  UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50))
//SYSUT2   DD  UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50))
//SYSUT3   DD  UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50))
//SYSTERM  DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSPUNCH DD  DISP=(,PASS),UNIT=3350,VOL=SER=WORK00,
//             SPACE=(TRK,(90,50))
//SYSIN    DD  DISP=SHR,DSN=&ASMLIB.(&MEMBER.)
//#LINK  EXEC PGM=IEWL,
//             PARM='XREF,LET,LIST,AC=1,SIZE=(140K,6400)'
//SYSLIN   DD  DISP=(OLD,DELETE),DSN=*.#ASM.SYSPUNCH
//         DD  DDNAME=SYSIN
//SYSLIB   DD  DISP=SHR,DSN=&LINKLIB.
//SYSLMOD  DD  DISP=SHR,DSN=&LINKLIB.(&MEMBER.)
//SYSUT1   DD  UNIT=3350,VOL=SER=WORK00,SPACE=(TRK,(50,20))
//SYSPRINT DD  SYSOUT=*
//        PEND

The DASD allocations:

IEE450I 17.00.54 UNIT STATUS 157                                                  
 UNIT TYPE STATUS  VOLSER VOLSTATE   UNIT TYPE STATUS  VOLSER VOLSTATE             
 150  3350 S       MVSRES PRIV/RSDNT 151  3350 A       MVS000 PRIV/RSDNT           
 152  3350 A       PAGE00 PRIV/RSDNT 153  3350 A       SPOOL1 PRIV/RSDNT           
 180  3380 O       PUB000 PRIV/RSERV 190  3390 O       PUB001 PRIV/RSERV           
 220  2314 O       SORTW1  PUB/RSERV 221  2314 O       SORTW2  PUB/RSERV           
 222  2314 O       SORTW3  PUB/RSERV 223  2314 O       SORTW4  PUB/RSERV           
 224  2314 O       SORTW5  PUB/RSERV 225  2314 O       SORTW6  PUB/RSERV           
 251  3350 O       WORK00 STRG/RSDNT 252  3350 O       WORK01 PRIV/RSDNT           
 350  3350 O       SMP000 PRIV/RSDNT 700  3350 O       JES200  PUB/RSDNT           
 701  3350 O       JES201  PUB/RSDNT 702  3350 O       JES202  PUB/RSDNT           
 750  3350 O       CBT000 PRIV/RSDNT 751  3350 O       CBT001 PRIV/RSDNT           
 752  3350 O       CBT002 PRIV/RSDNT 753  3350 O       CBT003 PRIV/RSDNT           
 754  3350 A       SYSCPK PRIV/RSDNT

and the request for allocation

 IEF677I WARNING MESSAGE(S) FOR JOB MVS0290  ISSUED                                
 $HASP373 MVS0290  STARTED - INIT  1 - CLASS A - SYS HMVS                          
 IEF403I MVS0290 - STARTED - TIME=17.01.11                                         
 IEF244I INIT MVS0290 - UNABLE TO ALLOCATE 1 UNIT(S)                               
         AT LEAST 1 OFFLINE UNIT(S) NEEDED.                                        
 IEF489I INIT - 1 UNIT(S) NEEDED FOR SYS00001                                      
 IEF247I INIT - 154,155,156,157,250,253,254,255,256,257,351,352 OFFLINE            
 IEF247I INIT - 353,354,355,356,357,358,359,35A,35B,35C,35D,35E OFFLINE            
 IEF247I INIT - 35F,703,704,705,706,707,708,709,70A,70B,70C,70D OFFLINE            
 IEF247I INIT - 70E,70F,755,756,757,758,759,75A,75B,75C,75D,75E OFFLINE            
 IEF247I INIT - 75F OFFLINE                                                        
*02 IEF238D INIT - REPLY DEVICE NAME OR 'CANCEL'.

Those addresses are all 3350s...

I suspect I don't have my VATLST set up correctly, but I've tried every combination of attributes that I can think off.

WHAT AM I DOING WRONG?



--
Jay Maynard
  

//MVS0290 JOB  (SMP),
//             'Install CMD1',
//             CLASS=A,
//             MSGCLASS=A,
//             COND=(0,NE),
//             MSGLEVEL=(1,1),
//             REGION=4096K
//****
//*
//* Name: SYS1.SETUP.CNTL(MVS0290)
//*
//* Desc: Install CMD1, the # command subsystem
//*
//****
//*
//#ASML   PROC MEMBER=,
//             ASMLIB='CBT249.FILE266',
//             LINKLIB='MVS.CMDSBSYS.LINKLIB'
//#ASM    EXEC PGM=IFOX00,PARM=(DECK,TERM,NOLIST)
//SYSLIB   DD  DISP=SHR,DSN=&ASMLIB,DCB=BLKSIZE=32720
//         DD  DISP=SHR,DSN=SYS1.HASPSRC
//         DD  DISP=SHR,DSN=SYS1.MACLIB
//         DD  DISP=SHR,DSN=SYS1.AMODGEN
//SYSUT1   DD  UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50))
//SYSUT2   DD  UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50))
//SYSUT3   DD  UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50))
//SYSTERM  DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSPUNCH DD  DISP=(,PASS),UNIT=3350,VOL=SER=WORK00,
//             SPACE=(TRK,(90,50))
//SYSIN    DD  DISP=SHR,DSN=&ASMLIB.(&MEMBER.)
//#LINK  EXEC PGM=IEWL,
//             PARM='XREF,LET,LIST,AC=1,SIZE=(140K,6400)'
//SYSLIN   DD  DISP=(OLD,DELETE),DSN=*.#ASM.SYSPUNCH
//         DD  DDNAME=SYSIN
//SYSLIB   DD  DISP=SHR,DSN=&LINKLIB.
//SYSLMOD  DD  DISP=SHR,DSN=&LINKLIB.(&MEMBER.)
//SYSUT1   DD  UNIT=3350,VOL=SER=WORK00,SPACE=(TRK,(50,20))
//SYSPRINT DD  SYSOUT=*
//        PEND
//DMASM   PROC MEMBER=,
//             LINKMEM=,
//             ASMLIB='CBT249.FILE266',
//             LINKLIB='MVS.CMDSBSYS.LINKLIB'
//ASM     EXEC PGM=IFOX00,PARM=(DECK,TERM,NOLIST)
//SYSLIB   DD  DISP=SHR,DSN=&ASMLIB,DCB=BLKSIZE=32720
//         DD  DISP=SHR,DSN=SYS1.HASPSRC
//         DD  DISP=SHR,DSN=SYS1.MACLIB
//         DD  DISP=SHR,DSN=SYS1.AMODGEN
//SYSUT1   DD  UNIT=3390,VOL=SER=PUB000,SPACE=(TRK,(90,50))
//SYSUT2   DD  UNIT=3390,VOL=SER=PUB000,SPACE=(TRK,(90,50))
//SYSUT3   DD  UNIT=3390,VOL=SER=PUB000,SPACE=(TRK,(90,50))
//SYSTERM  DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSPUNCH DD  DISP=(,PASS),UNIT=3350,VOL=SER=WORK00,
//             SPACE=(TRK,(90,50))
//SYSIN    DD  DSN=&ASMLIB.(&MEMBER.),DISP=SHR
//LKED    EXEC PGM=IEWL,
//             PARM='XREF,LET,LIST,AC=1,SIZE=(140K,6400)'
//SYSLIN   DD  DISP=(OLD,DELETE),DSN=*.ASM.SYSPUNCH
//         DD  DDNAME=SYSIN
//SYSLIB   DD  DISP=SHR,DSN=&LINKLIB.
//SYSLMOD  DD  DISP=SHR,DSN=&LINKLIB.(&LINKMEM)
//SYSUT1   DD  UNIT=3350,VOL=SER=WORK00,SPACE=(TRK,(50,20))
//SYSPRINT DD  SYSOUT=*
//        PEND
//DMLINK  PROC LINKLIB='MVS.CMDSBSYS.LINKLIB'
//DMLINK  EXEC PGM=IEWL,
//             PARM='XREF,LET,LIST,RENT,REUS'
//SYSLIN   DD  DDNAME=SYSIN
//SYSLIB   DD  DISP=SHR,DSN=SYS1.LINKLIB
//SYSLMOD  DD  DISP=SHR,DSN=&LINKLIB
//SYSUT1   DD  UNIT=3350,VOL=SER=WORK00,SPACE=(TRK,(50,20))
//SYSPRINT DD  SYSOUT=*
//        PEND
//DMCOPY  PROC LINKLIB='MVS.CMDSBSYS.LINKLIB',
//             TARGLIB=
//DMCOPY  EXEC PGM=IEBCOPY
//SYSPRINT DD  SYSOUT=*
//SYSUT1   DD  DISP=SHR,DSN=&LINKLIB.
//SYSUT2   DD  DISP=SHR,DSN=&TARGLIB.
//SYSUT3   DD  UNIT=3350,VOL=SER=WORK00,SPACE=(TRK,(50,20))
//SYSUT4   DD  UNIT=3350,VOL=SER=WORK00,SPACE=(TRK,(50,20))
//DMCOMP  EXEC PGM=IEBCOPY
//SYSPRINT DD  SYSOUT=*
//SYSUT1   DD  DISP=SHR,DSN=&TARGLIB.
//SYSUT2   DD  DISP=SHR,DSN=&TARGLIB.
//SYSUT3   DD  UNIT=3350,VOL=SER=WORK00,SPACE=(TRK,(50,20))
//SYSUT4   DD  UNIT=3350,VOL=SER=WORK00,SPACE=(TRK,(50,20))
//SYSIN    DD  DUMMY
//        PEND
//ASMPR   EXEC #ASML,MEMBER=CMDPRINT
//ASM00   EXEC #ASML,MEMBER=CMDDUMMY,
//             PARM.#LINK='RENT,REUS,LET,LIST,SIZE=(140K,6400)'
//ASM01   EXEC #ASML,MEMBER=CMDSBCSC
//ASM02   EXEC #ASML,MEMBER=CMDSBINT
//ASM03   EXEC #ASML,MEMBER=CMDSBSYS,
//             PARM.#LINK='RENT,REUS,LET,AC=1,LIST,SIZE=(140K,6400)'
//ASM04   EXEC #ASML,MEMBER=CMDTSO
//ASM05   EXEC #ASML,MEMBER=CMDSBTSO
//ASM05A  EXEC #ASML,MEMBER=CMDSBMON
//ASM06   EXEC #ASML,MEMBER=CSCSB03D
//ASM07   EXEC #ASML,MEMBER=CSCSA03D
//#LINK.SYSIN DD *
 INCLUDE SYSLIB(CSCSB03D)
 ENTRY IEESA03D
/*
//ASM08   EXEC #ASML,MEMBER=CSCSC03D
//ASM09   EXEC #ASML,MEMBER=CSCSD03D
//ASM10   EXEC #ASML,MEMBER=CSCSE03D
//ASM11   EXEC #ASML,MEMBER=CSCSF03D
//ASM12   EXEC #ASML,MEMBER=CSCSG03D
//ASM13   EXEC #ASML,MEMBER=CSCSH03D
//ASM14   EXEC #ASML,MEMBER=CSCSI03D
//ASM15   EXEC #ASML,MEMBER=CSCSJ03D
//ASM16   EXEC #ASML,MEMBER=CSCSK03D
//ASM17   EXEC #ASML,MEMBER=CSCSL03D
//ASM17A  EXEC #ASML,MEMBER=CSCSZ03D
//ASM18   EXEC #ASML,MEMBER=CSCSM03D
//ASM19   EXEC #ASML,MEMBER=CSCSN03D
//ASM20   EXEC #ASML,MEMBER=CSCSO03D
//ASM21   EXEC #ASML,MEMBER=CSCSP03D
//ASM22   EXEC #ASML,MEMBER=CSCSQ03D
//ASM23   EXEC #ASML,MEMBER=CSCSR03D
//ASM24   EXEC #ASML,MEMBER=CSCSS03D
//ASM25   EXEC #ASML,MEMBER=CSCZB03D
//ASM26   EXEC #ASML,MEMBER=CSCZC03D
//ASM27   EXEC #ASML,MEMBER=CSCZJ03D
//ASM28   EXEC #ASML,MEMBER=CSCZP03D
//ASM29   EXEC #ASML,MEMBER=CSCZS03D
//ASM30   EXEC #ASML,MEMBER=CSCGA03D
//ASM31   EXEC #ASML,MEMBER=CSCGE03D
//ASM32   EXEC #ASML,MEMBER=CSCGF03D
//ASM33   EXEC #ASML,MEMBER=CSCGH03D
//ASM34   EXEC #ASML,MEMBER=CSCGJ03D
//ASM35   EXEC #ASML,MEMBER=CSCGO03D
//ASM36   EXEC #ASML,MEMBER=CSCGS03D
//ASM37   EXEC #ASML,MEMBER=CSCZA03D
//ASM38   EXEC #ASML,MEMBER=CSCGI03D
//ASM39   EXEC #ASML,MEMBER=CSCGU03D
//LNK40   EXEC DMLINK
//DMLINK.SYSIN DD *
 INCLUDE SYSLIB(IEFBR14)
 NAME CSCGQ03D(R)
//ASM41   EXEC DMASM,MEMBER=NSESE03D,LINKMEM=CSCSE03D
//ASM42   EXEC DMASM,MEMBER=NSESJ03D,LINKMEM=CSCSJ03D
//ASM43   EXEC DMASM,MEMBER=NSESL03D,LINKMEM=CSCSL03D
//ASM44   EXEC DMASM,MEMBER=NSEZJ03D,LINKMEM=CSCZJ03D
//ASM45   EXEC DMASM,MEMBER=NSEZS03D,LINKMEM=CSCZS03D
//ASM46   EXEC DMASM,MEMBER=NSEGF03D,LINKMEM=CSCGF03D
//ASM47   EXEC DMASM,MEMBER=NSEGJ03D,LINKMEM=CSCGJ03D
//ASM48   EXEC DMASM,MEMBER=NSEGS03D,LINKMEM=CSCGS03D
//ASMPR   EXEC #ASML,MEMBER=CMDPRINT
//DOCCMD1 EXEC PGM=CMDPRINT,PARM='01072'
//STEPLIB  DD  DISP=SHR,DSN=MVS.CMDSBSYS.LINKLIB
//SYSPRINT DD  SYSOUT=A
//SYSUDUMP DD  SYSOUT=A
#$#
                    VERSION
             $DOC         .COMMAND SUB-SYSTEM -   (ADDIT DOCUMENTATION)
             $HELP        .COMMAND SUB-SYSTEM -   (TSO HELP MEMBER)
             $HINTS       .COMMAND SUB-SYSTEM -   (ADDIT INSTALL HINTS)
             $JCL         .COMMAND SUB-SYSTEM -   (JCL TO RUN CMD1)
             $MODS        .COMMAND SUB-SYSTEM -   (MVSMODS IEBCOPY)
             CMDDOCTN     .COMMAND SUB-SYSTEM -   (DOCUMENTATION)
             CMDDUMMY     .COMMAND SUB-SYSTEM -   (CMDDUMMY MODULE)
             CMDINSTL     .COMMAND SUB-SYSTEM -   (INSTALLATION JCL)
             CMDPRINT     .COMMAND SUB-SYSTEM -   (DOCUMENTATION PRINT)
             CMDSBCSC     .COMMAND SUB-SYSTEM -   (CROSS-SYSTEM CNTRL)
             CMDSBINT     .COMMAND SUB-SYSTEM -   (INIT AND MONITOR)
             CMDSBMON     .COMMAND SUB-SYSTEM -   (STANDALONE MONITOR)
             CMDSBSYS     .COMMAND SUB-SYSTEM -   (PROCESSOR)
             CMDSBTSO     .COMMAND SUB-SYSTEM -   (TSO FULL SCREEN MON)
             CMDTSO       .COMMAND SUB-SYSTEM -   (TSO DIRECTOR)
             CSCGA03D     .COMMAND SUB-SYSTEM -   (A - ACTIVITY MON.)
             CSCGE03D     .COMMAND SUB-SYSTEM -   (E - EXCEPTION MON.)
             CSCGF03D     .COMMAND SUB-SYSTEM -   (F - FRAME USE GRAPH)
             CSCGH03D     .COMMAND SUB-SYSTEM -   (H - HELP FOR GRAPH)
             CSCGI03D     .COMMAND SUB-SYSTEM -   (I - JES2 INIT DISP)
             CSCGJ03D     .COMMAND SUB-SYSTEM -   (J - JOB CPU GRAPH)
             CSCGO03D     .COMMAND SUB-SYSTEM -   (O - I/O ACTIVITY)
             CSCGQ03D     .COMMAND SUB-SYSTEM -   (Q - QUE)
             CSCGS03D     .COMMAND SUB-SYSTEM -   (S - SYS. IND. GRAPH)
             CSCGU03D     .COMMAND SUB-SYSTEM -   (U -DASD SPACE DISPL)
CSCSA03D     IEESA03D     .COMMAND SUB-SYSTEM -   (#N -  D ENQ P1)
CSCSB03D     IEESB03D     .COMMAND SUB-SYSTEM -   (#N -  D ENQ P2)
CSCSC03D     IEESC03D     .COMMAND SUB-SYSTEM -   (#L -  D LINES)
CSCSD03D     IEESD03D     .COMMAND SUB-SYSTEM -   (#D -  COREZAP)
CSCSE03D     IEESE03D     .COMMAND SUB-SYSTEM -   (#A -  ASCB INFO)
CSCSF03D     IEESF03D     .COMMAND SUB-SYSTEM -   (#F -  D FRAMES)
CSCSG03D     IEESG03D     .COMMAND SUB-SYSTEM -   (#R -  D ALLOC)
CSCSH03D     IEESH03D     .COMMAND SUB-SYSTEM -   (#S -  D LPA)
CSCSI03D     IEESI03D     .COMMAND SUB-SYSTEM -   (#V -  D DEVICE)
CSCSJ03D     IEESJ03D     .COMMAND SUB-SYSTEM -   (#I -  D PAGES)
CSCSK03D     IEESK03D     .COMMAND SUB-SYSTEM -   (#C -  CALCULATOR)
CSCSL03D     IEESL03D     .COMMAND SUB-SYSTEM -   (#J -  D A)
CSCSZ03D     IEESZ03D     .COMMAND SUB-SYSTEM -   (#Z -  D A)
CSCSM03D     IEESM03D     .COMMAND SUB-SYSTEM -   (#H -  HELP)
CSCSN03D     IEESN03D     .COMMAND SUB-SYSTEM -   (#T -  D TIOT)
CSCSO03D     IEESO03D     .COMMAND SUB-SYSTEM -   (#M -  TSO SEND)
CSCSP0ED     IEESP03D     .COMMAND SUB-SYSTEM -   (#P -  D SU)
CSCSQ03D     IEESQ03D     .COMMAND SUB-SYSTEM -   (#Q -  ANALYZE ENQ)
CSCSR03D     IEESR03D     .COMMAND SUB-SYSTEM -   (#O -  I/O PENDING)
CSCSS03D     IEESS03D     .COMMAND SUB-SYSTEM -   (#E -  EXECUTE)
CSCZA03D     IEEZA03D     .COMMAND SUB-SYSTEM -   (##A -  ACTIVITY MON.)
CSCZB03D     IEEZB03D     .COMMAND SUB-SYSTEM -   (##B -  DEVICE MON.)
CSCZC03D     IEEZC03D     .COMMAND SUB-SYSTEM -   (##C -  CHANNEL MON.)
CSCZJ03D     IEEZJ03D     .COMMAND SUB-SYSTEM -   (##J -  JOB MON.)
CSCZP03D     IEEZP03D     .COMMAND SUB-SYSTEM -   (##P -  PAGING MON.)
CSCZS03D     IEEZS03D     .COMMAND SUB-SYSTEM -   (##S -  SYSIND MON.)
             NSEGF03D     .CMD SUB-SYS (NONSE) -  (F - FRAME USE GRAPH)
             NSEGJ03D     .CMD SUB-SYS (NONSE) -  (J - JOB CPU GRAPH)
             NSEGS03D     .CMD SUB-SYS (NONSE) -  (S - SYS. IND. GRAPH)
             NSESE03D     .CMD SUB-SYS (NONSE) -  (#A -  ASCB INFO)
             NSESJ03D     .CMD SUB-SYS (NONSE) -  (#I -  D PAGES)
             NSESL03D     .CMD SUB-SYS (NONSE) -  (#J -  D A)
             NSEZJ03D     .CMD SUB-SYS (NONSE) -  (##J -  JOB MON.)
             NSEZS03D     .CMD SUB-SYS (NONSE) -  (##S -  SYSIND MON.)
#$#
             MACROS VERSION  FOR CMDSBMON
             ALLOC    1.0 .MACRO NEEDED FOR CMDSBMON
             DYNSPACE 1.0 .MACRO NEEDED FOR CMDSBMON
             FREE     1.0 .MACRO NEEDED FOR CMDSBMON
             RCPBFRGS 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPBTU   1.0 .MACRO NEEDED FOR CMDSBMON
             RCPBTU2  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPCKID  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDDN   1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDDNRT 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDEBUG 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDFPL  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDINC  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDISP  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDS    1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDSECT 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDSN   1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDSNPD 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDSNRT 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDSRGR 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPDUMMY 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPENDD  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPFDDN  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPFDISP 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPFDSN  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPFHOLD 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPFORUS 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPFREE  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPIOPL  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPLINK  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPLOAD  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPLOCSW 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPLOCS1 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPLOCS2 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPMCA   1.0 .MACRO NEEDED FOR CMDSBMON
             RCPNTU   1.0 .MACRO NEEDED FOR CMDSBMON
             RCPPERM  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPPPL   1.0 .MACRO NEEDED FOR CMDSBMON
             RCPPROC  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPPSWD  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPQNAME 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPRNGE  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPSPACE 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPSPEC  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPSR2   1.0 .MACRO NEEDED FOR CMDSBMON
             RCPSSREQ 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPSUBL  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPSYSOU 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPTU    1.0 .MACRO NEEDED FOR CMDSBMON
             RCPTUBFR 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPTXTL  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPTYPE  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPUNALC 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPUNIT  1.0 .MACRO NEEDED FOR CMDSBMON
             RCPVCHAR 1.0 .MACRO NEEDED FOR CMDSBMON
             RCPVOLRT 1.0 .MACRO NEEDED FOR CMDSBMON
             S99FAIL  1.0 .MACRO NEEDED FOR CMDSBMON
#$#
                   VERSION
             CSCGQQ00 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - QUEUECMN)
             CSCGQQ01 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - QUEUE)
             CSCGQQ02 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - ALLOCATE)
             CSCGQQ03 1.1 .CMD SUB-SYSTEM -       (Q - QCMD - CKPT)
             CSCGQQ04 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - DDNAME)
             CSCGQQ05 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - DISPLAY)
             CSCGQQ05 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - DISPLAY)
             CSCGQQ06 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - FINDJOB)
             CSCGQQ07 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - FORMAT)
             CSCGQQ08 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - HELP)
             CSCGQQ09 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - HEXBLK)
             CSCGQQ10 1.1 .CMD SUB-SYSTEM -       (Q - QCMD - INIT)
             CSCGQQ11 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - JCL)
             CSCGQQ12 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - JLOG)
             CSCGQQ13 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - JMSG)
             CSCGQQ14 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - LIST)
             CSCGQQ15 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - LISTDS)
             CSCGQQ16 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - PARSE)
             CSCGQQ17 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - READSPC)
             CSCGQQ18 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - REPOS)
             CSCGQQ19 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - SAVE)
             CSCGQQ20 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - SEARCH)
             CSCGQQ21 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - SYSLOG)
             CSCGQQ22 1.0 .CMD SUB-SYSTEM -       (Q - QCMD - XDS)
#$#
                   VERSION
             MACROS VERSION  FOR THE QUE COMMAND
             $JQT     1.0 .MACRO NEEDED FOR QUEUE
             QCLNK    1.0 .MACRO NEEDED FOR QUEUE
             QCOMMON  1.1 .MACRO NEEDED FOR QUEUE
             QSTART   1.1 .MACRO NEEDED FOR QUEUE
             QSTOP    1.0 .MACRO NEEDED FOR QUEUE
             QTILT    1.0 .MACRO NEEDED FOR QUEUE
/*
//DOCCMD2 EXEC PGM=CMDPRINT,PARM='01072'
//STEPLIB  DD  DISP=SHR,DSN=CBT.CMDSBSYS.LINKLIB
//SYSPRINT DD  SYSOUT=A
//SYSUDUMP DD  SYSOUT=*
//SYSIN    DD  DISP=SHR,DSN=CBT249.FILE266(CMDDOCTN)
//ADD1    EXEC PGM=IEBUPDTE,PARM=NEW
//SYSPRINT DD  SYSOUT=*
//SYSUT2   DD  DISP=SHR,DSN=SYS1.PROCLIB
//SYSIN    DD  DATA,DLM='><'
./ ADD NAME=CMD1
//CMD1   PROC  A=ASE0,
//             B='$',
//             C=CSK0,
//             D=DSD0,
//             E=ESS0,
//             F=FSF0,
//             G='$',
//             H=HSM0,
//             I=ISJ0,
//             J=JSL0,
//             K='$',
//             L=LSC0,
//             M=MSO0,
//             N=NSA0,
//             O=OSR0,
//             P=PSP0,
//             Q=QSQ0,
//             R=RSG0,
//             S=SSH0,
//             T=TSN0,
//             U='$',
//             V=VSI0,
//             W='$',
//             X='$',
//             Y='$',
//             Z=ZSZ0
//CMD1  EXEC PGM=CMDSBINT,TIME=1440,DPRTY=(15,10),
// PARM='&A&B&C&D&E&F&G&H&I&J&K&L&M&N&O&P&Q&R&S&T&U&V&W&X&Y&Z'
//*CSC#ASYS  DD  DUMMY
//*CSC#BSYS  DD  DUMMY
//*CSC#CSYS  DD  DUMMY
//*CSCDATA   DD  DSN=SYS1.SYSTEM.CMDSBSYS.CSCDATA,DISP=SHR
//*
//*      WHERE  -    FOR CSC#.... REPLACE .... WITH SMF SYSID OF ONE
//*                  OF THE SYSTEMS USING CROSS-SYSTEM COMMANDS.
//*                  AS MANY CSC#.... DD CARDS AS NECESSARY MAY EXIST.
//*
./ ADD NAME=CMDSBMON                          CHANGE THIS CARD TO ./
//CMDSBMON PROC U=0C3
//MONITOR EXEC PGM=CMDSBMON,PARM='&U.',REGION=8000K
//SYSUDUMP DD  SYSOUT=Z
//CMDLOG   DD  SYSOUT=Z
//CSCDATA  DD  DSN=SYS1.SYSTEM.CMDSBSYS.CSCDATA,DISP=SHR
//*   WHERE  XXX  IS THE 3270 UNIT ADDRESS
><
//ADD2    EXEC PGM=IEBUPDTE,PARM=NEW
//SYSPRINT DD  SYSOUT=*
//SYSUT2   DD  DISP=SHR,DSN=SYS1.UMODCNTL
//SYSIN    DD  DATA,DLM='><'
./ ADD NAME=ZUM0004
//ZUM0004 JOB  (SMP),
//             'INSTALL ZUM0004',
//             CLASS=A,
//             MSGCLASS=A,
//             MSGLEVEL=(1,1),
//             REGION=4096K
//****
//*
//* Name: SYS1.UMODCNTL(ZUM0004)
//*
//* Desc: INSTALL USERMOD ZUM0004
//*       Add an entry to the subsystem name table
//*
//****
//*
//RESTORE EXEC SMPACC
//SMPCNTL  DD  *
  RESTORE  SELECT(ZUM0004 ZUM0006).
//RECEIVE EXEC SMPREC
//SMPPTFIN DD  *
++USERMOD (ZUM0004) .
++VER (Z038) FMID(EBB1102)
  SUP(ZUM0006)
  /*
   Add entries to subsystem name table
  */ .
++ ZAP (IEFJESNM) .
 NAME IEFJESNM
 VER 000C 00000000   from X'00000000' empty slot
 REP 0008 C2E2D8F1     to C'BSP1'     (from ZUM0006)
 REP 000C C3D4C4F1     to C'CMD1'     added subsystem name
 IDRDATA ZUM0006
/*
//SMPCNTL  DD  *
  REJECT   SELECT(ZUM0004).
  RESETRC.
  RECEIVE SELECT(ZUM0004).
/*
//APPLY   EXEC SMPAPP
//SMPCNTL  DD  *
  APPLY SELECT(ZUM0004) DIS(WRITE).
><
//ADD3    EXEC PGM=IEBUPDTE,PARM=NEW
//SYSPRINT DD  SYSOUT=*
//SYSUT2   DD  DISP=SHR,DSN=SYS1.PARMLIB
//SYSIN    DD  DATA,DLM='><'
./ ADD NAME=COMMND01
COM='S CMD1'
COM='S JES2,,,PARM='WARM,NOREQ''
COM='S BSPPILOT,PARM=NOWTO'
COM='S BSPSETPF,PARM=NOREPLYU'
./ ADD NAME=IEASYS01
 APF=00,                      Suffix for authorized lib list IEAAPFxx
 APG=07,                      Automatic Prority Group
 BLDLF=BA,                    Suffix for BLDL list IEABLDxx
 CLPA,                        Do a CLPA at IPL time
 CMD=01,                      Automatic commands from COMMND00
 CSA=2048,                    Size of CSA  (2M minimum because VTAM)
 CVIO,                        clear VIO datasets on IPL
 DUMP=DASD,                   place dumps on DASD, list at IPL
 DUPLEX=SYS1.DUPLEX,          name of DUPLEX dataset
 FIX=01,                      list of fixed modules IEAFIXxx
 HARDCPY=(30E,ALL,CMDS),      Provide hardcopy on 30E device
 IPS=00,                      Performace options from IEAIPSxx
 LNK=00,                      Use link list from LNKLSTxx
 LOGCLS=L,                    JES2 log sysout class
 LOGLMT=999999,               WTL messages queued
 MAXUSER=20,                  System tasks+Initiators+TSO users max
 OPI=YES,                     OPeration Intervention is allowed
 OPT=00,                      Tuning parms from IEAOPTxx
 PAGE=(SYS1.PAGELPA,          LPA page dataset name                    X
               SYS1.PAGECSA,  COMMON page dataset name                 X
               SYS1.PAGEL01,  LOCAL 1 page dataset                     X
               SYS1.PAGEL02,  LOCAL 2 page dataset                     X
               L)             list page datsets at IPL time
 REAL=128,                    allow at most 128K for V=R address spaces
 RSU=0,                       no reconfigureable storage units
 SMF=00,                      use smf parameters from SMFPRMxx
 SQA=3,                       add 3 64K areas to SQA
 SWAP=SYS1.PAGES01,           name of swap dataset
 VAL=00,                      Volume Attribute List VATLSTxx
 VRREGN=64,                   Default region size for V=R
 WTOBFRS=250,                 Number of WTO buffers
 WTOEPLY=10                   Number of WTOR buffers
./ ADD NAME=IEAFIX01
SYS1.LPALIB CMDDUMMY
><
//SUBMIT  EXEC PGM=IEBGENER
//SYSPRINT DD  DUMMY
//SYSIN    DD  *
//SYSUT1   DD  DISP=SHR,DSN=SYS1.UMODCNTL(ZUM0004)
//SYSUT2   DD  SYSOUT=(A,INTRDR)
//COPY1   EXEC DMCOPY,TARGLIB='SYS2.LINKLIB'
//SYSIN  DD  *
 C I=SYSUT1,O=SYSUT2
 S M=((CMDPRINT,,R))
 S M=((CMDSBCSC,,R))
 S M=((CMDSBINT,,R))
 S M=((CMDSBSYS,,R))
 S M=((CMDSBMON,,R))
 S M=((CSCSA03D,,R))
 S M=((CSCSC03D,,R))
 S M=((CSCSD03D,,R))
 S M=((CSCSE03D,,R))
 S M=((CSCSF03D,,R))
 S M=((CSCSG03D,,R))
 S M=((CSCSH03D,,R))
 S M=((CSCSI03D,,R))
 S M=((CSCSJ03D,,R))
 S M=((CSCSK03D,,R))
 S M=((CSCSL03D,,R))
 S M=((CSCSM03D,,R))
 S M=((CSCSN03D,,R))
 S M=((CSCSO03D,,R))
 S M=((CSCSP03D,,R))
 S M=((CSCSQ03D,,R))
 S M=((CSCSR03D,,R))
 S M=((CSCSS03D,,R))
 S M=((CSCSZ03D,,R))
 S M=((CSCZA03D,,R))
 S M=((CSCZB03D,,R))
 S M=((CSCZC03D,,R))
 S M=((CSCZJ03D,,R))
 S M=((CSCZP03D,,R))
 S M=((CSCZS03D,,R))
/*
//COPY2 EXEC DMCOPY,TARGLIB='SYS1.LPALIB'
//SYSIN  DD  *
 C I=SYSUT1,O=SYSUT2
 S M=((CMDDUMMY,,R))
 S M=((CSCSA03D,IEESA03D,R))
 S M=((CSCSC03D,IEESC03D,R))
 S M=((CSCSD03D,IEESD03D,R))
 S M=((CSCSE03D,IEESE03D,R))
 S M=((CSCSF03D,IEESF03D,R))
 S M=((CSCSG03D,IEESG03D,R))
 S M=((CSCSH03D,IEESH03D,R))
 S M=((CSCSI03D,IEESI03D,R))
 S M=((CSCSJ03D,IEESJ03D,R))
 S M=((CSCSK03D,IEESK03D,R))
 S M=((CSCSL03D,IEESL03D,R))
 S M=((CSCSM03D,IEESM03D,R))
 S M=((CSCSN03D,IEESN03D,R))
 S M=((CSCSO03D,IEESO03D,R))
 S M=((CSCSP03D,IEESP03D,R))
 S M=((CSCSQ03D,IEESQ03D,R))
 S M=((CSCSR03D,IEESR03D,R))
 S M=((CSCSS03D,IEESS03D,R))
 S M=((CSCSZ03D,IEESZ03D,R))
 S M=((CSCZA03D,IEEZA03D,R))
 S M=((CSCZB03D,IEEZB03D,R))
 S M=((CSCZC03D,IEEZC03D,R))
 S M=((CSCZJ03D,IEEZJ03D,R))
 S M=((CSCZP03D,IEEZP03D,R))
 S M=((CSCZS03D,IEEZS03D,R))
/*
//COPY3 EXEC DMCOPY,TARGLIB='SYS2.CMDLIB' FULL SCREEN FOR TSO AND OPER
//SYSIN  DD  *
 C I=SYSUT1,O=SYSUT2
 S M=((CMDTSO,,R))
 S M=((CMDSBTSO,,R))
 S M=((CSCGA03D,,R))        ACTIVITY MONITOR
 S M=((CSCGE03D,,R))        EXCEPTION MONITOR
 S M=((CSCGF03D,,R))        JOB FRAME MONITOR
 S M=((CSCGH03D,,R))        HELP FOR GRAPH MONITORS
 S M=((CSCGI03D,,R))        JES2 INIT DISPLAY
 S M=((CSCGJ03D,,R))        JOB CPU MONITOR
 S M=((CSCGO03D,,R))        I/O ACTIVITY MONITOR
 S M=((CSCGQ03D,,R))        QUE COMMAND
 S M=((CSCGS03D,,R))        SYSTEM IND. GRAPH
 S M=((CSCGU03D,,R))        DASD FREE SPACE
/*
//

 

开云体育

On 11/06/2023 8:07 am, Doug Wegscheid wrote:
 IEF244I INIT MVS0290 - UNABLE TO ALLOCATE 1 UNIT(S)                  
         AT LEAST 1 OFFLINE UNIT(S) NEEDED.               
 IEF489I INIT - 1 UNIT(S) NEEDED FOR SYS00001

Note that SYS00001 is a dynamically generated DD name so it is probably not directly about the allocation for a DD you have coded.

I will guess and say it is for a catalog.

Before submitting the job, make sure you can access all the MVS.** and CBT249.** data sets (and any others referenced) from a TSO session.

Cheers,
Greg
 

On Sun, Jun 11, 2023 at 12:49 AM, Greg Price wrote:

I will guess and say it is for a catalog.

Before submitting the job, make sure you can access all the MVS.** and CBT249.** data sets (and any others referenced) from a TSO session.

I checked, and can access the CBT249.* and MVS.*, but it's catalog related; I put a blank 3350 online and told it to use that, and it asked for a mount for volume CBTCAT, so I apparently messed up when connecting up my CBT volumes. Will go back to last backup and try again.

Thanks!
 

I had the wrong CBT volumes loaded; I had ones from 2001 (CBT000..CBT003); I wanted later ones (CBT000..CBT002, CBTCAT). That problems resolved; now to tear into SOC4 in IEWL...
 

开云体育

A few S0C4's that I got in sysgen were resolved by increasing the values in SPACE parameter.

Khalid

On 6/11/2023 9:58 AM, Doug Wegscheid wrote:

I had the wrong CBT volumes loaded; I had ones from 2001 (CBT000..CBT003); I wanted later ones (CBT000..CBT002, CBTCAT). That problems resolved; now to tear into SOC4 in IEWL...
 

The SOC4 weren't on the sysgen, they were when runnig IEWL while building CMD1. All the IEWL steps had 'SIZE=' parameters; I got rid of those, and all is well.
 

Do you have the updated JCL you used to install it on a sysgen-ed system?

1 - 9 of 9