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