edicion SDIManual

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>
 

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