Paquete egresos

2021-05-10 09:54:33 -07:00
parent b0ccf6b9bd
commit 0421291be3
3 changed files with 337 additions and 1 deletions
--- a/Contabilidad/RegPrePoliza.aspx.vb
+++ b/Contabilidad/RegPrePoliza.aspx.vb
@@ -1905,6 +1905,9 @@ Partial Class ContabilidadC_RegPrePoliza
            If UsuarioActual.CveEmpresa = 119 Then
                params.Add(New ReportParameter("UsuarioRegistro", GlobalDTUsuarios(dr("CveUsuario").ToString.ToEntero).FiltroPrimeroValor("Nombre")))
            End If
+            If UsuarioActual.CveEmpresa = 140 Then
+                params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
+            End If
            If Archivo.Exists Then
                ruta = UsuarioActual.Empresa.Ruta & "Formatos/Polizas.rdlc"
            Else