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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IVMCMC

Package: Income Verification Match

Routine: IVMCMC


Information

IVMCMC ;ALB/SEK,BRM,GN,TDM,JAM,HM - CHECK INCOME TEST TRANSMISSION SEGMENTS;1/6/20 8:25am

Source Information

Source file <IVMCMC.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Income Verification Match 6 IVMFSSN^IVM2174F  ($$FINDMSG,$$GET,QRYQUE)^IVMCQ2  ACK^IVMPREC  BLDPID^IVMPREC6  $$CLEARF^IVMPRECA  ($$GETPAT,$$MATCH,PARSPID3)^IVMUFNC  
Health Level Seven 1 $$FMDATE^HLFNC  
VA FileMan 1 ^%DT  

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: 6

Package Total Caller Graph
Income Verification Match 5 IVMCM  IVMCM1  IVMCM2  IVMCM3  IVMCM5  
Enrollment Application System 1 EASCM  

Entry Points

Name Comments DBIA/ICR reference
EN ; Check segment structure of Income Test (Z10) transmission.
; Variable input:
; IVMDA -- pointer to an incoming message line in file #772
; IVMORF -- [optional]: set to 1 if Z10 is an ORF message
; IVMSEG -- the MSH segment string
;
; plus the usual HL7 variables: HLDA, HLFS, HLQ, HLECH
;
; Variable output:
; DFN -- pointer to the patient in file #2
; DGLY -- Income Year
; IVMFLGC -- Number of Dependent Children
; IVMMCI -- HL7 message control id of query sent to IVM Center
;
; and the global array ^TMP($J,"IVMCM" which holds the message.
ENQ
GET(SEG,NUM) ; Get the next HL7 segment.
; Formal input:
; SEG -- String with which to build ^TMP($J,"IVMCM"
; NUM -- Number to index child dependent strings [optional]
; Required variable input:
; HLDA -- Pointer to the incoming message in file #772
; IVMDA -- Pointer to the next message line within file #772
GETQ
PROB(ERR) ; Process encountered errors.
; Input: ERR -- Error text
ADDL ; Perform additional segment checks for ORF messages.
ADDLQ

External References

Name Field # of Occurrence
^%DT EN+30
$$FMDATE^HLFNC EN+30, EN+40, ADDL+20
IVMFSSN^IVM2174F EN+74
$$FINDMSG^IVMCQ2 ADDL+9
$$GET^IVMCQ2 ADDL+11
QRYQUE^IVMCQ2 ADDL+30
ACK^IVMPREC PROB+3
BLDPID^IVMPREC6 GET+37
$$CLEARF^IVMPRECA GET+12, GET+13
$$GETPAT^IVMUFNC ADDL+30
$$MATCH^IVMUFNC EN+35
PARSPID3^IVMUFNC EN+33

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J EN+27, EN+33, EN+48, GET+8, GET+9, GET+20, GET+22*, GET+29!, GET+33, GET+34
, GET+35, GET+38*, GET+44!, GET+46, GET+48*, GET+49*
^XTMP("DG53970P" EN+71, EN+74

Label References

Name Line Occurrences
ADDL EN+22
ADDLQ ADDL+5, ADDL+10, ADDL+11, ADDL+14, ADDL+18
ENQ EN+22, EN+25, EN+29, EN+30, EN+35, EN+39, EN+41, EN+42, EN+45, EN+46
EN+47, EN+61, EN+67, EN+77, EN+81, EN+86
GET EN+25, EN+39, EN+42, EN+45, EN+46, EN+47, EN+48, EN+53, EN+57, EN+58
EN+77, EN+81, EN+86, ADDL+5, ADDL+14, ADDL+18
GETQ GET+11, GET+14
PROB EN+25, EN+29, EN+30, EN+35, EN+39, EN+41, EN+42, EN+45, EN+46, EN+47
EN+53, EN+55, EN+57, EN+58, EN+77, EN+81, EN+86, GET+15, GET+17, ADDL+5
ADDL+10, ADDL+11, ADDL+14, ADDL+18

Naked Globals

Name Field # of Occurrence
^( GET+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT EN+30*
>> DFN EN+34*, EN+35, EN+74, ADDL+12*, ADDL+30
>> DGLY EN+40*, EN+41
DOB ADDL+2~, ADDL+20*, ADDL+30
DOBP EN+16~, EN+27*, EN+30
ERR PROB~, PROB+2
ERRMSG EN+16~, EN+35, ADDL+2~
>> HLERR EN+22, EN+52, EN+61, ENQ*, GET+21, PROB+2*, ADDL+26*
>> HLFS EN+19, GET+12, GET+13, GET+15, GET+16, GET+19, GET+22, GET+26, GET+31, GET+47
, GET+48, GET+49, ADDL+16, ADDL+20, ADDL+21, ADDL+25
>> I GET+32*, GET+45*, GET+48
ICN EN+16~, EN+34*, EN+35
>> IVMDA EN+48, ENQ*, GET+8*, GET+9, GET+33, GET+34*, GET+35, GET+46, GET+47*, GET+48*
>> IVMFLGC EN+51*, EN+59*
IVMJOB EN+69~, EN+70*, EN+71*, EN+72, EN+74
>> IVMMCI ADDL+6*, ADDL+9
IVMMSA ADDL+2~, ADDL+7*, ADDL+25
IVMNBR EN+52*, EN+53, EN+57, EN+58, ENQ+1!
>> IVMORF EN+22, EN+67
IVMPAT ADDL+2~, ADDL+30
IVMPAT("DOB" ADDL+30
IVMPAT("SEX" ADDL+30
IVMPAT("SSN" ADDL+30
>> IVMPID GET+37, GET+38
IVMQRD ADDL+2~, ADDL+15*, ADDL+16
IVMQRF ADDL+2~, ADDL+19*, ADDL+20, ADDL+21
>> IVMRTN EN+48, GET+8, GET+9, GET+33, GET+34, GET+35, GET+46
>> IVMSEG EN+19, EN+40, EN+55, GET+8*, GET+10, GET+12*, GET+13*, GET+15, GET+16, GET+19
, GET+22, GET+26, GET+31, GET+35*, GET+36, GET+46*, GET+47, GET+48, GET+49, ADDL+6
ADDL+7, ADDL+15, ADDL+19
IVMSEG1 EN+25, EN+39, EN+42, EN+45, EN+46, EN+47, EN+52, EN+53, EN+54, EN+57
EN+58, EN+77, EN+81, EN+86, ENQENQ+1!, GET+10*, GET+12, GET+13, GET+14
, GET+15, GET+16, GET+23, GET+28, GET+41, ADDL+5, ADDL+14, ADDL+18
>> IVMSSNFLAG EN+67, EN+74*
>> IVMTYPE ENQ*, ADDL+27*
>> MSGID EN+19*
NEXTSEG GET+7~, GET+9*, GET+15, GET+17
NONTE GET+42~, GET+43*, GET+45, GET+47*
NOPID GET+7~, GET+30*, GET+32, GET+33*
NUM GET~, GET+14, GET+20*, GET+22
PID3ARY EN+16~, EN+33, EN+36!
PID3ARY("NI" EN+34
PID3ARY("PI" EN+34
PIDCNTR GET+7~, GET+30*, GET+31, GET+36*
PIDSTR GET+7~, GET+37
PIDSTR( GET+31*, GET+36*
QARRAY ADDL+2~, ADDL+11
QARRAY("DFN" ADDL+12
QRYIEN ADDL+2~, ADDL+9*, ADDL+10, ADDL+11
SEG GET~, GET+11, GET+19*, GET+20, GET+22, GET+23*, GET+26, GET+29, GET+44, GET+48
, GET+49
SEQ GET+7~
SEX ADDL+2~, ADDL+21*, ADDL+30
SEXP EN+16~, EN+27*, EN+29
SSN ADDL+2~, ADDL+16*, ADDL+30
TMPARY EN+16~, EN+33, EN+36!
TMPARY(3 EN+33*
X EN+16~, EN+30*
Y EN+16~, EN+30
ZDPIFLG EN+16~, EN+51*, EN+56, GET+18*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All