AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2020-08-27 10:22:39 -07:00
parent 72f7a828fa 761bf1e222
commit f5b7f167ee
18 changed files with 238 additions and 41 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
App_Code/ClsGenerales.vb
View File

@@ -2728,7 +2728,7 @@ Public Class ClsGenerales
#Region "P A Q U E T E R I A S G U I A S" #Region "P A Q U E T E R I A S G U I A S"
Public Function AddPaqueteriasGuias(CvePaqueteria As Integer, CvePaqueteriaGuiaTipo As Integer, CveEstatus As Integer, CveSubProyecto As Integer, Fecha As String, Rastreo As String, Guia As String, NumCajas As Integer, Public Function AddPaqueteriasGuias(CvePaqueteria As Integer, CvePaqueteriaGuiaTipo As Integer, CveEstatus As Integer, CveSubProyecto As Integer, Fecha As String, Rastreo As String, Guia As String, NumCajas As Integer,
Peso As Double, Dimensiones As String, FechaEstimada As String, Observaciones As String, CveUsuario As Integer, CveEmpresa As Integer, Optional ImplicaCosto As Boolean = True, Peso As Double, Dimensiones As String, FechaEstimada As String, Observaciones As String, CveUsuario As Integer, CveEmpresa As Integer, Optional ImplicaCosto As Boolean = True,
Optional EsEntregaInterna As Boolean = False) As Integer Optional EsEntregaInterna As Boolean = False, Optional PolizaSeguro As String = "-1") As Integer
Dim Retorno As Integer = -1 Dim Retorno As Integer = -1
@@ -2755,6 +2755,7 @@ Public Class ClsGenerales
.Add("@CvePaqueteriaGuiaTipo", SqlDbType.SmallInt).Value = CvePaqueteriaGuiaTipo .Add("@CvePaqueteriaGuiaTipo", SqlDbType.SmallInt).Value = CvePaqueteriaGuiaTipo
.Add("@EsEntregaInterna", SqlDbType.Bit).Value = EsEntregaInterna .Add("@EsEntregaInterna", SqlDbType.Bit).Value = EsEntregaInterna
.Add("@PolizaSeguro", SqlDbType.NVarChar).Value = PolizaSeguro
.Add("@CvePaqueteriaGuia", SqlDbType.Int).Direction = ParameterDirection.Output .Add("@CvePaqueteriaGuia", SqlDbType.Int).Direction = ParameterDirection.Output

33
App_Code/ClsVentas.vb
View File

@@ -460,8 +460,7 @@ Public Class ClsVentas
Optional TipoDocto As String = "Cot", Optional Vigencia As Date = MinFecha, Optional CondicionesPago As Integer = -1, Optional TipoDocto As String = "Cot", Optional Vigencia As Date = MinFecha, Optional CondicionesPago As Integer = -1,
Optional AtencionA As String = "-1", Optional PedidoContrato As String = "-1", Optional CveFormaPago33 As Integer = -1, Optional CveMetodoPago33 As Integer = -1, Optional AtencionA As String = "-1", Optional PedidoContrato As String = "-1", Optional CveFormaPago33 As Integer = -1, Optional CveMetodoPago33 As Integer = -1,
Optional CveCliente As Integer = -1, Optional CveClienteSucursal As Integer = -1, Optional OrdenCompra As String = "-1", Optional RetIVA As Double = -1, Optional CveCliente As Integer = -1, Optional CveClienteSucursal As Integer = -1, Optional OrdenCompra As String = "-1", Optional RetIVA As Double = -1,
Optional RetISR As Double = -1, Optional Kilometraje As Double = 0, Optional CveVendedor As Integer = -1, Optional ObsAlm As String = "", Optional FormaPaqueteria As Integer = -1, Optional RetISR As Double = -1, Optional Kilometraje As Double = 0) As Boolean
Optional CorreoNot As String = "-1") As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Vta_VentasUpdate") DataAdapter("PA_Vta_VentasUpdate")
@@ -492,10 +491,6 @@ Public Class ClsVentas
.Add("@CveClienteSucursal", SqlDbType.Int).Value = CveClienteSucursal .Add("@CveClienteSucursal", SqlDbType.Int).Value = CveClienteSucursal
.Add("@OrdenCompra", SqlDbType.VarChar).Value = OrdenCompra .Add("@OrdenCompra", SqlDbType.VarChar).Value = OrdenCompra
.Add("@Kilometraje", SqlDbType.Float).Value = Kilometraje .Add("@Kilometraje", SqlDbType.Float).Value = Kilometraje
.Add("@CveVendedor", SqlDbType.Int).Value = CveVendedor
.Add("@ObservacionesAlm", SqlDbType.NVarChar).Value = ObsAlm
.Add("@FormaPaqueteria", SqlDbType.Int).Value = FormaPaqueteria
.Add("@CorreoNotificacion", SqlDbType.NVarChar).Value = CorreoNot
End With End With
Try Try
@@ -507,6 +502,32 @@ Public Class ClsVentas
Return Retorno Return Retorno
End Function End Function
Public Function UpdateObservacionesVenta(CveVenta As Integer, CveEmpresa As Integer, CveVendedor As Integer, Observaciones As String, FormaPaqueteria As Integer, CorreoNotificaciones As String, ObservacionesAlm As String,
Pedido As String, OrdenCompra As String, FechaPago As String) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Vta_VentasObservacionesUpdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveVenta", SqlDbType.Int).Value = CveVenta
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@CveVendedor", SqlDbType.Int).Value = CveVendedor
.Add("@Observaciones", SqlDbType.NVarChar).Value = Observaciones
.Add("@FormaPaqueteria", SqlDbType.Int).Value = FormaPaqueteria
.Add("@CorreoNotificaciones", SqlDbType.NVarChar).Value = CorreoNotificaciones
.Add("@ObservacionesAlm", SqlDbType.NVarChar).Value = ObservacionesAlm
.Add("@Pedido", SqlDbType.NVarChar).Value = Pedido
.Add("@OrdenCompra", SqlDbType.NVarChar).Value = OrdenCompra
.Add("@FechaPago", SqlDbType.Date).Value = FechaPago
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al actualizar las observaciones de la venta.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try
Return Retorno
End Function
Public Function UpdateFechaVencimientoVenta(CveVenta As Integer, FechaVencimiento As Date) As Boolean Public Function UpdateFechaVencimientoVenta(CveVenta As Integer, FechaVencimiento As Date) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Vta_VentasFechaVencimientoUpdate") DataAdapter("PA_Vta_VentasFechaVencimientoUpdate")

