Q: We have begun work on automated operations and need a way to bring down QINTER in preparation for running a nightly batch job stream. How can I determine from a CL program when an ENDSBS *IMMED has completed and the subsystem is ended?

A: 10 illustrates a simple technique to determine if the subsystem has ended.

A: Figure 10 illustrates a simple technique to determine if the subsystem has ended.

Determining If a Subsystem Has Ended

Figure 10 Determining a Subsystem's Status

 TEST: WRKSBSJOB SBS(QINTER) OUTPUT(*PRINT) MONMSG MSGID(CPF1003) EXEC(GOTO INACTIVE) /* qinter is still active -- wait & test again */ DLYJOB DLY(60) /* WAIT 1 MINUTE */ GOTO TEST INACTIVE: /* qinter is not active -- continue with batch processing */