Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping
Routine: XU8P426

XU8P426.m

Go to the documentation of this file.

XU8P426 ;SFISC/SO- POST INSTALL KILL OFF 'AD' XREF;8:32 AM  18 Jul 2006

 ;;8.0;KERNEL;**426**;Jul 10, 1995;Build 1

 D MES^XPDUTL("Deleting ""AD"" Cross Reference")

 K ^XIP(5.12,"AD")

 D MES^XPDUTL("Finished Deleting the ""AD"" Cross Reference")

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HXU8P426   254     printed  Apr 09, 2024@21:15:16                                                                                                                                                                                                      Page 2

XU8P426   ;SFISC/SO- POST INSTALL KILL OFF 'AD' XREF;8:32 AM  18 Jul 2006

 +1       ;;8.0;KERNEL;**426**;Jul 10, 1995;Build 1

 +2        DO MES^XPDUTL("Deleting ""AD"" Cross Reference")

 +3        KILL ^XIP(5.12,"AD")

 +4        DO MES^XPDUTL("Finished Deleting the ""AD"" Cross Reference")

 +5        QUIT