©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
IS00008(INTT,INDA,INA,INDEST,INQUE,INORDUZ,INORDIV) ;Compiled from script 'Generated: HL IHS DW1 HEADER-O' on SEP 08, 2008
Source file <IS00008.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Generic Interface System | 4 | ($$MESSID,$$NEWO)^INHD (ERROR,MC)^INHS SETPIECE^INHU ($$COMP,$$ESC,$$FIELD,$$REP,$$SUBCOMP)^INHUT |
| Data Warehouse Export System | 1 | HDR^BDWBHL |
| IHS Support HL7 Interfaces | 1 | ^BHLMSH |
| Kernel | 1 | $$GETERR^%ZTOS |
| Uncategorized | 1 | SETDT^UTDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ;Initialize variables
|
|
| EN | ||
| ERROR | ;
|
| Name | Field # of Occurrence |
|---|---|
| $$GETERR^%ZTOS | ERROR+1 |
| HDR^BDWBHL | START+12 |
| ^BHLMSH | START+12 |
| $$MESSID^INHD | START+1 |
| $$NEWO^INHD | START+95 |
| ERROR^INHS | ERROR+1, START+96 |
| MC^INHS | START+53, START+86, START+92 |
| SETPIECE^INHU | START+54, START+55, START+56, START+57, START+58, START+59, START+87, START+88, START+89, START+90 |
| $$COMP^INHUT | START+9, START+10 |
| $$ESC^INHUT | START+10 |
| $$FIELD^INHUT | START+9, START+10 |
| $$REP^INHUT | START+10 |
| $$SUBCOMP^INHUT | START+9, START+10 |
| SETDT^UTDT | START+3 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TRAP" | EN, ERROR+1 |
| ^INRHSITE(1 | START+3, START+8 |
| ^INRHT - [#4000] | START+95 |
| ^INTHL7M - [#4011] | START+6 |
| ^INTHOS(1 | ERROR+1 |
| ^UTILITY("INH" | START+1!, START+60*, START+91* |
| ^VA(200 - [#200] | START+4 |
| Name | Line Occurrences |
|---|---|
| START | EN+1 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | START+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BHLMIEN | START+5*, START+6 |
| >> CP | START+54*, START+55, START+56, START+57, START+58, START+59, START+87*, START+88, START+89, START+90 |
| D0 | START+18*, START+20!, START+22*, START+24!, START+26*, START+28!, START+30*, START+32!, START+34*, START+36! , START+38*, START+40!, START+42*, START+44!, START+46*, START+48!, START+50*, START+52!, START+63*, START+65! , START+67*, START+69!, START+71*, START+73!, START+75*, START+77!, START+79*, START+81!, START+83*, START+85! |
| >> DELIM | START+9*, START+14*, START+54, START+55, START+56, START+57, START+58, START+59, START+87, START+88 , START+89, START+90 |
| DTIME | START+3* |
| DUZ | START+4* |
| DUZ("AG" | START+3* |
| DUZ(0 | START+3* |
| DXS | START+20!, START+24!, START+28!, START+32!, START+36!, START+40!, START+44!, START+48!, START+52!, START+65! , START+69!, START+73!, START+77!, START+81!, START+85! |
| >> GERR | START+3* |
| INA | IS00008~ |
| INA("BDW1BHS11" | START+50 |
| INA("BDW1BHS9" | START+42 |
| INA("BDW1ZHS1" | START+63 |
| INA("BDW1ZHS2" | START+67 |
| INA("BDW1ZHS3" | START+71 |
| INA("BDW1ZHS4" | START+75 |
| INA("BDW1ZHS5" | START+79 |
| INA("BDW1ZHS6" | START+83 |
| INA("ENC" | START+18 |
| INA("INMIDGEN" | START+95 |
| INA("MESSID" | START+1* |
| INDA | IS00008~, START+2, START+18, START+22, START+26, START+30, START+34, START+38, START+42, START+46 , START+50, START+63, START+67, START+71, START+75, START+79, START+83 |
| >> INDELIM | START+9* |
| >> INDELIMS | START+10* |
| INDEST | IS00008~, START+95 |
| INHERCNT | START+3! |
| INHERR | START+3! |
| >> INHLDUZ | START+4* |
| >> INMODE | START+3* |
| INORDIV | IS00008~, START+95 |
| INORDUZ | IS00008~, START+95 |
| INQUE | IS00008~, START+95 |
| INREQERR | START+3!, START+94 |
| INSETID | START+7!, START+16*, START+61* |
| >> INSMIN | START+8* |
| >> INSTERR | START+3*, START+94 |
| >> INSUBCOM | START+9* |
| >> INSUBDEL | START+9* |
| INTT | IS00008~, START+95 |
| INUIF6 | START+2!*, START+95 |
| >> INUIF7 | START+95 |
| INV | START+3!*, START+20, START+24, START+28, START+32, START+36, START+40, START+44, START+48, START+52 , START+54, START+55, START+56, START+57, START+58, START+59, START+65, START+69, START+73, START+77 , START+81, START+85, START+87, START+88, START+89, START+90 |
| >> INVS | START+3*, START+53, START+86, START+92 |
| >> L1 | START+54*, START+55*, START+56*, START+57*, START+58*, START+59*, START+87*, START+88*, START+89*, START+90* |
| >> LCT | START+3*, START+60*, START+91* |
| LINE | START+54!*, START+55, START+56, START+57, START+58, START+59, START+60, START+87!*, START+88, START+89 , START+90, START+91 |
| >> MESSID | START+1*, START+95 |
| >> MULT | START+3* |
| >> SUBDELIM | START+9*, START+15*, START+54, START+55, START+56, START+57, START+58, START+59, START+87, START+88 , START+89, START+90 |
| U | START+3, START+8, START+95 |
| >> UIF | START+95*, START+96 |
| >> X | EN*, ERROR+1*, START+18*, START+19*, START+20, START+22*, START+23*, START+24, START+26*, START+27* , START+28, START+30*, START+31*, START+32, START+34*, START+35*, START+36, START+38*, START+39*, START+40 , START+42*, START+43*, START+44, START+46*, START+47*, START+48, START+50*, START+51*, START+52, START+63* , START+64*, START+65, START+67*, START+68*, START+69, START+71*, START+72*, START+73, START+75*, START+76* , START+77, START+79*, START+80*, START+81, START+83*, START+84*, START+85 |
| >> X1 | START+19*, START+23*, START+27*, START+31*, START+35*, START+39*, START+43*, START+47*, START+51*, START+64* , START+68*, START+72*, START+76*, START+80*, START+84* |