2
App_WebReferences/RCGPSService/configuration91.svcinfo
View File

@@ -1,5 +1,5 @@
<?xml version="1.0" encoding="utf-8"?> <?xml version="1.0" encoding="utf-8"?>
<SavedWcfConfigurationInformation xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" Version="9.1" CheckSum="lQzXnMYzJj9Lq03SQ9fuwegTyb4="> <SavedWcfConfigurationInformation xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" Version="9.1" CheckSum="0qns/0838cJFb5yp+oM76mm6SuzgFbT1201XTY4DyBY=">
<bindingConfigurations> <bindingConfigurations>
<bindingConfiguration bindingType="basicHttpBinding" name="BasicHttpBinding_IRCService"> <bindingConfiguration bindingType="basicHttpBinding" name="BasicHttpBinding_IRCService">
<properties> <properties>

54
App_WebReferences/WSPenske/ReceiveGPSInfo.wsdl
View File

@@ -83,6 +83,32 @@
</s:sequence> </s:sequence>
</s:complexType> </s:complexType>
</s:element> </s:element>
<s:element name="ReceiveGPSInformationMassiveXML">
<s:complexType>
<s:sequence>
<s:element minOccurs="0" maxOccurs="1" name="xmlGPSInfo">
<s:complexType>
<s:sequence>
<s:any processContents="lax" />
</s:sequence>
</s:complexType>
</s:element>
</s:sequence>
</s:complexType>
</s:element>
<s:element name="ReceiveGPSInformationMassiveXMLResponse">
<s:complexType>
<s:sequence>
<s:element minOccurs="0" maxOccurs="1" name="ReceiveGPSInformationMassiveXMLResult">
<s:complexType>
<s:sequence>
<s:any processContents="lax" />
</s:sequence>
</s:complexType>
</s:element>
</s:sequence>
</s:complexType>
</s:element>
</s:schema> </s:schema>
</wsdl:types> </wsdl:types>
<wsdl:message name="ReceiveGPSInformationSoapIn"> <wsdl:message name="ReceiveGPSInformationSoapIn">
@@ -103,6 +129,12 @@
<wsdl:message name="ReceiveGPSInformation_ObjetoSoapOut"> <wsdl:message name="ReceiveGPSInformation_ObjetoSoapOut">
<wsdl:part name="parameters" element="tns:ReceiveGPSInformation_ObjetoResponse" /> <wsdl:part name="parameters" element="tns:ReceiveGPSInformation_ObjetoResponse" />
</wsdl:message> </wsdl:message>
<wsdl:message name="ReceiveGPSInformationMassiveXMLSoapIn">
<wsdl:part name="parameters" element="tns:ReceiveGPSInformationMassiveXML" />
</wsdl:message>
<wsdl:message name="ReceiveGPSInformationMassiveXMLSoapOut">
<wsdl:part name="parameters" element="tns:ReceiveGPSInformationMassiveXMLResponse" />
</wsdl:message>
<wsdl:portType name="ReceiveGPSInfoSoap"> <wsdl:portType name="ReceiveGPSInfoSoap">
<wsdl:operation name="ReceiveGPSInformation"> <wsdl:operation name="ReceiveGPSInformation">
<wsdl:input message="tns:ReceiveGPSInformationSoapIn" /> <wsdl:input message="tns:ReceiveGPSInformationSoapIn" />
@@ -116,6 +148,10 @@
<wsdl:input message="tns:ReceiveGPSInformation_ObjetoSoapIn" /> <wsdl:input message="tns:ReceiveGPSInformation_ObjetoSoapIn" />
<wsdl:output message="tns:ReceiveGPSInformation_ObjetoSoapOut" /> <wsdl:output message="tns:ReceiveGPSInformation_ObjetoSoapOut" />
</wsdl:operation> </wsdl:operation>
<wsdl:operation name="ReceiveGPSInformationMassiveXML">
<wsdl:input message="tns:ReceiveGPSInformationMassiveXMLSoapIn" />
<wsdl:output message="tns:ReceiveGPSInformationMassiveXMLSoapOut" />
</wsdl:operation>
</wsdl:portType> </wsdl:portType>
<wsdl:binding name="ReceiveGPSInfoSoap" type="tns:ReceiveGPSInfoSoap"> <wsdl:binding name="ReceiveGPSInfoSoap" type="tns:ReceiveGPSInfoSoap">
<soap:binding transport="http://schemas.xmlsoap.org/soap/http" /> <soap:binding transport="http://schemas.xmlsoap.org/soap/http" />
@@ -146,6 +182,15 @@
<soap:body use="literal" /> <soap:body use="literal" />
</wsdl:output> </wsdl:output>
</wsdl:operation> </wsdl:operation>
<wsdl:operation name="ReceiveGPSInformationMassiveXML">
<soap:operation soapAction="http://tempuri.org/ReceiveGPSInformationMassiveXML" style="document" />
<wsdl:input>
<soap:body use="literal" />
</wsdl:input>
<wsdl:output>
<soap:body use="literal" />
</wsdl:output>
</wsdl:operation>
</wsdl:binding> </wsdl:binding>
<wsdl:binding name="ReceiveGPSInfoSoap12" type="tns:ReceiveGPSInfoSoap"> <wsdl:binding name="ReceiveGPSInfoSoap12" type="tns:ReceiveGPSInfoSoap">
<soap12:binding transport="http://schemas.xmlsoap.org/soap/http" /> <soap12:binding transport="http://schemas.xmlsoap.org/soap/http" />
@@ -176,6 +221,15 @@
<soap12:body use="literal" /> <soap12:body use="literal" />
</wsdl:output> </wsdl:output>
</wsdl:operation> </wsdl:operation>
<wsdl:operation name="ReceiveGPSInformationMassiveXML">
<soap12:operation soapAction="http://tempuri.org/ReceiveGPSInformationMassiveXML" style="document" />
<wsdl:input>
<soap12:body use="literal" />
</wsdl:input>
<wsdl:output>
<soap12:body use="literal" />
</wsdl:output>
</wsdl:operation>
</wsdl:binding> </wsdl:binding>
<wsdl:service name="ReceiveGPSInfo"> <wsdl:service name="ReceiveGPSInfo">
<wsdl:port name="ReceiveGPSInfoSoap" binding="tns:ReceiveGPSInfoSoap"> <wsdl:port name="ReceiveGPSInfoSoap" binding="tns:ReceiveGPSInfoSoap">

2
App_WebReferences/WSRVConsultas/configuration91.svcinfo
View File

