©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
LA7VPID ;VA/DALOI/JMC - HL7 PID/PV1 segment builder utility ;JUL 06, 2010 3:14 PM
Source file <LA7VPID.m>
| Package | Total | Call Graph |
|---|---|---|
| Automated Lab Instruments | 4 | BUILDSEG^LA7VHLU $$CHKDT^LA7VHLU1 $$CHKDATA^LA7VHLU3 $$ACCT^LA7VQINS |
| Registration | 3 | ($$PTR2CODE,$$PTR2TEXT)^DGUTL4 $$EN^VAFHLPID $$SITE^VASITE |
| Health Level Seven | 1 | ($$HLNAME,$$M11)^HLFNC |
| IHS Patient | 1 | $$HRN^AUPNPAT |
| Kernel | 1 | $$FMTHL7^XLFDT |
| Lab Service | 1 | PT^LRX |
| Uncategorized | 1 | $$GETICN^MPIF001 |
| VA Fileman | 1 | $$GET1^DIQ |
| Package | Total | Caller Graph |
|---|---|---|
| Automated Lab Instruments | 2 | LA7VMSG1 LA7VORM1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ICN(DFN,LA7ECH) | ; Send ICN from MPI
; Call with DFN = internal entry number of patient in PATIENT #2 file. ; LA7ECH = HL7 encoding characters. |
|
| F2PID | ; Build patient identifier field on file #2 patient
|
|
| PV1(LRDFN,LA7ARRAY,LA7FS,LA7ECH) | ; Build PV1 segment
; Call with LRDFN = ien of entry in File #63 ; LA7ARRAY = array to return PV1 array, pass by reference ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
| PID(LRDFN,LA7EXTID,LA7ARRAY,LA7PIDSN,HL,LA7ALTID) | ; Build PID segment
; Call with LRDFN = Lab DFN, passed by value ; LA7EXTID = to return as external patient id, id used by non-VA systems (optional) ; LA7ARRAY = array to return PID array, pass by reference ; LA7PIDSN = PID id counter, passsed by value ; HL = HL7 variable array, pass by reference ; LA7ALTID = return alternate patient id, id used by non-va systems (optional) |
|
| NF2PID | ; Build patient identifier field on non-file #2 patient
|
| Name | Field # of Occurrence |
|---|---|
| $$HRN^AUPNPAT | F2PID+31, F2PID+32 |
| $$PTR2CODE^DGUTL4 | NF2PID+31 |
| $$PTR2TEXT^DGUTL4 | NF2PID+32 |
| $$GET1^DIQ | F2PID+19, NF2PID+29, NF2PID+38 |
| $$HLNAME^HLFNC | NF2PID+18 |
| $$M11^HLFNC | F2PID+9, F2PID+12, F2PID+17, F2PID+28, NF2PID+9, NF2PID+10, NF2PID+16 |
| BUILDSEG^LA7VHLU | PV1+33, NF2PID+41 |
| $$CHKDT^LA7VHLU1 | NF2PID+21 |
| $$CHKDATA^LA7VHLU3 | PV1+30 |
| $$ACCT^LA7VQINS | F2PID+37 |
| PT^LRX | NF2PID+2 |
| $$GETICN^MPIF001 | ICN+10 |
| $$EN^VAFHLPID | F2PID+4 |
| $$SITE^VASITE | ICN+15 |
| $$FMTHL7^XLFDT | NF2PID+22 |
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ |
| ^LRT(67 - [#67] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | ICN+8 |
| ^DPT - [#2] | PV1+21 |
| ^LR - [#63] | PID+16, PID+19, PV1+8, PV1+26 |
| ^LRT(67 - [#67] | PID+23, PID+25, PV1+15, PV1+17 |
| ^XMB("NETNAME" | F2PID+19 |
| ^XMB(1 - [#4.3] | F2PID+19 |
| Name | Line Occurrences |
|---|---|
| $$ICN | F2PID+23 |
| F2PID | PID+28 |
| NF2PID | PID+31 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AGE | PID+32! |
| DFN | PID+10~, PID+20*, PID+23, PID+25*, PV1+7~, PV1+9*, PV1+15, PV1+17*, PV1+21, F2PID+4 , F2PID+17, F2PID+23, F2PID+31, F2PID+32, NF2PID+29, NF2PID+38, ICN~, ICN+10 |
| DOB | PID+32!, NF2PID+20, NF2PID+21*, NF2PID+22 |
| DUZ(2 | F2PID+31, F2PID+32 |
| HL | PID~ |
| HL("ECH" | F2PID+9, F2PID+12, F2PID+13, F2PID+17, F2PID+18, F2PID+19, F2PID+20, F2PID+23, F2PID+24, F2PID+28 , NF2PID+9, NF2PID+10, NF2PID+11, NF2PID+16, NF2PID+18, NF2PID+32, NF2PID+33 |
| HL("FS" | PID+15, F2PID+8, F2PID+20, F2PID+24, F2PID+27, F2PID+28, NF2PID+41 |
| >> HLFS | F2PID+9, F2PID+12, F2PID+14, F2PID+20, F2PID+24, F2PID+28, F2PID+31, F2PID+32, F2PID+33, F2PID+34 , F2PID+37 |
| HLQ | PID+10~, PID+13* |
| I | F2PID+3~, F2PID+42*, F2PID+43* |
| ICN | F2PID+3~, F2PID+23*, F2PID+24, ICN+4~, ICN+6*, ICN+12*, ICN+13*, ICN+14*, ICN+15*, ICN+17 |
| LA763 | PID+10~, PV1+7~ |
| LA763(0 | PID+19*, PID+20, PV1+8*, PV1+9 |
| LA7ALTID | PID~, PID+18*, F2PID+27, NF2PID+14 |
| LA7ARRAY | PID~, PV1~, PV1+33, NF2PID+41 |
| LA7ARRAY( | F2PID+43* |
| LA7ARRAY(0 | F2PID+4*, F2PID+8*, F2PID+9*, F2PID+12, F2PID+14*, F2PID+20*, F2PID+24*, F2PID+27*, F2PID+28*, F2PID+31* , F2PID+32*, F2PID+33*, F2PID+34*, F2PID+37* |
| LA7ECH | PV1~, PV1+30, ICN~, ICN+13, ICN+14, ICN+15 |
| LA7EXTID | PID~, PID+18*, F2PID+7, F2PID+8, F2PID+9, NF2PID+7, NF2PID+8, NF2PID+9 |
| LA7FS | PV1~, PV1+30, PV1+33 |
| LA7ICN | ICN+4~, ICN+10*, ICN+11, ICN+12 |
| LA7LOC | PV1+7~, PV1+9*, PV1+21*, PV1+22, PV1+25, PV1+26*, PV1+30*, PV1+31 |
| >> LA7ORD | F2PID+37 |
| LA7PIDSN | PID~, PID+18*, F2PID+4, NF2PID+4 |
| LA7X | F2PID+3~, NF2PID+29*, NF2PID+30, NF2PID+31, NF2PID+32, NF2PID+38*, NF2PID+39 |
| LA7Y | PID+10~, PV1+7~, PV1+33, NF2PID+41 |
| LA7Y(0 | PV1+11*, NF2PID+3* |
| LA7Y(1 | PV1+12*, NF2PID+4* |
| LA7Y(10 | NF2PID+27*, NF2PID+31*, NF2PID+32*, NF2PID+33* |
| LA7Y(19 | NF2PID+36*, NF2PID+39* |
| LA7Y(2 | PV1+22*, PV1+27*, NF2PID+8*, NF2PID+9* |
| LA7Y(3 | PV1+31*, NF2PID+10*, NF2PID+11* |
| LA7Y(4 | NF2PID+14*, NF2PID+15*, NF2PID+16* |
| LA7Y(5 | NF2PID+18* |
| LA7Y(7 | NF2PID+22* |
| LA7Y(8 | NF2PID+24* |
| LRDFN | PID~, PID+15, PID+16, PID+19, PV1~, PV1+8, PV1+26, NF2PID+15 |
| LRDPF | PID+10~, PID+20*, PID+23, PID+24*, PID+28, PID+31, PV1+7~, PV1+9*, PV1+15, PV1+16* , PV1+21, NF2PID+11, NF2PID+28, NF2PID+37 |
| LRRB | PID+32! |
| LRTREA | PID+32! |
| LRWRD | PID+32! |
| PNM | PID+32!, NF2PID+18 |
| SEX | PID+32!, NF2PID+24 |
| SSN | PID+32! |
| SSN(2 | NF2PID+10 |
| VA | PID+32! |
| VA200 | PID+32! |
| VAFPID | PID+10~ |
| VAFPID( | F2PID+43 |
| VAFPID(0 | F2PID+41 |
| X | F2PID+3~, F2PID+12*, F2PID+13*, F2PID+14, F2PID+17*, F2PID+18*, F2PID+19*, F2PID+20, ICN+8* |