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

Package: Dietetics

Routine: FHASN3


Information

FHASN3 ; HISC/NCA - Nutrition Status Matrix ;9/29/93 10:02

Source Information

Source file <FHASN3.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 4 ^%DT  ^%DTC  ^DIC  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
Dietetics 2 (EN2,TR)^FH  Q0^FHASN4  

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
Dietetics 2 FHASN4  FHASNR2  

Entry Points

Name Comments DBIA/ICR reference
EN2 ; Select to print Change Overtime or Admission
E1
DT ; Get From/To Dates
D1
D2
E2 ; Get # of Days from Admission
L0
KIL
HD ; Check for end of page
HDR ; Print heading

External References

Name Field # of Occurrence
^%DT D1, D2
^%DTC D2+3
^%ZIS L0
^%ZISC L0+2
^DIC E1+1
^DIR EN2+1, E2+3, HD+1
EN2^FH L0+1
TR^FH E1
Q0^FHASN4 L0+2
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "Select WARD (or ALL): "
  • Variable: X
  • Timeout: DTIME
  • Line Location: E1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: D1+0
Function Call: WRITE
  • Prompt: *7," [Must Start before Today!] "
  • Line Location: D1+1
Function Call: WRITE
  • Prompt: *7," [Greater than Today?] "
  • Line Location: D2+1
Function Call: WRITE
  • Prompt: *7," [Must End after Start] "
  • Line Location: D2+2
Function Call: WRITE
  • Prompt: !!,"This Report shows the status change on the starting date and on the ending date.",!,"Excludes any Admission starting from the starting date.",!
  • Line Location: D2+6
Function Call: WRITE
  • Prompt: !
  • Line Location: E2+1
Function Call: WRITE
  • Prompt: !
  • Line Location: L0+0
Function Call: WRITE
  • Prompt: !,HD,?72,"Page ",PG
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!?9,"N U T R I T I O N S T A T U S C H A N G E M A T R I X"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,"WARD",?30,DTE,!,$P(NAM,"~",1)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?17,"Shows Status Change on Start Date and End Date",!?17,"(Excludes Any Admission from the starting date)"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !!,?23,"BEG STATUS",?54,"END STATUS",?73,"STATUS"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,"STATUS",?26,"TOTAL",?43,"I II III IV UNC SAME",!,LN,!
  • Line Location: HDR+6
Routine Call
  • DIC
  • Line Location:
    • E1+1
Routine Call
  • DIR
  • Line Location:
    • EN2+1
    • E2+3
    • HD+1
Routine Call
  • %ZIS
  • Line Location:
    • L0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FH(119.6 - [#119.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(119.6 - [#119.6] EN2+2
^TMP($J KIL!

Label References

Name Line Occurrences
D1 D1, D1+1, D2+1, D2+2
D2 D2
DT EN2+2, D2+4
E1 E1+1
E2 EN2+2, E1+2
FHASN3 L0+2
KIL EN2+1, E1, E1+1, D1, D2, E2+3, L0, L0+1, L0+2
L0 D2+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT D1!*, D2!*
%DT("A" D1*, D2*
>> %Y D2+4
%ZIS L0!*, L0+2!
%ZIS("A" L0*
>> ANS HD+1*
DIC E1+1!*
DIC(0 E1+1*
DIR EN2+1!, E2+1!, HD+1!
DIR("?" E2+1*
DIR("A" EN2+1*, E2+2*
DIR(0 EN2+1*, E2+1*, HD+1*
>> DIROUT EN2+1, E2+3
>> DIRUT EN2+1, E2+3
DT D1+1, D2+1
>> DTE HDR+3
DTIME E1
>> DTOUT E1+1, D1, D2
>> EDT E1+2*, D2*, D2+1, D2+2, D2+3
>> FHLST L0+1*
>> FHPGM L0+1*
>> FHX1 EN2+1*, EN2+2, E1+2, HDR+4
>> HD HDR+1
IO L0+2
IO("Q" L0+1
IOF HDR+1
IOP L0!, L0+2!
IOST HD+1, HDR+1
>> LN HDR+6
>> NAM HDR+3
>> NOM D2+5*, E2+3*
>> PG HDR+1*
>> POP L0
>> SDT E1+2*, D1*, D1+1, D2+2, D2+3
U D1, D2
>> WRDS EN2+2*, E1*, E1+1*, L0+2
>> X E1*, E1+1, D1, D2, D2+4, D2+5
>> X1 D2+3*
>> X2 D2+3*
>> Y EN2+1, E1+1, D1, D2, E2+3, HD+1
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