Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FH(119.6 - [#119.6] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call