This commit is contained in:
2023-11-16 17:09:18 -07:00
parent 68c436d4c7
commit b0ff94bf73

View File

@@ -6958,7 +6958,7 @@ Partial Class RH_Personal
Dim primav As Decimal = TxtFIPrimaVacacional.Text.ToDecimal()
Dim DiasVacaciones As Decimal = TxtFIDiasVacaciones.Text.ToDecimal()
Dim diasaguinaldo As Decimal = TxtFIAguinaldo.Text.ToDecimal()
Dim FI As Decimal = (365 + diasaguinaldo + (DiasVacaciones * (primav / 100))) / 365
Dim FI As Decimal = (365D + diasaguinaldo + (DiasVacaciones * (primav / 100D))) / 365D
Dim SDI As Decimal = (SD * FI)
TxtFactordeIntegracion.Text = FI.ToString()
TxtFISalarioDiarioIntegrado.Text = String.Format("{0:###0.########}", SDI)
@@ -6966,7 +6966,7 @@ Partial Class RH_Personal
End Sub
Protected Sub LnkCalcularFactordeintegracion_Click(sender As Object, e As EventArgs)
calcularSDI()
Alert(String.Format(" salario diario integreado {0}", TxtFISalarioDiarioIntegrado.Text))
Alert(String.Format(" salario diario integrado {0}", TxtFISalarioDiarioIntegrado.Text))
End Sub
Protected Sub LnkCalcularFactordeintegracionyguardar_Click(sender As Object, e As EventArgs)
calcularSDI()