IVMZ7CE ;TDM,BAJ,ERC - HL7 Z07 CONSISTENCY CHECKER -- SERVICE SUBROUTINE ; 12/4/07 2:56pm
Source file <IVMZ7CE.m>
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 |