Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IVMPTRNA

Package: Income Verification Match

Routine: IVMPTRNA


Information

IVMPTRNA ;ALB/CKN,BRM,TDM,LBD,KUM - HL7 FULL DATA TRANSMISSION (Z07) BUILDER(CONTINUED) ;7/18/24 9:13AM

Source Information

Source file <IVMPTRNA.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 $$EXTERNAL^DILFD  ($$GET1,GETS)^DIQ  
Kernel 1 $$FMTHL7^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Income Verification Match 1 IVMPTRN9  

Entry Points

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)

External References

Name Field # of Occurrence
$$EXTERNAL^DILFD RF1LOAD+16, ZUDLOAD+20
$$GET1^DIQ RF1LOAD+20
GETS^DIQ RF1LOAD+14, ZUDLOAD+17
$$FMTHL7^XLFDT RF1LOAD+15, ZUDLOAD+18

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] EXTERNAL^DILFD,  GETS^DIQ
^DIC(4 - [#4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] NTROBX+27, NTROBX+30

Label References

Name Line Occurrences
$$ADDRCNV RF1LOAD+21
RF1LOAD RF1+23
ZUDLOAD ZUD+25

Local Variables

Legend:

>> 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~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All