VistA Analysis » VistA Reference » RPCs » ORWDPS32 FORMALT

ORWDPS32 FORMALT

Return a list of formulary alternatives.

Properties

Property Value
Label FORMALT
MUMPS Implementation ORWDPS33
Return Type ARRAY

MUMPS Method Description

Property Value
Method FORMALT^ORWDPS33
Method Comment return a list of formulary alternatives
Input Parameters IEN, PSTYPE
Code 
 D ENRFA^PSJORUTL(IEN,PSTYPE,.ORLST)
 S I=0 F  S I=$O(ORLST(I)) Q:'I  D
 . S OI=+$O(^ORD(101.43,"ID",+$P(ORLST(I),U,4)_";99PSP",0))
 . S $P(ORLST(I),U,4)=OI I OI S $P(ORLST(I),U,5)=$P(^ORD(101.43,OI,0),U)

CPRS

File Type Description
Pascal File Orders/rODBase.pas


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