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

Package: Dietetics

Routine: FHADR9


Information

FHADR9 ; HISC/NCA - Dietetic Survey ;11/25/94 14:27

Source Information

Source file <FHADR9.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Dietetics 2 TR^FH  QR^FHADR1  
VA Fileman 2 FILE^DICN  ^DIR  
Kernel 1 KILL^XUSCLEAN  

Caller Graph

Caller Graph Total: 20

Package Total Caller Graph
Dietetics 20 APPETIZING  COLD ENOUGH  COURTEOUS  ENOUGH TIME  FHADR7  FOODS PREFERRED  HOT ENOUGH  NUTRITIONAL INFO  
OLD SURVEY - APPETIZING  OLD SURVEY - CLEANLINESS  OLD SURVEY - COURTEOUS  OLD SURVEY - INFO  OLD SURVEY - OVERALL  OLD SURVEY - TASTE  OLD SURVEY - TEMPERATURE  OLD SURVEY - TIME  
OLD SURVEY - VARIETY  OVERALL  PREFERENCES DISCUSSED  TIMELINESS  

Entry Points

Name Comments DBIA/ICR reference
F1 ; Select Survey Category
F2 ; Select Service
F3
R1
CREAT ; Create the first entry
RTG ; Read in Rating String
EN1 ; Enter/Edit Dietetic Survey
KIL
HEL ; Help Prompt for Rating String
C1
C0 ; Check validity of the Rating String

External References

Name Field # of Occurrence
FILE^DICN CREAT+6
^DIR F1+3, F2+2, RTG+2, F3
TR^FH C0+1
QR^FHADR1 EN1+1
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: F3+0
Function Call: WRITE
  • Prompt: *7,!?5,"Two spaces found in input"
  • Line Location: C1+0
Function Call: WRITE
  • Prompt: *7,!?5,"'",$E(X1,1),"' Not a Rating."
  • Line Location: C1+1
Function Call: WRITE
  • Prompt: *7,!?5,"Illegal String Specification in ",X1
  • Line Location: C1+3
Function Call: WRITE
  • Prompt: *7,!?5,"No number surveyed for ",X1
  • Line Location: C1+4
Function Call: WRITE
  • Prompt: *7,!?5,"Illegal entry in rating ",X1
  • Line Location: C1+5
Function Call: WRITE
  • Prompt: *7,!?5,$E(X1,X8,$L(X1))," cannot be greater than 9999"
  • Line Location: C1+6
Function Call: WRITE
  • Prompt: *7,!?5,X2," used more than once."
  • Line Location: C1+8
Function Call: WRITE
  • Prompt: *7,!?5,"There are only 5 ratings."
  • Line Location: C1+10
Function Call: WRITE
  • Prompt: !!,"List the numbers surveyed by specifying which rating it belongs"
  • Line Location: HEL+1
Function Call: WRITE
  • Prompt: !,"to and separated by a single space.",!
  • Line Location: HEL+2
Function Call: WRITE
  • Prompt: !,"Example: E20 V40 G40 F3 U1",!
  • Line Location: HEL+3
Function Call: WRITE
  • Prompt: !," E = Excellent, V = Very Good, G = Good, F = Fair and U = Unacceptable",!
  • Line Location: HEL+4
Function Call: WRITE
  • Prompt: !,"Omit if none surveyed for a certain rating.",!
  • Line Location: HEL+5
Routine Call
  • DIR
  • Line Location:
    • F1+3
    • F2+2
    • RTG+2
    • F3

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(117.3 F1+5
^FH(117.3 - [#117.3] F1+7, F2+3, F2+4, R1*

Label References

Name Line Occurrences
C0 RTG+4
C1 C0+3
CREAT F1+7
F1 F3+1
F2 F3+1
KIL EN1+1, F1+3, F2+2, RTG+3, F3
R1 RTG+2
RTG F2+5, RTG+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA CREAT+7!
DA(1 CREAT+5*
DD CREAT+5!
DIC CREAT+5!*, CREAT+7!
DIC(0 CREAT+5*
DINUM CREAT+6*, CREAT+7!
DIR F1+1!, F2+1!, RTG+1!, F3!
DIR("?" F1+2*, F2+1*, RTG+1*
DIR("A" F1+1*, F2+1*, RTG+1*, F3*
DIR("B" RTG+1*, F3*
DIR(0 F1+1*, F2+1*, RTG+1*, F3*
>> DIROUT F1+3, F2+2, RTG+3, F3
>> DIRUT F1+3, F2+2, RTG+3, F3
DLAYGO CREAT+5*, CREAT+7!
DO CREAT+5!
>> FHX1 F1+3*, F1+4, F1+6
>> FHX2 F2+2*, F2+4, R1
>> FHX3 F1+1*, F2+3*, F2+4, CREAT+7*, R1
>> FLDNUM F1+4*, F1+5
>> OLD F2+4*, RTG+1
>> PRE EN1+1, F1+7, F2+3, F2+4, CREAT+5, R1
>> TIT F1+5*, F1+6*, F1+7, F2+3, F2+4, R1
U F1+5
X CREAT+6*, RTG+2*, RTG+4, R1, C0+2*, C0+3, C0+4!
X1 C0+3*, C0+4!, C1, C1+1, C1+2, C1+3, C1+4, C1+5, C1+6, C1+7
X2 C0+4!, C1+7*, C1+8, C1+9
X3 C0+4!
X4 C0+3*, C0+4!
X5 C0+4!, C1+1*
X6 C0+3*, C0+4!, C1*, C1+1*, C1+3*, C1+4*, C1+5*, C1+6*, C1+8*, C1+10*
X7 C0+3*, C0+4!, C1+9*, C1+10
X8 C0+4!, C1+2*, C1+3, C1+4, C1+5, C1+6
X9 C0+3*, C0+4!, C1+8, C1+9*
>> Y F1+3, F2+2, CREAT+7, F3+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