ORY350B ;SLCOIFO - PRE- AND POST-INSTALL B FOR PATCH OR*3.0*350 ;04/16/15 07:44
Source file <ORY350B.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PRE | ;Pre-Init Entry Point
|
|
POST | ;Post-Init Entry Point
|
|
PEOMRPT | ;Remove new & changed reports from OE/RR REPORTS file (101.24)
|
|
PAR | ; Parameter Value Transport
|
|
LOAD | ; load data into ^TMP (expects ROOT to be defined)
|
|
DEL | ;Delete package level parameters
|
|
PUT | ;Setup package level parameters
|
|
SET(ONAME,P,S) | ;Set the parameter
|
|
EDITEAD | ;edit OR GTX EARLIEST DATE to OR GTX CLINICALLY INDICATED DATE
|
|
LU(FILE,NAME,FLAGS,SCREEN,INDEXES) | ; call FileMan Finder to look up file entry
|
|
CONSPAR | ; set any value found for EAD at PKG level back into the CID at SYS level.
|
|
DELPARM | ;remove ORCDGMRC EARLIEST DATE DEFAULT from the system
|
|
CONSULT | ;
|
|
START | ;start search for consult orders
|
|
FINDORD | ;find cons/proc orders and change OR GTX EARLIEST DATE item ID value from EARLIEST to CLINICALLY
|
|
UPDATEID(ORDA) | ;update ID value for order. Change "EARLIEST" to "CLINICALLY"
|
|
SENDMAIL | ;send message with list of edited orders
|
|
DATA | ; parameter data
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^ORD(101.24 - [#101.24] | Classic Fileman Calls |
^ORD(101.41 - [#101.41] | Classic Fileman Calls |
^XTV(8989.51 - [#8989.51] | Classic Fileman Calls |