| GENERAL DESCRIPTION |
This IA permits patch EN*7*62 to delete the TRIGGER
cross-reference (#2) of field #.01 in subfile #6926.01. Code similar to the
following will be placed in a pre-install routine of the patch to perform the
deletion.
N DA,DIK
S DIK="^DD(6926.01,.01,1," ;this is the root of "xref multiple"
S DA(2)=6926.01,DA(1)=.01,DA=2 ;DA(2) = subfile#
;DA(1) = field#
;DA = xref#
D ^DIK ;this deletes the xref definition
Patch EN*7*62 will bring in a new #2 cross-reference (regular, whole-file) on
the .01 field of #6926.01 during the install. The cross-reference deletion
performed during the pre-install will ensure that all the trigger logic is
completely removed.
|