PSJHL10 ;BIR/LDT,BSJ-VALIDATE INCOMING HL7 DATA/CREATE NEW ORDER ;30 MAY 07
Source file <PSJHL10.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VALID | ;
|
|
| ERROR | ;Sends error msg to CPRS, logs error in OE/RR Errors file
|
|
| UDSET | ;Set up UD variables
|
|
| OUT | ;
|
|
| CHK(X,Y,Z) | ||
| DDOK(PSJF,OI) | ;Check to be sure all dispense drugs that are active in the
|
|
| IVSET | ;
|
|
| PUTD55 | ; Move drug data from local array into 55
|
|
| SETN | ;Set up patient 0 node if needed.
|
|
| CHKIV | ;Validate IV data
|
|
| AD | ;Check additives
|
|
| SOL | ;Check solutions
|
|
| DRG | ;Check to be sure additive/solutions are active
|
| FileNo | Call Tags |
|---|---|
| ^PS(55 - [#55] | Classic Fileman Calls |
