VistA Analysis » VistA Reference » RPCs » ORWDPS32 ALLIVRTE

ORWDPS32 ALLIVRTE

Properties

Property Value
Label ALLIVRTE
MUMPS Implementation ORWDPS32
Return Type ARRAY

MUMPS Method Description

Property Value
Method ALLIVRTE^ORWDPS32
Code
 N ABB,CNT,EXP,IEN,RTE
K ^TMP($J,"ORWDPS32 ALLIVRTE")
S CNT=0
D ALL^PSS51P2(,"??",,1,"ORWDPS32 ALLIVRTE")
S RTE="" F S RTE=$O(^TMP($J,"ORWDPS32 ALLIVRTE","B",RTE)) Q:RTE="" D
.S IEN=$O(^TMP($J,"ORWDPS32 ALLIVRTE","IV",RTE,"")) Q:IEN'>0
.S ABB=$G(^TMP($J,"ORWDPS32 ALLIVRTE",IEN,1))
.S EXP=$G(^TMP($J,"ORWDPS32 ALLIVRTE",IEN,4))
.S CNT=CNT+1,LST(CNT)=IEN_U_RTE_U_ABB_U_U_U_U
K ^TMP($J,"ORWDPS32 IVROUTE")

CPRS

File Type Description
Pascal File Orders/rODMeds.pas


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