Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
FUNCTION NBV &&non-blank value
PARAMETER tField
DO CASE
CASE TYPE(tField) = "C"
IF ISBLANK(&tField)
RETURN("blank character field")
ENDIF
CASE TYPE(tField) = "N"
IF ISBLANK(&tField)
RETURN("blank numeric field")
ENDIF
CASE TYPE(tField) = "D"
IF ISBLANK(&tField)
RETURN("blank date field")
ENDIF
CASE TYPE(tField) = "L"
IF ISBLANK(&tField)
RETURN("blank logical field")
ENDIF
CASE TYPE(tField) = "M"
IF ISBLANK(&tField)
RETURN("blank memo field")
ENDIF
CASE TYPE(tField) = "G"
IF ISBLANK(&tField)
RETURN("blank general field")
ENDIF
OTHERWISE
RETURN("undefined")
ENDCASE