bb.donnay-software.com

Hi,
I want examine use ADL to use DBF/CDX files via it, but some problems I have with it.

Open table is correct, however when I want open dbf table, which have CDX file present in directory and I write use table1 alias "T1" , this not open, and I must delete index file.
ok, I can do it

When after open table I want show record, for example
Dc_msgbox((cAlias2)->VLA)
where VLA is one from fields, this also works

but when want browse table, I examined many entries, but any not work, every time error invalid symbol/alias error.

Note : In ACE_UDF I have defined
//
#xtranslate VL836915-><f> => FieldWGet("VL836915",<"f">)
#xtranslate VL836915-><f> == <x> => FieldWGet("VL836915",<"f">) == <x>
...etc
where I use for alias same name as file DBF.

What can be here wrong ?

#INCLUDE "ACE_UDF.CH"
#INCLUDE "XBP.CH"
#include "dll.ch"
#include "common.ch"
#include "font.ch"

#INCLUDE "ACE.CH"
*#INCLUDE "SQL.CH"
*#INCLUDE "SQLEXT.CH"
#INCLUDE "INKEY.CH"

#INCLUDE "dcdialog.CH"
#INCLUDE "gra.CH"
#INCLUDE "appevent.CH"
#INCLUDE "dcuser.CH"
#include "dcxbrow.ch"
#include "cdxdbe.ch"
#include "dbfdbe.ch"
#include "foxdbe.ch"

*#include "dbesys.prg" // toto som niekde našiel na fóre s popisom ako nastaviť
// CDX, dbe,...
PROCEDURE DbeSys()

AceSetTableType("DBFCDX") // set the default table type to be ADS_CDX
* AceSetTableType("FOXCDX") // set the default table type to be ADS_CDX

/*
#ifdef _ENABLE_SQL_REPLICATION
// define ODBC connection to replicated database:
AceSQLReplicateConnection('DBQ=data\test.mdb;Driver={Microsoft Access Driver (*.mdb)};UID=admin;')

// define ADT or DBF tables that will be replicated:
AceSQLReplicate('AGENTS')
// add additional tables that you want to replicate here...
#endif
*/
Return

***************
FUNCTION Main
***************

LOCAL GetList := {}, oBrowse, aFields[3], aHeaders[3], aPres
LOCAL GetOptions, oToolBar, oDlg

LOCAL cAlias2 := "VL836915"

Set Deleted On

SET FIXED ON
SET DECIMALS TO 0

SET CHARSET TO OEM
*SET CHARSET TO ANSI

SET DATE GERMAN
*SET COLLATION TO GERMAN
SET COLLATION TO SYSTEM

use vl836915 ALIAS (cAlias2) NEW EXCLUSIVE
if used()
INDEX ON CLV TAG CLV
INDEX ON VLA TAG VLA
close all
endif

use vl836915 INDEX vl836915 ALIAS (cAlias2) NEW SHARED
set order to 1

go top

Dc_msgbox((cAlias2)->VLA) // this print field from DBF correctly !

*@ 1,1 DCBROWSE oBrowse ALIAS (cAlias2) SIZE 200,20 ;
@ 1,1 DCBROWSE oBrowse SIZE 200,20 ;
NOSOFTTRACK ;
SCOPE ;
OPTIMIZE ;
CURSORMODE XBPBRW_CURSOR_ROW

* ??? error, alias problem ?

*DCBROWSECOL FIELD (cAlias2)->VLA
*DCBROWSECOL FIELD ((cAlias2)->VLA)
*DCBROWSECOL FIELD VL836915->VLA
*DCBROWSECOL FIELD VLA
*DCBROWSECOL FIELD "VLA"
*DCBROWSECOL FIELD 1->VLA
*DCBROWSECOL DATA {||((cAlias2)->VLA)}
*DCBROWSECOL DATA {||(cAlias)->VLA}

DCREAD GUI FIT ADDBUTTONS ;
TITLE 'Quick-Browsing a Database' FIT

close all

RETURN nil


PROC appsys
RETURN

You seem to be describing your problem as one with the ACE Wrappers, not with DCBROWSE. You are saying that you cannot open the ADT file.

Have you contacted Boris Borsic (the author of ACE wrappers) ?

I wrote Boris, and wait for some advice.
But I open Dbf file with cdx visual fox pro, not a ADT file,
also can read field rows from it this work. But when open dcbrowse stillvhave error with invalid symbol, alias, i do not know if can use dcbrowse merhod and if ii have some bad use for alias.
Also I want examine your new express update, because i still use version 263

Is there any way that you can show me your problem in a sample program?

Hi Roger,

I send my test program in attach, in other post sending DLLs for place to Windows\System directory.

In Xbrowse are comments.
This example works when standard open DBF or DBF with CDX but when open with ACE , open is ok, also read rows, from table.
Only in DCBROWSE or DCQUICKBROWSE some problem with Alias. This looks that for dcbrowse table not exist.
I do not say that problem is in DCBROWSE, I mean some my misconception how it works

It is interersting, that I can do with database , positioning, read fields.

I also tryed Advantage StreamlineSQL ODBC driver to connect DBF as SQL, but this also not work for me, only MS VFP ODBC works.

this is dlls but I am sure, You have all,

You have referenced Advantage ADL and Advantage ALS.

I am not familiar with this.

Ok, never mind,

Boris Borzic advised me to use it as better alternative as MS VFP ODBC driver for connect to exist DBF files with compatibility with Visual Foxpro.

Thanks for your feedback, do not waste time on that.

Victorio