开云体育

Vince, I went and looked for the manuals, as I thought it was interesting. I found the index at your site says 0 files present. Am I doing something wrong? It shows the MVS380 area to be blank. I could not find the manuals.

Thanks,
Dave - N8ZFM


?On 2/28/25, 3:39 PM, "[email protected] <mailto:[email protected]> on behalf of Vince Coen via groups.io" <[email protected] <mailto:[email protected]> on behalf of vbcoen@... <mailto:[email protected]>> wrote:


On 28/02/2025 03:39, bufbooth via groups.io wrote:

Hello All, does the version of PL/I that Hercules/MVS38 use support
the SELECT/WHEN statement? I get a compile errors on any SELECT
statement. Thank you, Dennis

If you go to my website at :


applewood.linkpc.net/files/MVS380/pdfs then go to folder PL1




you will find all the manuals related to PL1 and programming etc under MVS.

On 28/02/2025 03:39, bufbooth via groups.io wrote:

Hello All, does the version of PL/I that Hercules/MVS38 use support the SELECT/WHEN statement?? I get a compile errors on any SELECT statement.? Thank you, Dennis

If you go to my website at :

applewood.linkpc.net/files/MVS380/pdfs?? then go to folder PL1


you will find all the manuals related to PL1 and programming etc under MVS.

• ?

开云体育

It seemss You have Netview active on z/OS, if the STC name is CNMPROC, try this NCCF cmd:

F CNMPROC,NCCF EXCMD AUTO1 SHUTSYS

Hope this help
Bye

On 2/26/25 13:22, John James via groups.io wrote:

P.S. Is there is user guide available anywhere for RECV370? Darned if I can remember how to use it. Thanks.

The source is included on SYSCPK, and also available at CBT:

//SYSLIN DD DSN=&TEMP,DISP=SHR

//? ? ? ? ? ? ? ?DD DDNAME=SYSIN

//SYSIN DD *

? INCLUDE .....

? NAME ....

/*

On Wed, Feb 26, 2025 at 07:23:23PM +0000, Erics51 via groups.io wrote:

All the docs I’ve found give the same instruction on how to cleanly shutdown the zOS session, namely
# in "system" terminal:
S SHUTSYS
Z EOD

# then, once finished, in Hercules:
exit
So I assume it should exist.

I would only assume it would exist if running the exact z/OS system the doc
was written for. Startup/shutdown procedures could vary greatly from one
shop to another, especially if automation products were in use. My previous
employer used AF/Operator to automate things. It intercepted some console
commands, like the start and stop commands, and for tasks it was configured
to control it would take the steps necessary to get the task into the
desired state. For example, a P CICS command might issue a F CICSP1,CEBT P
SHUTDOWN command behind the scenes. If anyone is interested in seeing a real
world example from a former z/OS shop, my former employer's shutdown
procedure looked something like (commands are in all upper case, comments
are in mixed case):


-------- Initiators ----------------------------------------
Drain the initiators:
INITOFF

-------- Printers ------------------------------------------
Stop the printers:
$P PRT1
$P PRT4
$P PRT5
$P PRT7

-------- Batch Jobs ----------------------------------------
Cancel Jobs:
Terminate any active batch jobs so CA7 and DISPATCH will
have correct status.

-------- CICS and IMS --------------------------------------
Stop GROUP4 tasks

Use command 'D GROUP4' to display desired and actual status.

Stop all CICS regions by issuing commands:
P CICS
P CICSA
P CICSB
P CICSC
P CICSD

Wait for the CICS regions to terminate.
Status can be checked by issuing the 'D GROUP4' command.

After the CICS regions have terminated, stop the IMS regions with commands:
P IMSPDBC
P IMSTDBC
P IMSXDBC

Wait for the IMS regions to terminate.

Wait for GROUP4 tasks to complete termination.
Use command 'D GROUP4' to display desired and actual status.

Note any tasks which have to be cancelled.

-------- Post-VTAM Tasks -----------------------------------
After the GROUP4 tasks have completed termination, stop the GROUP3 tasks.
P GROUP3

Wait for GROUP3 tasks to complete termination.
Use command 'D GROUP3' to display desired and actual status.

Note any tasks which have to be cancelled.

-------- DISPATCH and CA7 ----------------------------------
After the GROUP3 tasks have completed termination, stop the GROUP2 tasks.

Ensure ALL batch jobs are complete so CA7 will have complete status.
Cancel any remaining batch jobs.

P GROUP2

Wait for GROUP2 tasks to complete termination.
Use command 'D GROUP2' to display desired and actual status.

Note any tasks whcih have to be cancelled.

-------- VTAM and Pre-VTAM Tasks----------------------------
After the GROUP2 tasks have completed termination, stop the GROUP1 tasks.
P GROUP1

Wait for GROUP1 tasks to complete termination.
Use command 'D GROUP1' to display desired and actual status.

Note any tasks which have to be cancelled.

After all GROUP1 tasks have stopped, display AFOPER status.
D GROUP*

-------- AFOPER --------------------------------------------
Stop AFOPER
P AFOPER

Wait for AFOPER to complete termination.

-------- OMVS ----------------------------------------------
Shutdown all OMVS and HFS activity.
F OMVS,STOPPFS=NFS Stop NFSC
R nn,Y
R nn,I

F OMVS,STOPPFS=ZFS Stop ZFS
R nn,Y
R nn,I

F OMVS,SHUTDOWN Stop OMVS

Wait for OMVS shutdown complete message.

-------- JES2 ----------------------------------------------
Stop JES2
$PJES2,TERM

-------- SMF -----------------------------------------------
Flush SMF buffers:
Z EOD

-------- SYSPLEX -------------------------------------------
Enter the following commands from a CFL2 MCS console:

V XCF,CFL1,OFFLINE

Wait for:
xx IXC371D CONFIRM REQUEST TO VARY SYSTEM CFL1 OFFLINE.

R xx,SYSNAME=CFL1

Wait for this message:

xx IXC102A XCF IS WAITING FOR SYSTEM CFL1 DEACTIVATION. REPLY DOWN WHEN
MVS ON CFL1 HAS BEEN SYSTEM RESET

R xx,DOWN

------------------ End of Shutdown Procedure ------------------------

--

Kevin


Bruceville, TX

What's the definition of a legacy system? One that works!
Errare humanum est, ignoscere caninum.