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 @@ Salario diario(IMSS): +
+ + Salario Diario Integrado(SDI): +
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