VistA Analysis » VistA Reference » RPCs » ORWDPS2 CHKPI

ORWDPS2 CHKPI

Properties

Property Value
Label CHKPI
MUMPS Implementation ORWDPS2
Return Type SINGLE VALUE

MUMPS Method Description

Property Value
Method CHKPI^ORWDPS2
Method Comment return pre-existing patient instruct
Input Parameters ODIFN
Code 
 N IDNUM,IDPI
 S (IDNUM,IDPI)=0,VAL=""
 I '$D(^OR(100,ODIFN,4.5,"ID","PI")) S VAL="" Q
 F  S IDNUM=$O(^OR(100,ODIFN,4.5,"ID","PI",IDNUM)) Q:'IDNUM  D
 . F  S IDPI=$O(^OR(100,ODIFN,4.5,IDNUM,2,IDPI)) Q:'IDPI  D
 .. S VAL=VAL_^OR(100,ODIFN,4.5,IDNUM,2,IDPI,0)
 K IDNUM,IDPI

CPRS

File Type Description
Pascal File Orders/rODMeds.pas


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