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  |