@@ -1,5 +1,5 @@
<?xml version="1.0" encoding="utf-8"?> <?xml version="1.0" encoding="utf-8"?>
<SavedWcfConfigurationInformation xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" Version="9.1" CheckSum="NuY352soI+OoFqhd5YCpuMvYvGc="> <SavedWcfConfigurationInformation xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" Version="9.1" CheckSum="ABzLtw767ZQUU0k4nCQPs//zQy+J7OBv8lt+paGCsS4=">
<bindingConfigurations> <bindingConfigurations>
<bindingConfiguration bindingType="basicHttpBinding" name="Service1Soap"> <bindingConfiguration bindingType="basicHttpBinding" name="Service1Soap">
<properties> <properties>

66
App_WebReferences/WSRVConsultas/service1.wsdl
View File

@@ -153,6 +153,43 @@
</s:sequence> </s:sequence>
</s:complexType> </s:complexType>
</s:element> </s:element>
<s:element name="ConsultarPresunto">
<s:complexType>
<s:sequence>
<s:element minOccurs="0" maxOccurs="1" name="RFCEmisor" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="CuentaUsuario" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="ClaveUsuario" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="RfcPresunto" type="s:string" />
</s:sequence>
</s:complexType>
</s:element>
<s:element name="ConsultarPresuntoResponse">
<s:complexType>
<s:sequence>
<s:element minOccurs="0" maxOccurs="1" name="ConsultarPresuntoResult" type="tns:StructPresunto" />
</s:sequence>
</s:complexType>
</s:element>
<s:complexType name="StructPresunto">
<s:sequence>
<s:element minOccurs="1" maxOccurs="1" name="Estado" type="s:int" />
<s:element minOccurs="0" maxOccurs="1" name="Mensaje" type="s:string" />
<s:element minOccurs="1" maxOccurs="1" name="Numero" type="s:int" />
<s:element minOccurs="0" maxOccurs="1" name="Rfc" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="Nombre" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="Situacion" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="NumeroOficioSATPresuncion" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="PublicacionSATPresuncion" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="NumeroFechaOficioDOF" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="PublicacionDOFPresuncion" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="PubicacionSATDesvirtuado" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="NumeroOficioDesvirtuado" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="PublicacionDOFDesvirtuado" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="NumeroOficioDefinitivo" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="PublicacionSATDefinitivo" type="s:string" />
<s:element minOccurs="0" maxOccurs="1" name="PublicacionDOFDefinitivo" type="s:string" />
</s:sequence>
</s:complexType>
<s:element name="ConsultarCfdisEmitidos"> <s:element name="ConsultarCfdisEmitidos">
<s:complexType> <s:complexType>
<s:sequence> <s:sequence>
@@ -242,6 +279,12 @@
<wsdl:message name="ConsultarCancelacionSoapOut"> <wsdl:message name="ConsultarCancelacionSoapOut">
<wsdl:part name="parameters" element="tns:ConsultarCancelacionResponse" /> <wsdl:part name="parameters" element="tns:ConsultarCancelacionResponse" />
</wsdl:message> </wsdl:message>
<wsdl:message name="ConsultarPresuntoSoapIn">
<wsdl:part name="parameters" element="tns:ConsultarPresunto" />
</wsdl:message>
<wsdl:message name="ConsultarPresuntoSoapOut">
<wsdl:part name="parameters" element="tns:ConsultarPresuntoResponse" />
</wsdl:message>
<wsdl:message name="ConsultarCfdisEmitidosSoapIn"> <wsdl:message name="ConsultarCfdisEmitidosSoapIn">
<wsdl:part name="parameters" element="tns:ConsultarCfdisEmitidos" /> <wsdl:part name="parameters" element="tns:ConsultarCfdisEmitidos" />
</wsdl:message> </wsdl:message>
@@ -290,6 +333,11 @@
<wsdl:input message="tns:ConsultarCancelacionSoapIn" /> <wsdl:input message="tns:ConsultarCancelacionSoapIn" />
<wsdl:output message="tns:ConsultarCancelacionSoapOut" /> <wsdl:output message="tns:ConsultarCancelacionSoapOut" />
</wsdl:operation> </wsdl:operation>
<wsdl:operation name="ConsultarPresunto">
<wsdl:documentation xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/">Consultar un CFDI directamente por UUID y Fecha</wsdl:documentation>
<wsdl:input message="tns:ConsultarPresuntoSoapIn" />
<wsdl:output message="tns:ConsultarPresuntoSoapOut" />
</wsdl:operation>
<wsdl:operation name="ConsultarCfdisEmitidos"> <wsdl:operation name="ConsultarCfdisEmitidos">
<wsdl:documentation xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/">Consultar los CFDIs emitidos por rango de fecha</wsdl:documentation> <wsdl:documentation xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/">Consultar los CFDIs emitidos por rango de fecha</wsdl:documentation>
<wsdl:input message="tns:ConsultarCfdisEmitidosSoapIn" /> <wsdl:input message="tns:ConsultarCfdisEmitidosSoapIn" />
@@ -366,6 +414,15 @@
<soap:body use="literal" /> <soap:body use="literal" />
</wsdl:output> </wsdl:output>
</wsdl:operation> </wsdl:operation>
<wsdl:operation name="ConsultarPresunto">
<soap:operation soapAction="http://tempuri.org/ConsultarPresunto" style="document" />
<wsdl:input>
<soap:body use="literal" />
</wsdl:input>
<wsdl:output>
<soap:body use="literal" />
</wsdl:output>
</wsdl:operation>
<wsdl:operation name="ConsultarCfdisEmitidos"> <wsdl:operation name="ConsultarCfdisEmitidos">
<soap:operation soapAction="http://tempuri.org/ConsultarCfdisEmitidos" style="document" /> <soap:operation soapAction="http://tempuri.org/ConsultarCfdisEmitidos" style="document" />
<wsdl:input> <wsdl:input>
@@ -450,6 +507,15 @@
<soap12:body use="literal" /> <soap12:body use="literal" />
</wsdl:output> </wsdl:output>
</wsdl:operation> </wsdl:operation>
<wsdl:operation name="ConsultarPresunto">
<soap12:operation soapAction="http://tempuri.org/ConsultarPresunto" style="document" />
<wsdl:input>
<soap12:body use="literal" />
</wsdl:input>
<wsdl:output>
<soap12:body use="literal" />
</wsdl:output>
</wsdl:operation>
<wsdl:operation name="ConsultarCfdisEmitidos"> <wsdl:operation name="ConsultarCfdisEmitidos">
<soap12:operation soapAction="http://tempuri.org/ConsultarCfdisEmitidos" style="document" /> <soap12:operation soapAction="http://tempuri.org/ConsultarCfdisEmitidos" style="document" />
<wsdl:input> <wsdl:input>

