Call Graph
IBCNEHLQ ;DAOU/ALA - HL7 RQI Message ;17-JUN-2002
Source file <IBCNEHLQ.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 4 | IBCNEDEP IBTRHLO IBTRHLO1 IBTRHLO2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Entry Point
; Variables ; HLFS = Field Separator ; DFN = Patient IEN ; PAYR = Payer IEN ; BUFF = Buffer IEN ; FRDT = Freshness Date |
|
| PID | ; Patient Identification Segment
|
|
| GT1 | ; Guarantor Segment
|
|
| IN1 | ; Insurance Segment
|
|
| NTE(CTR) | ; NTE Segment
|
|
| CHK | ; Check for spouse or other information in the Patient Relation File
; DGREL = Relationship (1=Self, 2=Spouse, 3-34,99=Other) |
|
| ENCHL7(STR) | ; Encode HL7 escape seqs in data fields
|
|
| SCRUB(Z) | ; remove all punctuation from the string and convert lowercase to uppercase
; IB*2*416 - used for subscriber and patient ID fields |
|
| SCRUBX | ;
|
|
| PATREL(REL) | ; convert pat.relationship to insured from VistA to X12 and return X12 value
; REL - VistA value ; ; VistA values of Self (18), Spouse (01), and Child (19) remain unchanged, ; anything else is converted to X12 value of Other Adult (34) |
| Name | Field # of Occurrence |
|---|---|
| $$FIND1^DIC | IN1+57 |
| $$EXTERNAL^DILFD | NTE+3 |
| $$GET1^DIQ | PID+27, PID+35, PID+36, GT1+12, IN1+15, IN1+16, IN1+58, NTE+6, NTE+7, NTE+12 , NTE+14, NTE+30 |
| GETS^DIQ | GT1+52, IN1+51 |
| $$HLADDR^HLFNC | GT1+36 |
| $$HLDATE^HLFNC | PID+28, PID+37, PID+51, GT1+16, GT1+31, GT1+40, GT1+59, GT1+65, IN1+17, IN1+18 , IN1+22, IN1+29, IN1+30 |
| $$HLNAME^HLFNC | PID+39, GT1+13, GT1+28, GT1+56 |
| $$NOPUNCT^IBCEF | SCRUB+2 |
| $$NAME^IBCNEHLU | GT1+12 |
| $$MBICHK^IBCNEUT7 | PID+7, NTE+11 |
| $$EN^VAFHLPID | PID+9 |
| $$SITE^VASITE | PID+49 |
| $$HLNAME^XLFNAME | PID+43 |
| $$UP^XLFSTR | SCRUB+3 |
| FileNo | Call Tags |
|---|---|
| 2.312 | GET1^DIQ |
| ^IBE(355.12 - [#355.12] | GET1^DIQ |
| ^IBA(355.33 - [#355.33] | GET1^DIQ |
| ^IBCN(365.1 - [#365.1] | EXTERNAL^DILFD, GET1^DIQ |
| ^IBE(365.12 - [#365.12] | FIND1^DIC, GET1^DIQ |
| ^IBCN(365.18 - [#365.18] | GET1^DIQ |
| 365.185 | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPR(408.12 - [#408.12] | CHK+4, CHK+5, CHK+19 |
| ^DGPR(408.13 - [#408.13] | CHK+23 |
| ^DPT - [#2] | PID+24, PID+29, PID+48, GT1+24, GT1+27, GT1+31, GT1+35, GT1+43, GT1+44, IN1+28 , IN1+29, IN1+30, IN1+33, CHK+24 |
| ^IBA(355.33 - [#355.33] | PID+31, PID+38, GT1+9, GT1+16, IN1+7, IN1+17, IN1+18 |
| ^IBCN(365.18 - [#365.18] | GT1+49, IN1+48, NTE+29 |
| ^IBE(365.12 - [#365.12] | IN1+10, IN1+11, IN1+35, IN1+36 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADMDT | IN1+1~ |
| ADMN | IN1+1~ |
| >> BUFF | PID+7, PID+30, PID+31, PID+35, PID+38, GT1+9, GT1+12, GT1+16, IN1+7, IN1+15 , IN1+16, IN1+17, IN1+18, NTE+11 |
| CHR | ENCHL7+8~, ENCHL7+12*, ENCHL7+13, ENCHL7+14, ENCHL7+15 |
| CNT | ENCHL7+8~, ENCHL7+12*, ENCHL7+15 |
| CTR | NTE~, NTE+3, NTE+5, NTE+9, NTE+25, NTE+26, NTE+27, NTE+31, NTE+32! |
| DFN | PID+6*, PID+9, PID+21, PID+24, PID+27, PID+29, PID+36, PID+42, PID+48, PID+49 , GT1+24, GT1+27, GT1+31, GT1+35, GT1+43, GT1+44, IN1+28, IN1+29, IN1+30, IN1+33 , CHK+4, CHK+24~* |
| >> DGREL | CHK+5*, CHK+8, CHK+11 |
| DT | IN1+8 |
| EDQ | PID+1~ |
| EFFDT | IN1+1~, IN1+17*, IN1+19, IN1+29*, IN1+31 |
| EICDIIEN | GT1+2~, GT1+49*, GT1+50, GT1+51, IN1+2~, IN1+48*, IN1+49, IN1+50, NTE+1~, NTE+29* , NTE+30 |
| >> EICDVIEN | GT1+50, GT1+51, IN1+49, IN1+50 |
| ELIGDT | IN1+1~, IN1+8*, IN1+22 |
| EXPDT | IN1+1~, IN1+18*, IN1+20, IN1+30*, IN1+32 |
| >> EXT | PID+7, PID+23, PID+30, PID+53, GT1+8, GT1+22, GT1+48, IN1+6, IN1+26, IN1+47 , NTE+11, NTE+17, NTE+27 |
| >> FRDT | PID+51*, PID+53 |
| >> GRPNAM | IN1+43 |
| >> GRPNUM | IN1+42 |
| >> GT1 | GT1+4*, GT1+15*, GT1+17*, GT1+18*, GT1+30*, GT1+32*, GT1+33*, GT1+37*, GT1+40*, GT1+41* , GT1+42, GT1+45*, GT1+58*, GT1+60*, GT1+62*, GT1+65*, GT1+66*, GT1+68, GT1+69*, GT1+70* |
| >> HLECH | PID+13, PID+14, PID+15, PID+39, PID+43, PID+49, GT1+13, GT1+15, GT1+18, GT1+28 , GT1+30, GT1+33, GT1+56, GT1+58, GT1+62, IN1+10, IN1+35, IN1+56 |
| >> HLFS | PID+11, PID+16, PID+17, PID+28, PID+37, PID+45, PID+47, PID+49, PID+52, PID+53 , GT1+15, GT1+17, GT1+18, GT1+30, GT1+32, GT1+33, GT1+37, GT1+40, GT1+41, GT1+42 , GT1+45, GT1+58, GT1+60, GT1+62, GT1+65, GT1+66, GT1+69, GT1+70, IN1+9, IN1+10 , IN1+11, IN1+15, IN1+16, IN1+19, IN1+20, IN1+21, IN1+22, IN1+23, IN1+31, IN1+32 , IN1+34, IN1+35, IN1+36, IN1+37, IN1+42, IN1+43, IN1+44, IN1+55, IN1+56, IN1+58 , IN1+59, IN1+60, IN1+63, IN1+64, NTE+31 |
| >> HLQ | PID+43 |
| I | PID+1~, PID+45* |
| IBADDR | GT1+1~, GT1+36*, GT1+37 |
| IBDOB | PID+1~, PID+27*, PID+28, PID+35*, PID+36*, PID+37 |
| IBFMIEN | GT1+2~, GT1+51*, GT1+52, GT1+54, GT1+59, GT1+62, GT1+64, IN1+2~, IN1+50*, IN1+51 , IN1+54, IN1+55, IN1+56, IN1+57, IN1+60 |
| IBPYIEN | IN1+2~, IN1+57*, IN1+58 |
| IBSDATA | GT1+1~, GT1+35*, GT1+36 |
| IBTRKDTA | GT1+2~, GT1+52!, IN1+2~, IN1+51! |
| IBTRKDTA( | GT1+54, GT1+59, GT1+62, GT1+64, IN1+54, IN1+55, IN1+56, IN1+57, IN1+60 |
| IBWHO | PID+1~, PID+24*, PID+25, PID+31*, PID+32 |
| ICN | PID+1~, PID+48*, PID+49 |
| IDOB | GT1+1~, GT1+16*, GT1+17, GT1+31*, GT1+32, GT1+40, GT1+59*, GT1+60, GT1+65, CHK+23* , CHK+24* |
| IEN | GT1+49, IN1+48, NTE+6, NTE+12, NTE+14, NTE+29, CHK+2~, CHK+3*, CHK+4*, CHK+5 , CHK+11, CHK+14 |
| IENS | IN1+1~ |
| >> IN1 | IN1+3*, IN1+9*, IN1+10*, IN1+11*, IN1+15*, IN1+16*, IN1+19*, IN1+20*, IN1+21*, IN1+22* , IN1+23*, IN1+31*, IN1+32*, IN1+34*, IN1+35*, IN1+36*, IN1+37*, IN1+42*, IN1+43*, IN1+44* , IN1+55*, IN1+56*, IN1+58*, IN1+59*, IN1+60*, IN1+61, IN1+63*, IN1+64* |
| >> IRIEN | PID+23, PID+24, PID+27, PID+29, PID+36, GT1+23, GT1+24, GT1+27, GT1+31, GT1+35 , GT1+43, IN1+27, IN1+28, IN1+29, IN1+30, IN1+33 |
| ISEX | GT1+1~, GT1+41, GT1+64*, GT1+66, CHK+3*, CHK+23*, CHK+24* |
| LOOP | ENCHL7+8~, ENCHL7+15* |
| NEW | ENCHL7+8~, ENCHL7+13*, ENCHL7+15*, ENCHL7+16 |
| NM | PID+1~, PID+29*, PID+30, PID+38*, PID+39*, PID+41, PID+43*, PID+45*, GT1+1~, GT1+12* , GT1+13*, GT1+14*, GT1+15, GT1+27*, GT1+28*, GT1+29*, GT1+30, GT1+54*, GT1+55, GT1+56* , GT1+57*, GT1+58 |
| NM("FIELD" | PID+42* |
| NM("FILE" | PID+42* |
| NM("IENS" | PID+42* |
| >> NTE | NTE+3*, NTE+6*, NTE+7*, NTE+11*, NTE+23*, NTE+25*, NTE+26*, NTE+30*, NTE+31* |
| >> PATID | IN1+9, IN1+34 |
| >> PAYR | IN1+10, IN1+11, IN1+35, IN1+36 |
| PER | GT1+1~, CHK+19*, CHK+20, CHK+21 |
| >> PID | PID+9*, PID+11, PID+16*, PID+17, PID+28*, PID+37*, PID+45*, PID+47*, PID+49*, PID+52* , PID+53* |
| PID11 | PID+1~, PID+11*, PID+12, PID+13*, PID+14*, PID+15*, PID+16 |
| PID19 | PID+1~, PID+17*, PID+52 |
| PLIEN | GT1+1~, CHK+21*, CHK+22, CHK+23 |
| PREL | IN1+1~, IN1+7*, IN1+9, IN1+21, IN1+33*, IN1+34, IN1+37, IN1+53*, IN1+54*, IN1+59 |
| QFL | CHK+2~, CHK+3*, CHK+4, CHK+11* |
| >> QUERY | PID+7, GT1+5, GT1+48, IN1+47, NTE+11, NTE+18, NTE+27 |
| RDATA | GT1+1~, CHK+23*, CHK+24 |
| REL | PATREL~, PATREL+6 |
| RLIEN | GT1+1~, CHK+3*, CHK+11*, CHK+14*, CHK+16, CHK+19 |
| RPLC | ENCHL7+8~, ENCHL7+14*, ENCHL7+15 |
| SEX | GT1+1~, GT1+43*, GT1+44*, GT1+45 |
| STR | ENCHL7~, ENCHL7+12, ENCHL7+13, ENCHL7+15, ENCHL7+16*, ENCHL7+18 |
| >> SUBID | GT1+18, GT1+33, IN1+9, IN1+28, IN1+34 |
| >> TRANSR | IN1+8, NTE+3 |
| TYPE | NTE+10~, NTE+13*, NTE+14*, NTE+15*, NTE+16*, NTE+18*, NTE+19*, NTE+20*, NTE+21*, NTE+22* , NTE+23 |
| U | PID+24, PID+29, PID+31, PID+38, PID+48, PID+49, GT1+9, GT1+16, GT1+24, GT1+27 , GT1+31, GT1+36, GT1+43, GT1+44, IN1+7, IN1+8, IN1+10, IN1+11, IN1+17, IN1+18 , IN1+28, IN1+29, IN1+30, IN1+33, IN1+35, IN1+36, NTE+3, CHK+5, CHK+19, CHK+23 , CHK+24 |
| VAFSTR | PID+1~, PID+6*, PID+7*, PID+9 |
| WHICH | NTE+10~, NTE+12*, NTE+15, NTE+16, NTE+20, NTE+21, NTE+22 |
| WHO | GT1+1~, GT1+9*, GT1+10, GT1+24*, GT1+25, GT1+42, CHK+11 |
| Z | SCRUB~, SCRUB+2*, SCRUB+3*, SCRUBX+1 |
