¿ªÔÆÌåÓý

Re: novice help with cmsbatch job output


 

¿ªÔÆÌåÓý

If you add an

?

¡°CP SPOOL CONS CMSUSER * START¡±

?

At the start and a

?

¡°SP CPOOL CONS STOP CLOSE¡±

?

At the end you can see what is wrong. This shows me the LINK has a spelling mistake, and I believe that SPOOL commands are missing a device type. I tweaked it :-

?

/JOB CMSUSER CMSUSER JOB10

CP SPOOL CONS CMSUSER START

CP LINK CMSUSER 191 291 RR READ

ACCESS 291 B/A

CP MSG CMSUSER TESTING CMSBATCH

CP SPOOL PRT TO CMSUSER NOCONT

PRINT HELLO FORTRAN

CP SPOOL PRT CLOSE

CP SPOOL PRT OFF

RELEASE 291

CP DETACH 291

CP MSG CMSUSER END JOB

CP SPOOL CONS STOP CLOSE

/*

?

And I get :-

?

pun test cards

PUN FILE 0701? TO? CMSBATCH COPY 01 NOHOLD

Ready; T=0.01/0.01 18:15:16

18:15:16? MSG FROM CMSBATCH:? JOB 'JOB10' STARTED.

18:15:16? MSG FROM CMSBATCH:? TESTING CMSBATCH

PRT FILE 0703 FROM CMSBATCH COPY 01 NOHOLD

18:15:16? MSG FROM CMSBATCH:? END JOB

CON FILE 0702 FROM CMSBATCH COPY 01 NOHOLD

18:15:16? MSG FROM CMSBATCH:? JOB 'JOB10' ENDED.

?

This sends the PRINT and console file to CMSUSER.

If you want output on the real printer change line 6 to

?

¡°SPOOL ?PRT SYSTEM CLASS A¡±

?

And you will have to then start the printer from say OPERATOR

?

CP START? F CLASS A

?

Dave

?

?

?

From: [email protected] <[email protected]> On Behalf Of Ron Young
Sent: 27 May 2022 17:37
To: [email protected]
Subject: [h390-vm] novice help with cmsbatch job output

?

Hi All:
I'm trying to figure out how to "real" card decks with vm370ce.... I can get the job deck to run (and the CP MSG lines appear on cmsuser's 3270 session, but I can't figure out how to get the output to spool to the "real" printer. I am using page #236 (page 296 in the pdf) of /bitsavers/pdf/ibm/370/VM_370/Release_6/GC20-1819-2_IBM_Virtual_Machine_Facility_370_CMS_Users_Guide_Rel_6_PLC_17_Apr81.pdf.
I kick off the job by "devinit 00c test.txt trunc eof" in the operator console.

Any help would be appreciated.
-ron

here is the current job deck:

ID CMSBATCH
/JOB CMSUSER CMSUSER JOB10
CP LINK CMUSER 191 291 RR SECRET
ACCESS 291 B/A
CP MSG CMSUSER TESTING CMSBATCH
CP SPOOL A TO CMSUSER NOCONT
PRINT HELLO FORTRAN
CP CLOSE A
CP SPOOL A OFF
RELEASE 291
CP DETACH 291
CP MSG CMSUSER END JOB
/*

messages to cmsuser
16:34:46? MSG FROM CMSBATCH:? JOB 'JOB10' STARTED.
16:34:46? MSG FROM CMSBATCH:? TESTING CMSBATCH
16:34:46? MSG FROM CMSBATCH:? END JOB
16:34:46? MSG FROM CMSBATCH:? JOB 'JOB10' ENDED.

Join [email protected] to automatically receive all group messages.