diff --git a/Source/Modulos/Albaranes de cliente/Controller/uAlbaranesClienteController.pas b/Source/Modulos/Albaranes de cliente/Controller/uAlbaranesClienteController.pas
index c4ad12c3..845b8c23 100644
--- a/Source/Modulos/Albaranes de cliente/Controller/uAlbaranesClienteController.pas	
+++ b/Source/Modulos/Albaranes de cliente/Controller/uAlbaranesClienteController.pas	
@@ -422,6 +422,7 @@ begin
       USUARIO := AppFactuGES.UsuarioActivo.UserName;
       FECHA_ALBARAN := DateOf(Now);
       INCIDENCIAS_ACTIVAS := 0;
+      SITUACION := SITUACION_ALBARAN_PENDIENTE;
 //      INCIDENCIAS := Nil;
       REFERENCIA := '';
       FECHA_PREVISTA_ENVIO := 0;
diff --git a/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesCliente.pas b/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesCliente.pas
index 00c52161..e628911c 100644
--- a/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesCliente.pas	
+++ b/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesCliente.pas	
@@ -281,8 +281,6 @@ procedure TfEditorAlbaranesCliente.DuplicarInterno;
 var
   APedido : IBizAlbaranCliente;
 begin
-AppFactuGES.ShowCapado;
-{
   inherited;
   APedido := FController.Duplicar(Albaranes);
   try
@@ -290,7 +288,6 @@ AppFactuGES.ShowCapado;
   finally
     actRefrescar.Execute;
   end;
-}  
 end;
 
 procedure TfEditorAlbaranesCliente.EliminarInterno;