2
App_WebReferences/wsValidaCFDi2/ConsultaCFDIService.xsd
View File

@@ -3,7 +3,9 @@
<xs:complexType name="Acuse"> <xs:complexType name="Acuse">
<xs:sequence> <xs:sequence>
<xs:element minOccurs="0" name="CodigoEstatus" nillable="true" type="xs:string" /> <xs:element minOccurs="0" name="CodigoEstatus" nillable="true" type="xs:string" />
<xs:element minOccurs="0" name="EsCancelable" nillable="true" type="xs:string" />
<xs:element minOccurs="0" name="Estado" nillable="true" type="xs:string" /> <xs:element minOccurs="0" name="Estado" nillable="true" type="xs:string" />
<xs:element minOccurs="0" name="EstatusCancelacion" nillable="true" type="xs:string" />
</xs:sequence> </xs:sequence>
</xs:complexType> </xs:complexType>
<xs:element name="Acuse" nillable="true" type="tns:Acuse" /> <xs:element name="Acuse" nillable="true" type="tns:Acuse" />

2
App_WebReferences/wsValidaCFDi2/configuration91.svcinfo
View File

@@ -1,5 +1,5 @@
<?xml version="1.0" encoding="utf-8"?> <?xml version="1.0" encoding="utf-8"?>
<SavedWcfConfigurationInformation xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" Version="9.1" CheckSum="pOmVJStm5hxCRlvTFTVnICnM8aQ="> <SavedWcfConfigurationInformation xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" Version="9.1" CheckSum="WiujLa2Wexk6dRbNVWygD/ahBFk/T12zxoYVy0Rah2Y=">
<bindingConfigurations> <bindingConfigurations>
<bindingConfiguration bindingType="basicHttpBinding" name="BasicHttpBinding_IConsultaCFDIService"> <bindingConfiguration bindingType="basicHttpBinding" name="BasicHttpBinding_IConsultaCFDIService">
<properties> <properties>

4
General/PopUpPaqueteriasGuias.aspx
View File

@@ -208,6 +208,10 @@
<asp:RequiredFieldValidator ID="RfvPaqueteriaGuiaTipo" runat="server" ControlToValidate="DdlPaqueteriaGuiaTipo" InitialValue="-1" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Documento''</b> es necesario." ValidationGroup="GrpCrearGuia"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RfvPaqueteriaGuiaTipo" runat="server" ControlToValidate="DdlPaqueteriaGuiaTipo" InitialValue="-1" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Documento''</b> es necesario." ValidationGroup="GrpCrearGuia"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VcePaqueteriaGuiaTipo" runat="server" HighlightCssClass="vco" TargetControlID="RfvPaqueteriaGuiaTipo" Width="220px" PopupPosition="Left"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="VcePaqueteriaGuiaTipo" runat="server" HighlightCssClass="vco" TargetControlID="RfvPaqueteriaGuiaTipo" Width="220px" PopupPosition="Left"></ajax:ValidatorCalloutExtender>
</td> </td>
<td runat="server" id="tdLblPolizaSeguro" class="text-right" align="left" valign="top" style="width: 140px; padding-top: 4px;"><b>Poliza de Seguro:</b></td>
<td runat="server" id="tdTxtPolizaSeguro" align="left" valign="top" style="width: 200px;">
<asp:TextBox runat="server" ID="TxtPolizaSeguro" CssClass="form-control" Width="200px" Height="30px" Style="padding: 0px"></asp:TextBox>
</td>
</tr> </tr>
<tr></tr> <tr></tr>

26
General/PopUpPaqueteriasGuias.aspx.cs
View File

@@ -181,6 +181,10 @@ public partial class General_PopUpPaqueteriasGuias : ClsPaginas
if (CveVenta > 0 || CveOC > 0 || CveMovimiento > 0 || CveCompra > 0) if (CveVenta > 0 || CveOC > 0 || CveMovimiento > 0 || CveCompra > 0)
{ {
CargaGuiasVinculadas(); CargaGuiasVinculadas();
if(CveVenta > 0)
{
CondicionesVenta();
}
} }
else else
{ {
@@ -381,7 +385,10 @@ public partial class General_PopUpPaqueteriasGuias : ClsPaginas
String Observaciones = TxtObservaciones.Text; String Observaciones = TxtObservaciones.Text;
Boolean ImplicaCosto = ChkImplicaCosto.Checked; Boolean ImplicaCosto = ChkImplicaCosto.Checked;
int CvePaqueteriaGuia = ObjGeneral.AddPaqueteriasGuias(CvePaqueteria, CvePaqueteriaGuiaTipo,CveEstatus, CveSucursal, Fecha, Rastreo, Guia, NoCajas, Peso, Dimensiones, FechaEstimada, Observaciones, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, ImplicaCosto); string PolizaSeguro = (tdLblPolizaSeguro.Visible) ? TxtPolizaSeguro.Text : "-1";
int CvePaqueteriaGuia = ObjGeneral.AddPaqueteriasGuias(CvePaqueteria, CvePaqueteriaGuiaTipo,CveEstatus, CveSucursal, Fecha, Rastreo, Guia, NoCajas, Peso, Dimensiones,
FechaEstimada, Observaciones, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, ImplicaCosto,PolizaSeguro: PolizaSeguro);
if (CvePaqueteriaGuia > 0) if (CvePaqueteriaGuia > 0)
{ {
@@ -853,4 +860,21 @@ public partial class General_PopUpPaqueteriasGuias : ClsPaginas
} }
#endregion #endregion
private void CondicionesVenta()
{
ClsVentas ObjVenta = new ClsVentas();
if (ObjVenta.GetVentaDetalle(CveVenta))
{
DataTable VentasDetalle = ObjVenta.DtResultados;
if (VentasDetalle.Rows.Count > 0)
{
double Total = VentasDetalle.SUM("Total");
bool Mostrar = (Total >= 100000.00);
tdLblPolizaSeguro.Visible = Mostrar;
tdTxtPolizaSeguro.Visible = Mostrar;
}
}
}
} }

3
General/RepPaqueteriasGuias.aspx
View File

