VistA Analysis » VistA Reference » RPCs » ORWRP1 LISTNUTR

ORWRP1 LISTNUTR

Properties

Property Value
Label LISTNUTR
MUMPS Implementation ORWRP1
Return Type GLOBAL ARRAY

MUMPS Method Description

Property Value
Method LISTNUTR^ORWRP1
Method Comment list nutritional assessments
Input Parameters DFN
Code 
 N OK,I,X,SITE
 K ^TMP($J,"FHADT")
 S OK=$$FHWORADT^FHWORA(DFN)
 S I=0,SITE=$$SITE^VASITE,SITE=$P(SITE,"^",2)_";"_$P(SITE,"^",3)
 F  S I=$O(^TMP($J,"FHADT",DFN,I)) Q:'I  S X=SITE_U_I_U_^(I),^(I)=X
 S ROOT=$NA(^TMP($J,"FHADT",DFN))

CPRS

File Type Description
Pascal File rReports.pas


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