VistA Analysis » VistA Reference » RPCs » ORWDPS32 VALSCH

ORWDPS32 VALSCH

Validate a schedule and return a 1 if it is valid, otherwise return 0.

Properties

Property Value
Label VALSCH
MUMPS Implementation ORWDPS33
Return Type SINGLE VALUE

MUMPS Method Description

Property Value
Method VALSCH^ORWDPS33
Method Comment validate a schedule, return 1 if valid, 0 if not
Input Parameters X, PSTYPE
Code 
 I '$L($T(EN^PSSGSGUI)) S OK=-1 Q
 I $E($T(EN^PSSGSGUI),1,4)="EN(X" D
 . N ORX S ORX=$G(X) D EN^PSSGSGUI(.ORX,$G(PSTYPE,"I"))
 . K X S:$D(ORX) X=ORX
 E  D
 . D EN^PSSGSGUI
 S OK=$S($D(X):1,1:0)

CPRS

File Type Description
Pascal File Orders/rODBase.pas


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