Merge branch 'master' of http://192.168.10.111:8383/SIG

2021-12-17 22:16:54 -07:00
parent 6b27c6a34d 623095bd9b
commit da86bac203
26 changed files with 3060 additions and 448 deletions
--- a/Bancos/RepProgramarRecursos.aspx.vb
+++ b/Bancos/RepProgramarRecursos.aspx.vb
@@ -654,7 +654,7 @@ Partial Class Bancos_RepProgramarRecursos
        ObjUsuarios.Dispose()
    End Sub
    Private Sub EnviaCorreoNotificacion()
-        If UsuarioActual.CveEmpresa = 13 Then
+        If UsuarioActual.CveEmpresa.Contiene(13, 83) Then

            Dim strBody As New StringBuilder
            Try