VistA Analysis » VistA Reference » RPCs » ORWTPD SUINDV

ORWTPD SUINDV

set user level individual report’s time/occ setting

Properties

Property Value
Label SUINDV
MUMPS Implementation ORWTPD
Return Type SINGLE VALUE

MUMPS Method Description

Property Value
Method SUINDV^ORWTPD
Method Comment Set user individual time/occ setting
Input Parameters RPTS, VALUE
First Comment 
 RPTS format: RPTIen^RPTIen^RPTIen such as 1^2^3
Code 
 I $L(RPTS)=0 Q
 N ORERR,RPTID,P1,P7 S ORERR=0
 S (P1,P7)=""
 F I=1:1:$L(RPTS,"^") S RPTID=$P(RPTS,U,I) D
 . S P1=$P($G(^ORD(101.24,RPTID,0)),U),P7=$P($G(^(0)),U,7)
 . I "02345"[P7,(P1'="ORRP IMAGING") D DEL^XPAR("USR.`"_DUZ,"ORWRP TIME/OCC LIMITS INDV",RPTID,.ORERR) Q
 . D EN^XPAR(DUZ_";VA(200,","ORWRP TIME/OCC LIMITS INDV",RPTID,VALUE,.ORERR)

CPRS

File Type Description
Pascal File Options/rOptions.pas


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