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

Package: Mental Health

Routine: YSFORM


Information

YSFORM ;SLC/TGA-HEADER & FOOTER FOR FORMS ;3/27/90 15:01 ;

Source Information

Source file <YSFORM.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA FileMan 1 EN^DIQ1  

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

Package Total Caller Graph
Mental Health 8 YIHISTF  YSDX3R  YSDX3R1  YSDX3RU  YSDXR  YSSRU  YTEXT  YTEXT1  

Entry Points

Name Comments DBIA/ICR reference
ENHD ; Called by routines YSDX3R, YSDX3R1, YSDX3RU, YSDSR, YSHX1R YSPDR1
; YSPDXR, YSPHYR, YSPP, YSPP1, YSPP1A, YSPP3, YSPP4, YSPP5, YSPP6
; YSPP7, YSPP8, YSPP9, YSPRBR1, YSPRBR2, YSPROB5, YSPROBR, YSPROSE
; YSPTXR
ENFT ; Called by routines YSDX3R1, YSDX3RU, YSDXR, YSHX1R YSPDR1
; YSPDXR, YSPHYR, YSPP, YSPP1, YSPP1A, YSPP3, YSPP4, YSPP5
; YSPP7, YSPP8, YSPP9, YSPRBR1, YSPRBR2, YSPROB5, YSPROBR1, YSPROSE
; YSPTXR
SITE() ;Set YSLOC to location using KERNEL site parameter file entry
MASKSSN(YSSSN) ; return only last 4 of SSN

External References

Name Field # of Occurrence
EN^DIQ1 SITE+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ENHD+5
Function Call: WRITE
  • Prompt: YSNM,?47,"SSN ",$$MASKSSN(YSSSN),?65,"DOB ",YSDOB,!
  • Line Location: ENHD+7
Function Call: WRITE
  • Prompt: !
  • Line Location: ENHD+8
Function Call: WRITE
  • Prompt: "-"
  • Line Location: ENHD+8
Function Call: WRITE
  • Prompt: !
  • Line Location: ENHD+9
Function Call: WRITE
  • Prompt: "MEDICAL RECORD"
  • Condition for execution: YSFTR]""
  • Line Location: ENHD+9
Function Call: WRITE
  • Prompt: ?80-$L(YSFHDR)/2,YSFHDR
  • Line Location: ENHD+10
Function Call: WRITE
  • Prompt: !
  • Line Location: ENHD+10
Function Call: WRITE
  • Prompt: !
  • Line Location: ENHD+10
Function Call: WRITE
  • Prompt: !
  • Line Location: ENFT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: ENFT+8
Function Call: WRITE
  • Prompt: ?28,"(Continued on next page)"
  • Condition for execution: YSCON
  • Line Location: ENFT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: ENFT+9
Function Call: WRITE
  • Prompt: "_"
  • Line Location: ENFT+9
Function Call: WRITE
  • Prompt: !,YSNM,?(31+(37-$L(YSLCN)/2)),YSLCN
  • Line Location: ENFT+10
Function Call: WRITE
  • Prompt: ?69,"VAF 10-9034"
  • Condition for execution: YSFTR]""
  • Line Location: ENFT+10
Function Call: WRITE
  • Prompt: !,$$MASKSSN(YSSSN)
  • Line Location: ENFT+12
Function Call: WRITE
  • Prompt: " DOB ",YSDOB
  • Condition for execution: YSDOB]""
  • Line Location: ENFT+12
Function Call: WRITE
  • Prompt: ?(80-$L(YSFTR(1))),YSFTR(1)
  • Condition for execution: YSFTR]""
  • Line Location: ENFT+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XMB(1 - [#4.3] SITE+2

Label References

Name Line Occurrences
$$MASKSSN ENHD+7, ENFT+12
$$SITE ENHD+6, ENFT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA SITE+1~, SITE+3*
DIC SITE+1~, SITE+3*
DIQ SITE+1~, SITE+3*
DIQ(0 SITE+3*
DR SITE+1~, SITE+3*
I0 ENHD+8*, ENHD+10*, ENHD+12!, ENFT+7*, ENFT+9*, ENFT+13!
IOF ENHD+5
IOM ENHD+10, ENFT+9
IOSL ENFT+7
IOST ENHD+7, ENHD+8, ENHD+9, ENHD+10, ENFT+13
U SITE+2
>> YSCON ENHD+5*, ENHD+11, ENHD+12*, ENFT+5*, ENFT+8
>> YSDA SITE+2*, SITE+3, SITE+4
>> YSDOB ENHD+7, ENFT+12
>> YSFHDR ENHD+10
>> YSFHDR(1 ENHD+5*, ENHD+11
>> YSFTR ENHD+5*, ENHD+9, ENFT+5*, ENFT+10, ENFT+11, ENFT+12
>> YSFTR(1 ENFT+11*, ENFT+12
>> YSLCN ENHD+6*, ENFT+6*, ENFT+10
>> YSLOC SITE+4*, SITE+5
>> YSLOC(4 SITE+4
>> YSNM ENHD+7, ENFT+10
YSSSN ENHD+7, ENFT+12, MASKSSN~, MASKSSN+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All