edicion SDIManual

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