This commit is contained in:
@@ -876,7 +876,7 @@ Partial Class RH_Personal
|
||||
divBitacora.Visible = True
|
||||
CargaGvBitacora()
|
||||
Else
|
||||
|
||||
LoadDefaultValues()
|
||||
'Configuración de Modalidad Insert
|
||||
|
||||
ImgAddObs.Visible = False
|
||||
@@ -935,6 +935,20 @@ Partial Class RH_Personal
|
||||
AgregarEventosAsincronosGvVacaciones()
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub LoadDefaultValues()
|
||||
DdlDepartamento.SelectedIndex = 1
|
||||
DdlRegimenContratacion.SelectedValueExist(1)
|
||||
DdlMetodoPago.SelectedValueExist(1)
|
||||
DdlTipoPeriodo.SelectedValueExist(1)
|
||||
DdlTipoContrato.SelectedValueExist(2)
|
||||
DdlJornada.SelectedValueExist(6)
|
||||
DdlPuesto.SelectedIndex = 1
|
||||
DdlTurno.SelectedIndex = 1
|
||||
DdlEstatusPersonal.SelectedValue = "1"
|
||||
DdlRiesgoPuesto.SelectedIndex = 1
|
||||
End Sub
|
||||
Private Sub CargaCuentasContables()
|
||||
Dim ObjContabilidad As New ClsContPAQi(UsuarioActual.Empresa)
|
||||
If ObjContabilidad.GetCuentas(-1, "-1", -1) Then
|
||||
|
||||
Reference in New Issue
Block a user