VistA Analysis » VistA Reference » RPCs » ORWDPS32 OISLCT

ORWDPS32 OISLCT

Returns defaults for pharmacy orderable items.

Properties

Property Value
Label OISLCT
MUMPS Implementation ORWDPS32
Return Type ARRAY

MUMPS Method Description

Property Value
Method OISLCT^ORWDPS32
Method Comment rtn for defaults for pharm OI
Input Parameters OI, PSTYPE, ORVP
Code 
 N ILST S ILST=0
 K ^TMP("PSJINS",$J),^TMP("PSJMR",$J),^TMP("PSJNOUN",$J),^TMP("PSJSCH",$J)
 S LST($$NXT)="~Dispense" D DISPDRG
 S LST($$NXT)="~Instruct" D INSTRCT
 S LST($$NXT)="~Route"    D ROUTE
 S LST($$NXT)="~Message"  D MESSAGE
 I $L($G(^TMP("PSJSCH",$J))) S LST($$NXT)="~DefSched",LST($$NXT)="d"_^($J)
 K ^TMP("PSJINS",$J),^TMP("PSJMR",$J),^TMP("PSJNOUN",$J),^TMP("PSJSCH",$J)

CPRS

File Type Description
Pascal File Orders/rODBase.pas


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