VistA Analysis » VistA Reference » RPCs » ORWRP GET DEFAULT PRINTER

ORWRP GET DEFAULT PRINTER

Returns default printer.

Properties

Property Value
Label GETDFPRT
MUMPS Implementation ORWRP
Return Type SINGLE VALUE

MUMPS Method Description

Property Value
Method GETDFPRT^ORWRP
Method Comment Returns default printer for user
Input Parameters ORUSER, ORLOC
Code 
 N IEN,X0,ENT
 S ENT="ALL"
 I $G(ORLOC) S ORLOC=+ORLOC_";SC(",ENT=ENT_"^"_ORLOC
 I +$$GET^XPAR(ENT,"ORWDP WINPRINT DEFAULT") S Y="WIN;Windows Printer" Q
 S IEN=$$GET^XPAR(ENT,"ORWDP DEFAULT PRINTER",1) Q:+IEN=0
 Q:'$D(^%ZIS(1,IEN,0))  S X0=^(0)
 S Y=IEN_";"_$P(X0,U)

CPRS

File Type Description
Pascal File rCore.pas


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