Using OPER and LOCKMON in batch
Article ID: 20568
Updated On:
Products
Issue/Introduction
IDMS System Tasks and Operator commands are typically executed online at the "Enter Next Task Code" prompt however there are times when there is a need to execute them in batch. This document provides JCL and commands for the System Task command OPER and LOCKMON using the UCF batch program RHDCUCFB and DCUF SIMULATE.
Environment
Release: All supported releases.
Resolution
//UCFBATCH EXEC PGM=RHDCUCFB//STEPLIB DD DISP=SHR,DSN=IDMS.CV01.DBA.LOADLIB// DD DISP=SHR,DSN=IDMS.CV01.CUSTOM.LOADLIB,DISP=SHR// DD DISP=SHR,DSN=IDMS.CV01.CAGJLOAD//SYSLST DD SYSOUT=*//SYSCTL DD DISP=SHR,DSN=IDMS.CV01.SYSCTL//SYSIDMS DD *DMCL=CV01DMCL//SYSIPT DD *SIGNON useridSET OPTIONS INPUT 1 THRU 72DCUF SIMULATE 43X80OPER WATCH DB %ENTER%CLEARDCUF SIMULATE OFF %ENTERBYE/*
The data from the commands will be in the UCFBATCH.SYSLST:
V1 ENTER NEXT TASK CODE: CA IDMS RELEASE 19.0 TAPE GJJ04I node SYSTEM01?SIGNON useridIDMS DC259001 V1 USER userid SIGNED OFF LTERM UCFLT01 AT 14:31:31.IDMS DC258003 V1 USER userid SIGNED ON LTERM UCFLT01 AT 14:31:31.1IDMS DC402009 V1 DICTNAME SYSDICT HAS BEEN SETIDMS DC402009 V1 DBNAME EMPDEMO HAS BEEN SETV1700 ENTER NEXT TASK CODE: CA IDMS RELEASE 19.0 TAPE GJJ04I node SYSTEM01?SET OPTIONS INPUT 1 THRU 72DCUF SIMULATE 43X80IDMS DC401001 V1 SIMULATION COMMAND ACCEPTEDV1 ENTER NEXT TASK CODE: CA IDMS RELEASE 19.0 TAPE GJJ04I node SYSTEM01?- (CURSOR)OPER WATCH DB %ENTERTASK ID ORIG IDMSPROG SUBSCHEM PRI STA V# PAGEREAD PAGEWRIT CALLIDMS0000000012 DBDC RHDCLGSD IDMSNWK9 253 A 56 00000000 00000000 000000030000000011 DBDC RHDCLGSD IDMSNWK9 253 A 56 00000000 00000000 000000030000000010 DBDC RHDCLGSD IDMSNWK9 253 A 56 00000000 00000000 000000030000000009 DBDC RHDCRUAL IDMSSECQ 253 A 54 00000000 00000000 00000003
Example for LOCKMON:
//SYSIPT DD *SIGNON useridSET OPTIONS INPUT 1 THRU 72DCUF SIMULATE 43X80LOCKMON %ENTERSTATUS %ENTER%CLEARDCUF SIMULATE OFF %ENTERBYE/*
Additional Information
Feedback