@@ -190,7 +190,7 @@
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" /> <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a> <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div> </div>
<asp:GridView ID="GVDatos" runat="server" DataKeyNames="CvePaqueteriaGuia, CveSubProyecto, SubProyecto, CveAgrupador, TipoAgrupador, Folio, CvePaqueteria, Paqueteria, Liga, CveEstatus, Estatus, Rastreo, Guia, NumCajas, Peso, Dimensiones, Fecha, FechaEstimada, CveUsuario, CveEmpresa, FechaIng, Observaciones, ImplicaCosto, CvePaqueteriaGuiaTipo,EsEntregaInterna" <asp:GridView ID="GVDatos" runat="server" DataKeyNames="CvePaqueteriaGuia, CveSubProyecto, SubProyecto, CveAgrupador, TipoAgrupador, Folio, CvePaqueteria, Paqueteria, Liga, CveEstatus, Estatus, Rastreo, Guia, NumCajas, Peso, Dimensiones, Fecha, FechaEstimada, CveUsuario, CveEmpresa, FechaIng, Observaciones, ImplicaCosto, CvePaqueteriaGuiaTipo,EsEntregaInterna,PolizaSeguro"
AutoGenerateColumns="False" EmptyDataText="No se encontraron Registros con los filtros especificados" CssClass="table table-striped table-advance table-hover Widthall mysmallbtn ScrollAD" data-sort="true" GridLines="None" AutoGenerateColumns="False" EmptyDataText="No se encontraron Registros con los filtros especificados" CssClass="table table-striped table-advance table-hover Widthall mysmallbtn ScrollAD" data-sort="true" GridLines="None"
EmptyDataRowStyle-HorizontalAlign="Center" OnRowDataBound="GVDatos_RowDataBound"> EmptyDataRowStyle-HorizontalAlign="Center" OnRowDataBound="GVDatos_RowDataBound">
<Columns> <Columns>
@@ -208,6 +208,7 @@
<asp:BoundField DataField="Guia" HeaderText="Guía" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Left" /> <asp:BoundField DataField="Guia" HeaderText="Guía" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField DataField="Rastreo" HeaderText="Rastreo" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Left" /> <asp:BoundField DataField="Rastreo" HeaderText="Rastreo" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField DataField="PolizaSeguro" HeaderText="Póliza de seguro" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField DataField="Fecha" HeaderText="Fecha" ItemStyle-Width="4%" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-HorizontalAlign="Center" /> <asp:BoundField DataField="Fecha" HeaderText="Fecha" ItemStyle-Width="4%" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-HorizontalAlign="Center" />
<asp:BoundField DataField="FechaEstimada" HeaderText="Fecha Est." ItemStyle-Width="4%" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-HorizontalAlign="Center" /> <asp:BoundField DataField="FechaEstimada" HeaderText="Fecha Est." ItemStyle-Width="4%" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-HorizontalAlign="Center" />
<asp:BoundField DataField="FechaIng" HeaderText="Fecha Ing" ItemStyle-Width="4%" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-HorizontalAlign="Center" /> <asp:BoundField DataField="FechaIng" HeaderText="Fecha Ing" ItemStyle-Width="4%" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-HorizontalAlign="Center" />

2
Inventarios/EntradasSalidas.aspx.vb
View File

@@ -2025,7 +2025,7 @@ Partial Class Inventarios_EntradasSalidas
DdlConcepto.Items.Insert(0, New ListItem("Entrada Almacen ", "2")) DdlConcepto.Items.Insert(0, New ListItem("Entrada Almacen ", "2"))
End If End If
If UsuarioActual.CveEmpresa = 72 AndAlso CveTipoAlmacen.Contiene(14, 19) AndAlso UsuarioActual.CveUsuario = 2185 Then If UsuarioActual.CveEmpresa = 72 AndAlso CveTipoAlmacen.Contiene(12, 14, 19) AndAlso (UsuarioActual.CveUsuario = 2185 OrElse UsuarioActual.CveRol = 1) Then
'DdlConcepto.Items.Add(New ListItem("Seleccione", "-1")) 'DdlConcepto.Items.Add(New ListItem("Seleccione", "-1"))
DdlConcepto.Items.Add(New ListItem("Entrada por Ajuste", "32")) DdlConcepto.Items.Add(New ListItem("Entrada por Ajuste", "32"))

8
Inventarios/ResguardoMaterial.aspx.vb
View File

