|
|
| Line 63: |
Line 63: |
|
| |
|
| == Data Integrity Rules== | | == Data Integrity Rules== |
| Needs cleanup...
| | The [[CCMDB.mdb]] runs checks for the following: |
| ' infection without pathogen | | *'''no infections without pathogens''' |
| If isInfection And path_s = "" Then
| | *'''no non-infections with pathogens''' |
| MsgBox ("The Diagnosis '" & Dx_s & "' for patient " & Form_View.Pat_ID & " is an infection, but no pathogen is listed for it. Please enter a pathogen.")
| | For details, see the coding in Access. |
| uncheck Form_View.Diag_Complete
| |
| Form_View.Label_Diagnosis_check.BackColor = abnormal
| |
| End If
| |
|
| |
|
| ' non-infection with pathogen
| | {{Discussion}} |
| If (Not isInfection) And path_s > "" Then
| |
| MsgBox ("The Diagnosis '" & Dx_s & "' for patient " & Form_View.Pat_ID & " is not an infection, but the pathogen '" & path_s & "' is listed for it. Please remove the pathogen.")
| |
| Form_View.Label_Diagnosis_check.BackColor = abnormal
| |
| uncheck Form_View.Diag_Complete
| |
| End If
| |
|
| |
|
| {{Discussion}}
| |
| == Discussion == | | == Discussion == |
| * fix integrity section --[[User:Ttenbergen|Ttenbergen]] | | * fix integrity section --[[User:Ttenbergen|Ttenbergen]] |