Creature of habit?

Rob Berendt
"They that can give up essential liberty to obtain a little temporary
safety deserve neither liberty nor safety."
Benjamin Franklin

                    Evan Harris
                    <       To:
                    >                         cc:
                    Sent by:                  Fax to:
                    midrange-l-admin@mi       Subject:     Re: Doing A reclaim 

                    01/04/2002 03:11 AM
                    Please respond to


you even have the same status message text as I have while waiting for the
subsystems to end...

Having said that I'd be interested in the reason (if any)  Al is
recommending the message rather than what is a rather straightforward API.

Evan Harris

>Actually Al, I prefer:
>              ENDSBS     SBS(*ALL) OPTION(*IMMED)
>     /*
>      | Verify that system is in restricted state.
>     */
>              SNDPGMMSG  MSGID(CPF9898) MSGF(QCPFMSG) +
>                           MSGDTA('Verifying that we are now in +
>                           restricted state.') TOPGMQ(*EXT) +
>                           MSGTYPE(*STATUS)
>                           &FORMAT &RESET &ERROR)
>     /*
>      | Restricted state flag is byte 31 (offset 30):
>      |   0 = not in restricted state
>      |   1 = restricted state
>     */
>              CHGVAR     VAR(&RSTDFLAG) VALUE(%SST(&RECEIVER 31 1))
>              IF         COND(&RSTDFLAG *EQ '0') THEN(DO)
>                           Waiting for subsystems to end') +
>                           TOPGMQ(*EXT) MSGTYPE(*STATUS)
>              DLYJOB     DLY(60)
>              GOTO       CMDLBL(SbsCheck)
>              ENDDO
>Rob Berendt

This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email:
To subscribe, unsubscribe, or change list options,
or email:
Before posting, please take a moment to review the archives

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-2022 by 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.