EAS1098P ;ALB/LBD - EAS*1.0*98 PRE-INSTALL ; 11/10/09 4:37pm
;;1.0;ENROLLMENT APPLICATION SYSTEM;**98**;MAR 15,2001;Build 3
EN ; Display a message to inform the user that there will be a slight
; delay when installing the patch.
;
N MESS
S MESS(1)="PRE-INSTALLATION PROCESSING"
S MESS(2)="---------------------------"
S MESS(3)="This installation will take some time due to the large size of the file."
S MESS(4)="Please be patient and allow the process to complete. Thank you!"
S MESS(5)=""
D BMES^XPDUTL(.MESS)
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HEAS1098P 540 printed Dec 13, 2024@01:53 Page 2
EAS1098P ;ALB/LBD - EAS*1.0*98 PRE-INSTALL ; 11/10/09 4:37pm
+1 ;;1.0;ENROLLMENT APPLICATION SYSTEM;**98**;MAR 15,2001;Build 3
EN ; Display a message to inform the user that there will be a slight
+1 ; delay when installing the patch.
+2 ;
+3 NEW MESS
+4 SET MESS(1)="PRE-INSTALLATION PROCESSING"
+5 SET MESS(2)="---------------------------"
+6 SET MESS(3)="This installation will take some time due to the large size of the file."
+7 SET MESS(4)="Please be patient and allow the process to complete. Thank you!"
+8 SET MESS(5)=""
+9 DO BMES^XPDUTL(.MESS)
+10 QUIT