Yes, you can issue the SHUTDOWN or SHUTDOWN IMMEDIATE directly to the 
outstanding console reply or thru the UCF/Batch interface or from a VTAM 
terminal, basically, anywhere you can talk to IDMS interactively you can issue 
the command.

The UCF/Batch interface program name has a standard one that is created at 
installation time, but it was modified here long before I arrived so I simply 
propagated it forward since there is numerous job streams that execute the 
program under the name that was created long ago.

One thing to keep in mind, you notice that there is no signon statement in the 
input stream.
An implicit signon is performed using the user id executing the job. So, if you 
secure DCMT and/or the SHUTDOWN function in your configuration, be sure to 
execute the job with a userid that has the authority to 1) execute DCMT and 2) 
issue the SHUTDOWN command.

Hope this helps.

Charles (Chuck) Hardee
Senior Systems Engineer/Database Administration
CCG Information Technology
Thermo Fisher Scientific
300 Industry Drive
Pittsburgh, PA 15275
Direct: 724-517-2633
FAX: 412-490-9230
[email protected]


-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Steve Conway
Sent: Friday, March 07, 2014 8:26 AM
To: [email protected]
Subject: Re: OPS/MVS Command to Stop IDMS?

Thank you Chuck.

This has good possibilities. Your JCL has an interesting program name - is 
there not a standard utility name?

While I'm on this track, can the SHUTDOWN IMMED command be issued directly 
against a known IDMS region name, via console command?


Cheers,,,Steve

Steven F. Conway, CISSP
Hosting Services Division, Cloud Technology and Hosting Office, 
AO-DTS-CTHO-HSD
z/OS Systems Support
Phone: 703-295-1926
Mobile: 703-402-2650
[email protected]



From:   "Hardee, Chuck" <[email protected]>
To:     [email protected]
Date:   03/07/2014 08:08 AM
Subject:        Re: OPS/MVS Command to Stop IDMS?
Sent by:        IBM Mainframe Discussion List <[email protected]>



Why not simply submit a UCF/Batch job with a DCMT SHUTDOWN or DCMT 
SHUTDOWN IMMEDIATE?
Remember, the SHUTDOWN command will prompt for confirmation so you need to 
have a "Y" coded following the DCMT command.

//UCFBATCH EXEC PGM=whateveryoucallit
//STEPLIB   DD DISP=SHR,DSN=your.idms.loadlib
//          DD DISP=SHR,DSN=any.other.loadlib
//SYSCTL    DD DISP=SHR,DSN=your.cv.sysctl.dataset.name
//SYSIPT    DD *
DCMT SHUTDOWN
Y
/*
//SYSLST   DD SYSOUT=*

The above should get you started.

Once you have the job working, you should be able to use your scheduler to 
submit the job at the appropriate shutdown time of day, or condition, etc.

Good Luck.

Charles (Chuck) Hardee
Senior Systems Engineer/Database Administration
CCG Information Technology
Thermo Fisher Scientific
300 Industry Drive
Pittsburgh, PA 15275
Direct: 724-517-2633
FAX: 412-490-9230
[email protected]

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On 
Behalf Of John McKown
Sent: Friday, March 07, 2014 8:00 AM
To: [email protected]
Subject: Re: OPS/MVS Command to Stop IDMS?

We don't have IDMS. But we do have some other products with "hang a WTOR"
that needs to be replied to in order to shut them down (IMO, poor
architecture!). We use CA-OPS/MVS. What we do is look at each outstanding
WTOR and look for the proper MSGID to which to reply. The code looks
something like:

    temp = OPSTATUS("R","S","*") /* scan all WTORs */
    DO WHILE QUEUED() > 0
       PARSE PULL WTOR
       PARSE PULL LINE2
       FROMSYS=WORD(LINE2,4)
/* Check that the message is from this z/OS system */
       IF FROMSYS<>OPSINFO("SYSNAME") THEN ITERATE
       PARSE VAR WTOR REPLYNO MSGID .
       IF MSGID = 'CA-7.574' THEN DO
       ADDRESS OPER ,
         "R "REPLYNO",STOP"
       END
       END
    END

Hopefully this will be of some help, should no one else have an an exact
IDMS rule available.



On Fri, Mar 7, 2014 at 6:45 AM, Steve Conway
<[email protected]>wrote:

> Morning, All.
>
> Does anybody have a command to shut down IDMS regions by responding to
> their WTORs they are willing to share?
>
> I'm kinda pressed for time, and don't have a test region to test rules 
on,
> giving me one shot per night; it's not going quickly enough to keep
> everyone happy.
>
>
> Cheers,,,Steve
>
> Steven F. Conway, CISSP
> Hosting Services Division, Cloud Technology and Hosting Office,
> AO-DTS-CTHO-HSD
> z/OS Systems Support
> Phone: 703-295-1926
> Mobile: 703-402-2650
> [email protected]
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>



-- 
Wasn't there something about a PASCAL programmer knowing the value of
everything and the Wirth of nothing?

Maranatha! <><
John McKown

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to