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

Package: Dietetics

Routine: FHWOR71


Information

FHWOR71 ; HISC/CAH - Diet Profile for CPRS ;1/30/97 08:54

Source Information

Source file <FHWOR71.m>

Entry Points

Name Comments DBIA/ICR reference
P(DFN) ;Dietetics Profile for CPRS
; INPUT: DFN = Patient file #2 internal record number
; OUTPUT: -1^displayable error text (if invalid DFN or no profile)
; with version 5.5 selection of outpatients is allowed
; 1 if successful, and displayable data in
; ^TMP($J,"FHPROF",DFN,n) = line of text
; where n = sequential number
  • ICR #2292
    • Status: Active
    • Usage: Private
    F0 ; Display Diet
    A0
    F1
    F2
    F3
    LP
    SP
    SP1
    W0
    W1
    SPACNG(FHI,FHX) ;Multiple spacing before next line of text in ^TMP global
    TEST ; FOR TESTING ONLY - DFN must be defined

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,^TMP($J,"FHPROF",DFN,I)
    • Line Location: TEST+1
    Info |  Source |  Entry Points |  Interaction Calls