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.
Procedure
- 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.
- Remove module DFSAFMD0 from SYS1.LPALIB or the MLPA library where module DFSAFMD0 was bound.
- Restart with CLPA to enable these changes.
The following example shows how to remove module DFSAFMD0 from the IEAVADFM CSECT.
- 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 /* - 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 - 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