Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IVMZ7CCD

Package: Income Verification Match

Routine: IVMZ7CCD


Information

IVMZ7CCD ;BAJ,TGH - HL7 Z07 CONSISTENCY CHECKER -- CATASTROPHIC DISABILITY SUBROUTINE ; 11/9/05 9:30am

Source Information

Source file <IVMZ7CCD.m>

Entry Points

Name Comments DBIA/ICR reference
EN(DFN) ; entry point. Patient DFN is sent from calling routine.
; initialize working variables
CD(VCD) ; Is Patient Catastrophically disabled? If not, we need to examine patient's record to see if qualified for CD
; Whether qualified or not, if patient is listed as NOT CD, the rest of the rules should not be checked. Therefore,
; if DGCDIS("VCD") does not = "Y" system will exit after this rule without checking any further.
701 ;Catastrophic Disability 'Decided By' Cannot be 'HINQ'
702 ;Catastrophic Disability 'Decided By' not valid
703 ;"Catastrophic Disability 'Decided By' required"
704 ;"Catastrophic Disability Review Date Required"
705 ;"Catastrophic Disability Review Date Invalid"
706 ;"CD Condition Score not valid"
707 ;"CD Review Date greater than CD Date of Determination"
708 ;"CD Status Affected Extremity' Invalid"
709 ;"CD Status Diagnoses' Not Valid"
; .396 CD STATUS DIAGNOSES field (multiple):
710 ;"'CD Status Procedure' Not Valid"
; .397 CD STATUS PROCEDURES field (multiple):
711 ;"No CD Status Reason is Present"
712 ;"'Date Of Catastophic Disability Decision' Not Valid"
713 ;"'Date Of Catastophic Disability Decision' Required"
714 ;"'Facility Making Catastrophic Disability Determination' Not Valid"
715 ;"'Method Of Determination' Is A Required Value"
716 ;"'Method Of Determination' Not Valid"
717 ;"Not Enough Diagnoses/Procedures/Conditions To Qualify For CD Status"
718 ;"Permanent Status Indicator' Not Valid"
719 ;"'Veteran Catastrophically Disabled?' Field Must Have A Response"
; .39 VETERAN CATASTROPHICALLY DISABLED? field.
720 ;"Veteran Has Enough Diagnoses/Procedures/Conditions To Qualify For CD Status"
; We check this rule at the beginning of the routine. No need to check it here,
; but we need the label as a place holder.
723 ;"Catastrophic Disability Review date must be a precise date"
724 ;"Catastrophic Disability Date of Decision must be a precise date"
725 ;"Catastrophic Disability Procedure code must be accompanied with an Affected Extremity field"
; Procedure list = DGCDIS("PROC",ITEM)
; Affected Extremity list = DGCDIS("EXT",ITEM)
; This tag makes sure that there is at least one Affected Extremity for each procedure code.
726 ;"Catastrophic Disablity condition code requires a Score field"
; Condition list = DGCDIS("COND",ITEM)
; Score list = DGCDIS("SCORE",ITEM)
727
728
FILE ;file the inconsistencies in a temp global

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] CHK^DIE,  EXTERNAL^DILFD
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call