You could use something like: method-id IsValidData. procedure division returning myRet as condition-value. if Validator::IsPresent(txtCode) and Validator::IsDecimal(txtPrice) set myRet to true else set myRet to false end-if
↧