Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Quitadas las llamadas a 'ShowCapado'

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@922 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2009-03-05 15:16:26 +00:00
parent 28cc4ff877
commit 4f94bafe91
4 changed files with 0 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesCliente.pas
View File

@ -106,7 +106,6 @@ uses
} }
procedure TfEditorAlbaranesCliente.actCancelarEnvioExecute(Sender: TObject); procedure TfEditorAlbaranesCliente.actCancelarEnvioExecute(Sender: TObject);
begin begin
AppFactuGES.ShowCapado;
{ {
inherited; inherited;
@ -134,7 +133,6 @@ end;
procedure TfEditorAlbaranesCliente.actConfirmarRecepcionExecute(Sender: TObject); procedure TfEditorAlbaranesCliente.actConfirmarRecepcionExecute(Sender: TObject);
begin begin
AppFactuGES.ShowCapado;
{ {
inherited; inherited;
@ -168,7 +166,6 @@ end;
procedure TfEditorAlbaranesCliente.actGenerarEtiquetasExecute(Sender: TObject); procedure TfEditorAlbaranesCliente.actGenerarEtiquetasExecute(Sender: TObject);
begin begin
AppFactuGES.ShowCapado;
{ {
inherited; inherited;
//Miramos si viene de un pedido previo, si no es asi le preguntamos si desea imprimir la referencia del cliente //Miramos si viene de un pedido previo, si no es asi le preguntamos si desea imprimir la referencia del cliente
@ -231,7 +228,6 @@ procedure TfEditorAlbaranesCliente.actEnviarExecute(Sender: TObject);
// AFacturasController : IFacturasClienteController; // AFacturasController : IFacturasClienteController;
// AAlbaran : IBizAlbaranCliente; // AAlbaran : IBizAlbaranCliente;
begin begin
AppFactuGES.ShowCapado;
{ {
inherited; inherited;
bCambiarEstado := False; bCambiarEstado := False;

2
Source/Modulos/Facturas de proveedor/Views/uEditorFacturaProveedor.pas
View File

@ -274,7 +274,6 @@ end;
procedure TfEditorFacturaProveedor.ImprimirInterno; procedure TfEditorFacturaProveedor.ImprimirInterno;
begin begin
AppFactuGES.ShowCapado;
{ {
inherited; inherited;
FController.Print(FFactura); FController.Print(FFactura);
@ -352,7 +351,6 @@ end;
procedure TfEditorFacturaProveedor.PrevisualizarInterno; procedure TfEditorFacturaProveedor.PrevisualizarInterno;
begin begin
AppFactuGES.ShowCapado;
{ {
inherited; inherited;
FController.Preview(FFactura); FController.Preview(FFactura);

1
Source/Modulos/Pedidos a proveedor/Views/uEditorPedidosProveedor.pas
View File

@ -90,7 +90,6 @@ uses
} }
procedure TfEditorPedidosProveedor.actCambiarSituacionExecute(Sender: TObject); procedure TfEditorPedidosProveedor.actCambiarSituacionExecute(Sender: TObject);
begin begin
AppFactuGES.ShowCapado;
{ {
inherited; inherited;
FController.CambiarSituacion(FPedidos) FController.CambiarSituacion(FPedidos)

2
Source/Modulos/Recibos de proveedor/Views/uEditorReciboProveedor.pas
View File

@ -246,7 +246,6 @@ end;
procedure TfEditorReciboProveedor.ImprimirInterno; procedure TfEditorReciboProveedor.ImprimirInterno;
begin begin
AppFactuGES.ShowCapado;
{ {
inherited; inherited;
FController.Print(FRecibo); FController.Print(FRecibo);
@ -288,7 +287,6 @@ end;
procedure TfEditorReciboProveedor.PrevisualizarInterno; procedure TfEditorReciboProveedor.PrevisualizarInterno;
begin begin
AppFactuGES.ShowCapado;
{ {
inherited; inherited;
FController.Preview(FRecibo); FController.Preview(FRecibo);