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: EASECA

Package: Enrollment Application System

Routine: EASECA


Information

EASECA ;ALB/PHH,LBD,HM - Add a New LTC Co-Pay Test ;10 AUG 2001

Source Information

Source file <EASECA.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA FileMan 6 ^%DT  ^%DTC  ^DIC  FILE^DICN  ^DIK  ^DIR  
Enrollment Application System 4 EN^EASECMT  EN^EASECSC  (AGREE,EXMPT,REF,UPD)^EASECSCC  ($$EXMPT,$$LST)^EASECU  
Registration 2 STA^DGMTSCU2  $$GETSITE^DGMTU4  
Kernel 1 $$FMTE^XLFDT  

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 1 EASEC LTC COPAY TEST ADD  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
EN ;Entry point to add a new LTC Co-Pay test
DT
EXMPT ; Is veteran exempt from LTC copayments?
Q
ADD ;Add LTC Copay test
; Input -- DFN Patient IEN
; DGMTDT Date
; DGMTYPT Type of Test 3 = LTC Copay
; Output -- DGMTI Annual LTC Copay Test IEN
ADDQ
DEL ;Delete incomplete LTC Copay test
; Input -- DGMTI LTC Copay test IEN

External References

Name Field # of Occurrence
^%DT DT
^%DTC DT+3
STA^DGMTSCU2 EXMPT+30
$$GETSITE^DGMTU4 ADD+8
^DIC EN+4
FILE^DICN ADD+12
^DIK DEL+5
^DIR DT+5, EXMPT+9, EXMPT+14
EN^EASECMT EXMPT+18
EN^EASECSC EXMPT+33
AGREE^EASECSCC EXMPT+29
EXMPT^EASECSCC EXMPT+2, EXMPT+16, EXMPT+19
REF^EASECSCC EXMPT+26
UPD^EASECSCC EXMPT+31
$$EXMPT^EASECU EXMPT+1
$$LST^EASECU EN+10
$$FMTE^XLFDT EN+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,"Patient died on: ",$$FMTE^XLFDT(DGMDOD,"1D")
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !!,"Patient is not a Veteran."
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: !?3,*7,"The date of test must be after the date of the last test on "
  • Line Location: DT+1
Function Call: WRITE
  • Prompt: Y,"."
  • Line Location: DT+1
Function Call: WRITE
  • Prompt: Y,"."
  • Line Location: DT+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: EXMPT+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: EXMPT+20
Function Call: WRITE
  • Prompt: "="
  • Line Location: EXMPT+20
Function Call: WRITE
  • Prompt: !!,?10,"Veteran is NOT EXEMPT from Long Term Care copayments based"
  • Line Location: EXMPT+21
Function Call: WRITE
  • Prompt: !,?10,"on last year's income and must complete a 10-10EC form."
  • Line Location: EXMPT+22
Function Call: WRITE
  • Prompt: !!
  • Line Location: EXMPT+23
Function Call: WRITE
  • Prompt: "="
  • Line Location: EXMPT+23
Function Call: WRITE
  • Prompt: !!
  • Line Location: EXMPT+25
Routine Call
  • DIC
  • Line Location:
    • EN+4
Routine Call
  • DIR
  • Line Location:
    • DT+5
    • EXMPT+9
    • EXMPT+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^DGMT(408.31 - [#408.31] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DT+1, DT+4
^DGMT(408.31 - [#408.31] DEL+3
^DPT - [#2] EN+5, EN+8

Label References

Name Line Occurrences
ADD DT+9
DEL EXMPT+9, EXMPT+14, EXMPT+18
DT DT+1
EN DT+3, DT+9, EXMPT+2, EXMPT+9, EXMPT+10, EXMPT+18, EXMPT+19, EXMPT+26, EXMPT+27
Q EN+4, DT, EXMPT+2, EXMPT+9, EXMPT+10, EXMPT+18, EXMPT+19, EXMPT+26, EXMPT+27

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DT*!
%DT("A" DT*
%DT("B" DT*
%DT(0 DT*
D0 ADD+5~, ADD+11!
DA Q!, ADD+5~, DEL+2~, DEL+4*
DD ADD+5~, ADD+11!
DFN EN+4*, EN+5, EN+8, EN+10, EXMPT+1, EXMPT+2, EXMPT+16, EXMPT+19, Q!, ADD+10
DGADDF Q!
DGBL Q!
DGCAT EXMPT+30*, Q!
>> DGDET EXMPT+30*
DGEXMPT EXMPT+1*, EXMPT+2, EXMPT+19, Q!
DGFL Q!
DGFLD Q!
>> DGINT EXMPT+30*
DGIRO Q!
DGLD EN+10*, DT+1, DT+3, DT+4, Q!
DGLDT EN+10*, Q!
DGLDYR EN+10*, Q!
DGMDOD EN+1~*, EN+5*, EN+6
DGMTACT EXMPT+33*, Q+1!
DGMTCOR Q+1!
DGMTDFN EN+3!, EN+4*
DGMTDT DT*, DT+1, DT+3, Q+1!, ADD+7
DGMTI DT+9, EXMPT+2, EXMPT+16, EXMPT+19, Q+1!, ADD+12*, DEL+3, DEL+4
DGMTROU EXMPT+33*, Q+1!
DGMTYPT EN+2*, EN+10, Q+1!, ADD+10
>> DGNWT EXMPT+30*
DGOUT EXMPT+18, Q+1!
>> DGREF EXMPT+27
DGREQF Q+1!
DGSITE ADD+5~, ADD+8*, ADD+10
DGSTA EXMPT+30*, Q+1!
DGTTYP Q+2!
DGVI Q+2!
DGVO Q+2!
DIC EN+4*!, ADD+5~, ADD+7*
DIC("DR" ADD+10*
DIC(0 EN+4*, ADD+7*
DIK ADD+5~, ADD+7*, DEL+2~, DEL+4*
DINUM ADD+5~
DIR DT+5!, EXMPT+9!, EXMPT+14!
DIR("?" EXMPT+6*, EXMPT+7*, EXMPT+8*
DIR("A" DT+5*, EXMPT+6*, EXMPT+12*
DIR("B" DT+5*, EXMPT+6*
DIR("S" EXMPT+13*
DIR(0 DT+5*, EXMPT+6*, EXMPT+12*
DLAYGO ADD+5~, ADD+7*
DO ADD+5~
DS ADD+5~
DTOUT EXMPT+9, EXMPT+14, EXMPT+26, EXMPT+29, Q+2!
DUOUT EXMPT+9, EXMPT+14, EXMPT+26, EXMPT+29, Q+2!
DUZ ADD+8
>> I EXMPT+20*, EXMPT+23*
U EN+5, EN+8, EN+10, DEL+3
X DT+3, Q+2!, ADD+5~, ADD+7*
X1 DT+3*, Q+2!
X2 DT+3*, Q+2!
Y EN+4, DT, DT+1*, DT+3, DT+4*, EXMPT+10, EXMPT+14, EXMPT+16, Q+2!, ADD+12
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