PdcDBTable.SetFilter

From External Bemet Wiki
Jump to navigation Jump to search

Declaration

SetFilter(Filter as String) as Boolean

Description

Returns true or false whether a filter is succesfully set on the table

Notes

This method filters a set of records in a opened table. All standard pdc filter functions and expressions are available.

Code example

This code filters all calculations with status seven, deliverymonth december and delivery year 2008. Par calculation the calculationnumber is shown.

Dim tblDO_ORDER
dim strFilter

  Set tblDO_ORDER = pdc.DataBase.OpenTable(pdcConData, "DO_ORDER", "DO_ORDNR")
  strFilter = "(UPPER(DO_STAT)='7') AND (Month(DO_LEVER)=12) AND (YEAR(DO_LEVER)=2008)"
  'msgbox strFilter
  tblDO_ORDER.SetFilter strFilter

    if tblDO_ORDER.RecordCount > 0 then
    msgbox tblDO_ORDER.RecordCount

    tblDO_ORDER.FirstRecord
    do while not tblDO_ORDER.Eof
      msgbox "Calculation no: " & tblDO_ORDER.GetField("DO_ORDNR")

      tblDO_ORDER.NextRecord
    loop
  end if

Availability

Available since June 2008 (from version 3.8)