XU8P543.m

XU8P543 ;ISF/RD - Patch XU*8*543 ;

 ;;8.0;KERNEL;**543**;Jul 10, 1995;Build 18

 Q

 ;

POST ;POST-INIT

 D PATCH^ZTMGRSET(543)

 Q

XU8P543   ;ISF/RD - Patch XU*8*543 ;

 +1       ;;8.0;KERNEL;**543**;Jul 10, 1995;Build 18

 +2        QUIT 

 +3       ;

POST      ;POST-INIT

 +1        DO PATCH^ZTMGRSET(543)

 +2        QUIT