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 |
