Check if record can be deleted.

     strName = "PSLMST"
     strKey  = "EMPNO"
     IF NOT LceSetFieldValue(iSession, strKey , "12345")
              return error 
     ENDIF
     IF LceDelete(iSession, strName, strKey, TRUE)
               delete of the record can be performed 
     ELSE
               cannot delete the record 
               display error messages 
     ENDIF