@@ -816,7 +816,7 @@ Partial Class Inventarios_ResguardoMaterial
Case 23 ' Resguardo Case 23 ' Resguardo
'SALIDA ORIGEN 'SALIDA ORIGEN
CveMovimientoSalida = ObjInventario.AddMovimiento(DdlAlmacen.SelectedValue.ToEntero, 24, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, SubProyecto, ActivoFijo, Observaciones:=TxtObservaciones.Text, CvePersonal:=CvePersonal, CveAlmacenDestino:=DdlAlmacenDestino.SelectedValue.ToEntero, CveCliente:=CveCliente, CveProveedor:=CveProveedor) CveMovimientoSalida = ObjInventario.AddMovimiento(DdlAlmacen.SelectedValue.ToEntero, 24, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, SubProyecto, ActivoFijo, Observaciones:=TxtObservaciones.Text, CvePersonal:=CvePersonal, CveAlmacenDestino:=DdlAlmacenDestino.SelectedValue.ToEntero, CveCliente:=CveCliente, CveProveedor:=CveProveedor, Modulo:="ResgMat1")
FolioSalida = ObjInventario.Folio FolioSalida = ObjInventario.Folio
If CveMovimientoSalida <= 0 Then If CveMovimientoSalida <= 0 Then
@@ -839,7 +839,7 @@ Partial Class Inventarios_ResguardoMaterial
Cont = 0 Cont = 0
If Not TieneError Then If Not TieneError Then
CveMovimientoEntrada = ObjInventario.AddMovimiento(DdlAlmacenDestino.SelectedValue.ToEntero, 2, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, SubProyecto, ActivoFijo, Observaciones:=TxtObservaciones.Text, CvePersonal:=CvePersonal, CveMovimientoRelacionado:=CveMovimientoSalida, CveCliente:=CveCliente, CveProveedor:=CveProveedor) CveMovimientoEntrada = ObjInventario.AddMovimiento(DdlAlmacenDestino.SelectedValue.ToEntero, 2, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, SubProyecto, ActivoFijo, Observaciones:=TxtObservaciones.Text, CvePersonal:=CvePersonal, CveMovimientoRelacionado:=CveMovimientoSalida, CveCliente:=CveCliente, CveProveedor:=CveProveedor, Modulo:="ResgMat2")
FolioEntrada = ObjInventario.Folio FolioEntrada = ObjInventario.Folio
If CveMovimientoEntrada <= 0 Then If CveMovimientoEntrada <= 0 Then
@@ -873,7 +873,7 @@ Partial Class Inventarios_ResguardoMaterial
'SALIDA ORIGEN - RESGUARDO 'SALIDA ORIGEN - RESGUARDO
CveMovimientoSalida = ObjInventario.AddMovimiento(CveAlmacenLiberación, 3, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, SubProyecto, ActivoFijo, Observaciones:=TxtObservacionesLiberacion.Text, CvePersonal:=CvePersonalLiberacion, CveAlmacenDestino:=DdlAlmacenDestinoLiberacion.SelectedValue.ToEntero, CveProveedor:=CveProveedorLiberacion, CveCliente:=CveClienteLiberacion, MovimientoFijo:=True) CveMovimientoSalida = ObjInventario.AddMovimiento(CveAlmacenLiberación, 3, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, SubProyecto, ActivoFijo, Observaciones:=TxtObservacionesLiberacion.Text, CvePersonal:=CvePersonalLiberacion, CveAlmacenDestino:=DdlAlmacenDestinoLiberacion.SelectedValue.ToEntero, CveProveedor:=CveProveedorLiberacion, CveCliente:=CveClienteLiberacion, MovimientoFijo:=True, Modulo:="ResgMat3")
FolioSalida = ObjInventario.Folio FolioSalida = ObjInventario.Folio
Dim DiccionarioSecciones As New HybridDictionary Dim DiccionarioSecciones As New HybridDictionary
@@ -899,7 +899,7 @@ Partial Class Inventarios_ResguardoMaterial
If Not TieneError Then If Not TieneError Then
CveMovimientoEntrada = ObjInventario.AddMovimiento(DdlAlmacenDestinoLiberacion.SelectedValue.ToEntero, 23, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, SubProyecto, ActivoFijo, Observaciones:=TxtObservacionesLiberacion.Text, CvePersonal:=CvePersonalLiberacion, CveMovimientoRelacionado:=CveMovimientoSalida, CveProveedor:=CveProveedorLiberacion, CveCliente:=CveClienteLiberacion, MovimientoFijo:=True) CveMovimientoEntrada = ObjInventario.AddMovimiento(DdlAlmacenDestinoLiberacion.SelectedValue.ToEntero, 23, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, SubProyecto, ActivoFijo, Observaciones:=TxtObservacionesLiberacion.Text, CvePersonal:=CvePersonalLiberacion, CveMovimientoRelacionado:=CveMovimientoSalida, CveProveedor:=CveProveedorLiberacion, CveCliente:=CveClienteLiberacion, MovimientoFijo:=True, Modulo:="ResgMat4")
FolioEntrada = ObjInventario.Folio FolioEntrada = ObjInventario.Folio
If CveMovimientoEntrada <= 0 Then If CveMovimientoEntrada <= 0 Then

7
OI/DocumentoDetalle.aspx.cs
View File

@@ -89,15 +89,16 @@ public partial class OI_DocumentoDetalle : ClsPaginas
ViewState["CveAsignacion"] = value; ViewState["CveAsignacion"] = value;
} }
} }
#endregion
protected void Page_Load(object sender, EventArgs e) protected void Page_Load(object sender, EventArgs e)
{ {
if (!IsPostBack) if (!IsPostBack)
{ {
Cargar(); Cargar();
CargarMensajeNuevoEditado();
} }
} }
#endregion
#region "CARGAS" #region "CARGAS"
private void CargarCveDocumento() private void CargarCveDocumento()
@@ -120,7 +121,7 @@ public partial class OI_DocumentoDetalle : ClsPaginas
switch (MensajeNuevoEditado) switch (MensajeNuevoEditado)
{ {
case "Nuevo": case "Nuevo":
Alert("El Documento ha sido creado correctamente"); Alert("El Documento ha sido creado correctamente",JSBtnAceptar: "document.location.href=\"/OI/Documentos.aspx\";");
break; break;
case "NuevaVersion": case "NuevaVersion":
Alert("Nueva versión del Documento creado correctamente"); Alert("Nueva versión del Documento creado correctamente");
@@ -343,7 +344,7 @@ public partial class OI_DocumentoDetalle : ClsPaginas
ConfiguracionActualizar(); ConfiguracionActualizar();
ConfigurarGridUsuariosParticipantes(); ConfigurarGridUsuariosParticipantes();
ConfigurarCamposDetalleSegunUsuario(); ConfigurarCamposDetalleSegunUsuario();
CargarMensajeNuevoEditado();
MostrarBotonRechazar(); MostrarBotonRechazar();
} }
} }

40
RH/Personal.aspx
View File

