× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



I have a UPS monitoring program that runs in a job queue associated with
our controlling subsystem. When it tried to do the
ENDSBS SBS(*ALL) OPTION(*CNTRLD) DELAY(120)
I got
CPF1052
Message . . . . : ENDSBS *ALL not allowed in current environment.

Cause . . . . . : ENDSBS *ALL is allowed only from an interactive job
that
is started from a *SIGNON workstation entry in the controlling
subsystem.
ENDSBS *ALL is not allowed from a TELNET job, target pass-through job,
or
workstation function job. ENDSBS *ALL is only allowed in a batch job
when
the BCHTIMLMT parameter is specified.


Is this as simple as changing this to
ENDSBS SBS(*ALL) OPTION(*CNTRLD) DELAY(120) BCHTIMLMT(*NOMAX)

The remaining program is simply:

/* Wait for CPF0968: System ended to restricted condition. */
DOUNTIL (&SysStatus='1')
DLYJOB DLY(10)
CALL PGM(QWCRSSTS) PARM(&Ssts0200 &Len0200 &Format &ResetSts &ErrCode)
ENDDO
PWRDWNSYS DELAY(60) RESTART(*NO)

END:

DLCOBJ OBJ((&MsgQLib/&MsgQName *MSGQ *EXCL))

ENDPGM


From earlier in the code:
DCL &SysStatus *CHAR STG(*DEFINED) LEN(1) DEFVAR(&SSTS0200 31)
/* 0 System is not in restricted state. */
/* 1 System is in restricted state. */
Rob Berendt

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 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.