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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: FHASN71

Package: Dietetics

Routine: FHASN71


Information

FHASN71 ; HISC/NCA - Print Status Average (cont.) ;9/28/95 10:52

Source Information

Source file <FHASN71.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Dietetics 2 DTP^FH  PATNAME^FHOMUTL  
VA FileMan 2 NOW^%DTC  $$GET1^DIQ  
Registration 1 ^DGPMSTAT  

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

Package Total Caller Graph
Dietetics 1 FHASN7  

Entry Points

Name Comments DBIA/ICR reference
Q0 ; Process Screening all patients
TS ; Tabulate status
CHK ; Check if inpatient with ADM
UC ; Unclassified
SC ; Set Classification
GADM ; Get ADM for patient
NS ; Nutrition Status in inverse date order
STOR ; Store Nutrition Status by inverse date
CALC ;Calculate Average
C1 ;Calculate Averages continued
BSA ;Build sort array
PS ; Print summary
PSD ;Print summary detail
HDR ;Report Page Header

External References

Name Field # of Occurrence
NOW^%DTC PS+2
^DGPMSTAT TS+4
$$GET1^DIQ Q0+16
DTP^FH PS+1, PS+2
PATNAME^FHOMUTL TS+1, GADM+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?16,LN
  • Line Location: PS+9
Function Call: WRITE
  • Prompt: !
  • Line Location: PS+10
Function Call: WRITE
  • Prompt: !?16,NAME
  • Line Location: PSD+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PSD+3
Function Call: WRITE
  • Prompt: ?48
  • Line Location: PSD+4
Function Call: WRITE
  • Prompt: $S(D2:$J(D2,7),1:$J("",7))
  • Line Location: PSD+8
Function Call: WRITE
  • Prompt: $S(D2:$J(D2,5,0),1:$J("",5))
  • Line Location: PSD+10
Function Call: WRITE
  • Prompt: $S(D3:$J(D3,7),1:$J("",7))
  • Line Location: PSD+11