@@ -829,7 +829,7 @@
<asp:UpdatePanel ID="UpUniformesResguardo" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpUniformesResguardo" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvUniformesResguardo" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron registros" DataKeyNames="CveAlmacen,CodigoPS,PU,CveUM,CveMovimiento,CveMovimientoDetalle,CvePS,AplicaSeccion,AplicaSerie,CveSeccionAlmacen" ToolTip="" <asp:GridView ID="GvUniformesResguardo" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron registros" DataKeyNames="CveAlmacen,CodigoPS,PU,CveUM,CveMovimiento,CveMovimientoDetalle,CvePS,AplicaSeccion,AplicaSerie,CveSeccionAlmacen,Cantidad" ToolTip=""
CssClass="table table-hover table-advance Widthall" GridLines="None"> CssClass="table table-hover table-advance Widthall" GridLines="None">
<Columns> <Columns>
<asp:HyperLinkField DataNavigateUrlFields="CveMovimiento" Target="_blank" HeaderText="Folio" DataNavigateUrlFormatString="../Inventarios/EntradasSalidas.aspx?CveMovimiento={0}" DataTextField="Folio" /> <asp:HyperLinkField DataNavigateUrlFields="CveMovimiento" Target="_blank" HeaderText="Folio" DataNavigateUrlFormatString="../Inventarios/EntradasSalidas.aspx?CveMovimiento={0}" DataTextField="Folio" />
@@ -3869,23 +3869,43 @@
<div class="modal-body"> <div class="modal-body">
<asp:UpdatePanel runat="server" ID="UPPLiberarUniforme" UpdateMode="Conditional"> <asp:UpdatePanel runat="server" ID="UPPLiberarUniforme" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div class="row" style="width: 75%;"> <div class="row" style="width: 100%;">
<asp:Label Text="Almacen: " runat="server" Style="width: 20%" /> <div class="col-md-1" style="width:30%;text-align:right">
<asp:DropDownList runat="server" ID="DdlAlmacenDestinoLiberarUniforme" CssClass="form-control input-sm select2me" Style="width: 50%" DataTextField="Almacen" DataValueField="CveAlmacen"></asp:DropDownList> <asp:Label Text="Almacen: " runat="server" />
</div>
<div class="col-md-1" style="width:70%">
<asp:DropDownList runat="server" ID="DdlAlmacenDestinoLiberarUniforme" Width="100%" CssClass="form-control input-sm select2me" DataTextField="Almacen" DataValueField="CveAlmacen"></asp:DropDownList>
</div>
</div> </div>
<div runat="server" id="divSeccionAlmacen" class="frow" visible="false"> <br />
<asp:Label Text="Sección: " runat="server" Style="width: 20%" /> <div runat="server" id="divSeccionAlmacen" class="row" style="width: 100%;" visible="false">
<asp:DropDownList ID="DdlSeccionAlmacen" DataTextField="Seccion" AppendDataBoundItems="true" DataValueField="CveSeccion" Class="form-control input-sm select2me" Style="width: 50% !important" runat="server" CausesValidation="true"> <div class="col-md-1" style="width:30%;text-align:right">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:Label Text="Sección: " runat="server" />
</asp:DropDownList> </div>
<div class="col-md-1" style="width:70%">
<asp:DropDownList ID="DdlSeccionAlmacen" DataTextField="SeccionAlmacen" Width="100%" AppendDataBoundItems="true" DataValueField="CveSeccionAlmacen" Class="form-control input-sm select2me" runat="server" CausesValidation="true">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
</div>
</div> </div>
<br />
<div class="row" style="width: 100%;">
<div class="col-md-1" style="width:30%;text-align:right">
<asp:Label runat="server" ID="LblCantidadResguardo">Cantidad:</asp:Label>
</div>
<div class="col-md-1" style="width:70%">
<asp:TextBox runat="server" ID="TxtCantidadResguardo" CssClass="form-control " Width="100%"></asp:TextBox>
<asp:RangeValidator ID="RvTxtCantidadResguardo" Display="Dynamic" ControlToValidate="TxtCantidadResguardo" runat="server" MinimumValue="0" MaximumValue="1" Type="Integer" ErrorMessage="Se supera la cantidad maxima disponibled" ValidationGroup="GpoResguardo"></asp:RangeValidator>
</div>
</div>
<br />
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</div> </div>
<div class="modal-footer"> <div class="modal-footer">
<asp:UpdatePanel runat="server"> <asp:UpdatePanel runat="server">
<ContentTemplate> <ContentTemplate>
<asp:Button ID="BtnLiberarUniforme" runat="server" OnClick="LiberarUniforme" ClientIDMode="Static" Text="Guardar" CssClass="btn btn-primary" /> <asp:Button ID="BtnLiberarUniforme" runat="server" OnClick="LiberarUniforme" ClientIDMode="Static" Text="Guardar" ValidationGroup="GpoResguardo" CssClass="btn btn-primary" />
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button> <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
</ContentTemplate> </ContentTemplate>

11
RH/Personal.aspx.vb
View File

@@ -5105,7 +5105,7 @@ Partial Class RH_Personal
Dim ObjInv As New ClsInventarios Dim ObjInv As New ClsInventarios
If ObjInv.GetResguardoUniformesRep(UsuarioActual.CveEmpresa, CvePersonal, -1, -1, Todo:=True) Then If ObjInv.GetResguardoUniformesRep(UsuarioActual.CveEmpresa, CvePersonal, -1, -1, Todo:=False) Then
GvUniformesResguardo.DataSource = ObjInv.DtResultados GvUniformesResguardo.DataSource = ObjInv.DtResultados
UniformesInfo = ObjInv.DtResultados UniformesInfo = ObjInv.DtResultados
Else Else
@@ -5143,6 +5143,9 @@ Partial Class RH_Personal
CvePS = row.DataKey("CvePS").ToString().ToEntero CvePS = row.DataKey("CvePS").ToString().ToEntero
CveMovimientoUniforme = row.DataKey("CveMovimiento").ToString().ToEntero CveMovimientoUniforme = row.DataKey("CveMovimiento").ToString().ToEntero
CveMovimientoDetalleUniforme = row.DataKey("CveMovimientoDetalle").ToString().ToEntero CveMovimientoDetalleUniforme = row.DataKey("CveMovimientoDetalle").ToString().ToEntero
Dim Cantidad As Integer = row.DataKey("Cantidad").ToString().ToEntero
TxtCantidadResguardo.Text = Cantidad.ToString
RvTxtCantidadResguardo.MaximumValue = Cantidad.ToString
If row.DataKey("AplicaSeccion").ToString = "True" Then If row.DataKey("AplicaSeccion").ToString = "True" Then
divSeccionAlmacen.Visible = True divSeccionAlmacen.Visible = True
DdlSeccionAlmacen.Items.Clear() DdlSeccionAlmacen.Items.Clear()
@@ -5168,11 +5171,13 @@ Partial Class RH_Personal
Dim ObjInventario As New ClsInventarios Dim ObjInventario As New ClsInventarios
ObjInventario.IniciaTransacSQL() ObjInventario.IniciaTransacSQL()
Dim Cantidad As Double = TxtCantidadResguardo.Text.ToDouble()
Dim CveResultadoSalida As Integer = ObjInventario.AddMovimiento(CveAlmacenUniforme, 3, 1, Date.Now, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1, CveAlmacenDestino:=DdlAlmacenDestinoLiberarUniforme.SelectedValue.ToEntero, CvePersonal:=CvePersonal, Observaciones:=DescripcionUniforme) Dim CveResultadoSalida As Integer = ObjInventario.AddMovimiento(CveAlmacenUniforme, 3, 1, Date.Now, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1, CveAlmacenDestino:=DdlAlmacenDestinoLiberarUniforme.SelectedValue.ToEntero, CvePersonal:=CvePersonal, Observaciones:=DescripcionUniforme)
Dim ResultadoDetalleSalida As Boolean = ObjInventario.AddMovimientoDetalle(CveResultadoSalida, 1.0, CveUM, CvePS, PU, CveSeccionAlmacen:=CveSeccionAlmacenUniforme, CveMovimientoDetalleEntrada:=CveMovimientoDetalleUniforme) Dim ResultadoDetalleSalida As Boolean = ObjInventario.AddMovimientoDetalle(CveResultadoSalida, Cantidad, CveUM, CvePS, PU, CveSeccionAlmacen:=CveSeccionAlmacenUniforme, CveMovimientoDetalleEntrada:=CveMovimientoDetalleUniforme)
Dim CveSeccionAlmacen As Integer = DdlSeccionAlmacen.SelectedValue.ToEntero Dim CveSeccionAlmacen As Integer = DdlSeccionAlmacen.SelectedValue.ToEntero
Dim CveResultadoEntrada As Integer = ObjInventario.AddMovimiento(DdlAlmacenDestinoLiberarUniforme.SelectedValue.ToEntero, 2, 1, Date.Now, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1, CvePersonal:=CvePersonal, Observaciones:=DescripcionUniforme, CveMovimientoRelacionado:=CveMovimientoUniforme) Dim CveResultadoEntrada As Integer = ObjInventario.AddMovimiento(DdlAlmacenDestinoLiberarUniforme.SelectedValue.ToEntero, 2, 1, Date.Now, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1, CvePersonal:=CvePersonal, Observaciones:=DescripcionUniforme, CveMovimientoRelacionado:=CveMovimientoUniforme)
Dim ResultadoDetalleEntrada As Boolean = ObjInventario.AddMovimientoDetalle(CveResultadoEntrada, 1.0, CveUM, CvePS, PU, CveSeccionAlmacen:=CveSeccionAlmacen) Dim ResultadoDetalleEntrada As Boolean = ObjInventario.AddMovimientoDetalle(CveResultadoEntrada, Cantidad, CveUM, CvePS, PU, CveSeccionAlmacen:=CveSeccionAlmacen)
If ResultadoDetalleSalida And ResultadoDetalleEntrada Then If ResultadoDetalleSalida And ResultadoDetalleEntrada Then
ObjInventario.Commit() ObjInventario.Commit()

