©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
IS00001(INTT,INDA,INA,INDEST,INQUE,INORDUZ,INORDIV) ;Compiled from script 'Generated: HL IHS JVN O01 PACS-O' on DEC 03, 2002
Source file <IS00001.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Generic Interface System | 5 | $$MESSID^INHD (ERROR,MC)^INHS SETPIECE^INHU ($$COMP,$$ESC,$$FIELD,$$REP,$$SUBCOMP)^INHUT EN^IS00001A |
| IHS Support HL7 Interfaces | 3 | ^BHLMSH ^BHLPID VST^BHLV |
| Kernel | 1 | $$GETERR^%ZTOS |
| Uncategorized | 1 | SETDT^UTDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| 9 | ||
| START | ;Initialize variables
|
|
| EN | ||
| ERROR | ;
|
| Name | Field # of Occurrence |
|---|---|
| $$GETERR^%ZTOS | ERROR+1 |
| ^BHLMSH | START+16 |
| ^BHLPID | START+11 |
| VST^BHLV | START+11 |
| $$MESSID^INHD | START+1 |
| ERROR^INHS | ERROR+1 |
| MC^INHS | START+69 |
| SETPIECE^INHU | START+70, START+71, START+72, START+73, START+74, START+75, START+77, START+78 |
| $$COMP^INHUT | START+8, START+9 |
| $$ESC^INHUT | START+9 |
| $$FIELD^INHUT | START+8, START+9 |
| $$REP^INHUT | START+9 |
| $$SUBCOMP^INHUT | START+8, START+9 |
| EN^IS00001A | 9 |
| SETDT^UTDT | START+3 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TRAP" | EN, ERROR+1 |
| ^INRHSITE(1 | START+3, START+7 |
| ^INTHOS(1 | ERROR+1 |
| ^UTILITY("INH" | START+1! |
| ^VA(200 - [#200] | START+4 |
| Name | Line Occurrences |
|---|---|
| START | EN+1 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | START+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BHLMIEN | START+5* |
| >> CP | START+70*, START+71, START+72, START+73, START+74, START+75, START+77, START+78 |
| 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+43!, START+45*, START+47!, START+49*, START+50!, START+52*, START+53! , START+55*, START+56!, START+58*, START+59!, START+61*, START+62!, START+64*, START+65!, START+67*, START+68! , START+76* |
| >> DELIM | START+8*, START+13*, START+70, START+71, START+72, START+73, START+74, START+75, START+77, START+78 |
| 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+43!, START+47!, START+50!, START+53! , START+56!, START+59!, START+62!, START+65!, START+68! |
| >> GERR | START+3* |
| INA | IS00001~ |
| INA("ACA" | START+61 |
| INA("APA" | START+64 |
| INA("ENC" | START+18 |
| INA("EVDT" | START+38 |
| INA("MESSID" | START+1*, START+45 |
| INA("MET" | START+42 |
| INA("PRID" | START+49 |
| INA("RAP" | START+30 |
| INA("RF" | START+34 |
| INA("SAP" | START+22 |
| INA("SF" | START+26 |
| INA("VER" | START+52 |
| INDA | IS00001~, START+2, START+18, START+22, START+26, START+30, START+34, START+38, START+42, START+45 , START+49, START+52, START+55, START+58, START+61, START+64, START+67, START+76 |
| >> INDELIM | START+8* |
| >> INDELIMS | START+9* |
| INDEST | IS00001~ |
| INHERCNT | START+3! |
| INHERR | START+3! |
| >> INHLDUZ | START+4* |
| >> INMODE | START+3* |
| INORDIV | IS00001~ |
| INORDUZ | IS00001~ |
| INQUE | IS00001~ |
| INREQERR | START+3! |
| INSETID | START+6!, START+15* |
| >> INSMIN | START+7* |
| >> INSTERR | START+3* |
| >> INSUBCOM | START+8* |
| >> INSUBDEL | START+8* |
| INTT | IS00001~ |
| INUIF6 | START+2!* |
| INV | START+3!*, START+20, START+24, START+28, START+32, START+36, START+40, START+43, START+47, START+50 , START+53, START+56, START+59, START+62, START+65, START+68, START+70, START+71, START+72, START+73 , START+74, START+75, START+76, START+77, START+78 |
| >> INVS | START+3*, START+69 |
| >> L1 | START+70*, START+71*, START+72*, START+73*, START+74*, START+75*, START+76*, START+77*, START+78* |
| >> LCT | START+3* |
| LINE | START+70!*, START+71, START+72, START+73, START+74, START+75, START+77, START+78 |
| >> MESSID | START+1* |
| >> MULT | START+3* |
| >> SUBDELIM | START+8*, START+14*, START+70, START+71, START+72, START+73, START+74, START+75, START+77, START+78 |
| U | START+3, START+7 |
| >> 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+45*, START+46*, START+47, START+49*, START+50, START+52*, START+53, START+55* , START+56, START+58*, START+59, START+61*, START+62, START+64*, START+65, START+67*, START+68, START+76* |
| >> X1 | START+19*, START+23*, START+27*, START+31*, START+35*, START+39*, START+46* |
| >> Y(1 | START+42*, START+49*, START+61*, START+64*, START+76* |
| >> Y(2 | START+42*, START+49*, START+61*, START+64*, START+76* |