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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: DGDEP1

Package: Registration

Routine: DGDEP1


Information

DGDEP1 ;ALB/CAW,BAJ,ERC - List One Dependent/Edit Effective Dates ; 8/1/08 1:10pm

Source Information

Source file <DGDEP1.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Registration 3 INIT^DGDEP  $$ACTIVE^DGMTU11  $$SETSTR^VALM1  
VA Fileman 1 ^DIE  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGDEPE  

Entry Points

Name Comments DBIA/ICR reference
DOB(DA,X) ;CHECK EFFECTIVE DATE AGAINST DOB
EN ; Effective Dates
LSTDEP(DGDEP) ;List Dependents
EDIT ; Edit Effective Dates
; values for DGFLG:
; DGFLG = 1 IVM effective date
ONE(CNT) ; List one dependent
; Modified for SSN VERFICIATION STATUS DG*5.3*688 BAJ 11/22/2005
SET(X) ;Set up array
EDITQ
ENQ
EXIT ;

External References

Name Field # of Occurrence
INIT^DGDEP EDITQ
$$ACTIVE^DGMTU11 DOB+16
^DIE EDIT+9
$$SETSTR^VALM1 ONE+5, ONE+6, ONE+7, ONE+8, ONE+9, ONE+10, ONE+12, ONE+19, ONE+21, ONE+22
, ONE+25, ONE+27, ONE+32, ONE+33, ONE+34, ONE+35, ONE+38, ONE+39, ONE+45, ONE+46
, ONE+47, ONE+48, ONE+49, ONE+50, ONE+56, ONE+57, ONE+60, ONE+61, ONE+65, ONE+66
, ONE+67, ONE+72, ONE+73, ONE+78, ONE+79

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Cannot edit when viewing a means test."
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"Not while viewing"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"Cannot inactivate veteran"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!,"Cannot edit date added by IVM."
  • Line Location: EDIT+10
Function Call: WRITE
  • Prompt: !!,"There has to be an effective date for this person."
  • Line Location: EDIT+12
Function Call: WRITE
  • Prompt: !," <<EFFECTIVE DATE may not precede Date Of Birth>>",*7
  • Line Location: DOB+4
Function Call: WRITE
  • Prompt: !," <<EFFECTIVE DATE may not precede Veteran Date Of Birth>>",$C(7)
  • Line Location: DOB+9
Function Call: WRITE
  • Prompt: !," <<EFFECTIVE DATE may not be greater than Veteran Date Of Death>>",$C(7)
  • Line Location: DOB+14
Function Call: WRITE
  • Prompt: !," <<EFFECTIVE DATE must be a date prior to Spouse Inactivation Date>>",$C(7)
  • Line Location: DOB+17
