©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
LA7CHDR ;VA/DALOI/JMC - LAB HDR ORU (Observation Result) message builder ; 22-Oct-2013 09:22 ; MAW
Source file <LA7CHDR.m>
| Package | Total | Call Graph |
|---|---|---|
| Automated Lab Instruments | 11 | BUILD^LA7CHDR STARTMSG^LA7CHLU BUILDMSG^LA7CQRY1 (EXIT,HDRLOAD,RECOVER)^LA7HDR1 (BCD,STORE)^LA7QRY2 ($$INIT6249,$$P)^LA7VHLU $$UNESC^LA7VHLU3 $$DEFCODE^LA7VHLU5 CHKACC^LA7VMSG SENDMSG^LA7VMSG1 UPDT6249^LA7VORM1 |
| VA Fileman | 3 | DT^DICRW (FILE,UPDATE)^DIE CLEAN^DILF |
| Kernel | 2 | ($$FMADD,$$FMTHL7,$$NOW)^XLFDT $$PROD^XUPROD |
| Lab Service | 1 | $$LRUID^LRX |
| Registration | 1 | $$TESTPAT^VADPT |
| Package | Total | Caller Graph |
|---|---|---|
| Automated Lab Instruments | 4 | LA7CHDR LA7CHLU LA7CQRY1 LA7CSHL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RECOVER | ; Recover failed transmissions or message building
; Called by option Recover/Transmit Lab HDR Result Messages [LA7 HDR RECOVER] |
|
| RTR(LA7SS) | ;
; Call with LA7SS = list of subscripts that HDR wants separated by ";" ; (LA7SS="CH;MI;EM") |
|
| APQ(LRDFN,LRSS,LRIDT) | ; Anatomic Pathology (CY,EM,SP) subscript entry point from FileMan cross-reference on specific fields.
; Called by field #.11 in sub-files #63.02, 63.08, 63.09 - AP does not work through CPRS extended action protocols |
|
| QUEUE | ;
; Called by protocol LA7 LAB RESULTS ACTION ; and below (APQ) for AP subscripts ; Call with: ; LRAA - accession area (CH,MI subscript) ; LRAD - accession date (CH,MI subscript) ; LRAN - accession number (CH,MI subscript) ; LRIDT - inverse date/time (collection date/time) ; LRSS - test subscript defined in LABORATORY TEST file (#60) ; LRDFN - IEN in LAB DATA file (#63) ; LRSPEC - specimen ; LRSAMP - sample ; LRSB (Optional) - array of Chemistry results ; ex. glucose LRSB(2)=LR NODE |
|
| HDRLOAD(LA7SDT,LA7EDT,LA7LIMIT,LA7EVENT) | ; Load patient's historical lab results to HDR (Health Data Repository).
; Call with LA7SDT = start date of data extraction in FileMan format ; LA7EDT = end date of data extraction in FileMan format ; LA7LIMIT = # of messages to create this session (default =1000) ; LA7EVENT = name of HL7 event protocol to transmit messages |
|
| BUILD | ; Tasked entry point to build HL7 message to VA's HDR
; Tasked from above. |
|
| MSH(FS,ECH,SITE) | ;return the msh segment
|
|
| QUEMU2(LA7UID,LRAA,LRAD,LRAN,LRIDT,LRSS,LRDFN,LRSPEC,LRSAMP,LRSB) | ;
|
| Name | Field # of Occurrence |
|---|---|
| DT^DICRW | BUILD+9 |
| FILE^DIE | BUILD+97 |
| UPDATE^DIE | BUILD+59 |
| CLEAN^DILF | BUILD+60, BUILD+98 |
| BUILD^LA7CHDR | QUEUE+58 |
| STARTMSG^LA7CHLU | BUILD+79 |
| BUILDMSG^LA7CQRY1 | BUILD+88 |
| EXIT^LA7HDR1 | BUILD+109 |
| HDRLOAD^LA7HDR1 | HDRLOAD+6 |
| RECOVER^LA7HDR1 | RECOVER+3 |
| BCD^LA7QRY2 | BUILD+87 |
| STORE^LA7QRY2 | BUILD+54, BUILD+66, BUILD+76 |
| $$INIT6249^LA7VHLU | BUILD+36 |
| $$P^LA7VHLU | RTR+19 |
| $$UNESC^LA7VHLU3 | RTR+19 |
| $$DEFCODE^LA7VHLU5 | BUILD+51, BUILD+65, BUILD+75 |
| CHKACC^LA7VMSG | BUILD+82 |
| SENDMSG^LA7VMSG1 | BUILD+89 |
| UPDT6249^LA7VORM1 | BUILD+91 |
| $$LRUID^LRX | BUILD+23 |
| $$TESTPAT^VADPT | QUEUE+35 |
| $$FMADD^XLFDT | BUILD+86 |
| $$FMTHL7^XLFDT | MSH+14 |
| $$NOW^XLFDT | MSH+14 |
| $$PROD^XUPROD | QUEUE+35 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BLRRLMU - [#9009026.4] | QUEUE+46, MSH+2, MSH+3, MSH+18 |
| ^BLRRLMU("B" | QUEUE+44 |
| ^DIC(4 - [#4] | QUEUE+45 |
| ^DPT - [#2] | QUEUE+19 |
| ^LAHM(62.48 - [#62.48] | QUEUE+40, QUEUE+42, BUILD+25, BUILD+29 |
| ^LAHM(62.49 - [#62.49] | BUILD+101 |
| ^LR - [#63] | QUEUE+18, QUEUE+35, APQ+4, BUILD+48, BUILD+49, BUILD+69, BUILD+71, BUILD+72, BUILD+102 |
| ^LRO(68 - [#68] | QUEUE+24, BUILD+21 |
| ^TMP("LA7-QRY" | BUILD+40!, BUILD+61, BUILD+62*, BUILD+73 |
| ^TMP("LA7HDR" | QUEUE+32! |
| Name | Line Occurrences |
|---|---|
| QUEUE | APQ+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CS | MSH+1~, MSH+4*, MSH+10, MSH+11, MSH+12, MSH+13, MSH+15, MSH+24 |
| DIQUIET | BUILD+3~, BUILD+7* |
| DT | BUILD+86 |
| DUZ(2 | QUEUE+44, QUEUE+45 |
| ECH | MSH~, MSH+4, MSH+5, MSH+9 |
| FDA | BUILD+3~, BUILD+46~, BUILD+55! |
| FDA(1 | BUILD+93*, BUILD+94*, BUILD+95*, BUILD+96* |
| FDA(2 | BUILD+56*, BUILD+57* |
| FDAIEN | BUILD+46~, BUILD+55! |
| FDAIEN(1 | BUILD+58* |
| FS | MSH~, MSH+8, MSH+27 |
| GBL | BUILD+3~, BUILD+78* |
| HL | BUILD+3~, BUILD+80 |
| HL("ECH" | RTR+19 |
| HL("FS" | RTR+19 |
| HL("Q" | BUILD+81* |
| >> HLL("LINKS" | RTR+23* |
| >> HLNEXT | RTR+14 |
| >> HLNODE | RTR+15, RTR+16 |
| >> HLNODE( | RTR+18 |
| HLQ | BUILD+3~, BUILD+81* |
| >> HLQUIT | RTR+14 |
| I | QUEUE+15~, QUEUE+48*, MSH+1~, MSH+6* |
| J | MSH+1~, MSH+27* |
| LA7101 | BUILD+106! |
| LA76248 | QUEUE+15~, QUEUE+40*, QUEUE+41, QUEUE+42, BUILD+4~, BUILD+25*, BUILD+27, BUILD+29 |
| >> LA76249 | BUILD+36*, BUILD+37, BUILD+56, BUILD+57, BUILD+58, BUILD+79, BUILD+93, BUILD+94, BUILD+95, BUILD+96 , BUILD+101 |
| LA76249P | BUILD+4~, BUILD+36* |
| LA7953 | BUILD+106! |
| LA7ADDON | BUILD+108! |
| LA7ADDPN | BUILD+108! |
| LA7CLDT | BUILD+106! |
| LA7CODE | BUILD+51*, BUILD+65*, BUILD+75*, BUILD+106! |
| LA7DT | BUILD+4~ |
| LA7EDT | BUILD+85~, BUILD+86*, HDRLOAD~ |
| LA7ER | BUILD+46~, BUILD+55! |
| LA7ERR | BUILD+4~, BUILD+14*, BUILD+80*, BUILD+83 |
| LA7EVENT | HDRLOAD~ |
| LA7EVNT | BUILD+4~, BUILD+14*, BUILD+79 |
| LA7FAC | QUEUE+45*, BUILD+106! |
| LA7I | RTR+11~, RTR+22* |
| LA7ID | BUILD+4~, BUILD+25*, BUILD+90* |
| LA7INPT | QUEUE+19*, BUILD+61, BUILD+108!, MSH+21, MSH+26 |
| LA7INTYP | BUILD+4~, BUILD+29* |
| LA7LIMIT | HDRLOAD~ |
| LA7LNCVR | BUILD+4~ |
| LA7LOAD | BUILD+4~, BUILD+33*, BUILD+84 |
| LA7MTYP | BUILD+19*, BUILD+105! |
| LA7ND | BUILD+70*, BUILD+71*, BUILD+72, BUILD+74, BUILD+105! |
| LA7NOMSG | BUILD+4~, BUILD+17*, BUILD+79 |
| LA7NTESN | BUILD+106! |
| LA7NVAF | BUILD+4~, BUILD+14* |
| LA7OBR | BUILD+108! |
| LA7OBX | BUILD+108! |
| LA7OP | BUILD+106! |
| LA7ORCSN | BUILD+108! |
| LA7PARNT | BUILD+108! |
| LA7PAT | QUEUE+18*, QUEUE+19, BUILD+108! |
| LA7PIDSN | BUILD+106! |
| LA7PRI | BUILD+106! |
| LA7REJ | BUILD+108! |
| LA7RSITE | BUILD+4~, BUILD+25*, BUILD+90 |
| LA7SC | BUILD+85~, BUILD+86* |
| LA7SDT | BUILD+85~, BUILD+86*, HDRLOAD~ |
| LA7SEG | RTR+11~, RTR+19 |
| LA7SEG( | RTR+18* |
| LA7SEG(0 | RTR+16* |
| LA7SFT | BUILD+106! |
| LA7SITE | QUEUE+44*, QUEUE+46, BUILD+106! |
| LA7SPEC | BUILD+85~, BUILD+86* |
| LA7SS | RTR~, RTR+22 |
| LA7STOR | BUILD+108! |
| LA7UID | QUEMU2~ |
| LA7V | QUEUE+15~, QUEUE+50*, QUEUE+51*, QUEUE+52, QUEUE+53, QUEUE+54 |
| LA7VCH | QUEUE+15~, QUEUE+56, BUILD+105! |
| LA7VCH( | QUEUE+53*, QUEUE+54*, BUILD+49*, BUILD+50, BUILD+51, BUILD+52, BUILD+57 |
| LA7VER | QUEUE+46*, BUILD+106! |
| LA7VI | RTR+11~, RTR+14* |
| LA7VJ | RTR+11~, RTR+17*, RTR+18* |
| LA7VT | BUILD+46~ |
| LA7X | BUILD+4~, BUILD+21*, BUILD+22, RTR+11~, RTR+22*, RTR+23* |
| LA7Y | BUILD+4~, BUILD+47*, BUILD+48*, BUILD+49, BUILD+50, BUILD+51, BUILD+52, BUILD+57 |
| LASTYP | QUEUE+15~ |
| LAVERR | QUEUE+15~ |
| LRAA | QUEMU2~, QUEUE+21, QUEUE+24, QUEUE+32, BUILD+21, BUILD+23 |
| LRAD | QUEMU2~, QUEUE+32, BUILD+21, BUILD+23 |
| LRAN | QUEMU2~, QUEUE+32, BUILD+21, BUILD+23 |
| LRDFN | QUEMU2~, QUEUE+18, QUEUE+35, APQ~, APQ+4, BUILD+48, BUILD+49, BUILD+61, BUILD+62, BUILD+69 , BUILD+71, BUILD+72, BUILD+73, BUILD+96, BUILD+102, BUILD+105! |
| LRIDT | QUEMU2~, APQ~, BUILD+48, BUILD+49, BUILD+61, BUILD+62, BUILD+69, BUILD+71, BUILD+72, BUILD+73 , BUILD+85~, BUILD+94, BUILD+102, BUILD+105! |
| >> LRNIFN | QUEUE+31 |
| LRNLT | BUILD+105! |
| LRQUIET | BUILD+4~, BUILD+7* |
| >> LRSA( | QUEUE+54 |
| LRSAMP | QUEMU2~ |
| LRSB | QUEMU2~, BUILD+46~, BUILD+52*, BUILD+56, BUILD+65*, BUILD+74*, BUILD+75 |
| LRSB( | QUEUE+51, QUEUE+52, QUEUE+53 |
| LRSPEC | QUEMU2~, BUILD+51, BUILD+69*, BUILD+75 |
| LRSS | QUEMU2~, QUEUE+24~*, QUEUE+27, QUEUE+32, QUEUE+49, QUEUE+56, APQ~, BUILD+45, BUILD+48, BUILD+49 , BUILD+51, BUILD+61, BUILD+62, BUILD+64, BUILD+65, BUILD+68, BUILD+69, BUILD+71, BUILD+72, BUILD+73 , BUILD+75, BUILD+85~, BUILD+95, BUILD+102, BUILD+105!, RTR+11~, RTR+13*, RTR+14, RTR+20*, RTR+23 |
| >> LRTMPO("LRIFN" | QUEUE+31, QUEUE+32 |
| LRUID | BUILD+4~, BUILD+22*, BUILD+23*, BUILD+85~, BUILD+90, BUILD+93, BUILD+105! |
| LRX | RTR+11~, RTR+19*, RTR+20 |
| MSH | MSH+1~, MSH+7*, MSH+27*, MSH+28 |
| MSH( | MSH+6*, MSH+27 |
| MSH(1 | MSH+8* |
| MSH(10 | MSH+16* |
| MSH(11 | MSH+17* |
| MSH(12 | MSH+18* |
| MSH(15 | MSH+19*, MSH+22* |
| MSH(16 | MSH+20*, MSH+23* |
| MSH(2 | MSH+9* |
| MSH(21 | MSH+24*, MSH+26* |
| MSH(3 | MSH+10* |
| MSH(4 | MSH+11* |
| MSH(5 | MSH+12* |
| MSH(6 | MSH+13* |
| MSH(7 | MSH+14* |
| MSH(9 | MSH+15* |
| MSHA | MSH+1~, MSH+2*, MSH+10, MSH+11, MSH+12, MSH+13, MSH+24 |
| MSHAA | MSH+1~, MSH+3*, MSH+24 |
| NK1 | BUILD+107! |
| NTE | BUILD+107! |
| PID | BUILD+107! |
| RS | MSH+1~, MSH+5* |
| RUID | BUILD+3~, BUILD+22* |
| SITE | BUILD+3~, BUILD+25*, MSH~, MSH+2, MSH+3, MSH+18 |
| SPM | BUILD+107! |
| TQ1 | BUILD+107! |
| U | QUEUE+18, QUEUE+45, QUEUE+46, MSH+10, MSH+11, MSH+12, MSH+13, MSH+18, MSH+24 |
| X | QUEUE+15~ |
| ZTDESC | QUEUE+15~, QUEUE+47* |
| ZTDTH | QUEUE+15~, QUEUE+47* |
| ZTIO | QUEUE+15~, QUEUE+47* |
| ZTRTN | QUEUE+15~, QUEUE+47* |
| ZTSAVE | QUEUE+15~, QUEUE+57* |
| ZTSAVE( | QUEUE+48* |
| ZTSAVE("LA7VCH*" | QUEUE+55* |
| ZTSAVE("LRSPEC" | QUEUE+55* |
| ZTSK | QUEUE+15~ |