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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: EASECED

Package: Enrollment Application System

Routine: EASECED


Information

EASECED ;ALB/LBD - INCOME SCREENING DATA FOR EDIT ; 19 AUG 2001

Source Information

Source file <EASECED.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Enrollment Application System 3 (NEW,NEWIP,SETUP)^EASECED1  SPOUSE^EASECED2  (EDIT,WRT)^EASECED3  
VA FileMan 2 ^%DTC  ^DIR  
Registration 1 GETREL^DGMTU11  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Enrollment Application System 2 EASECDP4  EASECSC3  

Entry Points

Name Comments DBIA/ICR reference
EN
Q
ADD(DFN,DGTYPE,DGTSTDT) ; subroutine to add to files 408.12 & 408.13
; In -- DFN as the IEN of file 2 for the vet
; DGTYPE as C for mt children or D for all deps
; S for spouse (default spouse)
; DGTSTDT - optional test date
ADDQ
INACT ; prompt to inactivate a patient relation
; Input -- DGREL("D") array of dependents
; DGDEP as number of deps (from GETREL call)
EDIT(DGPREF,DGTYPE,DATE) ; edit demographic data for a dep
; Input -- DGPREF as returned by GETREL^DGMTU11 for dep to edit
; DGTYPE as D if all deps or C if MT children only
; S for spouse (optional - spouse if not defined)
; DATE [optional] as income screening year/default= last yr
; Output -- DGFL as -2 if timeout, -1 if '^', or 0 o/w

External References

Name Field # of Occurrence
^%DTC ADD+22
GETREL^DGMTU11 EN+2
^DIR ADD+18
NEW^EASECED1 EN+2
NEWIP^EASECED1 ADD+25
SETUP^EASECED1 INACT+11, INACT+13
SPOUSE^EASECED2 EN+3
EDIT^EASECED3 EDIT+7
WRT^EASECED3 ADD+22

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?62,"(AGE: "_$P(AGE,".")_")"
  • Line Location: ADD+22
Function Call: WRITE
  • Prompt: !?3,$C(7),"Incomplete Entry...Deleted"
  • Line Location: ADD+24
Function Call: WRITE
  • Prompt: !!,"No dependents to inactivate!"
  • Line Location: INACT+5
Function Call: WRITE
  • Prompt: !!,"Enter a number 1-",DGDEP," to indicate the dependent you wish to inactivate: "
  • Line Location: INACT+6
Function Call: WRITE
  • Prompt: !!,"Enter a number 1-",DGDEP," indicating the number of the dependent you wish to inactivate"
  • Line Location: INACT+10
Routine Call
  • DIR
  • Line Location:
    • ADD+18

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] EN+2, ADD+15

Label References

Name Line Occurrences
ADD EN+3
ADDQ ADD+23, ADD+24
EDIT EN+3
INACT INACT+10, INACT+12
Q EN+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACT INACT+3~
>> AGE ADD+22*
ANS ADD+8~
ANS( ADD+21*, ADD+22, ADD+23, ADD+24, ADD+25
DA ADD+8~
DATE EDIT~
DFN EN+2, EN+3, ADD~, ADD+15
DGACT EDIT+6~
>> DGDEP INACT+5, INACT+6, INACT+10
>> DGDR EN+3
DGDT INACT+3~
DGEDDEP EDIT+6~
>> DGFL EN*, EN+3, ADD+10*, ADD+12*, ADD+13, ADD+19*, ADD+20*, ADD+23*, ADD+24, INACT+4*
INACT+7*, INACT+8*
>> DGISDT EN+1*, EN+2
>> DGMTDT ADD+9
DGPREF EN+3*, EN+4!, EDIT~
>> DGREL("C" INACT+12
>> DGREL("D" INACT+11
>> DGREL("S" EN+3
>> DGRP(0 EN+2*
DGRP0ND ADD+25*, ADDQ!
DGRPI ADD+13*, ADD+14, ADD+15, ADD+16, ADD+17, ADD+19, ADD+20, ADD+21, ADD+22, ADDQ!
DGSPFL EN+3, EN+4!
DGTSTDT ADD~, ADD+9~*
DGTYPE ADD~, ADD+11*, ADD+12, EDIT~
DIR ADD+14!, ADDQ!
DIR("A" ADD+17*
DIR("B" ADD+15*
DIR(0 ADD+14*, ADD+16*
DIRUT ADDQ!
DOB EDIT+6~
DT EN+1, ADD+9, ADD+22
DTIME INACT+6
DTOUT ADD+19, ADDQ!
DUOUT ADD+19, ADDQ!
IEN INACT+3~
PROMPT ADD+8~, ADD+12*, ADD+17
RELATION EDIT+6~
SPOUSE ADD+8~, ADD+11*, ADD+12, ADD+15, ADD+22
TYPE ADD+8~, ADD+12*, ADD+17
UPARROW EDIT+6~
X ADD+15*, ADD+22, INACT+3~, INACT+6*, INACT+8, INACT+9, INACT+10, INACT+11*, INACT+12*, EDIT+6~
>> X1 ADD+22*
>> X2 ADD+22*
Y ADD+20, ADD+21, EDIT+6~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All