Routine Call
  • DIE
  • Line Location:
    • EDIT+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGPR(408.12 - [#408.12] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPR(408.12 - [#408.12] EDIT+11, DOB+2, DOB+7
^DIC(5 - [#5] ONE+71
^DPT - [#2] DOB+8, DOB+12
^TMP("DGMTEP" SET+1*, EXIT+1!, EDITQ+1!

Label References

Name Line Occurrences
EDIT EN+4, EDIT+12
EDITQ EDIT+10
EN EN+5
ENQ EN+2, EN+3
ONE LSTDEP+2, EDITQ+1
SET ONE+13, ONE+28, ONE+36, ONE+40, ONE+41, ONE+51, ONE+58, ONE+62, ONE+80

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACTIVE EN+7*, EN+8
CNT LSTDEP+1~*, LSTDEP+2*, ONE~, ONE+6, ONE+8, ONE+10, ONE+12, ONE+17, ONE+20, ONE+24
, ONE+26, ONE+27, ONE+30, ONE+33, ONE+35, ONE+37, ONE+46, ONE+47, ONE+49, ONE+50
, ONE+54, ONE+56, ONE+57, ONE+60, ONE+61, ONE+64, ONE+65, ONE+66, ONE+67, ONE+70
, ONE+71, ONE+72, ONE+73, ONE+76, ONE+77, ONE+78, ONE+79
DA EDIT+4~, EDIT+7*, DOB~, DOB+2, DOB+7, DOB+16
DATE EN+6*, EN+7, EDIT+4~, EDIT+11*, EDIT+12
DEP LSTDEP+1~, ONE+29*, ONE+30*, ONE+31, ONE+33, ONE+35, ONE+37
DGDEP LSTDEP~, EDIT+6, EDITQ!
DGDEP( LSTDEP+2, ONE+6, ONE+8, ONE+10, ONE+12, ONE+17, ONE+20, ONE+24, ONE+26*, ONE+27
, ONE+30, ONE+33, ONE+35, ONE+37, ONE+46, ONE+47, ONE+49, ONE+50, ONE+54, ONE+56
, ONE+57, ONE+60, ONE+61, ONE+64, ONE+65, ONE+66, ONE+67, ONE+70, ONE+71, ONE+72
, ONE+73, ONE+76, ONE+77, ONE+78, ONE+79, EDIT+6, EDIT+11
DGDEP(1 EN+6, EN+7
DGEDIT EDIT+4~, EDIT+5*
DGEE EDIT+4~
DGERR EN+5!, EN+8*
DGFILE DOB+1~, DOB+2*, DOB+3
DGFLG EDIT+5*, EDIT+10, EDITQ!
DGLN ONE+3~*, ONE+42, ONE+82, SET+1, SET+2*
DGMNTEXT ONE+18~, ONE+20*, ONE+21, ONE+22
>> DGMTACT EN+2
>> DGMTI EN+2, EN+3
>> DGPR EDIT+6*, EDIT+7
>> DGRPV EN+3
>> DGW EN+5, EDIT+6, EDIT+11, EDITQ+1
DIC EDIT+4~
DIE EDIT+4~, EDIT+7*
DR EDIT+4~, EDIT+7*
DR(2 EDIT+8*
NODE DOB+1~, DOB+7*, DOB+8, DOB+11, DOB+12
STATVAL ONE+68~, ONE+69*, ONE+71*, ONE+72, ONE+77
U ONE+6, ONE+8, ONE+10, ONE+12, ONE+17, ONE+20, ONE+24, ONE+26, ONE+27, ONE+33
, ONE+35, ONE+37, ONE+46, ONE+47, ONE+49, ONE+50, ONE+54, ONE+56, ONE+57, ONE+60
, ONE+61, ONE+64, ONE+65, ONE+66, ONE+67, ONE+70, ONE+71, ONE+72, ONE+73, ONE+76
, ONE+77, ONE+78, ONE+79, EN+7, EDIT+6, EDIT+11, DOB+2, DOB+3, DOB+8, DOB+11
, DOB+12
>> VALMBCK EN+1*, ENQ*
>> VALMCNT ONE+42*, ONE+82*
X ONE+5*, ONE+6*, ONE+7*, ONE+8*, ONE+9*, ONE+10*, ONE+12*, ONE+13, ONE+16*, ONE+19*
, ONE+21*, ONE+22*, ONE+25*, ONE+27*, ONE+28, ONE+32*, ONE+33*, ONE+34*, ONE+35*, ONE+36
, ONE+38*, ONE+39*, ONE+40, ONE+44*, ONE+45*, ONE+46*, ONE+47*, ONE+48*, ONE+49*, ONE+50*
, ONE+51, ONE+55*, ONE+56*, ONE+57*, ONE+58, ONE+59*, ONE+60*, ONE+61*, ONE+62, ONE+63*
, ONE+65*, ONE+66*, ONE+67*, ONE+72*, ONE+73*, ONE+78*, ONE+79*, ONE+80, SET~, SET+1
, DOB~, DOB+3, DOB+5*, DOB+8, DOB+11, DOB+13, DOB+15*, DOB+16, DOB+18*, DOB+20
X1 DOB+1~, DOB+2*, DOB+3, DOB+12*, DOB+13
Y EDIT+4~
ZIPPOS ONE+68~, ONE+77*, ONE+78
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All