LR7OB0 ;slc/dcm - Build message, backdoor from Lab ;8/11/97
Source file <LR7OB0.m>
| Package | Total | Caller Graph | 
|---|---|---|
| Lab Service | 4 | LR7OB1 LR7OB3 LR7OC0 LR7OV2 | 
| IHS Changes To Lab | 1 | BLR7OB1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ALL(RECEIVE) | ;Build HL7 message for all patients in file 63 | |
| EN1(ODT,SN,CONTROL,NAT) | ;Build msg based on date and LRSN | |
| NEW1(ODT,SN,CONTROL,NAT) | ;Create OE/RR order from Lab order date & LRSN | |
| EN3(LABPAT,SS,INVDT,CONTROL,Y) | ;Build msg from 63 | |
| CALL | ;Make call to OE/RR and cleanup | |
| REC | ;Send to receiving routine | |
| EN(ORD,CONTROL,NAT) | ;Build msg based on order # | |
| EN2(AC,ACDT,ACN,CONTROL,CH,BB,AP,NAT) | ;Build msg based on Accession area,Acc dt,# | |
| PAT(LRDFN,RECEIVE) | ;Get data for single patient from file 63 | |
| NEW(ORD,CONTROL,NAT) | ;Create OE/RR order from Lab order # | |
| FIRST | 
| Name | Field # of Occurrence | 
|---|---|
| $$ISPIMS^BLRUTIL | FIRST+3 | 
| CALL^LR7OB1 | CALL+1 | 
| ORD^LR7OB1 | NEW+7 | 
| ORD1^LR7OB1 | NEW1+4 | 
| 69^LR7OB3 | EN+5, EN1+5 | 
| SNEAK^LR7OB3 | EN2+11, EN3+12 | 
| EN^LR7OB630 | EN3+10 | 
| A68^LR7OB68 | EN2+9 | 
| $$HL7DT^LR7OU0 | FIRST+8, FIRST+12, FIRST+13 | 
| $$MSH^LR7OU0 | FIRST+5 | 
| $$PID^LR7OU0 | FIRST+6 | 
| $$PV1^LR7OU0 | FIRST+7 | 
| ORC^LR7OU01 | FIRST+20 | 
| MSG^XQOR | NEW+4, NEW1+1 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^%ZOSF("TEST" | REC+1 | 
| ^DIC(42 - [#42] | FIRST+3 | 
| ^LR - [#63] | ALL+4, PAT+4, PAT+6 | 
| ^LRO(68 - [#68] | EN2+8 | 
| ^LRO(69 - [#69] | EN+5 | 
| ^OR(100 - [#100] | NEW1+7 | 
| ^TMP("LRAP" | NEW+6!, NEW1+3!, CALL+2! | 
| ^TMP("LRBB" | NEW+6!, NEW1+3!, CALL+2! | 
| ^TMP("LRCH" | NEW+6!, NEW1+3!, CALL+2! | 
| ^TMP("LRX" | FIRST+3, FIRST+8, FIRST+10, FIRST+12, FIRST+13, FIRST+14, FIRST+17, FIRST+18, EN1+4!, EN2+7! , EN2+10, EN2+12!, EN3+7!, EN3+11, EN3+13! | 
| Name | Line Occurrences | 
|---|---|
| @( | FIRST+3, REC+1 | 
| CALL | NEW+8, NEW+9, NEW1+5, NEW1+8 | 
| EN | NEW+8, NEW+9 | 
| EN1 | NEW1+5, NEW1+8 | 
| EN3 | PAT+5, PAT+6 | 
| FIRST | EN2+11, EN3+12 | 
| PAT | ALL+4 | 
| REC | PAT+5, PAT+6 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| AC | EN2~, EN2+8, EN2+9 | 
| ACDT | EN2~, EN2+9 | 
| ACN | EN2~, EN2+9 | 
| AP | EN2~ | 
| APMSG | NEW+5~, NEW1+2~, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| BB | EN2~ | 
| BBMSG | NEW+5~, NEW1+2~, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| BYPASS | EN2+6~, EN2+9*, EN3+10*, EN3+13! | 
| CAT | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| CH | EN2~ | 
| CHMSG | NEW+5~, NEW1+2~, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| COBR | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| COBX | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| CONTROL | NEW~, NEW+8, NEW+9, NEW1~, NEW1+5, NEW1+7, NEW1+8, FIRST+3, FIRST+9, EN~ , EN1~, EN2~, EN3~, EN3+8*, CALL+1 | 
| CTR | FIRST+20*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| D0 | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| DA | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| DFN | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| DIC | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| DIE | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| DR | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| I | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| IFN | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| IFN1 | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| IFN2 | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| II | EN+3~ | 
| INVDT | EN3~, EN3+8, EN3+10 | 
| J | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| LABPAT | EN3~, EN3+10 | 
| >> LINK | FIRST+19 | 
| LOC | FIRST*, FIRST+3*, FIRST+7, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| LRDFN | EN+3~, EN1+3~, EN2+6~, EN3+6~, ALL+2~, ALL+3*, ALL+4*, PAT~, PAT+4, PAT+5 , PAT+6 | 
| LRDPF | FIRST+3, FIRST+6, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| LRFIRST | EN+3~, EN+4*, EN1+3~, EN1+5*, EN2+6~, EN2+9*, EN3+6~ | 
| LRIDT | PAT+3~, PAT+6* | 
| LRNIFN | NEW+5~, NEW+9*, NEW1+2~, NEW1+6*, FIRST+17 | 
| LRODT | NEW+5~, NEW1+2~ | 
| LRORD | NEW+5~, NEW1+2~ | 
| LRSN | NEW+5~, NEW1+2~ | 
| >> LRSTATI | FIRST+11 | 
| LRTMPO | NEW+5~, NEW1+2~ | 
| LRTMPO("LRIFN" | NEW+8, NEW+9, NEW1+5, NEW1+6, FIRST+17 | 
| MSG | NEW+5~, NEW1+2~, FIRST+20*, EN+3~, EN+4*, EN1+3~, EN1+5*, EN2+8*, EN2+11, EN3+9* | 
| MSG(1 | FIRST+5* | 
| MSG(2 | FIRST+6* | 
| MSG(3 | FIRST+7* | 
| NAT | NEW~, NEW1~, FIRST+16, EN~, EN1~, EN2~ | 
| OBRMSG | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| ODT | NEW1~, NEW1+4, NEW1+5, NEW1+8, FIRST+10, EN+3~, EN+4*, EN+5*, EN1~, EN2+10 , EN3+11 | 
| ORCMSG | FIRST+20*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| ORD | NEW~, NEW+7, NEW+8, NEW+9, EN~, EN+5 | 
| RECEIVE | ALL~, ALL+3*, ALL+4, PAT~, REC+1 | 
| ROOM | FIRST*, FIRST+3*, FIRST+7, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| SEX | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| SN | NEW1~, NEW1+4, NEW1+5, NEW1+8, FIRST+10, EN+3~, EN+5*, EN1~, EN2+10, EN3+11 | 
| SS | EN2+8*, EN3~, EN3+10, PAT+3~, PAT+4*, PAT+5, PAT+6 | 
| STDT | FIRST+8*, FIRST+12, FIRST+15, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| VAERR | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| VAIN | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| VAIN(1 | FIRST+3 | 
| VAIN(4 | FIRST+3 | 
| VAIN(5 | FIRST+3 | 
| X | NEW1+2~, NEW1+6*, NEW1+7*, FIRST+11*, EN+3~, EN1+3~, EN2+6~, EN3+6~, REC+1* | 
| X1 | FIRST+9*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| X10 | FIRST+18*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| X2 | FIRST+10*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| X3 | FIRST+11*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| X4 | FIRST+12*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| X5 | FIRST+13*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| X6 | FIRST+14*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| X7 | FIRST+15*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| X8 | FIRST+16*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| X9 | FIRST+17*, FIRST+19*, EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| XMSG | EN2+6~, EN3+6~, EN3+12 | 
| Y | EN+3~, EN1+3~, EN2+11!, EN3~, EN3+12!*, PAT+5, PAT+6 | 
| Y10 | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| Z | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| Z1 | EN+3~, EN1+3~, EN2+6~, EN3+6~ | 
| Name | Field # of Occurrence | 
|---|---|
| $T(MSG^XQOR | NEW+4, NEW1+1 |