Click above to get retro games delivered to your door ever month!

  m6_FiltDropRec():

  Purpose:  Drop a record from a filter.

   Syntax:  m6_FiltDropRec( <nHandle>, <nRecord> )

    Where:  <nHandle>     --  Is a handle to a previously allocated
                              filter.

            <nRecord>     --  Record to drop from the filter

  Returns:  Logical value:  .T. means the operation was successful,  .F.
            indicates it failed.  In the case of a .F. value call m6_Error()
            to retrieve the reason for the error.

     Note:  You do not need to own a filter to drop records from it.  What
            you do need is a valid handle to the filter, which can be
            obtained via m6_NewFilter() or m6_GetAreaFilter().

            *Always free RYO filters that are no longer being used.*

  Example:

         #include "SIXCDX.CH"
         #include "MACHSIX.CH"

         //..............................................use customer file
         USE Customer via "SIXCDX"

         //..............................................create RYO filter
         nHandle := m6_NewFilter()

         //......................................add records to the filter
         ? m6_FiltAddRec( nHandle,  5 )  // .T.
         ? m6_FiltAddRec( nHandle, 10 )  // .T.

         //..SET FILTER TO my RYO filter ( Note: System now owns the filter )
         m6_SetAreaFilter( nHandle )

         //...........Browse records, only records 5 and 10 will be visible
         Browse()

         //...................................Drop record 5 from the filter
         ? m6_FiltDropRec( nHandle, 5 )  //  .T.

         //..............................Now only record 10 will be visible
         Browse()

         //.Free filter via SET FILTER TO ( System will release the filter )
         SET FILTER TO