VistA Analysis » VistA Reference » RPCs » ORWTPD1 GETCSDEF

ORWTPD1 GETCSDEF

Properties

Property	Value
Label	GETCSDEF
MUMPS Implementation	ORWTPD1
Return Type	SINGLE VALUE

MUMPS Method Description

Property Value

Method GETCSDEF^ORWTPD1

Method Comment Get Div/Sys/Pkg Cover Sheet default range parameters.

Code

Property	Value
Method	GETCSDEF^ORWTPD1
Method Comment	Get Div/Sys/Pkg Cover Sheet default range parameters.
Code	`N ORVAL S ORVAL="" S ORVAL=$$GET^XPAR("DIV^SYS^PKG","ORQQCSDR CS RANGE START",1,"I") S ORVAL=$$CHKRNG(ORVAL,999) S INFO=ORVAL_U,ORVAL="" S ORVAL=$$GET^XPAR("DIV^SYS^PKG","ORQQCSDR CS RANGE STOP",1,"I") S ORVAL=$$CHKRNG(ORVAL,999) S INFO=INFO_ORVAL`

 N ORVAL
 S ORVAL=""
 S ORVAL=$$GET^XPAR("DIV^SYS^PKG","ORQQCSDR CS RANGE START",1,"I")
 S ORVAL=$$CHKRNG(ORVAL,999)
 S INFO=ORVAL_U,ORVAL=""
 S ORVAL=$$GET^XPAR("DIV^SYS^PKG","ORQQCSDR CS RANGE STOP",1,"I")
 S ORVAL=$$CHKRNG(ORVAL,999)
 S INFO=INFO_ORVAL

CPRS

File Type	Description
Pascal File	Options/rOptions.pas

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