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

Package: Income Verification Match

Routine: IVMZ7CE


Information

IVMZ7CE ;TDM,BAJ,ERC - HL7 Z07 CONSISTENCY CHECKER -- SERVICE SUBROUTINE ; 12/4/07 2:56pm

Source Information

Source file <IVMZ7CE.m>

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 IVMZ07C  

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,DGP) ; entry point. Patient DFN is sent from calling routine.
; initialize working variables
401 ; RATED INCOMPETENT INVALID
402 ; ELIGIBLE FOR MEDICAID INVALID
403 ; DT MEDICAID LAST ASKED INVALID
404 ; INELIGIBLE REASON INVALID
; Note: RULE #15 in IVMZ7CR is a duplicate of this rule
405 ; NON VETERAN ELIG CODE INVALID
; Note: RULE #60 in IVMZ7CR is a duplicate of this rule
406 ; CLAIM FOLDER NUMBER INVALID
407 ; ELIGIBILITY STATUS INVALID
408 ; DECLINE TO GIVE INCOME INVALID
; This CC removed per customer 05/08/2006 -- BAJ
; I $D(DGP("MEANS",0)),$P(DGP("MEANS",0),U,4)<1,$P(DGP("MEANS",0),U,14)'=1 S FILERR(RULE)=""
409 ; AGREE TO PAY DEDUCT INVALID
; this CC inactivated by DG*5.3*771
; 2 PENDING ADJUDICATION MEANS TEST
; 6 MT COPAY REQUIRED MEANS TEST
410 ; Note: RULE #404 above is a duplicate of this rule
411 ; ENROLLMENT APP DATE INVALID
412 ; POS/ELIG CODE INVALID
; Note: RULE #24 in IVMZ7CR is a duplicate of this rule
413 ; POS INVALID
; Note: RULE #13 in IVMZ7CR is a duplicate of this rule

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGIN(38.6 - [#38.6] EN+10, EN+11
^TMP($J EN+13*

Label References

Name Line Occurrences
@( EN+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN EN~, EN+13
DGP EN~
DGP("ENR" 411+1
DGP("MEANS" 409+5, 409+6, 409+8
DGP("PAT" 401+1, 402+1, 403+1, 406+1, 406+2, 407+1
FILERR EN+2~, EN+13
FILERR( 401+1*, 402+1*, 403+1*, 406+2*, 407+1*, 409+7*, 409+8*, 411+1*
RULE EN+2~, EN+10*, EN+11, EN+12, 401+1, 402+1, 403+1, 406+2, 407+1, 409+7
409+8, 411+1
U EN+12, 401+1, 402+1, 403+1, 406+1, 406+2, 407+1, 409+5, 409+6, 409+8
411+1
X EN+2~, 401+1*, 402+1*, 406+1*, 406+2, 407+1*, 409+6*, 409+7, 409+8, 411+1*
Y EN+2~, EN+11*, EN+12
Info |  Source |  Caller Graph |  Entry Points |  Global Variables Directly Accessed |  Label References |  Local Variables  | All