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

Package: Dietetics

Routine: FHADR9


Information

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

Source Information

Source file <FHADR9.m>

Entry Points

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

FileMan Files Accessed Via FileMan Db Call

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