Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DGRPC2

Package: Registration

Routine: DGRPC2


Information

DGRPC2 ;ALB/MRL/SCK/PJR/BAJ/LBD - CHECK CONSISTENCY OF PATIENT DATA (CONT) ; 10/14/10 9:56am

Source Information

Source file <DGRPC2.m>

Call Graph

Call Graph Total: 18

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  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DGRPC  DGRPC1  

Entry Points

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

External References

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GETS^DIQ
^DGPM - [#405] GET1^DIQ
^DIC(42 - [#42] GET1^DIQ
^DG(43 - [#43] GET1^DIQ

Global Variables Directly Accessed

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

Label References

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

Naked Globals

Name Field # of Occurrence
^( 55+3
^(0 51+1

Local Variables

Legend:

>> 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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All