XU8P455 ;ISF/RWF - Patch XU*8*455 Post-Init ;9/6/07 13:41
;;8.0;KERNEL;;Jul 10, 1995;Build 6
Q
;
POST ;Do Post-init
X ^%ZOSF("EON")
D RELOAD^ZTMGRSET
X ^%ZOSF("EOFF")
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HXU8P455 186 printed Sep 23, 2025@19:43:51 Page 2
XU8P455 ;ISF/RWF - Patch XU*8*455 Post-Init ;9/6/07 13:41
+1 ;;8.0;KERNEL;;Jul 10, 1995;Build 6
+2 QUIT
+3 ;
POST ;Do Post-init
+1 XECUTE ^%ZOSF("EON")
+2 DO RELOAD^ZTMGRSET
+3 XECUTE ^%ZOSF("EOFF")
+4 QUIT