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

Package: Dietetics

Routine: FHADR1A


Information

FHADR1A ; HISC/NCA - Dietetic Facility Profile ;4/27/93 09:32

Source Information

Source file <FHADR1A.m>

Entry Points

Name Comments DBIA/ICR reference
EN2 ; Print Facility Profile
LP
L1
L2
L3
LP1
HDR ; Print Facility Profile Heading

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?13,"NAME: ",?39,N(1),?86,"STATION NUMBER: ",?104,N(3)
  • Line Location: LP+8
Function Call: WRITE
  • Prompt: !?13,"LOCATION: ",?39,N(2),?86,"REGION:",?104,N(4)
  • Line Location: LP+9
Function Call: WRITE
  • Prompt: !?13,"RPM CLASSIFICATION: ",?39,N(6),?86,"COMPLEXITY LEVEL: ",N(7)
  • Line Location: LP+10
Function Call: WRITE
  • Prompt: !?13,"MULTI DIVISION FACILITY:",?39,N(5),!
  • Line Location: LP+11
Function Call: WRITE
  • Prompt: !!?13,"COOK CHILL FOODS: ",?66,$J($S($P(X0,"^",21)="Y":"YES",1:"NO"),3)
  • Line Location: L2+0
Function Call: WRITE
  • Prompt: !!?13,"DIETETIC INTERNSHIP/PROGRAMS:"
  • Line Location: L3+2
Function Call: WRITE
  • Prompt: !!,?15,"VA SPONSORED DIETETIC INTERNSHIP",?66,$J(N(8),3)
  • Line Location: L3+3
Function Call: WRITE
  • Prompt: !?15,"AFFILIATED AP4",?66,$J(N(9),3),!,?15,"AFFILIATED DIETETIC INTERNSHIP",?66,$J(N(10),3)
  • Line Location: L3+4
Function Call: WRITE
  • Prompt: !,?15,"AFFILIATED CUP",?66,$J(N(11),3),!,?15,"VA SPONSORED AP4",?66,$J(N(12),3)
  • Line Location: L3+5
Function Call: WRITE
  • Prompt: !?13,$S(TYP="S":"SPECIALIZED MEDICAL PROGRAMS:",TYP="D":"PRIMARY DELIVERY SYSTEM:",1:"NOT SPECIFIED")
  • Line Location: LP1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: LP1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: LP1+1
Function Call: WRITE
  • Prompt: !!!,?13,"S E C T I O N I F A C I L I T Y P R O F I L E",!!!!
  • Line Location: HDR+1
Info |  Source |  Entry Points |  Interaction Calls