EAS1048P.m

EAS1048P ;ALB/PHH - EAS*1*48 PRE-INSTALL ;12-18-2003

 ;;1.0;ENROLLMENT APPLICATION SYSTEM;**48**;MAR 15,2001

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 ---EAS1048P   524     printed  Apr 09, 2024@21:00:14                                                                                                                                                                                                     Page 2

EAS1048P  ;ALB/PHH - EAS*1*48 PRE-INSTALL ;12-18-2003

 +1       ;;1.0;ENROLLMENT APPLICATION SYSTEM;**48**;MAR 15,2001

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