IVMPTRNA ;ALB/CKN,BRM,TDM,LBD,KUM - HL7 FULL DATA TRANSMISSION (Z07) BUILDER(CONTINUED) ;7/18/24 9:13AM
Source file <IVMPTRNA.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 2 | $$EXTERNAL^DILFD ($$GET1,GETS)^DIQ |
Kernel | 1 | $$FMTHL7^XLFDT |
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 |
---|---|---|
Income Verification Match | 1 | IVMPTRN9 |
Name | Comments | DBIA/ICR reference |
---|---|---|
NTROBX(DGNTARR) | ;
|
|
RF1(DFN,RF1TYP) | ; create RF1 segment
; Input: ; DFN - Patient IEN ; RF1TYP - RF1 Type ; SAD = Street Address Change (Default) ; CAD = Confidential Address Change ; CPH = Cell Phone Number Change ; PNO = Pager Number Change ; EAD = E-Mail Address Change ; PHH = Home Phone Number Change ; RAD Residential Address Change |
|
ZUD(DFN,IVMZTYP,IVMZCNT) | ; create ZUD segment
; IVM*2.0*201 - Send Originating Source and User information to ES ; Input: ; DFN - Patient IEN ; IVMZTYP - ZUD Type ; SAD = Street Address Change (Default) ; CAD = Confidential Address Change ; CPH = Cell Phone Number Change ; EAD = E-Mail Address Change ; PHH = Home Phone Number Change ; RAD Residential Address Change ; PHB Business Phone Number Change ; PHC Confidential Phone Number Change ; IVMZCNT - Sequence number of ZUD segment |
|
ADDRCNV(ADDRSRC) | ;convert Address Source to HL7 format
|
|
RF1LOAD(RF1TYP) | ;
|
|
ZUDLOAD(IVMZTYP,IVMERR) | ;
; IVM*2.0*201 - Create ZUD segment ; Input ; IVMZTYP - ZUD Type ; IVMERR - Error message on failure (optional, pass by reference) |
FileNo | Call Tags |
---|---|
^DPT - [#2] | EXTERNAL^DILFD, GETS^DIQ |
^DIC(4 - [#4] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4 - [#4] | NTROBX+27, NTROBX+30 |
Name | Line Occurrences |
---|---|
$$ADDRCNV | RF1LOAD+21 |
RF1LOAD | RF1+23 |
ZUDLOAD | ZUD+25 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADDRSRC | RF1+14~, ADDRCNV~, ADDRCNV+1, ADDRCNV+2, ADDRCNV+3, ADDRCNV+4, ADDRCNV+5, ADDRCNV+6, ADDRCNV+7, ADDRCNV+8 , ADDRCNV+9, ADDRCNV+10 |
ADRDT | RF1+24, RF1+33, RF1LOAD+2!, RF1LOAD+15* |
ADRSIT | RF1+14~, RF1+30, RF1LOAD+2!, RF1LOAD+19*, RF1LOAD+20* |
ADRSRC | RF1+14~, RF1+31, RF1LOAD+2!, RF1LOAD+16*, RF1LOAD+18, RF1LOAD+21* |
ADTDT | RF1+14~ |
CS | NTROBX+1~, NTROBX+4*, NTROBX+5, NTROBX+6, NTROBX+7, NTROBX+8, NTROBX+9, NTROBX+10, NTROBX+11, NTROBX+12 , NTROBX+13, NTROBX+14, NTROBX+15, NTROBX+16, NTROBX+17, NTROBX+30, RF1+14~, RF1+17*, RF1+31 |
DFN | RF1~, RF1+21, ZUD~, ZUD+23, RF1LOAD+14, RF1LOAD+15, RF1LOAD+16, RF1LOAD+19, ZUDLOAD+17, ZUDLOAD+18 , ZUDLOAD+19 |
DGNTARR | NTROBX~ |
DGNTARR( | NTROBX+20, NTROBX+22 |
DGNTARR("HDT" | NTROBX+24 |
DGNTARR("HSIT" | NTROBX+29, NTROBX+30 |
DGNTARR("VDT" | NTROBX+25 |
DGNTARR("VER" | NTROBX+31 |
DGNTARR("VSIT" | NTROBX+26, NTROBX+27 |
ERR | RF1+14~, RF1+23, RF1LOAD+1~, RF1LOAD+14 |
GETFLDS | RF1LOAD+1~, RF1LOAD+13*, RF1LOAD+14 |
HLECH | NTROBX+2~*, NTROBX+4, RF1+15~*, RF1+17, ZUD+18~* |
HLFS | NTROBX+3~*, RF1+16~*, RF1+20, RF1+27, RF1+30, RF1+31, RF1+33, ZUD+19~*, ZUD+22, ZUD+30 , ZUD+31, ZUD+32 |
HLQ | RF1+14~, RF1+17* |
I | NTROBX+1~, NTROBX+19*, NTROBX+20, NTROBX+22, RF1+14~ |
IVMADDT | ZUD+17~, ZUD+27, ZUD+30, ZUDLOAD+7*, ZUDLOAD+18* |
IVMADIEN | ZUD+17~, ZUD+32, ZUDLOAD+7*, ZUDLOAD+19*, ZUDLOAD+20, ZUDLOAD+23* |
IVMADUSR | ZUD+17~, ZUD+29, ZUD+31, ZUDLOAD+7*, ZUDLOAD+20*, ZUDLOAD+22, ZUDLOAD+23*, ZUDLOAD+25*, ZUDLOAD+26* |
IVMERR | ZUD+17~, ZUD+24*, ZUD+25, ZUDLOAD~, ZUDLOAD+17 |
IVMGFLDS | ZUDLOAD+6~, ZUDLOAD+16*, ZUDLOAD+17 |
IVMRTN | ZUD+17~, ZUD+22*, ZUD+23, ZUD+25, ZUD+30*, ZUD+31*, ZUD+32*, ZUD+34 |
IVMZCNT | ZUD~, ZUD+22 |
IVMZDAT | ZUDLOAD+6~ |
IVMZDAT(2 | ZUDLOAD+18, ZUDLOAD+19 |
IVMZDT | ZUDLOAD+6~, ZUDLOAD+8*, ZUDLOAD+9*, ZUDLOAD+10*, ZUDLOAD+11*, ZUDLOAD+12*, ZUDLOAD+13*, ZUDLOAD+14*, ZUDLOAD+15*, ZUDLOAD+16 , ZUDLOAD+18 |
IVMZTYP | ZUD~, ZUD+20*, ZUD+22, ZUD+25, ZUDLOAD~, ZUDLOAD+8, ZUDLOAD+9, ZUDLOAD+10, ZUDLOAD+11, ZUDLOAD+12 , ZUDLOAD+13, ZUDLOAD+14, ZUDLOAD+15 |
IVMZUSR | ZUDLOAD+6~, ZUDLOAD+8*, ZUDLOAD+9*, ZUDLOAD+10*, ZUDLOAD+11*, ZUDLOAD+12*, ZUDLOAD+13*, ZUDLOAD+14*, ZUDLOAD+15*, ZUDLOAD+16 , ZUDLOAD+19, ZUDLOAD+20 |
>> NTROBX(11 | NTROBX+23* |
>> NTROBX(12 | NTROBX+24* |
>> NTROBX(14 | NTROBX+25* |
>> NTROBX(15 | NTROBX+27* |
>> NTROBX(16 | NTROBX+28*, NTROBX+30* |
>> NTROBX(17 | NTROBX+31* |
>> NTROBX(2 | NTROBX+17* |
>> NTROBX(3 | NTROBX+17* |
>> NTROBX(5 | NTROBX+18*, NTROBX+21*, NTROBX+22* |
NTRTEMP | NTROBX+1~ |
NTRTEMP( | NTROBX+22 |
NTRTEMP("AVI" | NTROBX+6*, NTROBX+10* |
NTRTEMP("HNC" | NTROBX+8*, NTROBX+12* |
NTRTEMP("NTR" | NTROBX+5*, NTROBX+9*, NTROBX+13* |
NTRTEMP("SUB" | NTROBX+7*, NTROBX+11* |
NTRTEMP("VER" | NTROBX+14*, NTROBX+15*, NTROBX+16*, NTROBX+31 |
RETURN | RF1+14~, RF1+20*, RF1+21, RF1+23, RF1+27*, RF1+30*, RF1+31*, RF1+33*, RF1+36 |
RF1TYP | RF1~, RF1+18*, RF1+20, RF1+23, RF1+24, RF1+27, RF1LOAD~, RF1LOAD+3, RF1LOAD+6, RF1LOAD+7 , RF1LOAD+8, RF1LOAD+9, RF1LOAD+10, RF1LOAD+12 |
RFDAT | RF1+14~, RF1LOAD+1~ |
RFDAT(2 | RF1LOAD+15, RF1LOAD+16, RF1LOAD+19 |
RFDT | RF1LOAD+1~, RF1LOAD+3*, RF1LOAD+6*, RF1LOAD+7*, RF1LOAD+8*, RF1LOAD+9*, RF1LOAD+10*, RF1LOAD+12*, RF1LOAD+13, RF1LOAD+15 |
RFSIT | RF1LOAD+1~, RF1LOAD+3*, RF1LOAD+6*, RF1LOAD+7*, RF1LOAD+8*, RF1LOAD+9*, RF1LOAD+10*, RF1LOAD+12*, RF1LOAD+13, RF1LOAD+19 |
RFSRC | RF1LOAD+1~, RF1LOAD+3*, RF1LOAD+6*, RF1LOAD+7*, RF1LOAD+8*, RF1LOAD+9*, RF1LOAD+10*, RF1LOAD+12*, RF1LOAD+13, RF1LOAD+16 , RF1LOAD+18 |
RS | NTROBX+1~, NTROBX+4*, NTROBX+21, RF1+14~, RF1+17* |
SS | NTROBX+1~, NTROBX+4*, NTROBX+30, RF1+14~, RF1+17* |
X | RF1+14~ |
Y | RF1+14~ |