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