©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
PXRM7XT ;SLC/JVS HL7 EXTRACT FROM FILE; 06/01/2007
Source file <PXRM7XT.m>
| Package | Total | Call Graph |
|---|---|---|
| Clinical Reminders | 1 | EN^PXRM7M1 |
| Health Level Seven | 1 | $$HLDATE^HLFNC |
| VA Fileman | 1 | GETS^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OBXSEG | ;CREATE THE OBX SEGMENTS
|
|
| EXTRACT(IEN,SEE,ID,MODE) | ;
|
|
| OBRSEG | ;CREATE OBR SEGMENTS
|
|
| SPLIT | ;SPLIT MESSAGES
|
|
| ORCSEG | ;CREATE ORC SEGMENTS
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GETS^DIQ |
| ^PXRMXT(810.3 - [#810.3] | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PXRMXT(810.3 - [#810.3] | EXTRACT+6, OBRSEG+6, OBRSEG+7 |
| ^TMP("HLS" | SPLIT+6!, SPLIT+11*, EXTRACT+16*, EXTRACT+19*, EXTRACT+25!, ORCSEG+51*, OBRSEG+56*, OBXSEG+74* |
| ^TMP("PXRM7" | EXTRACT+24!, ORCSEG+12, ORCSEG+16, ORCSEG+20, ORCSEG+24, ORCSEG+28, ORCSEG+32, ORCSEG+35, ORCSEG+39, ORCSEG+43 , OBRSEG+12, OBRSEG+22, OBRSEG+26, OBRSEG+28, OBRSEG+31, OBRSEG+35, OBRSEG+39, OBRSEG+43, OBRSEG+47, OBXSEG+12 , OBXSEG+18, OBXSEG+24, OBXSEG+30, OBXSEG+36, OBXSEG+42, OBXSEG+48, OBXSEG+54, OBXSEG+60, OBXSEG+66 |
| ^TMP("PXRM7HLORC" | SPLIT+7, EXTRACT+26!, ORCSEG+53* |
| Name | Line Occurrences |
|---|---|
| OBXSEG | OBRSEG+60 |
| ORCSEG | EXTRACT+12 |
| SPLIT | OBRSEG+61 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | EXTRACT+29! |
| DISYS | EXTRACT+29! |
| EO | EXTRACT+29!, ORCSEG+36*, ORCSEG+40*, ORCSEG+47 |
| EO(2 | ORCSEG+35*, ORCSEG+36 |
| EO(5 | ORCSEG+39*, ORCSEG+40 |
| ERROR | EXTRACT+2!, EXTRACT+7, EXTRACT+10 |
| ERROR(1 | EXTRACT+6* |
| >> HL("EID" | EXTRACT+28! |
| >> HL("EIDS" | EXTRACT+29! |
| >> HLA("HLS" | EXTRACT+28! |
| HLECH | EXTRACT+29! |
| HLFS | EXTRACT+29! |
| HLN | EXTRACT+29! |
| HLQ | EXTRACT+29! |
| HLSAN | EXTRACT+29! |
| HLX | EXTRACT+29! |
| ID | SPLIT+5, EXTRACT~, EXTRACT+22 |
| IEN | EXTRACT~, EXTRACT+6, EXTRACT+11, ORCSEG+6, OBRSEG+6, OBRSEG+7, OBRSEG+10, OBRSEG+11 |
| IENIEN | EXTRACT+30!, OBRSEG+7*, OBRSEG+8, OBRSEG+11, OBRSEG+62 |
| IENOBR | EXTRACT+30!, OBRSEG+6*, OBRSEG+7, OBRSEG+10, OBRSEG+11 |
| IENX | EXTRACT+30!, OBRSEG+10*, OBRSEG+12, OBRSEG+22, OBRSEG+26, OBRSEG+31, OBXSEG+12, OBXSEG+18, OBXSEG+24, OBXSEG+30 , OBXSEG+36 |
| IENY | EXTRACT+30!, ORCSEG+6*, ORCSEG+12, ORCSEG+16, ORCSEG+20, ORCSEG+24, ORCSEG+28, ORCSEG+32, ORCSEG+35, ORCSEG+39 , ORCSEG+43 |
| IENZ | EXTRACT+30!, OBRSEG+11*, OBRSEG+35, OBRSEG+39, OBRSEG+43, OBRSEG+47, OBXSEG+42, OBXSEG+48, OBXSEG+54, OBXSEG+60 , OBXSEG+66 |
| L | EXTRACT+30!, OBRSEG+8*, OBRSEG+13, OBRSEG+14, OBRSEG+18, OBRSEG+28, OBRSEG+35, OBRSEG+39, OBRSEG+43, OBRSEG+47 , OBRSEG+51, OBRSEG+52, OBRSEG+56, OBRSEG+58, OBRSEG+62, OBXSEG+3, OBXSEG+4, OBXSEG+7, OBXSEG+10, OBXSEG+16 , OBXSEG+22, OBXSEG+28, OBXSEG+34, OBXSEG+40, OBXSEG+46, OBXSEG+52, OBXSEG+58, OBXSEG+64, OBXSEG+70, OBXSEG+74 , OBXSEG+76 |
| LAST | EXTRACT+15, EXTRACT+18!, OBRSEG+5*, OBRSEG+14* |
| LINE | SPLIT+3, SPLIT+9*, EXTRACT+2!, EXTRACT+4*, EXTRACT+16*, EXTRACT+30!, ORCSEG+51*, OBRSEG+56*, OBXSEG+74* |
| MODE | EXTRACT~ |
| NEXT | EXTRACT+30!, OBRSEG+5*, OBRSEG+14* |
| NTE | EXTRACT+15*, EXTRACT+16, EXTRACT+17, EXTRACT+18! |
| OBR | OBRSEG+59! |
| OBR( | OBRSEG+13*, OBRSEG+14*, OBRSEG+28*, OBRSEG+51*, OBRSEG+52*, OBRSEG+56, OBRSEG+58 |
| OBX | OBXSEG+77! |
| OBX( | OBXSEG+3*, OBXSEG+4*, OBXSEG+7*, OBXSEG+70*, OBXSEG+74, OBXSEG+76 |
| ORC | SPLIT+8*, SPLIT+10, SPLIT+11, EXTRACT+19*, ORCSEG+9*, ORCSEG+32*, ORCSEG+43*, ORCSEG+46*, ORCSEG+47*, ORCSEG+48* , ORCSEG+51, ORCSEG+52, ORCSEG+53, ORCSEG+54! |
| ORC2 | SPLIT+2~, SPLIT+7*, SPLIT+8* |
| ORCCNT | SPLIT+4*, SPLIT+8, EXTRACT+1~, EXTRACT+3*, EXTRACT+19 |
| OV | OBXSEG+13*, OBXSEG+19*, OBXSEG+25*, OBXSEG+31*, OBXSEG+37*, OBXSEG+43*, OBXSEG+49*, OBXSEG+55*, OBXSEG+61*, OBXSEG+67* , OBXSEG+70, OBXSEG+71! |
| OV(1 | OBXSEG+12*, OBXSEG+13, OBXSEG+42*, OBXSEG+43 |
| OV(2 | OBXSEG+18*, OBXSEG+19, OBXSEG+48*, OBXSEG+49 |
| OV(3 | OBXSEG+24*, OBXSEG+25, OBXSEG+54*, OBXSEG+55 |
| OV(4 | OBXSEG+30*, OBXSEG+31, OBXSEG+60*, OBXSEG+61 |
| OV(5 | OBXSEG+36*, OBXSEG+37, OBXSEG+66*, OBXSEG+67 |
| PROTIEN | EXTRACT+28! |
| PXRM7 | EXTRACT+28! |
| PXRM77 | EXTRACT+28! |
| PXRM7ID | EXTRACT+28! |
| PXRM7R | EXTRACT+28! |
| QTI | EXTRACT+30!, ORCSEG+13*, ORCSEG+17*, ORCSEG+21*, ORCSEG+25*, ORCSEG+29*, ORCSEG+46 |
| QTI(1 | ORCSEG+12*, ORCSEG+13 |
| QTI(11 | ORCSEG+28*, ORCSEG+29 |
| QTI(3 | ORCSEG+16*, ORCSEG+17 |
| QTI(4 | ORCSEG+20*, ORCSEG+21 |
| QTI(5 | ORCSEG+24*, ORCSEG+25 |
| RFS | EXTRACT+30!, OBRSEG+32*, OBRSEG+36*, OBRSEG+40*, OBRSEG+44*, OBRSEG+52 |
| RFS(1 | OBRSEG+35*, OBRSEG+36 |
| RFS(2 | OBRSEG+31*, OBRSEG+32 |
| RFS(4 | OBRSEG+39*, OBRSEG+40 |
| RFS(5 | OBRSEG+43*, OBRSEG+44 |
| SEE | SPLIT+10, EXTRACT~, EXTRACT+8, EXTRACT+17, ORCSEG+52, OBRSEG+58, OBXSEG+76 |
| SEQ | EXTRACT+30!, OBRSEG+12*, OBRSEG+13, OBRSEG+14, OBRSEG+28, OBRSEG+51, OBRSEG+52, OBRSEG+56, OBRSEG+58, OBXSEG+3 , OBXSEG+4, OBXSEG+7, OBXSEG+70, OBXSEG+74, OBXSEG+76 |
| STATION | EXTRACT+31!, OBRSEG+26*, OBRSEG+27, OBRSEG+28 |
| TERM | OBXSEG+1~, OBXSEG+11*, OBXSEG+12, OBXSEG+17*, OBXSEG+18, OBXSEG+23*, OBXSEG+24, OBXSEG+29*, OBXSEG+30, OBXSEG+35* , OBXSEG+36, OBXSEG+41*, OBXSEG+42, OBXSEG+47*, OBXSEG+48, OBXSEG+53*, OBXSEG+54, OBXSEG+59*, OBXSEG+60, OBXSEG+65* , OBXSEG+66 |
| USI | EXTRACT+31!, OBRSEG+19*, OBRSEG+23*, OBRSEG+48*, OBRSEG+51 |
| USI(2 | OBRSEG+18*, OBRSEG+19 |
| USI(4 | OBRSEG+47*, OBRSEG+48 |
| USI(5 | OBRSEG+22*, OBRSEG+23 |
| ZMID | EXTRACT+28! |