Function Call: WRITE
  • Prompt: !?16,DTP,!!?42,"N U T R I T I O N S T A T U S A V E R A G E",?109,"Page ",PG
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!?(132-$L(DTE)\2),DTE
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!?16,$S(SRT="C":"CLINICIAN",1:"WARD"),?54,"I % II % III % IV % UNC % TOTAL",!?16,LN,!
  • Line Location: HDR+3

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] TS+6, TS+8, GADM+2
^DGPM("ATID1" GADM+2
^DIC(42 - [#42] TS+12
^FH(119.6 - [#119.6] Q0+8, Q0+9, Q0+12, Q0+13, Q0+14, TS+12
^FHPT - [#115] Q0+23, TS+9, TS+14, CHK+1, CHK+3, CHK+4, CHK+5, GADM+3, NS+2, NS+3
^TMP($J Q0+27!, TS+15, TS+16, NS+1!, NS+3, STOR+1*

Label References

Name Line Occurrences
BSA Q0+25
C1 CALC+1, CALC+2, CALC+3
CALC Q0+23
CHK TS+16
GADM CHK+2, CHK+5
HDR PS+2, PSD+1
NS TS+15
PS Q0+25
PSD PS+7, PS+8, PS+9
SC CHK+11
STOR NS+2, NS+3
TS Q0+23
UC TS+14, TS+15, CHK+3, CHK+4

Naked Globals

Name Field # of Occurrence
^( Q0+10, TS+16, GADM+2, NS+2, NS+3
^(0 CHK+1, CHK+4, GADM+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PS+2
>> ADM TS+6*, TS+9, CHK+1, CHK+3, CHK+4, CHK+5, GADM+2*, GADM+3
CLIN Q0+1!, Q0+14*, Q0+15, Q0+16, Q0+17, Q0+21!
>> D1 CHK+6*, PS+6*, PS+8*, PS+9*, PSD+5, PSD+7
>> D2 PSD+7*, PSD+8, PSD+9*, PSD+10
>> D3 PSD+5*, PSD+9, PSD+11
>> DFN TS+1, GADM+1, GADM+2
>> DG1 TS+3*, TS+5, TS+10
>> DGA1 TS+3*, TS+5, TS+6
>> DGT TS+2*
>> DGXFR0 TS+3*
>> DISC TS+7*, TS+8*, CHK+5, GADM+2*
>> DTE PS+1*, HDR+2
>> DTP PS+1*, PS+2*, HDR+1
>> DW1 TS+12*
DWRD Q0+1!
DWRD( Q0+11*, TS+11
>> EDT TS+2, NS+1, PS+1
>> FHDFN Q0+23*, TS+9, TS+14, CHK+1, CHK+3, CHK+4, CHK+5, GADM+3, NS+2, NS+3
>> FHWC( Q0+20*, TS+13, CHK+9, GADM+4
>> FHWCN( Q0+16*, BSA+9, BSA+10
>> FHWN( Q0+12*, BSA+7
>> FHX1 NS+1*, NS+2, NS+3*
>> FHX2 NS+1*, NS+2
IOF HDR+1
IOSL PSD+1
IOST HDR+1
>> K C1+1*, C1+2, C1+5, C1+7, PSD+6*, PSD+7
>> L CALC+1*, CALC+2*, CALC+3*, C1+2, C1+4, C1+5, C1+6
LIST Q0+1!, Q0+21!
LIST( Q0+15*, Q0+17*, Q0+19
>> LN PS+2*, PS+9, HDR+3
LST Q0+1!, Q0+9*, Q0+10
>> MW1 TS+10*, TS+11, TS+12
>> MWRD TS+12*
N Q0+23!
N( SC+2*, SC+3*, CALC+2, CALC+3, C1+2
N(0 CALC+1
NAME Q0+1!, PS+4*, PS+8*, PS+9*, PSD+2, PSD+3
>> ND Q0+23*, SC+4*, C1+2
>> NOW PS+2*
>> NX TS+16*, GADM+2*
>> PG PS+2*, HDR+1*
S Q0+1!
S( C1+4*, C1+5*, C1+6*, BSA+5, PS+6
S(0 PS+8
>> S1 CHK+6*, CHK+11, UC+1*, SC+3
SA BSA+3!
SA( BSA+12*, PS+3
>> SDT NS+1, PS+1
SN BSA+3!, BSA+7*, BSA+9*, BSA+10*, BSA+11*, BSA+12, BSA+13!
>> SRT SC+1, CALC+2, CALC+3, BSA+7, BSA+8, HDR+3
>> TOT Q0+2*, C1+7*, C1+8*, PS+9
U Q0+12, SC+3, C1+2, C1+5, C1+6, C1+7, C1+8, PSD+5, PSD+7
>> W1 TS+11*, TS+12*, TS+13, CHK+7*, CHK+8*, CHK+9, SC+1, GADM+4*, BSA+4*, BSA+5*
, BSA+6, BSA+7, BSA+9, BSA+10, BSA+11, PS+5*, PS+6
WARD Q0+1!
WC Q0+1!, Q0+13*, Q0+14, Q0+21!
>> WD TS+13*, CHK+9*, CHK+10*, SC+1, GADM+4*
WLCN Q0+1!
WRD Q0+1!, Q0+8*, Q0+9, Q0+11, Q0+12, Q0+13, Q0+14, Q0+15, Q0+17, Q0+19
, Q0+20
X Q0+1!, Q0+10*, Q0+11, Q0+18*, Q0+19*, Q0+21!, SC+1*, SC+2, SC+3, NS+2*
, NS+3*, STOR+1, STOR+2, C1+2*, C1+3*, C1+5, C1+6, C1+7, C1+8, BSA+9*
, BSA+10*, PS+3*, PS+4, PS+5
X1 Q0+1!, Q0+18*, Q0+19*, Q0+20, Q0+21!, BSA+10*
>> X4 TS+16*
>> X5 TS+16*, CHK+1, CHK+4, CHK+5, CHK+6, CHK+7, GADM+3
>> XX TS+6*, TS+7, GADM+2*, GADM+4, NS+2*, NS+3*, STOR+1
>> ZZ NS+1*, STOR+1, STOR+2*
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 |  Naked Globals |  Local Variables  | All