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

Package: Dietetics

Routine: FHORD5


Information

FHORD5 ; HISC/REL/NCA - Withhold Lists ;3/16/95 14:21

Source Information

Source file <FHORD5.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Dietetics 4 (DTP,EN2,TR)^FH  PID^FHDPA  PATNAME^FHOMUTL  CUR^FHORD7  
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
VA Fileman 2 (C,NOW)^%DTC  ^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHORD5  

Entry Points

Name Comments DBIA/ICR reference
F1 ; List Withholds
F2
F3
R0
R1
R2
KIL
DP
HDR

External References

Name Field # of Occurrence
C^%DTC F1+1
NOW^%DTC F1+1
^%ZIS R2+1
^%ZISC R2+3
^DIC R0+1
DTP^FH F3+2, HDR+1
EN2^FH R2+2
TR^FH R0, R1
PID^FHDPA F2+3
PATNAME^FHOMUTL F2
CUR^FHORD7 F2+1
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!?27,"N P O / P A S S L I S T",!!
  • Line Location: FHORD5+2
Function Call: READ
  • Prompt: "Select COMMUNICATION OFFICE (or ALL): "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: R0+0
Function Call: READ
  • Prompt: "Sort by WARD or DATE/TIME? WARD// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: SRT
  • Line Location: R1+0
Function Call: WRITE
  • Prompt: *7," Enter W or D"
  • Line Location: R1+1
Function Call: WRITE
  • Prompt: !!,"The list requires a 132 column printer.",!
  • Line Location: R2+0
Function Call: WRITE
  • Prompt: !
  • Line Location: R2+1
Function Call: WRITE
  • Prompt: !
  • Line Location: F1+4
Function Call: WRITE
  • Prompt: !,$P(X,"^",1),?24,$P(X,"^",2),?55,$P(X,"^",3)
  • Line Location: F3+0
Function Call: WRITE
  • Prompt: ?64,DTP
  • Line Location: F3+2
Function Call: WRITE
  • Prompt: ?83,DTP
  • Line Location: F3+2
Function Call: WRITE
  • Prompt: ?102,"*"
  • Condition for execution: D1<OLD
  • Line Location: F3+3
Function Call: WRITE
  • Prompt: ?106,$P(X,"^",6)
  • Line Location: F3+3
Function Call: WRITE
  • Prompt: !?44,"N P O / P A S S L I S T",?107,"Page ",PG
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: $P(^FH(119.73,FHP,0),"^",1)
  • Condition for execution: FHP
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: ?48,DTP
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!,"WARD/ROOM",?24,"PATIENT",?56,"ID#",?65,"EFFECTIVE DATE",?84,"EXPIRATION DATE",?102,">3",?106,"REASON",!
  • Line Location: HDR+2
Routine Call
  • DIC
  • Line Location:
    • R0+1
Routine Call
  • %ZIS
  • Line Location:
    • R2+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] F2+1, F2+4
^FH(119.6 - [#119.6] DP
^FH(119.73 - [#119.73] FHORD5+3, HDR+1
^FHPT - [#115] F2+1, F2+2, F2+3
^FHPT("AW" F1+2
^TMP($J KIL!, F1+1!, F1+3, F2+5*

Label References

Name Line Occurrences
DP F1+2
F1 R2+3
F2 F1+2
F3 F1+3
HDR F1+1, F3
KIL R0, R1, R2+1, R2+2, R2+3
R0 R0+1
R1 FHORD5+3, R1+1

Naked Globals

Name Field # of Occurrence
^( F2+2, F2+4
^(0 F2+1, DP

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % F1+1
%ZIS R2+1!*, R2+3!
%ZIS("A" R2+1*
>> A1 F2+2*, F2+5
>> A3 F1+3*
>> ADM F1+2*, F2+1, F2+2, F2+3
>> BID F2+5
>> D1 F1+2, F3+1*, F3+2, F3+3, DP*
>> D2 F2+3*, F2+5, F3+1*, F3+2
>> DFN F2, F2+1, F2+4
DIC R0+1!*
DIC(0 R0+1*
DT F1+1*
DTIME R0, R1
>> DTP F3+2*, HDR+1*
>> FHDFN F1+2*, F1+3*, F2+1, F2+2, F2+3, F2+5
>> FHLD F2+1
>> FHLST R2+2*
>> FHORD F2+2, F2+3
>> FHP FHORD5+3*, R0*, R0+1*, F1+2, HDR+1
>> FHPGM R2+2*
IO R2+3
IO("Q" R2+2
IOF FHORD5+2, HDR
IOP R2+1!, R2+3!
IOST HDR
>> K F2+2*
>> NOW F1+1*, F2+2, HDR+1
>> OLD F1+1*, F3+3
>> PG F1+1*, HDR*
>> POP R2+1
>> RM F2+4*, F2+5
>> SRT R1*, R1+1, R1+2*, F2+5
>> W1 F1+2*, DP
>> WRDN F1+3*, F2+4, F2+5, DP*
>> X R0*, R1*, F1+1, F1+3*, F3, F3+1, F3+3
>> X1 F1+1*
>> X2 F1+1*
>> Y R0+1, F2+5
>> Y(0 F2+1*, F2+5
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