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* |