f_xls_chkdw.srf 446 B

123456789101112131415161718
  1. $PBExportHeader$f_xls_chkdw.srf
  2. global type f_xls_chkdw from function_object
  3. end type
  4. forward prototypes
  5. global function boolean f_xls_chkdw (string arg_dataobject)
  6. end prototypes
  7. global function boolean f_xls_chkdw (string arg_dataobject);datastore ds
  8. ds = create datastore
  9. ds.dataobject = arg_dataobject
  10. String result
  11. result = ds.Describe("Datawindow.Objects")
  12. if isnull(result) or result = '' then return false
  13. return true
  14. end function