LR7OB0 ;slc/dcm - Build message, backdoor from Lab ;8/11/97
Source file <LR7OB0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NEW(ORD,CONTROL,NAT) | ;Create OE/RR order from Lab order #
|
|
| NEW1(ODT,SN,CONTROL,NAT) | ;Create OE/RR order from Lab order date & LRSN
|
|
| FIRST | ||
| EN(ORD,CONTROL,NAT) | ;Build msg based on order #
|
|
| EN1(ODT,SN,CONTROL,NAT) | ;Build msg based on date and LRSN
|
|
| EN2(AC,ACDT,ACN,CONTROL,CH,BB,AP,NAT) | ;Build msg based on Accession area,Acc dt,#
|
|
| EN3(LABPAT,SS,INVDT,CONTROL,Y) | ;Build msg from 63
|
|
| ALL(RECEIVE) | ;Build HL7 message for all patients in file 63
|
|
| PAT(LRDFN,RECEIVE) | ;Get data for single patient from file 63
|
|
| REC | ;Send to receiving routine
|
|
| CALL | ;Make call to OE/RR and cleanup
|
