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

Package: Enrollment Application System

Routine: EASEZPF


Information

EASEZPF ;ALB/SCK/GAH - Print 1010EZ Enrollment form ; 10/19/2000

Source Information

Source file <EASEZPF.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Enrollment Application System 7 EN^EASEZC1  SORT^EASEZC3  EN^EASEZPF1  EN^EASEZPF2  EN^EASEZPF3  (PAGE1,PAGE2,PAGEN)^EASEZPU  $$VERSION^EASEZU4  
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  
VA FileMan 1 $$GET1^DIQ  

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

Package Total Caller Graph
Enrollment Application System 4 EASEZPF1  EASEZPF2  EASEZPF3  EASEZU4  

Entry Points

Name Comments DBIA/ICR reference
QUE(EASAPP,EASDFN) ; Queue the 1010EZ print
; Input
; EASAPP - Internal entry number in the 1010EZ HOLDING File, #712
; EASDFN - [Optionla] Patient DFN
EXIT
CHECKS(EASAPP) ; Check for quit conditions
EN ; Entry point to print 1010EZ
ENQUIT ; Cleanup temp globals after printing is complete
SETUP(EALNE,EAINFO,EASAPP,EASDFN) ; Set-up print variables
; Input
; EALNE - Line format array
; EAINFO - Misc Data
; ("CLRK") - Clerk's intials
; ("ID") - Web ID from #712
; ("PGE") - Page number
; ("VET" ) - Veteran's name submitting the application
; ("SSN") - Veteran's SSN
; ("DISC") - Financial Disclosure status
; EASAPP - IEN of applicant on the 1010EZ HOLDING File, #712
; EASDFN - DFN of applicant in the PATIENT File, #2
SETQ
HDRMAIN(EALNE) ;
HDR(EALNE,EAINFO) ;
FT(EALNE,EAINFO) ;

External References

Name Field # of Occurrence
^%ZIS QUE+21
HOME^%ZIS QUE+33
^%ZISC QUE+37
^%ZTLOAD QUE+32
$$GET1^DIQ CHECKS+5, CHECKS+8, CHECKS+11, CHECKS+16, CHECKS+17, SETUP+24, SETUP+26, SETUP+33, SETUP+35, SETUP+37
, SETUP+38
EN^EASEZC1 SETUP+41
SORT^EASEZC3 SETUP+42
EN^EASEZPF1 EN+6
EN^EASEZPF2 EN+9, EN+17
EN^EASEZPF3 EN+11
PAGE1^EASEZPU EN+5
PAGE2^EASEZPU EN+8
PAGEN^EASEZPU EN+16
$$VERSION^EASEZU4 QUE+26
$$FMTE^XLFDT SETUP+34
$$NOW^XLFDT SETUP+34

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,*7,"Do not select a slave device for output."
  • Line Location: QUE+14
Function Call: WRITE
  • Prompt: !?5,"This output requires a 132 column output printer."
  • Line Location: QUE+15
Function Call: WRITE
  • Prompt: !?5,"Output to SCREEN will be unreadable.",!
  • Line Location: QUE+16
Function Call: WRITE
  • Prompt: !!?3,*7,"The VA10-10EZ for "
  • Line Location: CHECKS+15
Function Call: WRITE
  • Prompt: $$GET1^DIQ(712,EASAPP_",",1),", ",$$GET1^DIQ(712,EASAPP_",",2),", "
  • Line Location: CHECKS+16
Function Call: WRITE
  • Prompt: !?3,"WEB submission ID: ",$$GET1^DIQ(712,EASAPP_",",.1)
  • Line Location: CHECKS+17
Function Call: WRITE
  • Prompt: !?3,"could not be printed for the following reason(s): "
  • Line Location: CHECKS+18
Function Call: WRITE
  • Prompt: !?5,">> ",ERR(X)
  • Line Location: CHECKS+21
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDRMAIN+1
Function Call: WRITE
  • Prompt: ?75,"OMB APPROVED NO. 2900-0091 / Est. Burden Avg. 20 min.",!,EALNE("DD")
  • Line Location: HDRMAIN+2
Function Call: WRITE
  • Prompt: !,"D E P A R T M E N T O F V E T E R A N S A F F A I R S",?96,"APPLICATION FOR HEALTH BENEFITS",!,EALNE("DD")
  • Line Location: HDRMAIN+3
