.Net Cobol

How would one do this in Cobol .Net?  My main concern is the IsValidData function.  How would I write that in .net cobol using invoke.  I tried

                   invoke type Validator::IsPresent(txtCode) and

                   invoke type Validator::IsDecimal(txtPrice) returning validData

but there is a syntax error with the 'and'.


If isValidData() then

    *Do somthing

end if


Public Function IsValidData() as Boolean

    Return Validator.IsPresent(txtCode) andalso


end function


Class - Validator

Public Shared Function IsPresent(textbox as Textbox) as Boolean

        if textbox.text = " " then Messagebox.Show("Error")

         return false


          return true

end function.


Parents Reply Children
No Data