diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index e94b3853b..9fafa1375 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -416,7 +416,7 @@ Partial Class Bancos_DepositosCaja
Next
Dim StrEncript As String = Encripta($"OP=DC&CveIE={CveIEOrigen}&CuentaCaja={DdlCajaChica.SelectedItem.Text}&CuentaDepo={DdlCuentaDeposito.SelectedItem.Text}")
- documentos += String.Format("Imprimir {1}
", StrEncript, "Depósito Bancario")
+ documentos += String.Format("Imprimir {1}
", StrEncript, "Depósito Bancario")
@@ -430,7 +430,11 @@ Partial Class Bancos_DepositosCaja
End If
If Not OcurrioError Then
- documentos += String.Format("Prepóliza
", NuevaCvePrePoliza)
+ documentos += String.Format("Prepóliza
", NuevaCvePrePoliza)
+ If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
+ Dim ParametrosPrePoliza As String = Encripta($"OP=PREPO&CvePrePoliza={NuevaCvePrePoliza}")
+ documentos += String.Format("Imprimir {1}
", ParametrosPrePoliza, "PrePoliza")
+ End If
End If
Catch ex As Exception