Disabling ADS dialogs

Products

• IDMS - ADS

Issue/Introduction

Is it possible to disable an ADS dialog?

Environment

Release: All supported releases.

Resolution

If an ADS dialog has been defined to SYSGEN, it can be disabled/enabled just like any other program. However, typically ADS dialogs are not defined to SYSGEN. They make use of NULL PDEs when loaded and executed.

Before it has been loaded, a dialog that has not been defined to SYSGEN cannot be displayed as a program.

 DCMT D PRO TESTDLG1
IDMS DC262911 V1 PROGRAM TESTDLG1 HAS NOT LOADED.

An attempt to disable it results in the same message.

 DCMT V PRO TESTDLG1 DIS
IDMS DC262911 V1 PROGRAM TESTDLG1 HAS NOT LOADED.

If the dialog is then executed, thus loading it, it can now be displayed.

 DCMT D PRO TESTDLG1
   Program Name TESTDLG1            Version         1
   Type         DIALOG MAINLINE     Type            DICTIONARY
   Language     ADSO                Dictname
   Size (bytes) 00004488            Dictnode
   ISA size     00000000            Database key    00070011:001
   Status       ENABLED AND INSRV   Storage Prot    YES
   Dynamic      ALLOWED             Residence       IN POOL AT 42886200
   Reusable     YES                 Threading       CONCURRENT
   Reentrant    FULLY REENTRANT     Overlayable     NO
   Tasks use ct 000                 New Copy        ENABLED
   Times called 00000002            Times loaded    000001
   PGM chk thrh 005                 Pgm check ct    000
   Dump thrh    000                 Dump ct         000
   Amode        ANY                 Rmode           ANY
   PDE address  3BC92A60            MPmode          SYSTEM
   Savearea     NO                  Mult Enclave

It can also be disabled.

 DCMT V PRO TESTDLG1 DIS
IDMS DC262002 V1 USER:xxxxxxxx  PROGRAM TESTDLG1 DICTNAME SYST-DEF DISABLED AND
OUT OF SERVICE

An attempt to run it will then result in this.

DC171028 APPLICATION NOT EXECUTED. DIALOG LOAD MODULE TESTDLG1 MISSING

It can be re-enabled with this.

 DCMT V PRO TESTDLG1 ENA
IDMS DC262001 V1 USER:xxxxxxxx  PROGRAM TESTDLG1 DICTNAME SYST-DEF ENABLED AND I
N SERVICE