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
Print Page as PDF
Routine: FHASN4

Package: Dietetics

Routine: FHASN4


Information

FHASN4 ; HISC/NCA - Nutrition Status Matrix (cont.) ;8/3/94 11:11

Source Information

Source file <FHASN4.m>

Entry Points

Name Comments DBIA/ICR reference
Q0 ; Process Screening
F0
Q1 ; Process screening inpatients for status comparison
CNT ; Count unchanged status
Q2 ; Unclassified New
Q3 ; Tabulate status for old
Q4 ; Unclassified Old
Q5 ; Set Classification for Old and New
P0 ; Print Summary
P1
P2
LAST ; Last Total Line

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: P0+9
Function Call: WRITE
  • Prompt: !,$S(STS=1:"I",STS=2:"II",STS=3:"III",STS=4:"IV",1:"UNC")
  • Line Location: P2+1
Function Call: WRITE
  • Prompt: ?24,$J($P(TOT,"^",STS),7)
  • Line Location: P2+2
Function Call: WRITE
  • Prompt: ?37
  • Line Location: P2+3
Function Call: WRITE
  • Prompt: $J(X,7)
  • Line Location: P2+3
Function Call: WRITE
  • Prompt: $J(X,7)
  • Line Location: P2+4
Function Call: WRITE
  • Prompt: !?1,$P(Y,"^",2),?10,$E($P(Y,"^",1),1,26),?37
  • Line Location: P2+5
Function Call: WRITE
  • Prompt: $J(AST,7)
  • Line Location: P2+6
Function Call: WRITE
  • Prompt: !,LN,!,"Total",?24,$J(SUM,7),?37
  • Line Location: LAST+1
Function Call: WRITE
  • Prompt: $J($P(TOT1,"^",L),7)
  • Line Location: LAST+1
Info |  Source |  Entry Points |  Interaction Calls