Acana_Interiorismo/FactuGES2
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Se cambia la función CancelarCambios para que cuando se hace un cancelUpdates de la tabla maestra se fuerza a hacerlo con todas sus tablas hijas (Esto arragla el fallo que te pregunta si deseas guardar los cambios cuando cambias de lista de facturas a recibos por ejemplo)

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@223 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
roberto 2008-05-23 14:46:10 +00:00
parent a16ebef7f1
commit 0dc9c85d53
2 changed files with 24 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
Source/GUIBase/GUIBase.dproj
View File

@ -57,23 +57,23 @@
<DelphiCompile Include="GUIBase.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\dxBarD11.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\dxBarExtItemsD11.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\dxLayoutControlD11.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\dxPScxCommonD11.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\dxPScxGrid6LnkD11.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\dxPsPrVwAdvD11.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\frx11.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\frxe11.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\fs11.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\JvAppFrmD11R.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\JvCtrlsD11R.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\JvGlobusD11R.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
<DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\Base.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\dbrtl.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\dxBarD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\dxBarExtItemsD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\dxLayoutControlD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\dxPScxCommonD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\dxPScxGrid6LnkD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\dxPsPrVwAdvD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\frx11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\frxe11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\fs11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\JvAppFrmD11R.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\JvGlobusD11R.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\rtl.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\vcl.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Views\vcldb.dcp" />
<DCCReference Include="uDialogBase.pas">
<Form>fDialogBase</Form>
</DCCReference>

7
Source/GUIBase/uEditorDBBase.pas
View File

@ -115,6 +115,13 @@ begin
dsDataTable.DataTable.CancelUpdates;
//No funciona bien al CancelUpdates para las tablas detalle de esta forma le obligamos
dtDetails := dsDataTable.DataTable.GetDetailDataTables;
for i := 0 to dtDetails.Count - 1 do
begin
(TDADataTable(dtDetails.Items[i])).CancelUpdates;
end;
{ Comprobar si el bookmark no es válido cuando estamos cancelando la
inserción de una fila nueva.
CUIDADO!! Si no es válido salta una excepción. NO devuelve false!!!}