From 8813429e3d75b4bc0b1699942b87f77256f78b03 Mon Sep 17 00:00:00 2001 From: rrene Date: Thu, 1 Aug 2024 11:07:29 -0700 Subject: [PATCH] globaldtsubp --- Inventarios/TrasladoSolicitudOld.aspx.vb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Inventarios/TrasladoSolicitudOld.aspx.vb b/Inventarios/TrasladoSolicitudOld.aspx.vb index f3870501b..6c0e39898 100644 --- a/Inventarios/TrasladoSolicitudOld.aspx.vb +++ b/Inventarios/TrasladoSolicitudOld.aspx.vb @@ -1153,7 +1153,7 @@ Partial Class Inventarios_TrasladoSolicitudOld Dim SB As New StringBuilder - Dim CorreoDestino As String = GlobalDTUsuarios(CveUsuarioSolicita)(0)("Correo").ToString.Trim + Dim CorreoDestino As String = GlobalDTUsuarios(CveUsuarioSolicita, UsuarioActual.CveEmpresa)(0)("Correo").ToString.Trim If CorreoDestino.Length > 0 Then @@ -1193,7 +1193,7 @@ Partial Class Inventarios_TrasladoSolicitudOld Dim SB As New StringBuilder - Dim CorreoDestino As String = GlobalDTUsuarios(CveUsuarioAutoriza)(0)("Correo").ToString.Trim + Dim CorreoDestino As String = GlobalDTUsuarios(CveUsuarioAutoriza, UsuarioActual.CveEmpresa)(0)("Correo").ToString.Trim If CorreoDestino.Length > 0 Then