Presupuestos de cliente: permitir modificaciones aunque el presupuesto esté aceptado.

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@275 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2008-02-18 14:42:55 +00:00
parent e81b75fdea
commit 313af74b47

View File

@ -522,7 +522,10 @@ begin
if not Assigned(APresupuesto) then
raise Exception.Create ('Presupuesto no asignado: EsModificable');
Result := (APresupuesto.SITUACION = SITUACION_PRESUPUESTO_PENDIENTE);
//Result := (APresupuesto.SITUACION = SITUACION_PRESUPUESTO_PENDIENTE);
// En Tecsitel, todos los presupuestos son modificables independientemente
// de su situación.
Result := True;
end;
procedure TPresupuestosClienteController.RecalcularImportes(