Uninstalling the abend formatting module (DFSAFMD0)

If DFSAFMD0 is installed from a prior version of IMS, you can remove it from the host z/OS® system if no IMS Version 10 or earlier code runs on the z/OS system.

To uninstall the module DFSAFMD0:

Procedure

  1. Remove the name DFSAFMD0 from the IEAVADFM CSECT of module IGC0805A in SYS1.LPALIB. Removing this name prevents the operating system from installing module DFSAFMD0 as an abend formatting exit at the next IPL.
  2. Remove module DFSAFMD0 from SYS1.LPALIB or the MLPA library where module DFSAFMD0 was bound.
  3. Restart with CLPA to enable these changes.
If you previously used the AMASPZAP utility to zap module DFSAFMD0 into the IEAVADFM CSECT (as is done in the IMS IVP), you must use the AMASPZAP utility to remove the name DFSAFMD0 from the IEAVADFM CSECT. The IEAVADFM CSECT is a table of 8-byte entries, followed by a final 4-byte entry that contains zeros to indicate the end of the exit name list. Each 8-byte entry contains the name of a dump formatting exit routine. If DFSAFMD0 is not the last entry in the table, then in addition to removing the DFSAFMD0 entry, you must move any subsequent entries to ensure that no all-zero entries exist before the end of the table.

The following example shows how to remove module DFSAFMD0 from the IEAVADFM CSECT.

  1. Use the AMASPZAP utility to dump the current contents of the IEAVADFM CSECT:
    //DMPVADFM JOB ...
    //STEP001  EXEC PGM=AMASPZAP
    //SYSLIB   DD   DSN=SYS1.LPALIB,DISP=SHR
    //SYSPRINT DD   SYSOUT=A
    //SYSIN    DD   *
     DUMP IGC0805A IEAVADFM
    /*
  2. Examine the contents of the IEAVADFM CSECT from the AMASPZAP dump job output. Locate the entry that contains module DFSAFMD0 (in hexadecimal: X'C4C6E2C1C6D4C4F0'):
    **CCHHR- 0022000421   RECORD LENGTH- 000BA0         MEMBER NAME  IGC0805A  CSECT NAME  IEAVADFM
     000000   C4C6E2C1   C6D4C4F0   D4E8C4D4   D7E7F0F0     00000000   00000000   00000000   00000000
     000020   00000000   07FE0000   00000008   00000000
  3. Use the AMASPZAP utility to replace the entry that contains module DFSAFMD0 with zeros. In the example output above, module DFSAFMD0 is the first entry in the IEAVADFM CSECT, and one other entry follows. To remove module DFSAFMD0, entry 2 must be moved to become entry 1, and entry 2 must be zapped to be all zeros, as shown:
    /ZAPVADFM JOB ...
    /STEP001  EXEC PGM=AMASPZAP
    /SYSLIB   DD   DSN=SYS1.LPALIB,DISP=SHR
    /SYSPRINT DD   SYSOUT=A
    /SYSIN    DD   *
    NAME IGC0805A IEAVADFM
    VER  0000 C4C6E2C1C6D4C4F0
    VER  0008 D4E8C4D4D7E7F0F0
    REP  0000 D4E8C4D4D7E7F0F0
    REP  0008 0000000000000000