diff --git a/Inventarios/ResguardoMaterial.aspx.vb b/Inventarios/ResguardoMaterial.aspx.vb
index e3cfa6f5d..460a99f76 100644
--- a/Inventarios/ResguardoMaterial.aspx.vb
+++ b/Inventarios/ResguardoMaterial.aspx.vb
@@ -127,6 +127,7 @@ Partial Class Inventarios_ResguardoMaterial
Try
Dim CvePersonal As Integer = Request.QueryString("CvePersonal").ToString.ToEntero
OcultarControles(CvePersonal)
+ TxtFecha.Enabled = False
Catch ex As Exception
End Try
@@ -140,7 +141,8 @@ Partial Class Inventarios_ResguardoMaterial
Private Sub OcultarControles(CvePersonal As Integer)
- DdlPersonal.ddl.SelectedValueExist(CvePersonal)
+ DdlPersonal.SelectedValue = CvePersonal.ToString()
+ DdlPersonal.SelectedText = GlobalDTRHPersonal(UsuarioActual.CveEmpresa, CvePersonal).FiltroPrimeroValor("NombreCompleto")
DdlPersonal.Enabled = False
DVTipo.Visible = False
End Sub
@@ -931,10 +933,11 @@ Partial Class Inventarios_ResguardoMaterial
If Not TieneError Then
Dim Msg As New StringBuilder
If Concepto = 23 Then
- Msg.AppendFormat("
Resguardo con Folio: {1}", CveMovimientoSalida, FolioSalida)
+ 'FolioEntrada
+ Msg.AppendFormat("
Resguardo con Folio: {1}", CveMovimientoSalida, FolioEntrada)
Msg.AppendFormat("
Imprimir Resguardo ", Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimientoSalida)))
- Msg.AppendFormat("
El Movimiento de control se registro con el Folio: {1}", CveMovimientoEntrada, FolioEntrada)
+ Msg.AppendFormat("
El Movimiento de control se registro con el Folio: {1}", CveMovimientoEntrada, FolioSalida)
Else
Msg.AppendFormat("
Liberación de Resguardo con Folio: {1}", CveMovimientoEntrada, FolioEntrada)
Msg.AppendFormat("
Imprimir liberación de Resguardo ", Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimientoEntrada)))