From f4ca50d8c084d0b05d8656ff116682a9df068141 Mon Sep 17 00:00:00 2001
From: JORGE LUIS CAUDILLO ESPARZA <caudillo_90@hotmail.com>
Date: Fri, 12 Jan 2024 13:23:52 -0700
Subject: [PATCH] edicion SDIManual

---
 RH/Personal.aspx    | 4 ++++
 RH/Personal.aspx.vb | 4 +++-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/RH/Personal.aspx b/RH/Personal.aspx
index 3c9d224d2..bdfafa4e1 100644
--- a/RH/Personal.aspx
+++ b/RH/Personal.aspx
@@ -5754,6 +5754,10 @@
                             <asp:TextBox ID="TxtMImssSalarioDiarioImSS"  CssClass="form-control" runat="server"></asp:TextBox>
                             <asp:Label runat="server" AssociatedControlID="TxtMImssSalarioDiarioImSS">Salario diario(IMSS):</asp:Label>
                         </div>
+                        <div class="form-group form-md-line-input">
+                            <asp:TextBox ID="TxtMImssSDI" Enabled="false" CssClass="form-control" runat="server"></asp:TextBox>
+                            <asp:Label runat="server" Enabled="false" AssociatedControlID="TxtMImssSDI">Salario Diario Integrado(SDI):</asp:Label>
+                        </div>
 
                     </div>
 
diff --git a/RH/Personal.aspx.vb b/RH/Personal.aspx.vb
index a339f499b..20952eeca 100644
--- a/RH/Personal.aspx.vb
+++ b/RH/Personal.aspx.vb
@@ -7045,13 +7045,14 @@ Partial Class RH_Personal
         Using ObjPersonal As ClsRH = New ClsRH()
             ObjPersonal.IniciaTransacSQL()
             If ObjPersonal.UpdateSalarios(CvePersonal, TxtFechamodIMSSSalario.Text.ToDate().ToString("yyyy/MM/dd"), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa,
-                                          TxtSalarioDiario.Text.ToDecimal(), TxtSDI.Text.ToDecimal(), TxtMImssSalarioDiarioImSS.Text.ToDecimal(),
+                                          TxtSalarioDiario.Text.ToDecimal(), TxtMImssSDI.Text.ToDecimal(), TxtMImssSalarioDiarioImSS.Text.ToDecimal(),
                                           -1) Then
 
 
                 ObjPersonal.Commit()
 
                 TxtSalarioCotizado.Text = TxtMImssSalarioDiarioImSS.Text
+                TxtSDI.Text = TxtMImssSDI.Text
                 Dim sdi As Decimal = TxtSDI.Text.ToDecimal()
                 Dim sbc As Decimal = TxtMImssSalarioDiarioImSS.Text.ToDecimal()
                 salarioVariable = If(sbc > sdi, sbc - sdi, 0)
@@ -7067,6 +7068,7 @@ Partial Class RH_Personal
     Protected Sub LnkModsalarioIMSS_Click(sender As Object, e As EventArgs)
         TxtFechamodIMSSSalario.Text = NowADS().ToString("dd/MM/yyyy")
         TxtMImssSalarioDiarioImSS.Text = TxtSalarioCotizado.Text
+        TxtMImssSDI.Text = TxtSDI.Text
         RegistraScript("$('#DmodamodificarsalarioIMSS').modal()")
         UpModSalarioIMSS.Update()
     End Sub