Merge branch 'master' of http://192.168.10.111:8383/SIG
This commit is contained in:
@@ -7906,7 +7906,7 @@ Public Class ClsPaginas
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, Pago.ImportePago, Pago.ImportePago, 3, Pago.Referencia, Concepto, CveVenta:=VentaActual.CveVenta, CveCliente:=VentaActual.CveCliente, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, TipoCambioPago:=Pago.TCPago) Then ErrorMovtos = True
|
||||
End If
|
||||
|
||||
If Not ErrorMovtos AndAlso Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, Pago.ImportePago, Pago.ImportePago, 95, VentaActual.SerieFolio, VentaActual.SerieFolio, CveIE:=Pago.CveIE, CveVenta:=VentaActual.CveVenta, CveSubProyecto:=VentaActual.CveSubProyecto, CveCliente:=VentaActual.CveCliente, TipoCambio:=TCValuacionVenta, TipoCambioPago:=Pago.TCPago, PorcentajeImpuesto:=VentaActual.PorcentajeIVA, Contabilizable:=False) Then
|
||||
If Not ErrorMovtos AndAlso Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, Pago.ImportePago, (Pago.ImportePago * TCValuacionPago).RoundSQL, 95, VentaActual.SerieFolio, VentaActual.SerieFolio, CveIE:=Pago.CveIE, CveVenta:=VentaActual.CveVenta, CveSubProyecto:=VentaActual.CveSubProyecto, CveCliente:=VentaActual.CveCliente, TipoCambio:=TCValuacionVenta, TipoCambioPago:=Pago.TCPago, PorcentajeImpuesto:=VentaActual.PorcentajeIVA, Contabilizable:=False) Then
|
||||
ErrorMovtos = True
|
||||
End If
|
||||
End If
|
||||
|
||||
@@ -1568,6 +1568,8 @@ Public Class ClsRH
|
||||
DtResultados = Data
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public Property TipoSangre As String
|
||||
#End Region
|
||||
|
||||
#Region "Personal"
|
||||
@@ -1719,6 +1721,7 @@ Public Class ClsRH
|
||||
Me.CelularPersonal = Data.Rows(0)("CelularPersonal").ToString
|
||||
Me.TelefonoMarcadoRapido = Data.Rows(0)("TelefonoMarcadoRapido").ToString
|
||||
Me.ContactoAlterno = Data.Rows(0)("ContactoAlterno").ToString
|
||||
Me.TipoSangre = Data.Rows(0)("TipoSangre").ToString
|
||||
|
||||
If Not IsDBNull(Data(0)("CveSubProyectoZona")) Then
|
||||
CveSubproyectoZona = Data(0)("CveSubProyectoZona").ToString.ToEntero
|
||||
@@ -1939,7 +1942,7 @@ Public Class ClsRH
|
||||
NombrePadre As String, NombreMadre As String, CveSATBanco As Integer, CveSATRiesgoPuesto As Integer, CveSATRegimenContratacion As Integer, CveClienteAsignado As Integer, CveSubProyecto As Integer, URL As String, CveSupervisor As Integer, CLABE As String, BancoNumCuenta As String,
|
||||
CveJornada As Integer, CveUsuario As Integer, CveEmpresa As Integer, CveUsuarioNomina As Integer, Beneficiario As String, Optional CveSubProyectoZona As Integer = Nothing, Optional CveUniforme As Integer = -1,
|
||||
Optional TelefonoExtension As String = "-1", Optional CelularPersonal As String = "-1", Optional TelefonoMarcadoRapido As String = "-1", Optional ContactoAlterno As String = "-1", Optional CveTipodeSalario As Integer = 1, Optional Sindicalizado As Boolean = False, Optional CvePais As Integer = -1,
|
||||
Optional Pensionado As Boolean = False, Optional CveMedioTransporte As Integer = -1, Optional CveRegistroPatronal As Integer = -1, Optional CveEmpresaAsignado As Integer = -1, Optional CveTipoTrabajador As Integer = -1, Optional NetoPeriodo As Decimal = -1) As Boolean
|
||||
Optional Pensionado As Boolean = False, Optional CveMedioTransporte As Integer = -1, Optional CveRegistroPatronal As Integer = -1, Optional CveEmpresaAsignado As Integer = -1, Optional CveTipoTrabajador As Integer = -1, Optional NetoPeriodo As Decimal = -1, Optional TipoSangre As String = "-1") As Boolean
|
||||
|
||||
Dim Retorno As Boolean = False
|
||||
Dim noguardoXcurp As Boolean = False
|
||||
@@ -2027,6 +2030,9 @@ Public Class ClsRH
|
||||
.Add("@CveEmpresaAsignado", SqlDbType.Int).Value = CveEmpresaAsignado
|
||||
.Add("@CveTipoTrabajador", SqlDbType.Int).Value = CveTipoTrabajador
|
||||
.Add("@NetoPeriodo", SqlDbType.Money).Value = NetoPeriodo
|
||||
.Add("@TipoSangre", SqlDbType.VarChar).Value = TipoSangre
|
||||
|
||||
|
||||
|
||||
.Add("@RETURN_VALUE", SqlDbType.Int).Direction = ParameterDirection.ReturnValue
|
||||
|
||||
@@ -2066,7 +2072,8 @@ Public Class ClsRH
|
||||
CveJornada As Integer, CveEmpresa As Integer, CveUsuarioNomina As Integer, Beneficiario As String, Optional CveSubProyectoZona As Integer = Nothing, Optional CveUniforme As Integer = -1,
|
||||
Optional TelefonoExtension As String = "-1", Optional CelularPersonal As String = "-1", Optional TelefonoMarcadoRapido As String = "-1", Optional ContactoAlterno As String = "-1", Optional CveUsuarioModifico As Integer = -1,
|
||||
Optional FechaActivo As Date = MinFecha, Optional FechaReingreso As Date = MinFecha, Optional CveTipodeSalario As Integer = 1, Optional Sindicalizado As Integer = -1, Optional CvePais As Integer = -1, Optional Pensionado As Boolean = False, Optional CveRegistroPatronal As Integer = -1,
|
||||
Optional CveEmpresaAsignado As Integer = -1, Optional CveMedioTransporte As Integer = -1, Optional EsReserva As Integer = -1, Optional Fiscalizable As Integer = -1, Optional CveTipoTrabajador As Integer = -1, Optional NetoPeriodo As Decimal = -1) As Boolean
|
||||
Optional CveEmpresaAsignado As Integer = -1, Optional CveMedioTransporte As Integer = -1, Optional EsReserva As Integer = -1, Optional Fiscalizable As Integer = -1, Optional CveTipoTrabajador As Integer = -1, Optional NetoPeriodo As Decimal = -1,
|
||||
Optional TipoSangre As String = "-1") As Boolean
|
||||
|
||||
Dim Retorno As Boolean = False
|
||||
|
||||
@@ -2160,6 +2167,7 @@ Public Class ClsRH
|
||||
.Add("@Fiscalizable", SqlDbType.Int).Value = Fiscalizable
|
||||
.Add("@CveTipoTrabajador", SqlDbType.Int).Value = CveTipoTrabajador
|
||||
.Add("@NetoPeriodo", SqlDbType.Money).Value = NetoPeriodo
|
||||
.Add("@TipoSangre", SqlDbType.VarChar).Value = TipoSangre
|
||||
|
||||
End With
|
||||
|
||||
|
||||
@@ -42,9 +42,24 @@
|
||||
<div class="row">
|
||||
<div class="col-md-2">Pedimento:</div>
|
||||
<div class="col-md-10">
|
||||
<asp:TextBox ID="TxtPedimento" CssClass="form-control" runat="server" MaxLength="50" Width="300px"></asp:TextBox>
|
||||
<asp:TextBox ID="TxtPedimento" CssClass="form-control" runat="server" MaxLength="18" Width="300px" ClientIDMode="Static" ></asp:TextBox>
|
||||
<ajaxToolkit:MaskedEditExtender ID="meeTxtPedimento" runat="server"
|
||||
ClearMaskOnLostFocus="false"
|
||||
TargetControlID="TxtPedimento"
|
||||
Mask="99-99-9999-9999999"
|
||||
MaskType="Number"
|
||||
InputDirection="LeftToRight"
|
||||
AcceptNegative="None"
|
||||
ErrorTooltipEnabled="True" />
|
||||
<asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server" ControlToValidate="TxtDescripcion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripcion''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco" TargetControlID="RFVDescripcion" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||
|
||||
<asp:RegularExpressionValidator ID="regexTxtPedimento" runat="server" ControlToValidate="TxtPedimento" Display="None" ValidationGroup="GrpGuardar" ErrorMessage="Formato no valido, el formato correcto es 99-99-9999-9999999" ForeColor="Red"
|
||||
ValidationExpression="^[0-9 ]{2}-[0-9 ]{2}-[0-9 ]{4}-[0-9 ]{7}$" ></asp:RegularExpressionValidator>
|
||||
|
||||
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender2" runat="server" HighlightCssClass="vco" TargetControlID="regexTxtPedimento" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||
|
||||
|
||||
</div>
|
||||
</div>
|
||||
<div class="row">
|
||||
@@ -71,9 +86,10 @@
|
||||
</div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<div class="col-md-2">Aduanal</div>
|
||||
<div class="col-md-2">Aduanal:</div>
|
||||
<div class="col-md-10">
|
||||
<asp:DropDownList runat="server" ID="DdlAduanal" Width="300px" DataTextField="RazonSocial" DataValueField="CveProveedor" CssClass="select2me"></asp:DropDownList>
|
||||
<%--<asp:DropDownList runat="server" ID="DdlAduanal" Width="300px" DataTextField="RazonSocial" DataValueField="CveProveedor" CssClass="select2me"></asp:DropDownList>--%>
|
||||
<ADS:Dropdownlost ID="DdlProveedores" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor" style="width:300px!important"></ADS:Dropdownlost>
|
||||
</div>
|
||||
</div>
|
||||
<%-- <div class="row">
|
||||
@@ -287,6 +303,9 @@
|
||||
$('#BtnVincularCompra').click();
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
</script>
|
||||
|
||||
</asp:Content>
|
||||
|
||||
@@ -58,8 +58,12 @@ Partial Class Compras_Importaciones
|
||||
DtCompras = New DataTable
|
||||
DtComprasVinculadas = New DataTable
|
||||
|
||||
DdlAduanal.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
|
||||
DdlAduanal.DataBind()
|
||||
'DdlAduanal.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
|
||||
'DdlAduanal.DataBind()
|
||||
DdlProveedores.setEsWebService(True)
|
||||
DdlProveedores.Attributes.Add("data-metodo", "getproveedores")
|
||||
DdlProveedores.SelectedText = "Todos"
|
||||
DdlProveedores.SelectedValue = "-1"
|
||||
|
||||
TxtFecha.Text = Now.ToShortDateString
|
||||
End Sub
|
||||
@@ -87,7 +91,9 @@ Partial Class Compras_Importaciones
|
||||
TxtPedimento.Text = ObjImportaciones.DtResultados.Rows(0)("Pedimento").ToString
|
||||
TxtDescripcion.Text = ObjImportaciones.DtResultados.Rows(0)("Descripcion").ToString
|
||||
TxtFecha.Text = ObjImportaciones.DtResultados.Rows(0)("Fecha").ToString
|
||||
DdlAduanal.SelectedValue = ObjImportaciones.DtResultados.Rows(0)("CveAduanal").ToString
|
||||
|
||||
DdlProveedores.txtValue.Value = ObjImportaciones.DtResultados.Rows(0)("CveAduanal").ToString
|
||||
DdlProveedores.txtText.Value = ObjImportaciones.DtResultados.Rows(0)("RazonSocial").ToString
|
||||
|
||||
'HdnCveCompra.Value = ObjImportaciones.DtResultados.Rows(0)("CveCompra").ToString
|
||||
'LbCompraProveedor.Text = ObjImportaciones.DtResultados.Rows(0)("RazonSocial").ToString
|
||||
@@ -139,13 +145,14 @@ Partial Class Compras_Importaciones
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim Pedimento As String = TxtPedimento.Text.Trim.Replace("-", " ")
|
||||
|
||||
Dim ObjImp As New ClsCompras
|
||||
ObjImp.IniciaTransacSQL()
|
||||
Dim ErrorImportacion = False
|
||||
|
||||
If CveImportacion < 0 Then
|
||||
CveImportacion = ObjImp.AddImportacion(TxtPedimento.Text.Trim, TxtDescripcion.Text.Trim, DdlAduanal.SelectedValue.ToEntero, HdnCveAF.Value.ToEntero, TxtFecha.Text.ToDate, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
|
||||
CveImportacion = ObjImp.AddImportacion(Pedimento, TxtDescripcion.Text.Trim, DdlProveedores.SelectedValue.ToEntero, HdnCveAF.Value.ToEntero, TxtFecha.Text.ToDate, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
|
||||
|
||||
If CveImportacion > 0 Then
|
||||
For Each dr As DataRow In DtCompras.Rows
|
||||
@@ -168,7 +175,7 @@ Partial Class Compras_Importaciones
|
||||
End If
|
||||
|
||||
Else
|
||||
If Not ObjImp.UpdateImportacion(TxtPedimento.Text.Trim, CveImportacion, TxtDescripcion.Text, DdlAduanal.SelectedValue.ToString.ToEntero, HdnCveAF.Value.ToEntero, TxtFecha.Text.ToDate, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
|
||||
If Not ObjImp.UpdateImportacion(Pedimento, CveImportacion, TxtDescripcion.Text, DdlProveedores.SelectedValue.ToString.ToEntero, HdnCveAF.Value.ToEntero, TxtFecha.Text.ToDate, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
|
||||
ErrorImportacion = True
|
||||
End If
|
||||
End If
|
||||
|
||||
@@ -3386,10 +3386,17 @@ Partial Class PopUpVerFactura
|
||||
Dim UsuarioCapturo As String = ObjInventarios.DtResultados.FiltroPrimeroValor("UsuarioCapturo")
|
||||
|
||||
|
||||
Dim Ruta As String = ""
|
||||
Dim Supervisor As String = ""
|
||||
|
||||
If String.IsNullOrEmpty(Recibio) Then
|
||||
Dim ObjRH As New ClsRH
|
||||
If ObjRH.GetPersonal(ObjInventarios.CvePersonal, UsuarioActual.CveEmpresa) AndAlso ObjRH.DtResultados.Rows.Count > 0 Then
|
||||
Recibio = ObjRH.DtResultados.Rows(0)("NombreCompleto").ToString
|
||||
If UsuarioActual.CveEmpresa.Contiene(7, 11, 12, 122, 145) Then
|
||||
Ruta = ObjRH.DtResultados.Rows(0)("Ruta").ToString
|
||||
Supervisor = ObjRH.DtResultados.Rows(0)("Supervisor").ToString
|
||||
End If
|
||||
End If
|
||||
ObjRH.Dispose()
|
||||
End If
|
||||
@@ -3576,7 +3583,8 @@ Partial Class PopUpVerFactura
|
||||
MunicipioDestino, EstadoDestino, PaisDestino, CPDestino, FechaMovimiento, NombreCapturo, PuestoRecibio,
|
||||
PuestoEnrego, RazonSocial, ResponsableCarga, ResponsableRecibio, NombreCliente,
|
||||
CantidadProductos:=CantidadProductos, CantidadUsados:=CantidadUsados, CveTipoAlmacen:=CveTipoAlmacen, NombreEntrego:=NombreEntrego,
|
||||
CveConceptoMovRelacionado:=CveConceptoMovtoRelacionado, FolioRelacionado:=FolioRelacionado, UsuarioRegistro:=UsuarioCapturo)
|
||||
CveConceptoMovRelacionado:=CveConceptoMovtoRelacionado, FolioRelacionado:=FolioRelacionado, UsuarioRegistro:=UsuarioCapturo,
|
||||
Ruta:=Ruta, Supervisor:=Supervisor)
|
||||
|
||||
End Sub
|
||||
Private Sub PUanacExtr(CveMoneda As Integer) 'preciounitario a moneda nacional o extranjera
|
||||
@@ -3594,7 +3602,8 @@ Partial Class PopUpVerFactura
|
||||
EstadoOrigen As String, PaisOrigen As String, CPOrigen As String, CalleDestino As String, NoExtDestino As String, ColoniaDestino As String, LocalidadDestino As String, MunicipioDestino As String,
|
||||
EstadoDestino As String, PaisDestino As String, CPDestino As String, FechaMovimiento As Date, NombreCapturo As String, PuestoRecibio As String, PuestoEntrego As String,
|
||||
RazonSocial As String, ResponsableCarga As String, ResponsableRecibio As String, NombreCliente As String, Optional CantidadProductos As Decimal = 0, Optional CantidadUsados As Decimal = 0,
|
||||
Optional CveTipoAlmacen As Integer = -1, Optional NombreEntrego As String = "", Optional CveConceptoMovRelacionado As Integer = -1, Optional FolioRelacionado As String = "", Optional UsuarioRegistro As String = "")
|
||||
Optional CveTipoAlmacen As Integer = -1, Optional NombreEntrego As String = "", Optional CveConceptoMovRelacionado As Integer = -1, Optional FolioRelacionado As String = "", Optional UsuarioRegistro As String = "",
|
||||
Optional Ruta As String = Nothing, Optional Supervisor As String = Nothing)
|
||||
|
||||
|
||||
Select Case CveConcepto
|
||||
@@ -4936,6 +4945,7 @@ Partial Class PopUpVerFactura
|
||||
params.Add(New ReportParameter("DepartamentoEntrego", DepartamentoEntrego))
|
||||
|
||||
End If
|
||||
|
||||
params.Add(New ReportParameter("FechaMovimiento", FechaMovimiento.ToString("dd/MM/yyyy")))
|
||||
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
|
||||
params.Add(New ReportParameter("Observaciones", Observaciones))
|
||||
@@ -4961,6 +4971,13 @@ Partial Class PopUpVerFactura
|
||||
params.Add(New ReportParameter("AlmacenOrigen", Almacen))
|
||||
params.Add(New ReportParameter("AlmacenDestino", AlmacenDestino))
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(7, 11, 12, 122, 145) Then
|
||||
params.Add(New ReportParameter("Ruta", Ruta))
|
||||
params.Add(New ReportParameter("Supervisor", Supervisor))
|
||||
params.Add(New ReportParameter("NombreEmpleado", Recibio))
|
||||
params.Add(New ReportParameter("UsuarioEntrega", UsuarioRegistro))
|
||||
End If
|
||||
|
||||
Dim Mov As New ClsInventarios
|
||||
If Mov.GetMovimientos(DtMovimientos(0)("CveMovimiento").ToString.ToEntero, -1, Folio.ToEntero, UsuarioActual.CveEmpresa) AndAlso Mov.DtResultados.Rows.Count = 1 Then
|
||||
If Mov.DtResultados(0)("CvePersonal").ToString <> "" Then
|
||||
|
||||
@@ -132,6 +132,7 @@ Partial Class RH_CatPersonal
|
||||
If FechaFIngreso = Nothing Then
|
||||
FechaFIngreso = "-1"
|
||||
End If
|
||||
|
||||
If ObjPersonal.GetPersonal(-1, "-1", "-1", "-1", "-1", CveTurno, CvePuesto, CveDepartamento, CveRuta, CveEscolaridad, CveEstadoCivil, CveGenero, CveEstatusPersonal, CveSubProyecto, CveClienteAsignado, HorarioTrabajo, CveSupervisor, CveTipoPeriodo, CveMetodoPago, CveTipoContrato, CveMotivoBaja, CveProyecto, FechaIFinContrato, FechaFFinContrato, FechaIIngreso, FechaFIngreso, UsuarioActual.CveEmpresa, ddlclasificacion.SelectedValue.ToEntero()) Then
|
||||
DTDatos = ObjPersonal.DtResultados
|
||||
|
||||
|
||||
@@ -324,11 +324,40 @@
|
||||
<label for="<%= TxtEstado.ClientID.ToString()%>">Estado: </label>
|
||||
<i></i>
|
||||
</div>
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox CssClass="form-control" ID="TxtTelefono" runat="server" MaxLength="10"></asp:TextBox>
|
||||
<label for="<%= TxtTelefono.ClientID.ToString()%>">Teléfono:</label>
|
||||
<i></i>
|
||||
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-12" runat="server" id="DVTxtTelefono">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox CssClass="form-control" ID="TxtTelefono" runat="server" MaxLength="10"></asp:TextBox>
|
||||
<label for="<%= TxtTelefono.ClientID.ToString()%>">Teléfono:</label>
|
||||
<i></i>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
<div class="col-md-6" runat="server" id="DVDdlTipoSangre" visible="false">
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:DropDownList CssClass="form-control select2me" ID="DdlTipoSangre" runat="server" >
|
||||
<asp:ListItem Value="-1">Seleccione Uno </asp:ListItem>
|
||||
<asp:ListItem Value="A+">A+ </asp:ListItem>
|
||||
<asp:ListItem Value="A-">A- </asp:ListItem>
|
||||
<asp:ListItem Value="B+">B+ </asp:ListItem>
|
||||
<asp:ListItem Value="B-">B- </asp:ListItem>
|
||||
<asp:ListItem Value="AB+">AB+</asp:ListItem>
|
||||
<asp:ListItem Value="AB-">AB-</asp:ListItem>
|
||||
<asp:ListItem Value="O+">O+</asp:ListItem>
|
||||
<asp:ListItem Value="O-">O-</asp:ListItem>
|
||||
|
||||
</asp:DropDownList>
|
||||
<label for="<%= DdlTipoSangre.ClientID.ToString()%>">Tipo de Sangre:</label>
|
||||
<i></i>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox CssClass="form-control" ID="TxtTelefonoEmergencia" runat="server" MaxLength="70"></asp:TextBox>
|
||||
<label for="<%= TxtTelefonoEmergencia.ClientID.ToString()%>">Contacto en caso de emergencia (nombre y teléfono):</label>
|
||||
@@ -879,7 +908,8 @@
|
||||
<i></i>
|
||||
</div>
|
||||
<div runat="server" id="DivSuperiorInmediato" class="form-group form-md-line-input input-iconright">
|
||||
<asp:DropDownList ID="DdlSupervisorOrganigrama" runat="server" Width="100%" AppendDataBoundItems="True" DataTextField="NombreCompleto" DataValueField="CvePersonal" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardar">
|
||||
<asp:DropDownList ID="DdlSupervisorOrganigrama" runat="server" Width="100%" AppendDataBoundItems="True"
|
||||
DataTextField="NombreCompleto" DataValueField="CvePersonal" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardar">
|
||||
<asp:ListItem Selected="True" Text="Sin Asignar" Value="-1"></asp:ListItem>
|
||||
<asp:ListItem Text="Cabecera" Value="0"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
@@ -5211,12 +5241,14 @@
|
||||
</tr>
|
||||
<tr>
|
||||
<td style="width: 33% !important; vertical-align: top !important">
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtTelefonoBuzonCalidad" runat="server" CausesValidation="true" MaxLength="10" Visible="true" CssClass="form-control" Width="200px"></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender runat="server" TargetControlID="TxtTelefonoBuzonCalidad" FilterType="Numbers,Custom" InvalidChars=".*-" />
|
||||
<label for="<%= TxtTelefonoBuzonCalidad.ClientID.ToString()%>">Teléfono:</label>
|
||||
<i></i>
|
||||
</div>
|
||||
|
||||
</td>
|
||||
<td style="width: 33% !important; vertical-align: top !important">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
|
||||
@@ -1037,8 +1037,10 @@ Partial Class RH_Personal
|
||||
End If
|
||||
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(712) = "1" Then
|
||||
If UsuarioActual.Empresa.Funcionalidad(712) = "1" Or UsuarioActual.CveEmpresa = 1 Then
|
||||
DvRuta.Visible = True
|
||||
DVTxtTelefono.Attributes.Add("class", "col-md-6")
|
||||
DVDdlTipoSangre.Visible = True
|
||||
End If
|
||||
|
||||
End If
|
||||
@@ -1701,6 +1703,7 @@ Partial Class RH_Personal
|
||||
TxtTelefonoExtension.Text = ObjPersonal.TelefonoExtension
|
||||
TxtCelularPersonal.Text = ObjPersonal.CelularPersonal
|
||||
TxtTelefonoMarcadoRapido.Text = ObjPersonal.TelefonoMarcadoRapido
|
||||
DdlTipoSangre.SelectedValueExist(ObjPersonal.TipoSangre)
|
||||
'TxtContactoAlterno.Text = ObjPersonal.ContactoAlterno
|
||||
|
||||
|
||||
@@ -2012,7 +2015,7 @@ Partial Class RH_Personal
|
||||
UsuarioActual.CveEmpresa, DDLUsuarioNomina.SelectedValue.ToEntero(), TxtBeneficiario.Text.Trim, DdlSubproyectoZona.SelectedValue.ToEntero(), CveUniforme:=DdlUniforme.SelectedValue.ToEntero(),
|
||||
TelefonoExtension:=TxtTelefonoExtension.Text, CelularPersonal:=TxtCelularPersonal.Text, TelefonoMarcadoRapido:=TxtTelefonoMarcadoRapido.Text, ContactoAlterno:="", CveTipodeSalario:=DDlTipoSalario.SelectedValue.ToEntero(),
|
||||
Sindicalizado:=ChkSindicalizado.Checked, Pensionado:=ChkPensionado.Checked, CvePais:=DdlPais.SelectedValue.ToEntero(), CveRegistroPatronal:=DdlRegistroPatronal.SelectedValue.ToEntero(),
|
||||
CveEmpresaAsignado:=DdlEmpresaAsignada.SelectedValue.ToEntero, CveTipoTrabajador:=DdlTipoTrabajador.SelectedValue.ToEntero(), NetoPeriodo:=TxtNetoPeriodo.Text.ToDecimal) Then
|
||||
CveEmpresaAsignado:=DdlEmpresaAsignada.SelectedValue.ToEntero, CveTipoTrabajador:=DdlTipoTrabajador.SelectedValue.ToEntero(), NetoPeriodo:=TxtNetoPeriodo.Text.ToDecimal, TipoSangre:=DdlTipoSangre.SelectedValue) Then
|
||||
|
||||
If Archivo.Exists Then
|
||||
|
||||
@@ -2098,7 +2101,7 @@ Partial Class RH_Personal
|
||||
TelefonoExtension:=TxtTelefonoExtension.Text, CelularPersonal:=TxtCelularPersonal.Text, TelefonoMarcadoRapido:=TxtTelefonoMarcadoRapido.Text, ContactoAlterno:="", CveUsuarioModifico:=UsuarioActual.CveUsuario,
|
||||
CveTipodeSalario:=DDlTipoSalario.SelectedValue.ToEntero(), Sindicalizado:=If(ChkSindicalizado.Checked, 1, 0), Pensionado:=ChkPensionado.Checked, CvePais:=DdlPais.SelectedValue.ToEntero(),
|
||||
CveRegistroPatronal:=DdlRegistroPatronal.SelectedValue.ToEntero(), CveEmpresaAsignado:=DdlEmpresaAsignada.SelectedValue.ToEntero(), EsReserva:=If(chkEsReserva.Checked, 1, 0),
|
||||
Fiscalizable:=If(chkNoFiscalizar.Checked, 0, 1), CveTipoTrabajador:=DdlTipoTrabajador.SelectedValue.ToEntero(), NetoPeriodo:=TxtNetoPeriodo.Text.ToDecimal) Then
|
||||
Fiscalizable:=If(chkNoFiscalizar.Checked, 0, 1), CveTipoTrabajador:=DdlTipoTrabajador.SelectedValue.ToEntero(), NetoPeriodo:=TxtNetoPeriodo.Text.ToDecimal, TipoSangre:=DdlTipoSangre.SelectedValue) Then
|
||||
|
||||
'Funcion usa RH Familiares
|
||||
If UsuarioActual.Empresa.Funcionalidad(568) = "1" Then
|
||||
|
||||
Reference in New Issue
Block a user