FHWOR71 ; HISC/CAH - Diet Profile for CPRS ;1/30/97 08:54
Source file <FHWOR71.m>
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 |
|
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
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|