DGRPC2 ;ALB/MRL/SCK/PJR/BAJ/LBD - CHECK CONSISTENCY OF PATIENT DATA (CONT) ; 10/14/10 9:56am
Source file <DGRPC2.m>
Package | Total | Call Graph |
---|---|---|
Registration | 15 | $$FORIEN^DGADDUTL $$CVELIG^DGCV $$HASCAT^DGENCDA ($$CNCK,$$MSCK,$$RANGE)^DGMSCK $$LST^DGMTU $$SSN^DGMTU1 ALL^DGMTU21 $$OLD^DGMTU4 TOT^DGRP9 END^DGRPC3 $$CAACT^DGRPCADD ($$B4,$$RWITHIN)^DGRPDT $$COMPOW^DGRPMS (ELIG,KVAR,MB,SVC)^VADPT ADM^VADPT2 |
VA Fileman | 2 | C^%DTC ($$GET1,GETS)^DIQ |
Integrated Billing | 1 | $$INSUR^IBBAPI |
Name | Comments | DBIA/ICR reference |
---|---|---|
60 | ;60 - Location of agent orange exposure unanswered
|
|
61 | ;61 - Incomplete Phone Number
; DG*5.3*657 BAJ Phone number check modified ; Home phone check is disabled ; Work phone is required only if pt is employed |
|
62 | ;62 - Missing Emergency Contact Name
|
|
63 | ;Confidential Address check
|
|
64 | ;64 - Place of Birth City/State Missing ;**505
|
|
65 | ;65 - Mother's Maiden Name Missing ;**505
|
|
66 | ;66 - Pseudo SSN in use ;**505
; DG*5.3*657 BAJ 11/20/2005 Removed from CC. Pseudo notice appears in Patient List |
|
67 | ;67 - Serv Sep Date [Last] missing or imprecise, patch 528
|
|
68 | ;used for 68-71, for Combat Vet, DG*5.3*528
|
|
69 | ;
|
|
FIND | ||
CHECK55(DFN) | ;Business rules for additional 55-INCOME DATA MISSING checks
; Modeled from DGMTR checks. ; Input DFN - IEN from PATIENT File #2 |
|
Q55 | ||
48 | ||
49 | ;
|
|
46 | ;off
|
|
47 | ;off
|
|
44 | ;off
|
|
45 | ;off
|
|
43 | ;off
|
|
NEXT | ||
77 | ;; Date out of range for POW Location
|
|
76 | ;; Conflict Date out of range for conflict
|
|
75 | ;; Conflict TO date precedes FROM date
|
|
74 | ;; Conflict Date Missing or Incomplete
|
|
73 | ;; An MSE FROM date precedes an MSE TO date
|
|
72 | ;; MSE - Required Fields
|
|
71 | ;
|
|
70 | ;
|
|
COMB | ||
78 | ;; Date out of range for Combat Location
|
|
59 | ;59 - incomplete Catastrophic Disability info
|
|
58 | ;58 - EC Claim - No Gulf/Som Svc
|
|
55 | ;BELOW IS USED BY BOTH 54 & 55
|
|
54 | ;
|
|
57 | ||
56 | ||
51 | ||
50 | ; insurance checks
|
|
53 | ||
52 | ||
JUST55 |
Name | Field # of Occurrence |
---|---|
C^%DTC | 57+3 |
$$FORIEN^DGADDUTL | 63+8 |
$$CVELIG^DGCV | 67+2, 71+6 |
$$HASCAT^DGENCDA | 59+1 |
$$CNCK^DGMSCK | 74+1, 76+1 |
$$MSCK^DGMSCK | 72+1, 73+1 |
$$RANGE^DGMSCK | 76+9, 78+1 |
$$LST^DGMTU | 55+9, JUST55+6 |
$$SSN^DGMTU1 | 55+13, 55+14 |
ALL^DGMTU21 | 55+11 |
$$OLD^DGMTU4 | 55+10 |
TOT^DGRP9 | JUST55+3 |
END^DGRPC3 | 56+1, FIND+3 |
$$CAACT^DGRPCADD | 63+3 |
$$B4^DGRPDT | 73+7, 73+9, 76+7 |
$$RWITHIN^DGRPDT | 76+10, 78+6 |
$$COMPOW^DGRPMS | 78+5 |
$$GET1^DIQ | CHECK55+17, CHECK55+18, CHECK55+19 |
GETS^DIQ | CHECK55+13 |
$$INSUR^IBBAPI | 50+4 |
ELIG^VADPT | CHECK55+23 |
KVAR^VADPT | Q55 |
MB^VADPT | CHECK55+10 |
SVC^VADPT | CHECK55+11 |
ADM^VADPT2 | CHECK55+15 |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GETS^DIQ |
^DGPM - [#405] | GET1^DIQ |
^DIC(42 - [#42] | GET1^DIQ |
^DG(43 - [#43] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(391 - [#391] | 55+6 |
^DG(43 - [#43] | 57+3 |
^DGMT(408.31 - [#408.31] | JUST55+6 |
^DIC(21 - [#21] | 51+1 |
^DIC(8 - [#8] | 55+5 |
^DIC(8.1 - [#8.1] | 55+4 |
^DPT - [#2] | 55+3, 55+5, 61+5 |
^HL(779.004 - [#779.004] | 63+7 |
Name | Line Occurrences |
---|---|
$$CHECK55 | JUST55+7 |
@( | 47+2, 48+1, 50+8, 51, 52+1, 53+1, 55+3, 55+5, 55+6, JUST55 , JUST55+2, JUST55+8, 56+1, 57+5, 58+5, 59+3, 60+2, 61+7, 62+2, 63+11 , 64+2, 65+2, 66+4, 67+4, 71+12, 72+2, 73+1, 73+4, 73+10, 74+2 , 76+12, 77+2, 78+3, 78+4, 78+5, 78+7, FIND+2 |
COMB | 48, 50+7, 51+2, 52, 53, 55+15, JUST55+5, 56, 57+4, 59+2 , 60+1, 61+6, 62+1, 63+10, 64+1, 65+1, 67+3, 71+7, 71+8, 71+9 , 71+10, 72+1, 73+7, 73+9, 74+1, 76+7, 76+10, 78+6 |
FIND | FIND+1 |
JUST55 | 55+12 |
NEXT | 47+2, 48+1, 50+8, 51, 52+1, 53+1, 55+3, 55+5, 55+6, JUST55 , JUST55+2, JUST55+8, 56+1, 57+5, 58+5, 59+3, 60+2, 61+7, 62+2, 63+11 , 64+2, 65+2, 66+4, 67+4, 71+12, 72+2, 73+1, 73+4, 73+10, 74+2 , 76+12, 77+2, 78+3, 78+4, 78+5, 78+7 |
Q55 | CHECK55+10, CHECK55+11, CHECK55+12, CHECK55+14, CHECK55+16 |
Name | Field # of Occurrence |
---|---|
^( | 55+3 |
^(0 | 51+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> CONARR( | 76+2, 76+7*, 76+10* |
>> CONCHK | 74+1*, 76+1* |
>> CONERR | 74+1 |
>> CONSPEC( | 76+2, 76+4 |
COV | 50+2~, 50+3*, 50+5, 50+6 |
DATA | 76+3~, 76+4*, 76+5 |
DFN | 50+4, 55+3, 55+5, 55+9, 55+11, JUST55+6, JUST55+7, 59+1, 61+5, 63+3 , 67+2, 71+6, CHECK55~, CHECK55+13, CHECK55+14 |
DG | CHECK55+7~, CHECK55+26*, CHECK55+27*, CHECK55+28 |
DG1 | CHECK55+7~, CHECK55+28* |
DG55 | JUST55+5~, JUST55+7* |
DGAPD | JUST55+5~, JUST55+6* |
>> DGCHK | 47+1, 48, 50+1, 50+7, 55+2, 55+12, JUST55, 56, 76+7, 76+8 , NEXT, FIND |
>> DGCT | COMB* |
>> DGD | 48*, JUST55+4*, 56* |
DGE | 55+4~*, 55+5 |
>> DGER | 78+3, COMB* |
DGERR | 63+1~, 63+2*, 63+5*, 63+7*, 63+9*, 63+10 |
>> DGFL | 55+13*, 55+14*, 55+15, JUST55+3*, JUST55+4*, JUST55+5 |
DGG | 67+1~, 67+2*, 67+3, 71+5~, 71+6*, 71+7, 71+8, 71+9, 71+10 |
DGI | 63+1~, 63+9* |
>> DGINC | JUST55+3 |
DGISYR | 55+6*! |
>> DGLST | 47+1*, 47+2, 48+1, 50+1*, 50+8, 51, 52+1, 53+1, 55+2*, 55+3 , 55+5, 55+6, JUST55, JUST55+1*, JUST55+2, JUST55+8, 56+1, 57+5, 58+5, 59+3 , 60+2, 61+7, 62+2, 63+11, 64+2, 65+2, 66+4, 67+4, 71+11*, 71+12 , 72+2, 73+1, 73+4, 73+10, 74+2, 76+12*, 77+2, 78+3, 78+4, 78+5 , 78+7, COMB*, NEXT*, NEXT+1*, FIND, FIND+1*, FIND+2* |
DGMED | CHECK55+7~ |
DGMED(2 | CHECK55+14 |
DGMT | 55+1~, 55+9*, 55+10*, 55+11 |
>> DGNCK | FIND+1 |
>> DGP( | 48, 50+3, 51+1, 51+2, 52, 53, 56, 57, 57+2, 59+2 , 60+1, 61+6, 62+1, 63+3, 63+5, 63+7, 63+8, 63+9, 65+1, 73+9 , 76+6, 78+4, 78+5, 78+6 |
>> DGP("TYPE" | 55+6 |
>> DGP(0 | 64+1 |
>> DGPMSE | 73+4 |
>> DGPMSE( | 73+5, 73+6, 73+7 |
DGPTYP | 55+6*!, 55+12, JUST55+2 |
>> DGREL("D" | 55+14 |
>> DGREL("S" | 55+13 |
DGRTN | CHECK55+7~, CHECK55+9*, CHECK55+10*, CHECK55+11*, CHECK55+12*, CHECK55+14*, CHECK55+16, CHECK55+20*, CHECK55+25*, CHECK55+27 , CHECK55+28*, CHECK55+41*, CHECK55+42*, Q55+1 |
DGSRVC | CHECK55+7~, CHECK55+19*, CHECK55+20 |
>> DGTOT( | JUST55+4 |
>> DGVT | 48, 56, 60+1 |
DGWARD | CHECK55+7~, CHECK55+18*, CHECK55+19 |
DT | 50+4, 55+3, 55+6, 55+11, 57+4 |
EMPST | 61+4~, 61+5*, 61+6 |
FROMDAT | 76+3~, 76+6*, 76+7, 76+10 |
FROMPC | 76+3~, 76+5*, 76+6 |
>> I | 55+14*, JUST55+4*, NEXT*, FIND*, FIND+1, FIND+2 |
I1 | 73+2~, 73+5*, 73+6, 73+7, 73+9*, 76+2* |
>> I5 | 76+2*, 76+7* |
>> I6 | 76+2*, 76+10* |
INS | 50+2~, 50+4*, 50+5, 50+6 |
J | 63+1~, 63+9* |
>> LOC | 76+2*, 76+4, 76+7, 76+10, 78+5*, 78+6 |
>> MSDATERR | 73+1, 73+7*, 73+9* |
>> MSECHK | 72+1*, 73+1* |
>> MSERR | 72+1, 73+7*, 73+9* |
NODE | 76+3~, 76+5*, 76+6 |
OUT | 73+5~, 73+7* |
>> PCNT | CHECK55+41* |
>> RANGE( | 76+10, 78+6 |
>> RANSET | 76+9*, 78+1* |
STR63 | 63+1~, 63+8*, 63+9 |
TODAT | 76+3~, 76+6*, 76+7, 76+10 |
TOPC | 76+3~, 76+5*, 76+6 |
U | 55+5, 55+10, 55+11, JUST55+6, 57, 57+2, 57+3, 61+5, 63+3, 63+5 , 63+9, 73+6, 73+7, CHECK55+24 |
VA | CHECK55+7~ |
VADMVT | CHECK55+7~, CHECK55+16, CHECK55+18 |
VAEL | CHECK55+7~ |
VAEL(1 | CHECK55+27, CHECK55+41 |
VAEL(3 | CHECK55+24, CHECK55+41 |
VAEL(6 | CHECK55+42 |
VAINDT | CHECK55+7~ |
VAMB | CHECK55+7~ |
VAMB(1 | CHECK55+41, CHECK55+42 |
VAMB(4 | CHECK55+25, CHECK55+41, CHECK55+42 |
VAMB(7 | CHECK55+10 |
VASV | CHECK55+7~ |
VASV(4 | CHECK55+11 |
VASV(9 | CHECK55+12 |
X | 48*, 50+2~, 50+3*, 50+5*, 50+6*, 50+7, 51+1*, 51+2*, 52*, 53* , 55+15*, JUST55+5*, 56*, 57+3*, 57+4*, 59+2*, 60+1*, 61+6*, 62+1*, 63+10* , 64+1*, 65+1*, 67+3*, 71+7*, 71+8*, 71+9*, 71+10*, 72+1*, 73+7*, 73+9* , 74+1*, 76+7*, 76+10*, 78+6*, COMB |
X1 | 57+1~, 57+2* |
X2 | 57+1~, 57+3* |