PSULRHL2 ;HCIOFO/BH - File real time HL7 messages ; 3/30/11 10:14am
Source file <PSULRHL2.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| FILE | ||
| WRITE(IEN) | ;--- Find the OBR/OBX segments
 | 
|
| ERROR(CODE,FAC,MESSAGE) | ; Files any errors found within the processing
 | 
|
| OBX(STR1,IEN,IEN1) | ; Extracts required OBX fields and files into 
 ; the global  | 
|
| OBR(STR,IEN) | ; Extracts required OBR fields and files into the global
 | 
|
| PARAMS() | ; Get HL7 Parameters and facility # from the MSH segment
 | 
|
| DEMO() | ; Get the demographic data and file a zero node entry in the 
 ; message global  |