Corregido bloque try..finally mal establecido.
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@289 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
parent
f6919eb9d1
commit
370a98ca01
@ -89,8 +89,8 @@ function TsrvEjercicios.GenerarPGC(const ID_EJERCICIO_COPIA, ID_EJERCICIO: Integ
|
|||||||
begin
|
begin
|
||||||
Result := False;
|
Result := False;
|
||||||
|
|
||||||
|
Connection.BeginTransaction;
|
||||||
try
|
try
|
||||||
Connection.BeginTransaction;
|
|
||||||
schEjercicios.NewCommand(Connection, 'GenerarPGC', ['ID_EJERCICIO_COPIA', 'ID_EJERCICIO'], [ID_EJERCICIO_COPIA, ID_EJERCICIO]);
|
schEjercicios.NewCommand(Connection, 'GenerarPGC', ['ID_EJERCICIO_COPIA', 'ID_EJERCICIO'], [ID_EJERCICIO_COPIA, ID_EJERCICIO]);
|
||||||
Connection.CommitTransaction;
|
Connection.CommitTransaction;
|
||||||
Result := True;
|
Result := True;
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user