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

CRHD8PST.m

Go to the documentation of this file.
  1. CRHD8PST ; HIOFO/FT - FIX PARAMETER SETTINGS ; 5/10/19 2:29pm
  1. ;;1.0;CRHD;****;Jan 28, 2008;Build 14
  1. Q
  1. ; This routine uses the following IAs:
  1. ; #10141 - MES^XPDUTL Kernel (supported)
  1. ; #2263 - EN^XPAR Kernel (supported)
  1. ;
  1. Q
  1. EN ; main entry point
  1. ;
  1. N CRHDERR
  1. S CRHDERR=""
  1. ; Installing commands in the command file...
  1. D MES^XPDUTL(" Post install starting....updating Parameters...")
  1. ;
  1. ; ADD CRHD GUI VERSION with new build numbers for executables.
  1. D EN^XPAR("SYS","CRHD GUI VERSION",1,"1.0.8.3",.CRHDERR)
  1. I +$G(CRHDERR) D
  1. . D BMES^XPDUTL(" "_CRHDERR)
  1. . D BMES^XPDUTL(" ....Parameter not added ")
  1. ;
  1. D BMES^XPDUTL(" CRHD*1.0*8 Post Install complete")
  1. K CRHDERR
  1. ;
  1. Q
  1. ;