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

XU8P444.m

Go to the documentation of this file.

XU8P444 ;SFISC/SO- POST INSTALL KILL OFF 'AD' XREF;12:03 PM  11 Jan 2007

 ;;8.0;KERNEL;**444**;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[HXU8P444   255     printed  Apr 09, 2024@21:10:04                                                                                                                                                                                                      Page 2

XU8P444   ;SFISC/SO- POST INSTALL KILL OFF 'AD' XREF;12:03 PM  11 Jan 2007

 +1       ;;8.0;KERNEL;**444**;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