From 4f94bafe91464859ec0206db723f91b378516e3e Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Thu, 5 Mar 2009 15:16:26 +0000
Subject: [PATCH] Quitadas las llamadas a 'ShowCapado'

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@922 0c75b7a4-871f-7646-8a2f-f78d34cc349f
---
 .../Albaranes de cliente/Views/uEditorAlbaranesCliente.pas    | 4 ----
 .../Facturas de proveedor/Views/uEditorFacturaProveedor.pas   | 2 --
 .../Pedidos a proveedor/Views/uEditorPedidosProveedor.pas     | 1 -
 .../Recibos de proveedor/Views/uEditorReciboProveedor.pas     | 2 --
 4 files changed, 9 deletions(-)

diff --git a/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesCliente.pas b/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesCliente.pas
index b88ac94e..970f44b6 100644
--- a/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesCliente.pas	
+++ b/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesCliente.pas	
@@ -106,7 +106,6 @@ uses
 }
 procedure TfEditorAlbaranesCliente.actCancelarEnvioExecute(Sender: TObject);
 begin
-AppFactuGES.ShowCapado;
 {
   inherited;
 
@@ -134,7 +133,6 @@ end;
 
 procedure TfEditorAlbaranesCliente.actConfirmarRecepcionExecute(Sender: TObject);
 begin
-AppFactuGES.ShowCapado;
 {
   inherited;
 
@@ -168,7 +166,6 @@ end;
 
 procedure TfEditorAlbaranesCliente.actGenerarEtiquetasExecute(Sender: TObject);
 begin
-AppFactuGES.ShowCapado;
 {
   inherited;
   //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;
 //  AAlbaran : IBizAlbaranCliente;
 begin
-AppFactuGES.ShowCapado;
 {
   inherited;
   bCambiarEstado := False;
diff --git a/Source/Modulos/Facturas de proveedor/Views/uEditorFacturaProveedor.pas b/Source/Modulos/Facturas de proveedor/Views/uEditorFacturaProveedor.pas
index 80b43b29..05980730 100644
--- a/Source/Modulos/Facturas de proveedor/Views/uEditorFacturaProveedor.pas	
+++ b/Source/Modulos/Facturas de proveedor/Views/uEditorFacturaProveedor.pas	
@@ -274,7 +274,6 @@ end;
 
 procedure TfEditorFacturaProveedor.ImprimirInterno;
 begin
-AppFactuGES.ShowCapado;
 {
   inherited;
   FController.Print(FFactura);
@@ -352,7 +351,6 @@ end;
 
 procedure TfEditorFacturaProveedor.PrevisualizarInterno;
 begin
-AppFactuGES.ShowCapado;
 {
   inherited;
   FController.Preview(FFactura);
diff --git a/Source/Modulos/Pedidos a proveedor/Views/uEditorPedidosProveedor.pas b/Source/Modulos/Pedidos a proveedor/Views/uEditorPedidosProveedor.pas
index 21a1bd34..e63e5310 100644
--- a/Source/Modulos/Pedidos a proveedor/Views/uEditorPedidosProveedor.pas	
+++ b/Source/Modulos/Pedidos a proveedor/Views/uEditorPedidosProveedor.pas	
@@ -90,7 +90,6 @@ uses
 }
 procedure TfEditorPedidosProveedor.actCambiarSituacionExecute(Sender: TObject);
 begin
-AppFactuGES.ShowCapado;
 {
   inherited;
   FController.CambiarSituacion(FPedidos)
diff --git a/Source/Modulos/Recibos de proveedor/Views/uEditorReciboProveedor.pas b/Source/Modulos/Recibos de proveedor/Views/uEditorReciboProveedor.pas
index 8d5de3d8..3d83454c 100644
--- a/Source/Modulos/Recibos de proveedor/Views/uEditorReciboProveedor.pas	
+++ b/Source/Modulos/Recibos de proveedor/Views/uEditorReciboProveedor.pas	
@@ -246,7 +246,6 @@ end;
 
 procedure TfEditorReciboProveedor.ImprimirInterno;
 begin
-AppFactuGES.ShowCapado;
 {
   inherited;
   FController.Print(FRecibo);
@@ -288,7 +287,6 @@ end;
 
 procedure TfEditorReciboProveedor.PrevisualizarInterno;
 begin
-AppFactuGES.ShowCapado;
 {
   inherited;
   FController.Preview(FRecibo);