Function Call: WRITE
  • Prompt: !?50,"SECTION I - GENERAL INFORMATION",!,EALNE("D")
  • Line Location: HDRMAIN+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"APPLICATION FOR HEALTH BENEFITS, Continued",?65,"| ",EAINFO("VET"),?100,"| ",EAINFO("SSN")
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,EALNE("DD")
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,EALNE("DD")
  • Line Location: FT+3
Function Call: WRITE
  • Prompt: !,"AUTOMATED VA FORM 10-10EZ APR 1998",?40,"PRINTED: ",EAINFO("PD")
  • Line Location: FT+4
Function Call: WRITE
  • Prompt: ?80,"Clerk: ",EAINFO("CLRK"),"/",EAINFO("ID")
  • Line Location: FT+5
Function Call: WRITE
  • Prompt: ?120,"Page "
  • Line Location: FT+6
Function Call: WRITE
  • Prompt: EAINFO("PGE")
  • Line Location: FT+6
Routine Call
  • %ZIS
  • Line Location:
    • QUE+21
Routine Call
  • %ZIS
  • Line Location:
    • QUE+33

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^EAS(712 - [#712] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("EASEZ" ENQUIT+1!
^TMP("EZDATA" ENQUIT+2!
^TMP("EZDISP" ENQUIT+5!
^TMP("EZINDEX" ENQUIT+3!
^TMP("EZTEMP" EN+15, ENQUIT+4!

Label References

Name Line Occurrences
$$CHECKS QUE+12
@( QUE+36
EXIT QUE+12, QUE+23, QUE+29, QUE+38
SETUP EN+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% FT+1~
>> %ZIS QUE+20*
>> %ZIS("S" QUE+20*
DUZ QUE+30
EAABRT EN+1~, EN+14, EN+15*
EAADL EN+1~, EN+14*, EN+15, EN+16
EAINFO EN+1~, EN+3, EN+6, EN+9, EN+11, EN+17, SETUP~, HDR~, FT~
EAINFO("CLRK" SETUP+24*, SETUP+25, SETUP+27*, SETUP+29*, FT+5
EAINFO("DISC" SETUP+35*
EAINFO("EASAPP" SETUP+36*
EAINFO("ID" SETUP+33*, FT+5
EAINFO("PD" SETUP+34*, FT+4
EAINFO("PGE" SETUP+32*, FT+6*
EAINFO("SSN" SETUP+38*, HDR+2
EAINFO("VET" SETUP+37*, HDR+2
EALNE EN+1~, EN+3, EN+6, EN+9, EN+11, EN+17, SETUP~, HDRMAIN~, HDR~, FT~
EALNE("D" SETUP+17*, SETUP+18*, HDRMAIN+4
EALNE("DD" SETUP+17*, SETUP+18*, HDRMAIN+2, HDRMAIN+3, HDR+3, FT+3
EALNE("UL" SETUP+17*, SETUP+18*
EALNE("ULC" SETUP+16*, SETUP+18
EASAPP QUE~, QUE+12, QUE+18*, QUE+26, CHECKS~, CHECKS+5, CHECKS+8, CHECKS+11, CHECKS+16, CHECKS+17
, EN+3, SETUP~, SETUP+33, SETUP+35, SETUP+36, SETUP+37, SETUP+38, SETUP+41, SETUP+42
EASDFN QUE~, QUE+18*, EN+3, SETUP~
>> EASVRSN QUE+26*, QUE+27
ERR QUE+9~, CHECKS+14, EN+1~
ERR( CHECKS+6*, CHECKS+9*, CHECKS+12*, CHECKS+20, CHECKS+21
IO("Q" QUE+29
IOF HDRMAIN+1, HDR+1
IOST SETUP+16
POP QUE+9~, QUE+23
RSLT CHECKS+3~, CHECKS+22*, CHECKS+24
X QUE+9~, QUE+31*, CHECKS+5*, CHECKS+6, CHECKS+8*, CHECKS+9, CHECKS+11*, CHECKS+12, CHECKS+19*, CHECKS+20*
, CHECKS+21, SETUP+13~, SETUP+26*, SETUP+27
Y FT+1~
ZTDESC QUE+9~, QUE+30*
ZTIO QUE+9~
ZTRTN QUE+9~, QUE+25*, QUE+27*, QUE+36
ZTSAVE QUE+9~
ZTSAVE( QUE+31*
ZTSK QUE+9~, EXIT
ZUSR QUE+9~, QUE+30*, SETUP+22*, SETUP+23, SETUP+24, SETUP+26
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