Re: PWRDWNSYS in CL program -- MIDRANGE-L

Subject: Re: PWRDWNSYS in CL program
From: rob@xxxxxxxxx
Date: Thu, 3 Jan 2013 16:11:15 -0500
List-archive: <http://archive.midrange.com/midrange-l>
List-help: <mailto:midrange-l-request@midrange.com?subject=help>
List-id: Midrange Systems Technical Discussion <midrange-l.midrange.com>
List-post: <mailto:midrange-l@midrange.com>
List-subscribe: <http://lists.midrange.com/mailman/listinfo/midrange-l>, <mailto:midrange-l-request@midrange.com?subject=subscribe>
List-unsubscribe: <http://lists.midrange.com/mailman/listinfo/midrange-l>, <mailto:midrange-l-request@midrange.com?subject=unsubscribe>

CRTSRCPF FILE(QTEMP/QCLSRC)
EDTF FILE(QTEMP/QCLSRC) MBR(JEFF)

************Beginning of data**************
SNDMSG MSG('BEFORE PWRDWNSYS') TOUSR(ROB)
PWRDWNSYS OPTION(*IMMED) RESTART(*YES *FULL)
DSPJOBLOG OUTPUT(*PRINT)
SNDMSG MSG('AFTER PWRDWNSYS') TOUSR(ROB)
************End of Data********************

CRTCLPGM PGM(QTEMP/JEFF) SRCFILE(QTEMP/QCLSRC)
Ownership of object JEFF in QTEMP type *PGM changed.
Program JEFF created in library QTEMP.

CALL QTEMP/JEFF
To confirm power down, press F16.
F16=Confirm

From HMC: D9002740 and so on and so forth...

Sign on
DSPMSG ROB

From . . . : ROB 01/03/13 15:54:35

BEFORE PWRDWNSYS

No "AFTER".

I might be a little thirsty Tuesday night...

Rob Berendt

As an Amazon Associate we earn from qualifying purchases.

Follow-Ups:

Re: PWRDWNSYS in CL program , Jeff Crosby

This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.