Merge branch 'master' of http://192.168.10.111:8383/SIG
This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
@@ -47,12 +47,12 @@ Partial Class Acarreos_CatChoferes
|
||||
Dim Estatus = 0
|
||||
If ChkEstatus.Checked Then Estatus = 1
|
||||
If HdnModalidad.Value = "A" Then
|
||||
If ObjAcar.AddChofer(TxtChofer.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, DdlTransportista.SelectedValue, TxtIdentificacion.Text.Trim, TxtTelefono.Text.Trim, Licencia:=TxtLicencia.Text, RFC:=TxtRFC.Text.Trim, Domicilio:=TxtDomicilio.Text.Trim, NumeroExterior:=TxtNumInt.Text.Trim, NumeroInterior:=TxtNumInt.Text.Trim, Colonia:=TxtColonia.Text.Trim, Ciudad:=TxtCiudad.Text.Trim, Estado:=TxtEstado.Text.Trim(), CP:=TxtCP.Text.Trim, NumRegidTribOperador:=TxtNumRegidTribOperador.Text.Trim, ResidenciaFiscalOperador:=TxtResidenciaFiscalOperador.Text.Trim) Then
|
||||
If ObjAcar.AddChofer(TxtChofer.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, DdlTransportista.SelectedValue, TxtIdentificacion.Text.Trim, TxtTelefono.Text.Trim, Licencia:=TxtLicencia.Text, RFC:=TxtRFC.Text.Trim, Domicilio:=TxtDomicilio.Text.Trim, NumeroExterior:=TxtNumExt.Text.Trim, NumeroInterior:=TxtNumInt.Text.Trim, Colonia:=TxtColonia.Text.Trim, Ciudad:=TxtCiudad.Text.Trim, Estado:=TxtEstado.Text.Trim(), CP:=TxtCP.Text.Trim, NumRegidTribOperador:=TxtNumRegidTribOperador.Text.Trim, ResidenciaFiscalOperador:=TxtResidenciaFiscalOperador.Text.Trim) Then
|
||||
CargaDatos()
|
||||
Alert("Agregado Correctamente.", TipoMensaje.MsgInformacion)
|
||||
End If
|
||||
ElseIf HdnModalidad.Value = "U" Then
|
||||
If ObjAcar.UpdateChofer(HdnID.Value.ToEntero(), TxtChofer.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, Estatus, DdlTransportista.SelectedValue, TxtIdentificacion.Text.Trim, TxtTelefono.Text.Trim, Licencia:=TxtLicencia.Text, RFC:=TxtRFC.Text.Trim, Domicilio:=TxtDomicilio.Text.Trim, NumeroInterior:=TxtNumInt.Text.Trim, Colonia:=TxtColonia.Text.Trim, Ciudad:=TxtCiudad.Text.Trim, Estado:=TxtEstado.Text.Trim(), CP:=TxtCP.Text.Trim, NumRegidTribOperador:=TxtNumRegidTribOperador.Text.Trim, ResidenciaFiscalOperador:=TxtResidenciaFiscalOperador.Text.Trim) Then
|
||||
If ObjAcar.UpdateChofer(HdnID.Value.ToEntero(), TxtChofer.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, Estatus, DdlTransportista.SelectedValue, TxtIdentificacion.Text.Trim, TxtTelefono.Text.Trim, Licencia:=TxtLicencia.Text, RFC:=TxtRFC.Text.Trim, Domicilio:=TxtDomicilio.Text.Trim, NumeroExterior:=TxtNumExt.Text.Trim, NumeroInterior:=TxtNumInt.Text.Trim, Colonia:=TxtColonia.Text.Trim, Ciudad:=TxtCiudad.Text.Trim, Estado:=TxtEstado.Text.Trim(), CP:=TxtCP.Text.Trim, NumRegidTribOperador:=TxtNumRegidTribOperador.Text.Trim, ResidenciaFiscalOperador:=TxtResidenciaFiscalOperador.Text.Trim) Then
|
||||
CargaDatos()
|
||||
Alert("Actualizado Correctamente.", TipoMensaje.MsgInformacion)
|
||||
End If
|
||||
@@ -107,6 +107,20 @@ Partial Class Acarreos_CatChoferes
|
||||
TxtTelefono.Text = ""
|
||||
TxtCiudad.Text = ""
|
||||
TxtLicencia.Text = ""
|
||||
|
||||
|
||||
DdlTransportista.SelectedValueExist(-1)
|
||||
TxtRFC.Text = ""
|
||||
TxtNumInt.Text = ""
|
||||
TxtNumExt.Text = ""
|
||||
TxtEstado.Text = ""
|
||||
TxtCP.Text = ""
|
||||
TxtColonia.Text = ""
|
||||
|
||||
TxtNumRegidTribOperador.Text = ""
|
||||
TxtResidenciaFiscalOperador.Text = ""
|
||||
|
||||
|
||||
ChkEstatus.Checked = True
|
||||
divEstatus.Visible = False
|
||||
UpAddChofer.Update()
|
||||
|
||||
@@ -1,4 +1,4 @@
|
||||
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepEstadoResultadosPorSegmento.aspx.vb" Inherits="Contabilidad_RepEstadoResultadosPorSegmento" ValidateRequest="false" %>
|
||||
<%@ Page Title="Estado Resultados X Segmento" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepEstadoResultadosPorSegmento.aspx.vb" Inherits="Contabilidad_RepEstadoResultadosPorSegmento" ValidateRequest="false" %>
|
||||
|
||||
<asp:Content ID="Content1" ContentPlaceHolderID="HB" runat="Server">
|
||||
<%-- <li>
|
||||
@@ -53,6 +53,7 @@
|
||||
</style>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content5" ContentPlaceHolderID="E" runat="Server">
|
||||
Estado Resultados X Segmento
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="JS" runat="Server">
|
||||
|
||||
|
||||
@@ -266,7 +266,7 @@ Partial Class Contabilidad_RepEstadoResultadosPorSegmento
|
||||
DSDatos = ObjConta.DSResultados
|
||||
|
||||
|
||||
If DSDatos IsNot Nothing AndAlso DSDatos.Tables.Count = 3 Then
|
||||
If DSDatos IsNot Nothing AndAlso DSDatos.Tables.Count = 2 Then
|
||||
Try
|
||||
|
||||
|
||||
|
||||
@@ -2737,7 +2737,15 @@ Partial Class OC
|
||||
Next
|
||||
End If
|
||||
|
||||
Alert(Msg.ToString, TipoMensaje.MsgInformacion, $"document.location.href=""/OC/OC.aspx?Tipo={TipoOC}""")
|
||||
' Alert(Msg.ToString, TipoMensaje.MsgInformacion, $"document.location.href=""/OC/OC.aspx?Tipo={TipoOC}""")
|
||||
|
||||
'ES NUEVO
|
||||
Dim Liga1 As String = $"document.location.href=""/OC/OC.aspx?Tipo={TipoOC}"""
|
||||
Dim Liga2 As String = $"document.location.href=""/OC/RepOC.aspx"""
|
||||
Alert(Msg.ToString(), TipoMensaje.MsgVentasDosBotones, Liga1, TextoConfirmacion:="Seguir Registrando", TextoSegundoBoton:="Ir al Reporte", JSBtn2:=Liga2)
|
||||
|
||||
|
||||
|
||||
|
||||
'GeneraPDF(CveOrdenCompra)
|
||||
TxtDescrip.Text = ""
|
||||
@@ -3103,7 +3111,13 @@ Partial Class OC
|
||||
If Conta IsNot Nothing Then Conta.Commit()
|
||||
|
||||
If LigaOCs = "" Then
|
||||
Alert(String.Format("La {0} se guardó correctamente", TipoLargo), TipoMensaje.MsgInformacion)
|
||||
'Alert(String.Format("La {0} se guardó correctamente", TipoLargo), TipoMensaje.MsgInformacion)
|
||||
|
||||
'Edicion
|
||||
Dim Liga1 As String = $"document.location.href=""/OC/OC.aspx?Tipo={TipoOC}"""
|
||||
Dim Liga2 As String = $"document.location.href=""/OC/RepOC.aspx"""
|
||||
Alert(String.Format("La {0} se guardó correctamente", TipoLargo), TipoMensaje.MsgVentasDosBotones, Liga1, TextoConfirmacion:="Seguir Registrando", TextoSegundoBoton:="Ir al Reporte", JSBtn2:=Liga2)
|
||||
|
||||
Else
|
||||
Dim ImprimirOC = ""
|
||||
Dim Msg As New StringBuilder
|
||||
@@ -3123,7 +3137,16 @@ Partial Class OC
|
||||
Next
|
||||
End If
|
||||
|
||||
Alert(Msg.ToString, TipoMensaje.MsgInformacion, $"document.location.href=""/OC/OC.aspx?Tipo={TipoOC}""")
|
||||
'Alert(Msg.ToString, TipoMensaje.MsgInformacion, $"document.location.href=""/OC/OC.aspx?Tipo={TipoOC}""")
|
||||
|
||||
|
||||
'Edicion
|
||||
Dim Liga1 As String = $"document.location.href=""/OC/OC.aspx?Tipo={TipoOC}"""
|
||||
Dim Liga2 As String = $"document.location.href=""/OC/RepOC.aspx"""
|
||||
Alert(Msg.ToString(), TipoMensaje.MsgVentasDosBotones, Liga1, TextoConfirmacion:="Seguir Registrando", TextoSegundoBoton:="Ir al Reporte", JSBtn2:=Liga2)
|
||||
|
||||
|
||||
|
||||
End If
|
||||
|
||||
DrEliminados.Clear()
|
||||
|
||||
@@ -109,8 +109,7 @@
|
||||
<ContentTemplate>
|
||||
<asp:Label ID="LblSubProyecto" runat="server" class="col-md-1 truncate">SubProyecto:</asp:Label>
|
||||
<div class="col-md-2">
|
||||
<asp:DropDownList ID="DdlSubProyectoAsignado" runat="server" CssClass="select2me" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" ValidationGroup="GrpGuardar" Width="100%">
|
||||
<asp:ListItem Selected="True" Text="Sin SubProyecto asignado" Value="-1"></asp:ListItem>
|
||||
<asp:DropDownList ID="DdlSubProyectoAsignado" runat="server" CssClass="select2me" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" ValidationGroup="GrpGuardar" Width="100%">
|
||||
</asp:DropDownList>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
@@ -178,7 +177,7 @@
|
||||
<label class="col-md-1 truncate">Ruta:</label>
|
||||
<div class="col-md-2">
|
||||
<asp:DropDownList ID="DdlRuta" runat="server" CssClass="select2me" Width="100%" AppendDataBoundItems="true" DataTextField="Ruta" DataValueField="CveRuta" ValidationGroup="GrpGuardar">
|
||||
<asp:ListItem Selected="True" Text="Sin asignar Ruta" Value="-1"></asp:ListItem>
|
||||
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</div>
|
||||
<label class="col-md-1 truncate">Escolaridad:</label>
|
||||
@@ -211,7 +210,7 @@
|
||||
<label class="col-md-1 truncate">Motivo Baja:</label>
|
||||
<div class="col-md-2">
|
||||
<asp:DropDownList ID="DdlMotivoBaja" runat="server" Width="100%" CssClass="select2me" AppendDataBoundItems="true" DataTextField="MotivoBaja" DataValueField="CveMotivoBaja" ValidationGroup="GrpGuardar">
|
||||
<asp:ListItem Selected="True" Text="Sin asignar Motivo de Baja" Value="-1"></asp:ListItem>
|
||||
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</div>
|
||||
|
||||
@@ -237,7 +236,7 @@
|
||||
<label class="col-md-1 truncate">Supervisor:</label>
|
||||
<div class="col-md-2">
|
||||
<asp:DropDownList ID="DdlSupervisor" runat="server" Width="100%" CssClass="select2me" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveUsuario" ValidationGroup="GrpGuardar">
|
||||
<asp:ListItem Selected="True" Text="Sin Supervisor Asignado" Value="-1"></asp:ListItem>
|
||||
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</div>
|
||||
<div class="row">
|
||||
|
||||
Reference in New Issue
Block a user