migracion de base de datos dbExpress a ADO

[scooterjgm]

Muchas gracias, me ha kedado mas claro. ANtes me ekivoke como bien te has dado cuenta. me referia al ADOQuery.

Muchas gracias por todo. Espero q con esto me baste, pero una ultima pregunta...

para q sirve el transactionDesc en el dbExpress?? veo q en ADO no se usa, puedo prescindir de ello??

[guillotmarc]

Hola.

Sirve para poder tener varias transacciones simultaneamente, y poder acceder a cada una de ellas de forma independiente.

En cambio en ADO (no existe ningún tipo de TransactionDesc), si no recuerdo mal, al abrir más de una transacción, quedan anidadas, y solo podrás confirmarlas/cancelarlas en orden inverso al de su creación.

Saludos.

[scooterjgm]

tengo estas instrucciones para saber si hay una transaccion activa o no en FireBird... como seria en ADO??

if not SQLConnection.InTransaction then
begin
TransactionDesc.TransactionID := 1;
TransactionDesc.IsolationLevel := xilReadCommitted;
TransactionDesc.TransactionID :=TransactionDesc.TransactionID;
SQLConnection.StartTransaction(TransactionDesc);
end;

el equivalente en ado seria el siguiente??


if not SQLConnection.InTransaction then
begin
ADOConnection.IsolationLevel := xilReadCommitted;
ADOConnection.BeginTrans;
end;


prescinsiendo del TransactionDesc........¿?¿?¿?

una cosa mas... es lo mismo esto??

SQLClientDataSet.ApplyUpdates(1);---->ADODataSet.UpdateRecord;

SQLClientDataSet.ExecuteDirect(sql);--->ADODataSet.Execute(sql);

Integer(ADOConnection.ExecuteDirect(string) = 0);----->?????????????

Muchas gracias

[scooterjgm]

nadie puede ayudarme??

[guillotmarc]

¿ Ayudarte en que ?. En este momento tienes que hacer pruebas, y utilizar un poco la ayuda de Delphi.

Estas buscando equivalencias de código que no existen.

Empezado por scooterjgm

if not SQLConnection.InTransaction then
begin
TransactionDesc.TransactionID := 1;
TransactionDesc.IsolationLevel := xilReadCommitted;
TransactionDesc.TransactionID :=TransactionDesc.TransactionID;
SQLConnection.StartTransaction(TransactionDesc);
end;

el equivalente en ado seria el siguiente??


if not SQLConnection.InTransaction then
begin
ADOConnection.IsolationLevel := xilReadCommitted;
ADOConnection.BeginTrans;
end;

No. Se parece pero no es lo mismo. Simplemente no puedes obtener lo mismo. En el primer caso obtienes una transacción a la que puedes acceder posteriermente mediante su correspondiente TransactionDesc. En cambio en ADO no existe ningún TransactionDesc por lo que posteriormente solo podrás acceder a las transacciones (para anularlas o finalizarlas), de forma anidada.

Por lo tanto no es lo mismo, ni hay forma de obtener lo mismo. Aunque esto ya te lo dije hace unos dias

Empezado por scooterjgm

SQLClientDataSet.ApplyUpdates(1);---->ADODataSet.UpdateRecord;

No, una simple consulta a la ayuda de Delphi te lo confirmaría. Lo que más se parece al ApplyUpdates, es el UpdateBatch. Aunque para eso tienes que trabajar en ADO en modo de BatchUpdates (modificaciones en Caché), lo cual no es habitual. En ADO, usualmente los cambios se pasan a la base de datos, directamente en el Post, sin esperar a ningún ApplyUpdates, o por el estilo.

De nuevo la forma de trabajar en ADO y dbExpress es muy distinta, y no vas a encontrar equivalentes.

Empezado por scooterjgm

SQLClientDataSet.ExecuteDirect(sql);--->ADODataSet.Execute(sql);

Consultando la ayuda de Delphi o con una sencilla prueba (en 2 minutos la tienes hecha) verias que no. Lo que mas se parece es el Execute sobre el ADOConnection.

Empezado por scooterjgm

Integer(ADOConnection.ExecuteDirect(string) = 0);

¿ Esto funciona ?. ¿ Para que quieres pasar de booleano a entero ?. En todo caso esta pregunta no me parece que valga la pena ni responderla. Ya está respondida en la pregunta anterior. Los códigos de retorno para saber si la ejecución ha tenido éxito, deberias mirarlos en la ayuda de Delphi, no te va a morder.

Saludos.

[scooterjgm]

Perdona mi ignorancia.