6
Ventas/Ventas.aspx.vb
View File

@@ -26143,10 +26143,8 @@ Partial Class Ventas
Private Sub GuardarValoresEditados() Private Sub GuardarValoresEditados()
Dim ObjVentas As New ClsVentas() Dim ObjVentas As New ClsVentas()
If ObjVentas.UpdateVentas(TxtSubTotal.Text.ToDecimal, LblDescuentos.Text.ToDecimal, TxtIVA.Text.ToDecimal, TxtIEPS.Text.ToDecimal, TxtTotal.Text.ToDecimal, DdlMoneda.SelectedValue.ToEntero(), If ObjVentas.UpdateObservacionesVenta(CveVenta, UsuarioActual.CveEmpresa, DdlVendedor.SelectedValue.ToEntero(), TxtObsFact.Text, RblPaqueteria.SelectedValue.ToEntero(), TxtCorreoNotificaciones.Text,
TipoCambio, TxtFecha.Text.Trim.ToDate, TxtObsFact.Text.Trim, UsuarioActual.CveEmpresa, CveVenta, DdlMetodoPago33.SelectedValue.ToEntero, DdlFormaPago33.SelectedValue.ToEntero, TxtObsAlmacen.Text, TxtPedidoContrato.Text, TxtOrdenCompra.Text, TxtFechaPago.Text) Then
TipoDocto:=DdlTipoComprobante.SelectedValue, OrdenCompra:=TxtOrdenCompra.Text, PedidoContrato:=TxtPedidoContrato.Text, ObsAlm:=TxtObsAlmacen.Text, FormaPaqueteria:=RblPaqueteria.SelectedValue.ToEntero,
CorreoNot:=TxtCorreoNotificaciones.Text, CveVendedor:=DdlVendedor.SelectedValue.ToEntero, Kilometraje:=TxtKilometraje.Text.ToDouble) Then
CargaVenta() CargaVenta()
BtnEditar.Text = "Editar" BtnEditar.Text = "Editar"
Alert("Actualizado correctamente") Alert("Actualizado correctamente")

8
packages.config
View File

@@ -17,9 +17,9 @@
<package id="Microsoft.Bcl" version="1.1.9" targetFramework="net40" /> <package id="Microsoft.Bcl" version="1.1.9" targetFramework="net40" />
<package id="Microsoft.Bcl.Async" version="1.0.168" targetFramework="net40" /> <package id="Microsoft.Bcl.Async" version="1.0.168" targetFramework="net40" />
<package id="Microsoft.Bcl.Build" version="1.0.14" targetFramework="net40" /> <package id="Microsoft.Bcl.Build" version="1.0.14" targetFramework="net40" />
<package id="Microsoft.IdentityModel.JsonWebTokens" version="5.3.0" targetFramework="net45" /> <package id="Microsoft.IdentityModel.JsonWebTokens" version="6.7.1" targetFramework="net45" />
<package id="Microsoft.IdentityModel.Logging" version="5.3.0" targetFramework="net45" /> <package id="Microsoft.IdentityModel.Logging" version="6.7.1" targetFramework="net45" />
<package id="Microsoft.IdentityModel.Tokens" version="5.3.0" targetFramework="net45" /> <package id="Microsoft.IdentityModel.Tokens" version="6.7.1" targetFramework="net45" />
<package id="Microsoft.Owin" version="4.1.0" targetFramework="net45" /> <package id="Microsoft.Owin" version="4.1.0" targetFramework="net45" />
<package id="Microsoft.Owin.Host.SystemWeb" version="3.0.1" targetFramework="net45" /> <package id="Microsoft.Owin.Host.SystemWeb" version="3.0.1" targetFramework="net45" />
<package id="Microsoft.Owin.Security" version="4.1.0" targetFramework="net45" /> <package id="Microsoft.Owin.Security" version="4.1.0" targetFramework="net45" />
@@ -37,6 +37,6 @@
<package id="NuGet.Core" version="2.8.0" targetFramework="net4" /> <package id="NuGet.Core" version="2.8.0" targetFramework="net4" />
<package id="Owin" version="1.0" targetFramework="net45" /> <package id="Owin" version="1.0" targetFramework="net45" />
<package id="StackExchange.Redis.StrongName" version="1.0.488" targetFramework="net40" /> <package id="StackExchange.Redis.StrongName" version="1.0.488" targetFramework="net40" />
<package id="System.IdentityModel.Tokens.Jwt" version="5.3.0" targetFramework="net45" /> <package id="System.IdentityModel.Tokens.Jwt" version="6.7.1" targetFramework="net45" />
<package id="WebGrease" version="1.6.0" targetFramework="net40" /> <package id="WebGrease" version="1.6.0" targetFramework="net40" />
</packages> </packages>