VistA Analysis » VistA Reference » RPCs » ORWDPS32 VALRATE

ORWDPS32 VALRATE

Return a 1 if IV rate text is valid, otherwise return 0.

Properties

Property Value
Label VALRATE
MUMPS Implementation ORWDPS33
Return Type SINGLE VALUE

MUMPS Method Description

Property Value
Method VALRATE^ORWDPS33
Method Comment return "1" (true) if IV rate text is valid
Input Parameters X
Code 
 I $E($RE($$UPPER^ORWDPS32(X)),1,5)="RH/LM"  S X=$E(X,1,$L(X)-5)
 S X=$$TRIM^ORWDPS32(X)
 D ORINF^PSIVSP S VAL=$G(X) ;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