FiveTech Software tech support forums

... < 51000" },; {"MYTABLE2","HBRECNO BETWEEN 1 AND 50000" }} This SET together ADOWHERECLAUSE( nWa, cNewSql ) enable us to open tables using the set of data we really need without altering any code logic. This SET is used as default query to open ...

... abre las transacciones para cada conexión abierta ADOCOMMITTRANS y ADOROLLBACKTRANS lo mismo que ADOBEGINTRANS Nueva función ADONESTEDTRANS (nWA) devuelve nr de transacciones anidadas NUEVO CÓDIGO DE ERROR 10600 - conexión no disponible no puede encontrar transacciones ADO_ALREADYOPEN Prueba ...

... opens a transactions for each opened connection ADOCOMMITTRANS and ADOROLLBACKTRANS the same as ADOBEGINTRANS New function ADONESTEDTRANS( nWA ) returns nr of nested transactions NEW ERROR CODE 10600 - connection not available cant find transactions ADO_ALREADYOPEN Test if the open recordset ...

... mezcla de ambos. Las tablas de cada área son siempre ctualizadas por ADORDD. ex use CTable replace xfiled with xValue o hb_adoRddGetConnection (NWA): execute ("update....") // Si no haces la resincronización al editar se mostrará este registro últmo la actualización. En resumen, con ...

... fields where the SQL type its without field len definition such as: AUTOINC, MONEY, DOUBLE, INT, SMALLINT, etc. Corrected Bugs: 1) ADOBEGINTRANS( nWA ) : without work are it starts a transaction in default adordd connection otherwise it starts in the connection of the current work area. 2) ADOROLLBACKTRANS( ...

... fields where the SQL type its without field len definition such as: AUTOINC, MONEY, DOUBLE, INT, SMALLINT, etc. Corrected Bugs: 1) ADOBEGINTRANS( nWA ) : without work are it starts a transaction in default adordd connection otherwise it starts in the connection of the current work area. 2) ADOROLLBACKTRANS( ...

Antonio, i found the equivalent for MSSQL in function ADORECCOUNT(nWA,oRecordSet): IF aAWData[ WA_ENGINE ] = "ACCESS" //.or. aAWData[ WA_ENGINE ] = "MSSQL"//6.08.15 ONLY WITH ACCESSIT TAKES LONGER IN BIG TABLES      ...

... Warning W0001 Ambiguous reference: 'WA_UNIQUE' WA_INDEXUNIQUE adordd.prg(3743) Warning W0002 Ambiguous reference, assuming memvar: 'ARELINFO' nWA Ultima version https://github.com/AHFERREIRA/adordd.git

Lucas,

Comment this in ado_setfilter

* ADO_GOTOID( nWA, nRecNo )

IF oRecordSet:Eof() //does not have this rec in filter lets gotop
ADO_GOTOP(nWa)
ENDIF
*/

Did it work?

Antonio, Yes, I do have HBRECNO and I am using your code. In fact, at ADO_OPEN( nWA, aOpenInfo ), you added : IF EMPTY(aWAData[WA_FIELDRECNO]) //DONT HAVE ANY AUTO INC FIELD USE AS RECNO CREATE .... Well, despite I have HBRECNO, aWAData[WA_FIELDRECNO is giving 0. ...

Antonio, SET SCOPE fix seems to be: STATIC FUNCTION ADOSCOPE(nWA,aWAdata, oRecordSet, aOrderInfo,nIndex) IF LEN(ALLTRIM( cvaltochar(aWAData[ WA_SCOPETOP ][y]) + cvaltochar(aWAData[ WA_SCOPEBOT ][y])) ) > 0 Scopetop and ScopeBot can be a numeric. Fields ...

Antonio, This could be the fix for FUNCTION ADO_PUTVALUE( nWA, nField, xValue ):             //oRecordSet:Fields( nField - 1 ):Value := xValue            //oRecordSet:Update()      ...

... dates are related. Tdatarow does it in a different way, it updates at once all fields. Try to comment out oRecordSet:Update() at ADO_PUTVALUE( nWA, nField, xValue ). For filtering, maybe in tRecSet class there is a method. Remember, once you work with Acess you will be able to work with the ...

... instead Filters will be done within coming weeks. About seek this was left overs from trials please test instead of cSql := IndexBuildExp(nWA,aWAData[WA_INDEXACTIVE],aWAData,.F.,IF(aSeek[3],aseek[1],aSeek[2] )) this: cSql := IndexBuildExp(nWA,aWAData[WA_INDEXACTIVE],aWAData,.F.,aSeek[2] ...

byte-one, Ill change it to IndexExt() and TableExt() Little correction: The right text in STATIC FUNCTION ADO_RELEVAL( nWA, aRelInfo ) is "allowed" Sorry Im not getting it. If you want to test it simply place SET RELATION TO or not if you want try it browse fields from 2 ...