Ficha de presupuesto de cliente: faltaba asignar ID_CLIENTE al presupuesto cuando se empezaba nuevo.
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@803 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
parent
1906a07336
commit
bcbfe41c5c
@ -284,8 +284,12 @@ end;
|
||||
procedure TfEditorPresupuestoCliente.OnClienteChanged(Sender: TObject);
|
||||
begin
|
||||
if Assigned(FPresupuesto) then
|
||||
begin
|
||||
FPresupuesto.Cliente := ViewPresupuesto.ViewClientePresupuesto.Cliente;
|
||||
|
||||
if (FPresupuesto.Detalles.RecordCount > 0) then
|
||||
FController.DetallesController.ActualizarDetalles(FPresupuesto.Detalles, FPresupuesto.Cliente);
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TfEditorPresupuestoCliente.pgPaginasChanging(Sender: TObject;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user