VistA Analysis » VistA Reference » RPCs » ORWDFH TXT

ORWDFH TXT

RPC to return the text of the current and any future diets for a patient.

Properties

Property Value
Label TXT
MUMPS Implementation ORWDFH
Return Type ARRAY

MUMPS Method Description

Property Value
Method TXT^ORWDFH
Method Comment Return text of current & future diets for a patient
Input Parameters DFN
Code 
 S LST(1)="Current Diet:  "_$$DIET^ORCDFH(DFN)
 N FUTLST D FUT(.FUTLST,DFN) I $D(FUTLST)>1 D
 . S LST(2)="Future Diet Orders:",ILST=2
 . S I=0 F  S I=$O(FUTLST(I)) Q:'I  D
 . . S X=$$FMTE^XLFDT(I,2)_"  "_$P(FUTLST(I),U,2)
 . . S LST(ILST)=$S(ILST=2:"Future Diet Orders:  "_X,1:"   "_X)
 . . S ILST=ILST+1

CPRS

File Type Description
Pascal File Orders/rODDiet.pas


Document generated on August 31st 2022, 2:55:43 pm