FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Have any function to use instead of cm...() for ADS?
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Have any function to use instead of cm...() for ADS?
Posted: Mon Mar 24, 2008 10:48 AM

Dear All,

I've used cmfilter() with dbfcdx (Comix/Clipmore) but now I move to
xHb&FWH&ADS. Is the cm....() compatible with ADS? If not, what I gonna use
filter for ADS?

Thanks in advance for any idea and help.

Regards,
Dutch

Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)
Posts: 663
Joined: Mon Dec 05, 2005 11:22 PM
Have any function to use instead of cm...() for ADS?
Posted: Mon Mar 24, 2008 02:02 PM

If you are using ADS then you have to use their functions for smart filtering or use a .ch file to remap the commands. If you are just sharing the indexes then you can still continue to use the cm functions.

Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Have any function to use instead of cm...() for ADS?
Posted: Tue Mar 25, 2008 09:27 AM

Thanks Gale

Have you got example of .CH file to remap the cm..() function?

Regards,
Dutch

Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)
Posts: 663
Joined: Mon Dec 05, 2005 11:22 PM
Have any function to use instead of cm...() for ADS?
Posted: Tue Mar 25, 2008 01:30 PM

Sorry, I sure don't.

Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Have any function to use instead of cm...() for ADS?
Posted: Wed Mar 26, 2008 04:37 PM
Dear Gale,

Gale FORd wrote:Sorry, I sure don't.


I got the function to use instead of cm..()

*-----------------------------------------*
* Use these function instead of CLIPMORE  *
*-----------------------------------------*
Function cmSetFilter( xVal )
return DbSetFilter( {|| &(xVal) }, xVal )

Function cmClrFilter()
return DbClearFilter()

Function cmReFilter( xVal )
local cFilter := (Alias())->(DbFilter())
if !empty( cFilter )
	cFilter += '.and.'+xVal
	DbClearFilter()
end
return DbSetFilter( {|| &(cFilter) }, cFilter )


Thanks&Regards,
Dutch
Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)

Continue the discussion