-- mejora en registro de genero en rh_personal
This commit is contained in:
@@ -3509,7 +3509,7 @@ Partial Class General_SaldosIniciales
|
|||||||
Dim CveSATRiesgoPuesto As Integer = 1
|
Dim CveSATRiesgoPuesto As Integer = 1
|
||||||
Dim CveJornada As Integer = 1
|
Dim CveJornada As Integer = 1
|
||||||
|
|
||||||
If Sexo.ToUpper.Contains("Masculino") Then CveGenero = 1 Else CveGenero = 2
|
If Sexo.ToUpper.Contiene("Masculino", "1: Masculino") Then CveGenero = 1 Else CveGenero = 2
|
||||||
If AltaIMSS.ToUpper.Contiene("SI", "1") Then AltaIMSS = "True" Else AltaIMSS = "False"
|
If AltaIMSS.ToUpper.Contiene("SI", "1") Then AltaIMSS = "True" Else AltaIMSS = "False"
|
||||||
myarraystr = EstadoCivil.Split(":"c)
|
myarraystr = EstadoCivil.Split(":"c)
|
||||||
If (myarraystr.Length > 1) Then
|
If (myarraystr.Length > 1) Then
|
||||||
|
|||||||
Reference in New Issue
Block a user