Re: Retrieving active controlling subsystem

["Mark S. Waterbury" <mark.s.waterbury@xxxxxxx>]

RTVSYSVAL QCTLSBSD ?

----- Original Message ----- 
> From: <mlazarus@xxxxxxxx>
> To: <midrange-l@xxxxxxxxxxxx>
> Sent: Monday, April 10, 2006 4:36 PM
> Subject: Re: Retrieving active controlling subsystem

> Michael,
>
> That code works (with modifications) to get the complete list of
> subsystems.  It does not tell me which one is the controlling subsystem.
>
> -mark
>
> Original Message:
> -----------------
> From:  Michael_Schutte@xxxxxxxxxxxx
> Date: Mon, 10 Apr 2006 16:14:27 -0400
> To: midrange-l@xxxxxxxxxxxx
> Subject: Re: Retrieving active controlling subsystem
>
>
> Does this help?
>
> http://archive.midrange.com/rpg400-l/200304/msg00127.html
>
> You can specify the job name by replacing the
>
> '*ALL      *ALL      *ALL      '
>
> With what you want to look for.
>
> Michael Schutte
> Work 614-492-7419
> email  michael_schutte@xxxxxxxxxxxx
>
> ----------------
>
> How would I go about retrieving the *active* controlling subsystem?  If
> the QCTLSBSD system value is changed, retrieving that value won't reflect
> the current reality.
>
> I'm looking for this info becuase I want to automate an orderly shutdown
> of active subsystems, but do not want to end the controlling *SBS.  TIA.
>
> -mark
>
> --------------------------------------------------------------------
> mail2web - Check your email from the web at
> http://mail2web.com/ .
>
>
>
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing 
> list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.