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
2021-01-09 10:37:32 -07:00
parent 2bfa26d637 a1052eb6fa
commit 9e24601c4f
21 changed files with 989 additions and 57 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
App_Code/ClsCRM.vb
View File

@@ -431,7 +431,8 @@ Public Class ClsCRM
Return Retorno Return Retorno
End Function End Function
Public Function AddEmpresaCRM(NombreEmpresa As String, RFC As String, CveMedioCaptacion As Integer, CveEmpresa As Integer, CveUsuarioIng As Integer, CveEncuestaAplicada As Integer, CveVendedor As Integer, Optional CveSubProyecto As Integer = -1, Optional Correo As String = "-1") As Integer Public Function AddEmpresaCRM(NombreEmpresa As String, RFC As String, CveMedioCaptacion As Integer, CveEmpresa As Integer, CveUsuarioIng As Integer, CveEncuestaAplicada As Integer, CveVendedor As Integer,
Optional CveSubProyecto As Integer = -1, Optional Correo As String = "-1", Optional CveGiroClasificacion As Integer = -1) As Integer
Dim CveEmpresaCRM As Integer = -1 Dim CveEmpresaCRM As Integer = -1
DataAdapter("PA_CRM_EmpresaAdd") DataAdapter("PA_CRM_EmpresaAdd")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
@@ -444,6 +445,7 @@ Public Class ClsCRM
.Add("@CveVendedor", SqlDbType.Int).Value = CveVendedor .Add("@CveVendedor", SqlDbType.Int).Value = CveVendedor
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@Correo", SqlDbType.VarChar).Value = Correo .Add("@Correo", SqlDbType.VarChar).Value = Correo
.Add("@CveGiroClasificacion", SqlDbType.Int).Value = CveGiroClasificacion
.Add("@RETURN_VALUE", SqlDbType.Int).Direction = ParameterDirection.ReturnValue .Add("@RETURN_VALUE", SqlDbType.Int).Direction = ParameterDirection.ReturnValue
End With End With
@@ -456,7 +458,8 @@ Public Class ClsCRM
Return CveEmpresaCRM Return CveEmpresaCRM
End Function End Function
Public Function UpdateEmpresCRM(NombreEmpresa As String, RFC As String, CveMedioCaptacion As Integer, CveEmpresaCRM As Integer, CveVendedor As Integer, CveUsuarioMod As Integer, Optional CveCliente As Integer = -1, Optional CveSubProyecto As Integer = -1, Optional Correo As String = "-1") As Boolean Public Function UpdateEmpresCRM(NombreEmpresa As String, RFC As String, CveMedioCaptacion As Integer, CveEmpresaCRM As Integer, CveVendedor As Integer, CveUsuarioMod As Integer,
Optional CveCliente As Integer = -1, Optional CveSubProyecto As Integer = -1, Optional Correo As String = "-1", Optional CveGiroClasificacion As Integer = -1) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_CRM_EmpresaUpdate") DataAdapter("PA_CRM_EmpresaUpdate")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
@@ -469,6 +472,7 @@ Public Class ClsCRM
.Add("@CveCliente", SqlDbType.Int).Value = CveCliente .Add("@CveCliente", SqlDbType.Int).Value = CveCliente
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@Correo", SqlDbType.VarChar).Value = Correo .Add("@Correo", SqlDbType.VarChar).Value = Correo
.Add("@CveGiroClasificaciones", SqlDbType.Int).Value = CveGiroClasificacion
End With End With
Try Try
SqlAdapter.Fill(Data) SqlAdapter.Fill(Data)
@@ -651,7 +655,8 @@ Public Class ClsCRM
Public Function GetAcercamiento(CveEmpresa As Integer, Optional CveEmpresaCRM As Integer = -1, Optional CveAcercamiento As Integer = -1, Optional CveTipoProceso As Integer = -1, Public Function GetAcercamiento(CveEmpresa As Integer, Optional CveEmpresaCRM As Integer = -1, Optional CveAcercamiento As Integer = -1, Optional CveTipoProceso As Integer = -1,
Optional CveVendedor As Integer = -1, Optional FechaInicio As String = "-1", Optional FechaFin As String = "-1", Optional NombreAcercamiento As String = "-1", Optional CveVendedor As Integer = -1, Optional FechaInicio As String = "-1", Optional FechaFin As String = "-1", Optional NombreAcercamiento As String = "-1",
Optional CveMedioCaptacion As Integer = -1, Optional CveRechazoMotivo As Integer = -1, Optional CveProbabilidad As Integer = -1, Optional CveMedioCaptacion As Integer = -1, Optional CveRechazoMotivo As Integer = -1, Optional CveProbabilidad As Integer = -1,
Optional FechaApertura As String = "-1", Optional FechaCierre As String = "-1", Optional TopSelect As Integer = 10000) As Boolean Optional FechaApertura As String = "-1", Optional FechaCierre As String = "-1", Optional TopSelect As Integer = 10000, Optional CvePS As Integer = -1,
Optional CveGiroClasificacion As Integer = -1) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_CRM_AcercamientoGet") DataAdapter("PA_CRM_AcercamientoGet")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
@@ -675,6 +680,9 @@ Public Class ClsCRM
.Add("@FechaCierre", SqlDbType.VarChar).Value = FechaCierre .Add("@FechaCierre", SqlDbType.VarChar).Value = FechaCierre
.Add("@TopSelect", SqlDbType.Int).Value = TopSelect .Add("@TopSelect", SqlDbType.Int).Value = TopSelect
.Add("@CvePS", SqlDbType.Int).Value = CvePS
.Add("@CveGiroClasificacion", SqlDbType.Int).Value = CveGiroClasificacion
End With End With
Try Try
SqlAdapter.Fill(Data) SqlAdapter.Fill(Data)
@@ -688,7 +696,7 @@ Public Class ClsCRM
Public Function AddAcercamiento(CveEmpresaCRM As Integer, CveContactoPrincipal As Integer, CveTipoProceso As Integer, CveEtapaProcesoActual As Integer, CveVendedor As Integer, CveMedioCaptacion As Integer, Public Function AddAcercamiento(CveEmpresaCRM As Integer, CveContactoPrincipal As Integer, CveTipoProceso As Integer, CveEtapaProcesoActual As Integer, CveVendedor As Integer, CveMedioCaptacion As Integer,
CveRechazoMotivo As Integer, CveProbabilidadAcercamiento As Integer, FechaApertura As DateTime, NombreAcercamiento As String, Descripcion As String, Importe As Double, Comision As Double, CveRechazoMotivo As Integer, CveProbabilidadAcercamiento As Integer, FechaApertura As DateTime, NombreAcercamiento As String, Descripcion As String, Importe As Double, Comision As Double,
Prioridad As Integer, CveEmpresa As Integer, CveUsuarioIng As Integer, Prioridad As Integer, CveEmpresa As Integer, CveUsuarioIng As Integer,
Optional FechaCierre As Nullable(Of DateTime) = Nothing) As Integer Optional FechaCierre As Nullable(Of DateTime) = Nothing, Optional CvePS As Integer = -1) As Integer
Dim _CveAcercamiento As Integer = -1 Dim _CveAcercamiento As Integer = -1
DataAdapter("PA_CRM_AcercamientoAdd") DataAdapter("PA_CRM_AcercamientoAdd")
@@ -714,6 +722,7 @@ Public Class ClsCRM
.Add("@Prioridad", SqlDbType.Int).Value = Prioridad .Add("@Prioridad", SqlDbType.Int).Value = Prioridad
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@CveUsuarioIng", SqlDbType.Int).Value = CveUsuarioIng .Add("@CveUsuarioIng", SqlDbType.Int).Value = CveUsuarioIng
.Add("@CvePS", SqlDbType.Int).Value = CvePS
.Add("@RETURN_VALUE", SqlDbType.Int).Direction = ParameterDirection.ReturnValue .Add("@RETURN_VALUE", SqlDbType.Int).Direction = ParameterDirection.ReturnValue
End With End With
@@ -729,7 +738,7 @@ Public Class ClsCRM
Public Function UpdateAcercamiento(CveAcercamiento As Integer, CveContactoPrincipal As Integer, CveTipoProceso As Integer, CveEtapaProcesoActual As Integer, CveVendedor As Integer, CveMedioCaptacion As Integer, Public Function UpdateAcercamiento(CveAcercamiento As Integer, CveContactoPrincipal As Integer, CveTipoProceso As Integer, CveEtapaProcesoActual As Integer, CveVendedor As Integer, CveMedioCaptacion As Integer,
CveProbabilidadAcercamiento As Integer, NombreAcercamiento As String, Descripcion As String, Importe As Double, Comision As Double, CveProbabilidadAcercamiento As Integer, NombreAcercamiento As String, Descripcion As String, Importe As Double, Comision As Double,
Prioridad As Integer, CveUsuarioMod As Integer, Optional CveRechazoMotivo As Integer = -1, Optional CveEncuestaAplicadaProceso As Integer = -1, Prioridad As Integer, CveUsuarioMod As Integer, Optional CveRechazoMotivo As Integer = -1, Optional CveEncuestaAplicadaProceso As Integer = -1,
Optional FechaApertura As Nullable(Of DateTime) = Nothing, Optional FechaCierre As Nullable(Of DateTime) = Nothing) As Boolean Optional FechaApertura As Nullable(Of DateTime) = Nothing, Optional FechaCierre As Nullable(Of DateTime) = Nothing, Optional CvePS As Integer = -1) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_CRM_AcercamientoUpdate") DataAdapter("PA_CRM_AcercamientoUpdate")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
@@ -755,6 +764,7 @@ Public Class ClsCRM
.Add("@CveRechazoMotivo", SqlDbType.Int).Value = CveRechazoMotivo .Add("@CveRechazoMotivo", SqlDbType.Int).Value = CveRechazoMotivo
.Add("@FechaApertura", SqlDbType.DateTime).Value = IIf(FechaApertura Is Nothing, SqlTypes.SqlDateTime.Null, FechaApertura) .Add("@FechaApertura", SqlDbType.DateTime).Value = IIf(FechaApertura Is Nothing, SqlTypes.SqlDateTime.Null, FechaApertura)
.Add("@FechaCierre", SqlDbType.DateTime).Value = IIf(FechaCierre Is Nothing, SqlTypes.SqlDateTime.Null, FechaCierre) .Add("@FechaCierre", SqlDbType.DateTime).Value = IIf(FechaCierre Is Nothing, SqlTypes.SqlDateTime.Null, FechaCierre)
.Add("@CvePS", SqlDbType.Int).Value = CvePS
End With End With
Try Try
SqlAdapter.Fill(Data) SqlAdapter.Fill(Data)

3
App_Code/ClsVentas.vb
View File

@@ -2719,7 +2719,7 @@ Public Class ClsVentas
Return Retorno Return Retorno
End Function End Function
Public Function GetRepCotizacionesSinFacturar(FechaI As Date, FechaF As Date, CveSubProyecto As String, CveCliente As Integer, CveEmpresa As Integer, Optional CveUsuarioConsulta As Integer = -1) As Boolean Public Function GetRepCotizacionesSinFacturar(FechaI As Date, FechaF As Date, CveSubProyecto As String, CveCliente As Integer, CveEmpresa As Integer, Optional CveUsuarioConsulta As Integer = -1, Optional CveEstatusFactura As Integer = -1) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Vta_RepCotizacionesSinFacturarGet") DataAdapter("PA_Vta_RepCotizacionesSinFacturarGet")
@@ -2729,6 +2729,7 @@ Public Class ClsVentas
.Add("@CveSubProyecto", SqlDbType.VarChar).Value = CveSubProyecto .Add("@CveSubProyecto", SqlDbType.VarChar).Value = CveSubProyecto
.Add("@CveCliente", SqlDbType.Int).Value = CveCliente .Add("@CveCliente", SqlDbType.Int).Value = CveCliente
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@CveEstatusFactura", SqlDbType.Int).Value = CveEstatusFactura
.Add("@CveUsuarioConsulta", SqlDbType.Int).Value = CveUsuarioConsulta .Add("@CveUsuarioConsulta", SqlDbType.Int).Value = CveUsuarioConsulta
End With End With

9
App_Code/Timbrado.vb
View File

@@ -2688,6 +2688,15 @@ Public Class Timbrado
#Region "Timbra" #Region "Timbra"
If ArchivoGenerado Then If ArchivoGenerado Then
Dim opciones As String() = New String(0) {"CALCULAR_SELLO"}
Dim pade = New PADE33.PadeTimbradoServiceClient
Dim Respuesta As String = pade.timbradoPrueba("72330711-cac6-4106-8051-cbcda1aef495", "rene.molina@adssistemas.mx", "Facturacion2021#", cfdi.Xml, opciones)
' Aumentamos el timeout de la operación
Dim FolioFiscal As String
FolioFiscal = obtenerAtributo(Respuesta, "TimbreFiscalDigital", "UUID") 'XmlDoc.DocumentElement("cfdi:Complemento").FirstChild.Attributes("UUID").InnerText
'cfdi.TimbrarCfdi(UsuarioServicio, ClaveServicio, UrlServicio, TimbraProduccion) 'cfdi.TimbrarCfdi(UsuarioServicio, ClaveServicio, UrlServicio, TimbraProduccion)
'sw.Stop() 'sw.Stop()

32
App_WebReferences/PADE33/Reference.svcmap Normal file
View File

@@ -0,0 +1,32 @@
<?xml version="1.0" encoding="utf-8"?>
<ReferenceGroup xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ID="74836d6a-9238-4e5b-b78b-90210bd6100d" xmlns="urn:schemas-microsoft-com:xml-wcfservicemap">
<ClientOptions>
<GenerateAsynchronousMethods>false</GenerateAsynchronousMethods>
<GenerateTaskBasedAsynchronousMethod>true</GenerateTaskBasedAsynchronousMethod>
<EnableDataBinding>true</EnableDataBinding>
<ExcludedTypes />
<ImportXmlTypes>false</ImportXmlTypes>
<GenerateInternalTypes>false</GenerateInternalTypes>
<GenerateMessageContracts>false</GenerateMessageContracts>
<NamespaceMappings />
<CollectionMappings />
<GenerateSerializableTypes>true</GenerateSerializableTypes>
<Serializer>Auto</Serializer>
<UseSerializerForFaults>true</UseSerializerForFaults>
<ReferenceAllAssemblies>true</ReferenceAllAssemblies>
<ReferencedAssemblies />
<ReferencedDataContractTypes />
<ServiceContractMappings />
</ClientOptions>
<MetadataSources>
<MetadataSource Address=" http://timbrado.pade.mx:80/servicio/Timbrado3.3?wsdl" Protocol="http" SourceId="1" />
</MetadataSources>
<Metadata>
<MetadataFile FileName="Timbrado3.xsd" MetadataType="Schema" ID="03404faf-e6b7-4ab9-ba61-1a17cad2a0be" SourceId="1" SourceUrl="http://timbrado.pade.mx/servicio/Timbrado3.3?xsd=1" />
<MetadataFile FileName="Timbrado3.wsdl" MetadataType="Wsdl" ID="c803d077-e85f-46ea-be18-2ddeb4820ced" SourceId="1" SourceUrl="http://timbrado.pade.mx/servicio/Timbrado3.3?wsdl" />
</Metadata>
<Extensions>
<ExtensionFile FileName="configuration91.svcinfo" Name="configuration91.svcinfo" />
<ExtensionFile FileName="configuration.svcinfo" Name="configuration.svcinfo" />
</Extensions>
</ReferenceGroup>

284
App_WebReferences/PADE33/Timbrado3.wsdl Normal file
View File

@@ -0,0 +1,284 @@
<?xml version="1.0" encoding="utf-8"?>
<definitions xmlns:wsp="http://www.w3.org/ns/ws-policy" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:wsam="http://www.w3.org/2007/05/addressing/metadata" xmlns:tns="timbrado.ws.pade.mx" xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/" xmlns:wsp1_2="http://schemas.xmlsoap.org/ws/2004/09/policy" xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" name="Timbrado3.3" targetNamespace="timbrado.ws.pade.mx" xmlns="http://schemas.xmlsoap.org/wsdl/">
<types>
<xsd:schema>
<xsd:import schemaLocation="http://timbrado.pade.mx:80/servicio/Timbrado3.3?xsd=1" namespace="timbrado.ws.pade.mx" />
</xsd:schema>
</types>
<message name="acuseCancelacion">
<part name="parameters" element="tns:acuseCancelacion" />
</message>
<message name="acuseCancelacionResponse">
<part name="parameters" element="tns:acuseCancelacionResponse" />
</message>
<message name="consultarEstatusComprobante">
<part name="parameters" element="tns:consultarEstatusComprobante" />
</message>
<message name="consultarEstatusComprobanteResponse">
<part name="parameters" element="tns:consultarEstatusComprobanteResponse" />
</message>
<message name="consultarCfdiRelacionados">
<part name="parameters" element="tns:consultarCfdiRelacionados" />
</message>
<message name="consultarCfdiRelacionadosResponse">
<part name="parameters" element="tns:consultarCfdiRelacionadosResponse" />
</message>
<message name="responderSolicitudCancelacionConOpciones">
<part name="parameters" element="tns:responderSolicitudCancelacionConOpciones" />
</message>
<message name="responderSolicitudCancelacionConOpcionesResponse">
<part name="parameters" element="tns:responderSolicitudCancelacionConOpcionesResponse" />
</message>
<message name="consultarDisponibilidadServicio">
<part name="parameters" element="tns:consultarDisponibilidadServicio" />
</message>
<message name="consultarDisponibilidadServicioResponse">
<part name="parameters" element="tns:consultarDisponibilidadServicioResponse" />
</message>
<message name="timbradoBase64Prueba">
<part name="parameters" element="tns:timbradoBase64Prueba" />
</message>
<message name="timbradoBase64PruebaResponse">
<part name="parameters" element="tns:timbradoBase64PruebaResponse" />
</message>
<message name="timbradoBase64">
<part name="parameters" element="tns:timbradoBase64" />
</message>
<message name="timbradoBase64Response">
<part name="parameters" element="tns:timbradoBase64Response" />
</message>
<message name="consultarPeticionesPendientes">
<part name="parameters" element="tns:consultarPeticionesPendientes" />
</message>
<message name="consultarPeticionesPendientesResponse">
<part name="parameters" element="tns:consultarPeticionesPendientesResponse" />
</message>
<message name="timbradoConCSD">
<part name="parameters" element="tns:timbradoConCSD" />
</message>
<message name="timbradoConCSDResponse">
<part name="parameters" element="tns:timbradoConCSDResponse" />
</message>
<message name="cancelarConOpciones">
<part name="parameters" element="tns:cancelarConOpciones" />
</message>
<message name="cancelarConOpcionesResponse">
<part name="parameters" element="tns:cancelarConOpcionesResponse" />
</message>
<message name="cancelar">
<part name="parameters" element="tns:cancelar" />
</message>
<message name="cancelarResponse">
<part name="parameters" element="tns:cancelarResponse" />
</message>
<message name="cfdiPorUUID">
<part name="parameters" element="tns:cfdiPorUUID" />
</message>
<message name="cfdiPorUUIDResponse">
<part name="parameters" element="tns:cfdiPorUUIDResponse" />
</message>
<message name="timbradoPrueba">
<part name="parameters" element="tns:timbradoPrueba" />
</message>
<message name="timbradoPruebaResponse">
<part name="parameters" element="tns:timbradoPruebaResponse" />
</message>
<message name="timbrado">
<part name="parameters" element="tns:timbrado" />
</message>
<message name="timbradoResponse">
<part name="parameters" element="tns:timbradoResponse" />
</message>
<portType name="PadeTimbradoService">
<operation name="acuseCancelacion">
<input wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/acuseCancelacionRequest" message="tns:acuseCancelacion" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/acuseCancelacionResponse" message="tns:acuseCancelacionResponse" />
</operation>
<operation name="consultarEstatusComprobante">
<input wsam:Action="consultarEstatusComprobante" message="tns:consultarEstatusComprobante" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/consultarEstatusComprobanteResponse" message="tns:consultarEstatusComprobanteResponse" />
</operation>
<operation name="consultarCfdiRelacionados">
<input wsam:Action="consultarCfdiRelacionados" message="tns:consultarCfdiRelacionados" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/consultarCfdiRelacionadosResponse" message="tns:consultarCfdiRelacionadosResponse" />
</operation>
<operation name="responderSolicitudCancelacionConOpciones">
<input wsam:Action="responderSolicitudCancelacionConOpciones" message="tns:responderSolicitudCancelacionConOpciones" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/responderSolicitudCancelacionConOpcionesResponse" message="tns:responderSolicitudCancelacionConOpcionesResponse" />
</operation>
<operation name="consultarDisponibilidadServicio">
<input wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/consultarDisponibilidadServicioRequest" message="tns:consultarDisponibilidadServicio" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/consultarDisponibilidadServicioResponse" message="tns:consultarDisponibilidadServicioResponse" />
</operation>
<operation name="timbradoBase64Prueba">
<input wsam:Action="timbradoBase64Prueba" message="tns:timbradoBase64Prueba" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/timbradoBase64PruebaResponse" message="tns:timbradoBase64PruebaResponse" />
</operation>
<operation name="timbradoBase64">
<input wsam:Action="timbradoBase64" message="tns:timbradoBase64" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/timbradoBase64Response" message="tns:timbradoBase64Response" />
</operation>
<operation name="consultarPeticionesPendientes">
<input wsam:Action="consultarPeticionesPendientes" message="tns:consultarPeticionesPendientes" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/consultarPeticionesPendientesResponse" message="tns:consultarPeticionesPendientesResponse" />
</operation>
<operation name="timbradoConCSD">
<input wsam:Action="timbradoConCSD" message="tns:timbradoConCSD" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/timbradoConCSDResponse" message="tns:timbradoConCSDResponse" />
</operation>
<operation name="cancelarConOpciones">
<input wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/cancelarConOpcionesRequest" message="tns:cancelarConOpciones" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/cancelarConOpcionesResponse" message="tns:cancelarConOpcionesResponse" />
</operation>
<operation name="cancelar">
<input wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/cancelarRequest" message="tns:cancelar" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/cancelarResponse" message="tns:cancelarResponse" />
</operation>
<operation name="cfdiPorUUID">
<input wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/cfdiPorUUIDRequest" message="tns:cfdiPorUUID" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/cfdiPorUUIDResponse" message="tns:cfdiPorUUIDResponse" />
</operation>
<operation name="timbradoPrueba">
<input wsam:Action="timbradoPrueba" message="tns:timbradoPrueba" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/timbradoPruebaResponse" message="tns:timbradoPruebaResponse" />
</operation>
<operation name="timbrado">
<input wsam:Action="timbrado" message="tns:timbrado" />
<output wsam:Action="timbrado.ws.pade.mx/PadeTimbradoService/timbradoResponse" message="tns:timbradoResponse" />
</operation>
</portType>
<binding name="PadeTimbradoServicePortBinding" type="tns:PadeTimbradoService">
<soap:binding transport="http://schemas.xmlsoap.org/soap/http" />
<operation name="acuseCancelacion">
<soap:operation soapAction="" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="consultarEstatusComprobante">
<soap:operation soapAction="consultarEstatusComprobante" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="consultarCfdiRelacionados">
<soap:operation soapAction="consultarCfdiRelacionados" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="responderSolicitudCancelacionConOpciones">
<soap:operation soapAction="responderSolicitudCancelacionConOpciones" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="consultarDisponibilidadServicio">
<soap:operation soapAction="" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="timbradoBase64Prueba">
<soap:operation soapAction="timbradoBase64Prueba" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="timbradoBase64">
<soap:operation soapAction="timbradoBase64" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="consultarPeticionesPendientes">
<soap:operation soapAction="consultarPeticionesPendientes" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="timbradoConCSD">
<soap:operation soapAction="timbradoConCSD" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="cancelarConOpciones">
<soap:operation soapAction="" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="cancelar">
<soap:operation soapAction="" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="cfdiPorUUID">
<soap:operation soapAction="" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="timbradoPrueba">
<soap:operation soapAction="timbradoPrueba" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
<operation name="timbrado">
<soap:operation soapAction="timbrado" />
<input>
<soap:body use="literal" />
</input>
<output>
<soap:body use="literal" />
</output>
</operation>
</binding>
<service name="Timbrado3.3">
<port name="PadeTimbradoServicePort" binding="tns:PadeTimbradoServicePortBinding">
<soap:address location="http://timbrado.pade.mx:80/servicio/Timbrado3.3" />
</port>
</service>
</definitions>

252
App_WebReferences/PADE33/Timbrado3.xsd Normal file
View File

@@ -0,0 +1,252 @@
<?xml version="1.0" encoding="utf-8"?>
<xs:schema xmlns:tns="timbrado.ws.pade.mx" targetNamespace="timbrado.ws.pade.mx" version="1.0" xmlns:xs="http://www.w3.org/2001/XMLSchema">
<xs:element name="acuseCancelacion" type="tns:acuseCancelacion" />
<xs:element name="acuseCancelacionResponse" type="tns:acuseCancelacionResponse" />
<xs:element name="cancelar" type="tns:cancelar" />
<xs:element name="cancelarConOpciones" type="tns:cancelarConOpciones" />
<xs:element name="cancelarConOpcionesResponse" type="tns:cancelarConOpcionesResponse" />
<xs:element name="cancelarResponse" type="tns:cancelarResponse" />
<xs:element name="cfdiPorUUID" type="tns:cfdiPorUUID" />
<xs:element name="cfdiPorUUIDResponse" type="tns:cfdiPorUUIDResponse" />
<xs:element name="consultarCfdiRelacionados" type="tns:consultarCfdiRelacionados" />
<xs:element name="consultarCfdiRelacionadosResponse" type="tns:consultarCfdiRelacionadosResponse" />
<xs:element name="consultarDisponibilidadServicio" type="tns:consultarDisponibilidadServicio" />
<xs:element name="consultarDisponibilidadServicioResponse" type="tns:consultarDisponibilidadServicioResponse" />
<xs:element name="consultarEstatusComprobante" type="tns:consultarEstatusComprobante" />
<xs:element name="consultarEstatusComprobanteResponse" type="tns:consultarEstatusComprobanteResponse" />
<xs:element name="consultarPeticionesPendientes" type="tns:consultarPeticionesPendientes" />
<xs:element name="consultarPeticionesPendientesResponse" type="tns:consultarPeticionesPendientesResponse" />
<xs:element name="responderSolicitudCancelacionConOpciones" type="tns:responderSolicitudCancelacionConOpciones" />
<xs:element name="responderSolicitudCancelacionConOpcionesResponse" type="tns:responderSolicitudCancelacionConOpcionesResponse" />
<xs:element name="timbrado" type="tns:timbrado" />
<xs:element name="timbradoBase64" type="tns:timbradoBase64" />
<xs:element name="timbradoBase64Prueba" type="tns:timbradoBase64Prueba" />
<xs:element name="timbradoBase64PruebaResponse" type="tns:timbradoBase64PruebaResponse" />
<xs:element name="timbradoBase64Response" type="tns:timbradoBase64Response" />
<xs:element name="timbradoConCSD" type="tns:timbradoConCSD" />
<xs:element name="timbradoConCSDResponse" type="tns:timbradoConCSDResponse" />
<xs:element name="timbradoPrueba" type="tns:timbradoPrueba" />
<xs:element name="timbradoPruebaResponse" type="tns:timbradoPruebaResponse" />
<xs:element name="timbradoResponse" type="tns:timbradoResponse" />
<xs:complexType name="responderSolicitudCancelacionConOpciones">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="rfcReceptor" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="arregloUUID" nillable="true" type="xs:string" />
<xs:element minOccurs="0" name="cert" nillable="true" type="xs:base64Binary" />
<xs:element minOccurs="0" name="key" nillable="true" type="xs:base64Binary" />
<xs:element minOccurs="0" name="keyPass" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="opciones" nillable="true" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="responderSolicitudCancelacionConOpcionesResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="cfdiPorUUID">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="uuid" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="cfdiPorUUIDResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="timbrado">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="cfdiXml" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="opciones" nillable="true" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="timbradoResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="timbradoBase64">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="cfdiXmlBase64" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="opciones" nillable="true" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="timbradoBase64Response">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="acuseCancelacion">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="uuid" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="acuseCancelacionResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="timbradoBase64Prueba">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="cfdiXmlBase64" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="opciones" nillable="true" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="timbradoBase64PruebaResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="cancelarConOpciones">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="rfcEmisor" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="arregloUUID" nillable="true" type="xs:string" />
<xs:element minOccurs="0" name="cert" nillable="true" type="xs:base64Binary" />
<xs:element minOccurs="0" name="key" nillable="true" type="xs:base64Binary" />
<xs:element minOccurs="0" name="keyPass" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="opciones" nillable="true" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="cancelarConOpcionesResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="consultarEstatusComprobante">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="uuid" type="xs:string" />
<xs:element minOccurs="0" name="rfcEmisor" type="xs:string" />
<xs:element minOccurs="0" name="rfcReceptor" type="xs:string" />
<xs:element minOccurs="0" name="total" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="opciones" nillable="true" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="consultarEstatusComprobanteResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="consultarCfdiRelacionados">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="rfcEmisor" type="xs:string" />
<xs:element minOccurs="0" name="rfcReceptor" type="xs:string" />
<xs:element minOccurs="0" name="uuid" type="xs:string" />
<xs:element minOccurs="0" name="cert" nillable="true" type="xs:base64Binary" />
<xs:element minOccurs="0" name="key" nillable="true" type="xs:base64Binary" />
<xs:element minOccurs="0" name="keyPass" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="opciones" nillable="true" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="consultarCfdiRelacionadosResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="cancelar">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="rfcEmisor" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="arregloUUID" nillable="true" type="xs:string" />
<xs:element minOccurs="0" name="cert" nillable="true" type="xs:base64Binary" />
<xs:element minOccurs="0" name="key" nillable="true" type="xs:base64Binary" />
<xs:element minOccurs="0" name="keyPass" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="cancelarResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="consultarPeticionesPendientes">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="rfcReceptor" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="opciones" nillable="true" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="consultarPeticionesPendientesResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="consultarDisponibilidadServicio">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="consultarDisponibilidadServicioResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="tns:resultDisponibilidadServicio" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="resultDisponibilidadServicio">
<xs:sequence>
<xs:element minOccurs="0" name="mensaje" type="xs:string" />
<xs:element name="servicioOk" type="xs:boolean" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="timbradoConCSD">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="cfdiXml" type="xs:string" />
<xs:element minOccurs="0" name="cert" nillable="true" type="xs:base64Binary" />
<xs:element minOccurs="0" name="key" nillable="true" type="xs:base64Binary" />
<xs:element minOccurs="0" name="keyPass" type="xs:string" />
<xs:element name="prueba" type="xs:boolean" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="opciones" nillable="true" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="timbradoConCSDResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="timbradoPrueba">
<xs:sequence>
<xs:element minOccurs="0" name="contrato" type="xs:string" />
<xs:element minOccurs="0" name="usuario" type="xs:string" />
<xs:element minOccurs="0" name="passwd" type="xs:string" />
<xs:element minOccurs="0" name="cfdiXml" type="xs:string" />
<xs:element minOccurs="0" maxOccurs="unbounded" name="opciones" nillable="true" type="xs:string" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="timbradoPruebaResponse">
<xs:sequence>
<xs:element minOccurs="0" name="return" type="xs:string" />
</xs:sequence>
</xs:complexType>
</xs:schema>

10
App_WebReferences/PADE33/configuration.svcinfo Normal file
View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<configurationSnapshot xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="urn:schemas-microsoft-com:xml-wcfconfigurationsnapshot">
<behaviors />
<bindings>
<binding digest="System.ServiceModel.Configuration.BasicHttpBindingElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089:&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-16&quot;?&gt;&lt;Data name=&quot;PadeTimbradoServicePortBinding&quot; /&gt;" bindingType="basicHttpBinding" name="PadeTimbradoServicePortBinding" />
</bindings>
<endpoints>
<endpoint normalizedDigest="&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-16&quot;?&gt;&lt;Data address=&quot;http://timbrado.pade.mx:80/servicio/Timbrado3.3&quot; binding=&quot;basicHttpBinding&quot; bindingConfiguration=&quot;PadeTimbradoServicePortBinding&quot; contract=&quot;PADE33.PadeTimbradoService&quot; name=&quot;PadeTimbradoServicePort&quot; /&gt;" digest="&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-16&quot;?&gt;&lt;Data address=&quot;http://timbrado.pade.mx:80/servicio/Timbrado3.3&quot; binding=&quot;basicHttpBinding&quot; bindingConfiguration=&quot;PadeTimbradoServicePortBinding&quot; contract=&quot;PADE33.PadeTimbradoService&quot; name=&quot;PadeTimbradoServicePort&quot; /&gt;" contractName="PADE33.PadeTimbradoService" name="PadeTimbradoServicePort" />
</endpoints>
</configurationSnapshot>

201
App_WebReferences/PADE33/configuration91.svcinfo Normal file
View File

@@ -0,0 +1,201 @@
<?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="j1p3uyXhLIYSb0PWT7VKGW9Nx93nzxfX0cGMYZl0sJU=">
<bindingConfigurations>
<bindingConfiguration bindingType="basicHttpBinding" name="PadeTimbradoServicePortBinding">
<properties>
<property path="/name" isComplexType="false" isExplicitlyDefined="true" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>PadeTimbradoServicePortBinding</serializedValue>
</property>
<property path="/closeTimeout" isComplexType="false" isExplicitlyDefined="true" clrType="System.TimeSpan, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/openTimeout" isComplexType="false" isExplicitlyDefined="true" clrType="System.TimeSpan, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/receiveTimeout" isComplexType="false" isExplicitlyDefined="true" clrType="System.TimeSpan, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/sendTimeout" isComplexType="false" isExplicitlyDefined="true" clrType="System.TimeSpan, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/allowCookies" isComplexType="false" isExplicitlyDefined="true" clrType="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/bypassProxyOnLocal" isComplexType="false" isExplicitlyDefined="true" clrType="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/hostNameComparisonMode" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.HostNameComparisonMode, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>StrongWildcard</serializedValue>
</property>
<property path="/maxBufferPoolSize" isComplexType="false" isExplicitlyDefined="true" clrType="System.Int64, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/maxBufferSize" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>65536</serializedValue>
</property>
<property path="/maxReceivedMessageSize" isComplexType="false" isExplicitlyDefined="true" clrType="System.Int64, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/proxyAddress" isComplexType="false" isExplicitlyDefined="false" clrType="System.Uri, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/readerQuotas" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.XmlDictionaryReaderQuotasElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.XmlDictionaryReaderQuotasElement</serializedValue>
</property>
<property path="/readerQuotas/maxDepth" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>0</serializedValue>
</property>
<property path="/readerQuotas/maxStringContentLength" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>0</serializedValue>
</property>
<property path="/readerQuotas/maxArrayLength" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>0</serializedValue>
</property>
<property path="/readerQuotas/maxBytesPerRead" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>0</serializedValue>
</property>
<property path="/readerQuotas/maxNameTableCharCount" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>0</serializedValue>
</property>
<property path="/textEncoding" isComplexType="false" isExplicitlyDefined="false" clrType="System.Text.Encoding, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.Text.UTF8Encoding</serializedValue>
</property>
<property path="/transferMode" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.TransferMode, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>Buffered</serializedValue>
</property>
<property path="/useDefaultWebProxy" isComplexType="false" isExplicitlyDefined="true" clrType="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/messageEncoding" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.WSMessageEncoding, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>Text</serializedValue>
</property>
<property path="/security" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.BasicHttpSecurityElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.BasicHttpSecurityElement</serializedValue>
</property>
<property path="/security/mode" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.BasicHttpSecurityMode, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>None</serializedValue>
</property>
<property path="/security/transport" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.HttpTransportSecurityElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.HttpTransportSecurityElement</serializedValue>
</property>
<property path="/security/transport/clientCredentialType" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.HttpClientCredentialType, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>None</serializedValue>
</property>
<property path="/security/transport/proxyCredentialType" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.HttpProxyCredentialType, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>None</serializedValue>
</property>
<property path="/security/transport/extendedProtectionPolicy" isComplexType="true" isExplicitlyDefined="false" clrType="System.Security.Authentication.ExtendedProtection.Configuration.ExtendedProtectionPolicyElement, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.Security.Authentication.ExtendedProtection.Configuration.ExtendedProtectionPolicyElement</serializedValue>
</property>
<property path="/security/transport/extendedProtectionPolicy/policyEnforcement" isComplexType="false" isExplicitlyDefined="false" clrType="System.Security.Authentication.ExtendedProtection.PolicyEnforcement, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>Never</serializedValue>
</property>
<property path="/security/transport/extendedProtectionPolicy/protectionScenario" isComplexType="false" isExplicitlyDefined="false" clrType="System.Security.Authentication.ExtendedProtection.ProtectionScenario, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>TransportSelected</serializedValue>
</property>
<property path="/security/transport/extendedProtectionPolicy/customServiceNames" isComplexType="true" isExplicitlyDefined="false" clrType="System.Security.Authentication.ExtendedProtection.Configuration.ServiceNameElementCollection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>(Collection)</serializedValue>
</property>
<property path="/security/transport/realm" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/security/message" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.BasicHttpMessageSecurityElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.BasicHttpMessageSecurityElement</serializedValue>
</property>
<property path="/security/message/clientCredentialType" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.BasicHttpMessageCredentialType, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>UserName</serializedValue>
</property>
<property path="/security/message/algorithmSuite" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.Security.SecurityAlgorithmSuite, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>Default</serializedValue>
</property>
</properties>
</bindingConfiguration>
</bindingConfigurations>
<endpoints>
<endpoint name="PadeTimbradoServicePort" contract="PADE33.PadeTimbradoService" bindingType="basicHttpBinding" address="http://timbrado.pade.mx/servicio/Timbrado3.3" bindingConfiguration="PadeTimbradoServicePortBinding">
<properties>
<property path="/address" isComplexType="false" isExplicitlyDefined="true" clrType="System.Uri, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>http://timbrado.pade.mx:80/servicio/Timbrado3.3</serializedValue>
</property>
<property path="/behaviorConfiguration" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/binding" isComplexType="false" isExplicitlyDefined="true" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>basicHttpBinding</serializedValue>
</property>
<property path="/bindingConfiguration" isComplexType="false" isExplicitlyDefined="true" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>PadeTimbradoServicePortBinding</serializedValue>
</property>
<property path="/contract" isComplexType="false" isExplicitlyDefined="true" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>PADE33.PadeTimbradoService</serializedValue>
</property>
<property path="/headers" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.AddressHeaderCollectionElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.AddressHeaderCollectionElement</serializedValue>
</property>
<property path="/headers/headers" isComplexType="false" isExplicitlyDefined="true" clrType="System.ServiceModel.Channels.AddressHeaderCollection, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>&lt;Header /&gt;</serializedValue>
</property>
<property path="/identity" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.IdentityElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.IdentityElement</serializedValue>
</property>
<property path="/identity/userPrincipalName" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.UserPrincipalNameElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.UserPrincipalNameElement</serializedValue>
</property>
<property path="/identity/userPrincipalName/value" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/servicePrincipalName" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.ServicePrincipalNameElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.ServicePrincipalNameElement</serializedValue>
</property>
<property path="/identity/servicePrincipalName/value" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/dns" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.DnsElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.DnsElement</serializedValue>
</property>
<property path="/identity/dns/value" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/rsa" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.RsaElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.RsaElement</serializedValue>
</property>
<property path="/identity/rsa/value" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/certificate" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.CertificateElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.CertificateElement</serializedValue>
</property>
<property path="/identity/certificate/encodedValue" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/certificateReference" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.CertificateReferenceElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.CertificateReferenceElement</serializedValue>
</property>
<property path="/identity/certificateReference/storeName" isComplexType="false" isExplicitlyDefined="false" clrType="System.Security.Cryptography.X509Certificates.StoreName, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>My</serializedValue>
</property>
<property path="/identity/certificateReference/storeLocation" isComplexType="false" isExplicitlyDefined="false" clrType="System.Security.Cryptography.X509Certificates.StoreLocation, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>LocalMachine</serializedValue>
</property>
<property path="/identity/certificateReference/x509FindType" isComplexType="false" isExplicitlyDefined="false" clrType="System.Security.Cryptography.X509Certificates.X509FindType, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>FindBySubjectDistinguishedName</serializedValue>
</property>
<property path="/identity/certificateReference/findValue" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/certificateReference/isChainIncluded" isComplexType="false" isExplicitlyDefined="false" clrType="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>False</serializedValue>
</property>
<property path="/name" isComplexType="false" isExplicitlyDefined="true" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>PadeTimbradoServicePort</serializedValue>
</property>
<property path="/kind" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/endpointConfiguration" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
</properties>
</endpoint>
</endpoints>
</SavedWcfConfigurationInformation>

3
Bancos/IE.aspx.vb
View File

@@ -1118,8 +1118,9 @@ Partial Class Bancos_IE
End If End If
'DATOS DE CANCELACION 'DATOS DE CANCELACION
If ObjIE.CveEstatusIE = 2 Then If ObjIE.CveEstatusIE = 2 OrElse (ObjIE.CveEstatusIE = 1 AndAlso ObjIE.CveIECancelacion > 0) Then
TabCancelacion.Visible = True TabCancelacion.Visible = True
LbUsuarioCancelacion.Text = ObjIE.UsuarioCancelacion LbUsuarioCancelacion.Text = ObjIE.UsuarioCancelacion
LbFechaCancelacion.Text = ObjIE.FechaCancelacion.ToShortDateString LbFechaCancelacion.Text = ObjIE.FechaCancelacion.ToShortDateString

7
CRM/Acercamiento.aspx
View File

@@ -405,12 +405,15 @@
</div> </div>
<%-- style="padding-bottom: 17px;" --%> <%-- style="padding-bottom: 17px;" --%>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtDescripcion" CssClass="form-control MultiLineTextBox" onkeyDown="checkTextAreaMaxLength(this,event,'200');" TextMode="MultiLine" Rows="3" CausesValidation="true" runat="server" MaxLength="200"></asp:TextBox> <asp:TextBox ID="TxtDescripcion" CssClass="form-control MultiLineTextBox" onkeyDown="checkTextAreaMaxLength(this,event,'200');" TextMode="MultiLine" Rows="2" CausesValidation="true" runat="server" MaxLength="200"></asp:TextBox>
<%--<asp:RequiredFieldValidator ID="RFVDescripcion" runat="server" ControlToValidate="TxtDescripcion" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>--%> <%--<asp:RequiredFieldValidator ID="RFVDescripcion" runat="server" ControlToValidate="TxtDescripcion" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>--%>
<label style="height: 83px;" for="<%= TxtDescripcion.ClientID.ToString()%>">Descripción del Proyecto:</label> <label style="height: 83px;" for="<%= TxtDescripcion.ClientID.ToString()%>">Descripción del Proyecto:</label>
<i></i> <i></i>
</div> </div>
<div class="form-group form-md-line-input input-iconright">
<label style="color:#888888" for="<%= DdlPS.ClientID.ToString()%>">Producto Servicio:</label>
<ADS:Dropdownlost runat="server" ID="DdlPS" CssStyle="width:100%" CssClassDdl="form-control select2me" DataTextField="PSCodigo" DataValueField="CvePS" />
</div>
</div> </div>
</div> </div>
</div> </div>

30
CRM/Acercamiento.aspx.cs
View File

@@ -234,6 +234,18 @@ public partial class CRM_Acercamiento : ClsPaginas
ViewState["CveAcercamientoGasto"] = value; ViewState["CveAcercamientoGasto"] = value;
} }
} }
private int CvePS
{
get
{
return ViewState["CvePS"] == null ? -1 : ViewState["CvePS"].ToString().ToEntero();
}
set
{
ViewState["CvePS"] = value;
}
}
#endregion #endregion
protected void Page_Load(object sender, EventArgs e) protected void Page_Load(object sender, EventArgs e)
@@ -269,6 +281,7 @@ public partial class CRM_Acercamiento : ClsPaginas
} }
} }
} }
CargarPS();
} }
} }
@@ -322,6 +335,8 @@ public partial class CRM_Acercamiento : ClsPaginas
CveEncuestaAplicadaProceso = (ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaAplicadaProceso").ToEntero() > 0) ? ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaAplicadaProceso").ToEntero() : -1; CveEncuestaAplicadaProceso = (ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaAplicadaProceso").ToEntero() > 0) ? ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaAplicadaProceso").ToEntero() : -1;
//CveEtapaBitacoraSeleccionada = CveEtapaActual; //CveEtapaBitacoraSeleccionada = CveEtapaActual;
CvePS = ObjCRM.DtResultados.FiltroPrimeroValor("CvePS").ToEntero();
HdfEtapaSeleccionada.Value = CveEtapaActual.ToString(); HdfEtapaSeleccionada.Value = CveEtapaActual.ToString();
//INHABILITAMOS CAMPOS QUE NO SE PUEDEN EDITAR //INHABILITAMOS CAMPOS QUE NO SE PUEDEN EDITAR
DdlEmpresaCRM.Enabled = false; DdlEmpresaCRM.Enabled = false;
@@ -556,6 +571,17 @@ public partial class CRM_Acercamiento : ClsPaginas
if (DTEtapasProceso.FiltroPrimeroValor("CveTipoEtapa", String.Format("CveEtapaProceso = {0}", DdlEtapaProceso.SelectedValue.ToEntero())).Contiene("1", "2", "3")) if (DTEtapasProceso.FiltroPrimeroValor("CveTipoEtapa", String.Format("CveEtapaProceso = {0}", DdlEtapaProceso.SelectedValue.ToEntero())).Contiene("1", "2", "3"))
GuardarCambioEtapa(); GuardarCambioEtapa();
} }
private void CargarPS()
{
DdlPS.setEsWebService(true);
if(CvePS > 0)
{
string productoAsignado = get_GlobalDTPSSimplificado(UsuarioActual.CveEmpresa, CvePS: CvePS).FiltroPrimeroValor("PSCodigo");
DdlPS.SelectedValue = CvePS.ToString();
DdlPS.SelectedText = productoAsignado;
}
}
#endregion #endregion
#region "GUARDAR" #region "GUARDAR"
@@ -605,7 +631,7 @@ public partial class CRM_Acercamiento : ClsPaginas
} }
if ((CveEncuestaAplicadaProceso != 0) && ObjCRM.UpdateAcercamiento(CveAcercamiento, CveContactoPrincipal, CveTipoProceso, CveEtapaProcesoActualActualizar, CveVendedor, CveMedioCaptacion, CveProbabilidadAcercamiento, if ((CveEncuestaAplicadaProceso != 0) && ObjCRM.UpdateAcercamiento(CveAcercamiento, CveContactoPrincipal, CveTipoProceso, CveEtapaProcesoActualActualizar, CveVendedor, CveMedioCaptacion, CveProbabilidadAcercamiento,
NombreAcercamiento, Descripcion, Importe, Comision, Prioridad, UsuarioActual.CveUsuario, CveEncuestaAplicadaProceso: CveEncuestaAplicadaProceso, FechaApertura: FechaApertura, FechaCierre: FechaCierre)) NombreAcercamiento, Descripcion, Importe, Comision, Prioridad, UsuarioActual.CveUsuario, CveEncuestaAplicadaProceso: CveEncuestaAplicadaProceso, FechaApertura: FechaApertura, FechaCierre: FechaCierre, CvePS:DdlPS.SelectedValue.ToEntero()))
{ {
//String MensajeBitacora = (CveEtapaProcesoActualActualizar != CveEtapaActual) ? String.Format("Se actualizó la etapa del acercamiento a {0}.", DTEtapasProceso.FiltroPrimeroValor("EtapaProceso", "CveEtapaProceso = " + CveEtapaProcesoActualActualizar)) : String.Format("Se actualizó el Acercamiento {0} con Vendedor {2} y Contacto Principal {3}.", NombreAcercamiento, DdlTipoProceso.SelectedItem, DdlVendedor.SelectedItem, DdlContactoPrincipal.SelectedValue == "-1" ? "aun no asignado" : DdlContactoPrincipal.SelectedItem.Text); //String MensajeBitacora = (CveEtapaProcesoActualActualizar != CveEtapaActual) ? String.Format("Se actualizó la etapa del acercamiento a {0}.", DTEtapasProceso.FiltroPrimeroValor("EtapaProceso", "CveEtapaProceso = " + CveEtapaProcesoActualActualizar)) : String.Format("Se actualizó el Acercamiento {0} con Vendedor {2} y Contacto Principal {3}.", NombreAcercamiento, DdlTipoProceso.SelectedItem, DdlVendedor.SelectedItem, DdlContactoPrincipal.SelectedValue == "-1" ? "aun no asignado" : DdlContactoPrincipal.SelectedItem.Text);
@@ -671,7 +697,7 @@ public partial class CRM_Acercamiento : ClsPaginas
int CveUsuarioIng = UsuarioActual.CveUsuario; int CveUsuarioIng = UsuarioActual.CveUsuario;
if (ObjCRM.UpdateAcercamiento(CveAcercamiento, CveContactoPrincipal, CveTipoProceso, CveEtapaProcesoActualActualizar, CveVendedor, CveMedioCaptacion, CveProbabilidadAcercamiento, if (ObjCRM.UpdateAcercamiento(CveAcercamiento, CveContactoPrincipal, CveTipoProceso, CveEtapaProcesoActualActualizar, CveVendedor, CveMedioCaptacion, CveProbabilidadAcercamiento,
NombreAcercamiento, Descripcion, Importe, Comision, Prioridad, UsuarioActual.CveUsuario, CveEncuestaAplicadaProceso: CveEncuestaAplicadaProceso, FechaApertura: FechaApertura, FechaCierre: FechaCierre)) NombreAcercamiento, Descripcion, Importe, Comision, Prioridad, UsuarioActual.CveUsuario, CveEncuestaAplicadaProceso: CveEncuestaAplicadaProceso, FechaApertura: FechaApertura, FechaCierre: FechaCierre, CvePS: DdlPS.SelectedValue.ToEntero()))
{ {
CveEtapaActual = CveEtapaProcesoActualActualizar; CveEtapaActual = CveEtapaProcesoActualActualizar;
HdfEtapaSeleccionada.Value = CveEtapaProcesoActualActualizar.ToString(); HdfEtapaSeleccionada.Value = CveEtapaProcesoActualActualizar.ToString();

11
CRM/EmpresaCRM.aspx
View File

@@ -109,6 +109,11 @@
<asp:RequiredFieldValidator ID="RFVSubProyecto" CssClass="help-block errorimput" runat="server" ControlToValidate="DdlSucursales" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Sucursal''</b> es necesario." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RFVSubProyecto" CssClass="help-block errorimput" runat="server" ControlToValidate="DdlSucursales" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Sucursal''</b> es necesario." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
</div> </div>
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlGiroClasificacion" Width="50%" runat="server" DataValueField="CveClienteClasificacion" DataTextField="ClienteClasificacion" AppendDataBoundItems="true" CssClass="form-control input-sm select2me"></asp:DropDownList>
<label for="<%=DdlGiroClasificacion.ClientID.ToString()%>">Giro:</label>
</div>
<%-- DATOS DINAMICOS - TABLA ENCUESTA --%> <%-- DATOS DINAMICOS - TABLA ENCUESTA --%>
<asp:UpdatePanel ID="UpDatosTecnicos" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpDatosTecnicos" runat="server" UpdateMode="Conditional">
@@ -676,6 +681,12 @@
</div> </div>
</div> </div>
<div class="row">
<div class="form-group col-md-6 form-md-line-input input-iconright">
<label style="color:#888888" for="<%= DdlPS.ClientID.ToString()%>">Producto Servicio:</label>
<ADS:Dropdownlost runat="server" ID="DdlPS" CssStyle="width:100%" CssClassDdl="form-control select2me" DataTextField="PSCodigo" DataValueField="CvePS" />
</div>
</div>
</div> </div>

38
CRM/EmpresaCRM.aspx.cs
View File

@@ -217,6 +217,19 @@ public partial class CRM_EmpresaCRM : ClsPaginas
ViewState["DtProbabilidadAcercamiento"] = value; ViewState["DtProbabilidadAcercamiento"] = value;
} }
} }
private int CveGiroClasificacion
{
get
{
return ViewState["CveGiroClasificacion"].ToString().ToEntero();
}
set
{
ViewState["CveGiroClasificacion"] = value;
}
}
#endregion #endregion
protected void Page_Load(object sender, EventArgs e) protected void Page_Load(object sender, EventArgs e)
@@ -237,6 +250,8 @@ public partial class CRM_EmpresaCRM : ClsPaginas
CargaDatosTecnicos(); CargaDatosTecnicos();
} }
VerificaPermisos(); VerificaPermisos();
CargaClasificaciones();
DdlPS.setEsWebService(true);
} }
} }
@@ -274,7 +289,7 @@ public partial class CRM_EmpresaCRM : ClsPaginas
{ {
string Mensaje = ""; string Mensaje = "";
//DATOS GENERALES //DATOS GENERALES
CveEmpresaCRM = ObjCRM.AddEmpresaCRM(NombreEmpresa, RFC, CveMedioCaptacion, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, CveEncuestaAplicada, CveVendedorActualizar, CveSubProyecto, Correo); CveEmpresaCRM = ObjCRM.AddEmpresaCRM(NombreEmpresa, RFC, CveMedioCaptacion, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, CveEncuestaAplicada, CveVendedorActualizar, CveSubProyecto, Correo, DdlGiroClasificacion.SelectedValue.ToEntero());
if (CveEmpresaCRM > 0) if (CveEmpresaCRM > 0)
{ {
@@ -321,7 +336,7 @@ public partial class CRM_EmpresaCRM : ClsPaginas
CveEncuestaAplicada = GuardaDatosTecnicos(ObjDatosTecnicos, CveEncuestaAplicada); CveEncuestaAplicada = GuardaDatosTecnicos(ObjDatosTecnicos, CveEncuestaAplicada);
} }
if ((CveEncuestaAplicada != 0) && ObjCRM.UpdateEmpresCRM(NombreEmpresa, RFC, CveMedioCaptacion, CveEmpresaCRM, CveVendedorActualizar, UsuarioActual.CveUsuario, CveSubProyecto: CveSubProyecto, Correo: Correo)) if ((CveEncuestaAplicada != 0) && ObjCRM.UpdateEmpresCRM(NombreEmpresa, RFC, CveMedioCaptacion, CveEmpresaCRM, CveVendedorActualizar, UsuarioActual.CveUsuario, CveSubProyecto: CveSubProyecto, Correo: Correo,CveGiroClasificacion:DdlGiroClasificacion.SelectedValue.ToEntero()))
{ {
if (!ObjBitacora.AddEventoBitacora(String.Format("Se actualizó la empresa {0} con RFC {1}", NombreEmpresa, RFC), "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveEmpresaCRM: CveEmpresaCRM)) if (!ObjBitacora.AddEventoBitacora(String.Format("Se actualizó la empresa {0} con RFC {1}", NombreEmpresa, RFC), "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveEmpresaCRM: CveEmpresaCRM))
{ {
@@ -628,8 +643,9 @@ public partial class CRM_EmpresaCRM : ClsPaginas
CveVendedor = ObjCRM.DtResultados.FiltroPrimeroValor("CveVendedorAsignado").ToEntero(); CveVendedor = ObjCRM.DtResultados.FiltroPrimeroValor("CveVendedorAsignado").ToEntero();
CveSubProyecto = ObjCRM.DtResultados.FiltroPrimeroValor("CveSubProyecto").ToEntero(); CveSubProyecto = ObjCRM.DtResultados.FiltroPrimeroValor("CveSubProyecto").ToEntero();
CveCliente = ObjCRM.DtResultados.FiltroPrimeroValor("CveCliente").ToEntero(); CveCliente = ObjCRM.DtResultados.FiltroPrimeroValor("CveCliente").ToEntero();
CveGiroClasificacion = ObjCRM.DtResultados.FiltroPrimeroValor("CveGiroClasificacion").ToEntero();
if(!(CveCliente > 0)) if (!(CveCliente > 0))
{ {
HplCrearCliente.Visible = true; HplCrearCliente.Visible = true;
HplCrearCliente.NavigateUrl = String.Format("/Ventas/Clientes.aspx?CveEmpresaCRM={0}", CveEmpresaCRM); HplCrearCliente.NavigateUrl = String.Format("/Ventas/Clientes.aspx?CveEmpresaCRM={0}", CveEmpresaCRM);
@@ -652,6 +668,8 @@ public partial class CRM_EmpresaCRM : ClsPaginas
BtnEliminarEmpresa.Enabled = false; BtnEliminarEmpresa.Enabled = false;
DivBitacora.Visible = false; DivBitacora.Visible = false;
CveGiroClasificacion = -1;
} }
ObjCRM.Dispose(); ObjCRM.Dispose();
@@ -665,6 +683,7 @@ public partial class CRM_EmpresaCRM : ClsPaginas
else else
{ {
CreaTempDTContactos(); CreaTempDTContactos();
CveGiroClasificacion = -1;
} }
DdlVendedorAsignado.SelectedValueExist(CveVendedor); DdlVendedorAsignado.SelectedValueExist(CveVendedor);
@@ -1429,7 +1448,7 @@ public partial class CRM_EmpresaCRM : ClsPaginas
if (ObjCRM.DtResultados.Rows.Count > 0) if (ObjCRM.DtResultados.Rows.Count > 0)
{ {
CveAcercamiento = ObjCRM.AddAcercamiento(CveEmpresaCRM, CveContactoPrincipal, CveTipoProceso, CveEtapaProcesoActual, CveVendedor, CveMedioCaptacion, CveRechazoMotivo, CveProbabilidadAcercamiento, CveAcercamiento = ObjCRM.AddAcercamiento(CveEmpresaCRM, CveContactoPrincipal, CveTipoProceso, CveEtapaProcesoActual, CveVendedor, CveMedioCaptacion, CveRechazoMotivo, CveProbabilidadAcercamiento,
FechaApertura, NombreAcercamiento, Descripcion, Importe, Comision, Prioridad, UsuarioActual.CveEmpresa, CveUsuarioIng); FechaApertura, NombreAcercamiento, Descripcion, Importe, Comision, Prioridad, UsuarioActual.CveEmpresa, CveUsuarioIng, CvePS:DdlPS.SelectedValue.ToEntero());
}else }else
{ {
Alert("No tiene 'Etapa Proceso' con el 'Proceso' seleccionado al agregar el Acercamiento",ModExtensiones.TipoMensaje.MsgAdvertencia); Alert("No tiene 'Etapa Proceso' con el 'Proceso' seleccionado al agregar el Acercamiento",ModExtensiones.TipoMensaje.MsgAdvertencia);
@@ -1487,7 +1506,9 @@ public partial class CRM_EmpresaCRM : ClsPaginas
BtnEliminarEmpresa.Visible = false; BtnEliminarEmpresa.Visible = false;
if (!UsuarioActual.TienePermisoProceso(251)) if (!UsuarioActual.TienePermisoProceso(251))
{
LnkAgregarAcercamiento.Visible = false; LnkAgregarAcercamiento.Visible = false;
}
if ((UsuarioActual.CveVendedor != CveVendedor)) if ((UsuarioActual.CveVendedor != CveVendedor))
{ {
@@ -1545,4 +1566,13 @@ public partial class CRM_EmpresaCRM : ClsPaginas
CargaMetodosCaptacion(); CargaMetodosCaptacion();
UpDatos.Update(); UpDatos.Update();
} }
private void CargaClasificaciones()
{
DataTable dtGiroClasificaciones = get_GlobalDTClienteClasificaciones(UsuarioActual.CveEmpresa);
DdlGiroClasificacion.DataSource = dtGiroClasificaciones;
DdlGiroClasificacion.DataBind();
DdlGiroClasificacion.Items.Insert(0, new ListItem("Seleccione", "-1"));
DdlGiroClasificacion.SelectedValueExist(CveGiroClasificacion);
}
} }

17
CRM/RepAcercamientos.aspx
View File

@@ -20,7 +20,7 @@
<div class="portlet-title portlet-filterT smalltitle"> <div class="portlet-title portlet-filterT smalltitle">
<div class="tools"> <div class="tools">
<asp:Button ID="BtnConsultar" runat="server" Text="Consultar" OnClick="BtnConsultar_Click" class="btn btn-primary" ValidationGroup="Valida" /> <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" OnClick="BtnConsultar_Click" class="btn btn-primary" ValidationGroup="Valida" />
<%--<a href="javascript:;" class="expand"></a>--%> <a href="javascript:;" class="expand"></a>
</div> </div>
<div class="titlefiltros caption"> <div class="titlefiltros caption">
@@ -54,13 +54,24 @@
<ajax:CalendarExtender runat="server" ID="CEFechaSolicitudF" TargetControlID="TxtFechaFin" PopupButtonID="imgFechaFin" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender> <ajax:CalendarExtender runat="server" ID="CEFechaSolicitudF" TargetControlID="TxtFechaFin" PopupButtonID="imgFechaFin" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
</div> </div>
<label class="col-md-1" style="width: 30px; margin-top: 5px;">PS:</label>
<div class="col-md-2">
<div style="width:100%">
<ADS:Dropdownlost runat="server" Width="100%" ID="DdlPS" CssClassDdl="table-group-action-input form-control input-inline input-small input-sm select2me" DataTextField="PSCodigo" DataValueField="CvePS" />
</div>
</div>
</div> </div>
</div> </div>
</div> </div>
<%-- <div class="portlet-body" style="display: none;"> <div class="portlet-body" style="display: none;">
<div class="row" style="margin-left: 10px; margin-top: 10px;"> <div class="row" style="margin-left: 10px; margin-top: 10px;">
<label class="col-md-1" style="width: 90px;"">Giro:</label>
<div class="col-md-2">
<asp:DropDownList ID="DdlGiroClasificacion" Width="100%" runat="server" DataValueField="CveClienteClasificacion" DataTextField="ClienteClasificacion" AppendDataBoundItems="true" CssClass="form-control input-sm select2me"></asp:DropDownList>
</div>
</div> </div>
</div>--%> </div>
</div> </div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>

13
CRM/RepAcercamientos.aspx.cs
View File

@@ -5,6 +5,7 @@ using System.Web;
using System.Web.UI; using System.Web.UI;
using System.Web.UI.WebControls; using System.Web.UI.WebControls;
using Extensiones; using Extensiones;
using System.Data;
public partial class CRM_RepAcercamientos : ClsPaginas public partial class CRM_RepAcercamientos : ClsPaginas
{ {
@@ -42,13 +43,13 @@ public partial class CRM_RepAcercamientos : ClsPaginas
{ {
CveVendedor = DdlVendedor.SelectedValue.ToEntero(); CveVendedor = DdlVendedor.SelectedValue.ToEntero();
if (CveVendedor > 0) if (true)
{ {
string FechaInicio = TxtFechaInicio.Text == "" ? "-1" : TxtFechaInicio.Text; string FechaInicio = TxtFechaInicio.Text == "" ? "-1" : TxtFechaInicio.Text;
string FechaFin = TxtFechaFin.Text == "" ? "-1" : TxtFechaFin.Text; string FechaFin = TxtFechaFin.Text == "" ? "-1" : TxtFechaFin.Text;
int CvePS = DdlPS.SelectedValue.ToEntero() == 0 ? -1 : DdlPS.SelectedValue.ToEntero();
ClsCRM ObjCRM = new ClsCRM(); ClsCRM ObjCRM = new ClsCRM();
if (ObjCRM.GetAcercamiento(UsuarioActual.CveEmpresa, CveVendedor: CveVendedor, FechaInicio: FechaInicio, FechaFin: FechaFin)) if (ObjCRM.GetAcercamiento(UsuarioActual.CveEmpresa, CveVendedor: CveVendedor, FechaInicio: FechaInicio, FechaFin: FechaFin, CvePS: CvePS, CveGiroClasificacion:DdlGiroClasificacion.SelectedValue.ToEntero()))
{ {
GVDatos.DataSource = ObjCRM.DtResultados; GVDatos.DataSource = ObjCRM.DtResultados;
GVDatos.DataBind(); GVDatos.DataBind();
@@ -84,6 +85,12 @@ public partial class CRM_RepAcercamientos : ClsPaginas
//CALCULAMOS EL INTERVALO DE LA SEMANA ACTUAL //CALCULAMOS EL INTERVALO DE LA SEMANA ACTUAL
TxtFechaInicio.Text = DateTime.Now.AddDays(-((int)DateTime.Now.DayOfWeek) + 1).ToShortDateString(); TxtFechaInicio.Text = DateTime.Now.AddDays(-((int)DateTime.Now.DayOfWeek) + 1).ToShortDateString();
//TxtFechaFin.Text = DateTime.Now.AddDays((7 - (int)DateTime.Now.DayOfWeek)).ToShortDateString(); //TxtFechaFin.Text = DateTime.Now.AddDays((7 - (int)DateTime.Now.DayOfWeek)).ToShortDateString();
DdlPS.setEsWebService(true);
DataTable dtGiroClasificaciones = get_GlobalDTClienteClasificaciones(UsuarioActual.CveEmpresa);
DdlGiroClasificacion.DataSource = dtGiroClasificaciones;
DdlGiroClasificacion.DataBind();
DdlGiroClasificacion.Items.Insert(0, new ListItem("Seleccione", "-1"));
} }
#endregion #endregion
} }

63
Compras/Compras.aspx.vb
View File

@@ -1837,25 +1837,25 @@ Partial Class Compras_Compras
'TmpDT.Columns.Add("IEPSPSPorcentaje") 'TmpDT.Columns.Add("IEPSPSPorcentaje")
'TmpDT.Columns.Add("IEPSPSIVAPorcentaje") 'TmpDT.Columns.Add("IEPSPSIVAPorcentaje")
SubTotalConceptos = Math.Round(TmpDT.SUM("Total"), 2).ToDecimal SubTotalConceptos = Math.Round(TmpDT.SUM("Total"), 2).ToDecimal
AddPS2(False) AddPS2(False)
'VALIDA QUE EL XML SI VIENE CON EL CODIGO SAT 01010101 'VALIDA QUE EL XML SI VIENE CON EL CODIGO SAT 01010101
Dim ProductosCodigoSATNoPermitidos As New StringBuilder("") Dim ProductosCodigoSATNoPermitidos As New StringBuilder("")
For Each drr As DataRow In TmpDT.FiltraParametros("ClaveProdServ = '01010101'").Rows For Each drr As DataRow In TmpDT.FiltraParametros("ClaveProdServ = '01010101'").Rows
ProductosCodigoSATNoPermitidos.AppendFormat("{0}</br>", drr("PS")) ProductosCodigoSATNoPermitidos.AppendFormat("{0}</br>", drr("PS"))
Next Next
If ProductosCodigoSATNoPermitidos.ToString.Length > 0 Then If ProductosCodigoSATNoPermitidos.ToString.Length > 0 Then
Dim mensajeAdvertencia As String = String.Format("El comprobante contiene productos con código SAT '01010101', revise los productos:</br></br>{0}", ProductosCodigoSATNoPermitidos.ToString) Dim mensajeAdvertencia As String = String.Format("El comprobante contiene productos con código SAT '01010101', revise los productos:</br></br>{0}", ProductosCodigoSATNoPermitidos.ToString)
Alert(mensajeAdvertencia, TipoMensaje.MsgAdvertencia) Alert(mensajeAdvertencia, TipoMensaje.MsgAdvertencia)
End If
End If End If
Else
End If
Else
CargaConceptosXML(XMLDoc) CargaConceptosXML(XMLDoc)
End If End If
@@ -4714,7 +4714,7 @@ Partial Class Compras_Compras
ViewState("CveCompra") = ObjCompras.CveCompra ViewState("CveCompra") = ObjCompras.CveCompra
If ObjCompras.DtResultados.Rows.Count > 0 Then ViewState("CompraFolio") = ObjCompras.DtResultados.Rows(0)("vFolio").ToString If ObjCompras.DtResultados.Rows.Count > 0 Then ViewState("CompraFolio") = ObjCompras.DtResultados.Rows(0)("vFolio").ToString
If DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") Then If DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") Then
Devolucion = guardardevolucion(ObjInventario, ObjCompras.CveCompra, TxtSubTotal.Text.ToDouble, TxtFecha.Text.Trim.ToDate) Devolucion = guardardevolucion(ObjInventario, ObjCompras.CveCompra, TxtSubTotal.Text.ToDecimal, TxtFecha.Text.Trim.ToDate)
TieneError = Devolucion.TieneError TieneError = Devolucion.TieneError
End If End If
@@ -7143,6 +7143,10 @@ Partial Class Compras_Compras
End If End If
End If End If
If CveCompraRefacturacion > 0 Then
importeMovimiento = 0
importeMN = 0
End If
Case 59 'Documentos Case 59 'Documentos
importeMovimiento = importeCreditos importeMovimiento = importeCreditos
@@ -14268,7 +14272,7 @@ Partial Class Compras_Compras
'*se envia true si hubo un error*' '*se envia true si hubo un error*'
Private Function guardardevolucion(ObjInventario As ClsInventarios, CveCompra As Integer, subtotal As Double, Fecha As Date) As MMensajeDevolucion Private Function guardardevolucion(ObjInventario As ClsInventarios, CveCompra As Integer, subtotal As Decimal, Fecha As Date) As MMensajeDevolucion
Dim ErrorMovInv As Boolean = False Dim ErrorMovInv As Boolean = False
Dim CveAlmacen As Integer = DdlAlmacenDevolucion.SelectedValue.ToEntero() Dim CveAlmacen As Integer = DdlAlmacenDevolucion.SelectedValue.ToEntero()
Dim subtotaldevolucion As Double = 0 Dim subtotaldevolucion As Double = 0
@@ -14276,6 +14280,7 @@ Partial Class Compras_Compras
Dim CveMovimientoEntrada As Integer = -1 Dim CveMovimientoEntrada As Integer = -1
'Calculo los subtotales para comparar con la NC 'Calculo los subtotales para comparar con la NC
Dim cantidad As Double = 0.0 Dim cantidad As Double = 0.0
Dim TotalAlmacen As Decimal = 0
For Each Dr As GridViewRow In GVDevolucion.Rows For Each Dr As GridViewRow In GVDevolucion.Rows
'CveAlmacen = Dr.DataKey("CveAlmacen").ToString.ToEntero 'CveAlmacen = Dr.DataKey("CveAlmacen").ToString.ToEntero
@@ -14295,14 +14300,24 @@ Partial Class Compras_Compras
If CveMovimientoEntrada <= 0 Then If CveMovimientoEntrada <= 0 Then
ErrorMovInv = True ErrorMovInv = True
Else Else
Dim Acumulado As Decimal = 0
Dim PU As Decimal = 0
For Each Dr As GridViewRow In GVDevolucion.Rows For Each Dr As GridViewRow In GVDevolucion.Rows
If Dr.FCTextBox("TxtCantidad").Text.ToDouble > 0 Then If Dr.FCTextBox("TxtCantidad").Text.ToDouble > 0 Then
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoEntrada, Dr.FCTextBox("TxtCantidad").Text.ToDouble, Dr.DataKey("CveUM").ToString.ToEntero, Dr.DataKey("CvePS").ToString.ToEntero, Dr.DataKey("PU").ToString.ToDecimal, -1, CveMovimientoDetalleEntrada:=Dr.DataKey("CveMovimientoDetalle").ToString.ToEntero) Then Acumulado += (Dr.FCTextBox("TxtCantidad").Text.ToDecimal * Dr.DataKey("PU").ToString.ToDecimal)
PU = Dr.DataKey("PU").ToString.ToDecimal
If subtotal < Acumulado Then
Dim dif As Decimal = subtotal - Acumulado
PU = (((Dr.FCTextBox("TxtCantidad").Text.ToDecimal * Dr.DataKey("PU").ToString.ToDecimal)) + dif) / Dr.FCTextBox("TxtCantidad").Text.ToDecimal
End If
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoEntrada, Dr.FCTextBox("TxtCantidad").Text.ToDouble, Dr.DataKey("CveUM").ToString.ToEntero, Dr.DataKey("CvePS").ToString.ToEntero, PU, -1, CveMovimientoDetalleEntrada:=Dr.DataKey("CveMovimientoDetalle").ToString.ToEntero) Then
ErrorMovInv = True ErrorMovInv = True
Exit For Exit For
End If End If
End If End If
Next Next
End If End If
Else Else
ErrorMovInv = True ErrorMovInv = True
@@ -14364,18 +14379,18 @@ Partial Class Compras_Compras
'End Sub 'End Sub
Protected Sub BtnVinculaDevolucion_Click(sender As Object, e As EventArgs) Protected Sub BtnVinculaDevolucion_Click(sender As Object, e As EventArgs)
Try Try
Dim subtotaldevolucion As Double = 0 Dim subtotaldevolucion As Decimal = 0
Dim realizadevolucion As Boolean = False Dim realizadevolucion As Boolean = False
'Calculo los subtotales para comparar con la NC 'Calculo los subtotales para comparar con la NC
Dim cantidad As Double = 0.0 Dim cantidad As Decimal = 0
For Each Dr As GridViewRow In GVDevolucion.Rows For Each Dr As GridViewRow In GVDevolucion.Rows
cantidad = Dr.FCTextBox("TxtCantidad").Text.ToDouble cantidad = Dr.FCTextBox("TxtCantidad").Text.ToDecimal
If cantidad > 0 Then If cantidad > 0 Then
realizadevolucion = True realizadevolucion = True
subtotaldevolucion += Dr.DataKey("PU").ToString.ToDouble * cantidad subtotaldevolucion += Dr.DataKey("PU").ToString.ToDecimal * cantidad
End If End If
Next Next
@@ -14409,6 +14424,7 @@ Partial Class Compras_Compras
Dim IEPSCompra As Decimal = TxtIEPS.Text.ToDecimal() Dim IEPSCompra As Decimal = TxtIEPS.Text.ToDecimal()
Dim RetIVACompra As Decimal = TxtRetIVA.Text.ToDecimal() Dim RetIVACompra As Decimal = TxtRetIVA.Text.ToDecimal()
Dim RetISRCompra As Decimal = TxtRetISR.Text.ToDecimal() Dim RetISRCompra As Decimal = TxtRetISR.Text.ToDecimal()
Dim Acumulado As Decimal = 0
'Dim TotalCalculable As Decimal = TotalCompra - IEPSCompra + RetIVACompra + RetISRCompra 'Dim TotalCalculable As Decimal = TotalCompra - IEPSCompra + RetIVACompra + RetISRCompra
@@ -14438,6 +14454,15 @@ Partial Class Compras_Compras
Dim IVA As Decimal = IVAPorcentajeCompra 'Math.Round(Total * IVAPorcentajeCompra, 2) Dim IVA As Decimal = IVAPorcentajeCompra 'Math.Round(Total * IVAPorcentajeCompra, 2)
Dim Descuento As Decimal = 0 Dim Descuento As Decimal = 0
Acumulado += (PU * Cantidad)
If SubTotalCompra < Acumulado Then
'ajusta el valor
Dim dif As Decimal = SubTotalCompra - Acumulado
PU = ((PU * Cantidad) + dif) / Cantidad
Total = Cantidad * PU
End If
AddPS(Cantidad, CveUM, UM, CveClasificacion, Clasificacion, CvePS, PS, CveTipoPS, CveSubProyectoContrato, SubProyecto, Proyecto, CveProyecto, Obs, PU, Total, IVA, 0, 0, 0, 0, Descuento, -1, False) AddPS(Cantidad, CveUM, UM, CveClasificacion, Clasificacion, CvePS, PS, CveTipoPS, CveSubProyectoContrato, SubProyecto, Proyecto, CveProyecto, Obs, PU, Total, IVA, 0, 0, 0, 0, Descuento, -1, False)
End If End If

22
Inventarios/TraspasoAlmacen.aspx.vb
View File

@@ -1889,10 +1889,14 @@ Partial Class Inventarios_TraspasoAlmacen
Exit For Exit For
End If End If
'MOV, Alm, Transito 'MOV, Alm, Transito
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoSalidaTransitorio, gvr.FCTextBox("TxtCantidad").Text.ToString.ToDecimal, gvr.DataKey("CveUM").ToString.ToEntero, gvr.DataKey("CvePS").ToString.ToEntero, PrecioEntrada, CveAF:=gvr.DataKey("CveAF").ToString.ToEntero, CveSeccionAlmacen:=gvr.FCDropDownList("DdlSeccionAlmacen").SelectedValue.ToEntero, Serie:=gvr.DataKey("Serie").ToString, Lote:=gvr.DataKey("Lote").ToString, FechaCaducidad:=gvr.DataKey("FechaCaducidad").ToDate, CveMovimientoDetalleEntrada:=gvr.DataKey("CveMovimientoDetalleTransitorio").ToString.ToEntero) Then If gvr.DataKey("CveMovimientoDetalleTransitorio").ToString.ToEntero > 0 Then
ErrorMovInv = True If Not ObjInventario.AddMovimientoDetalle(CveMovimientoSalidaTransitorio, gvr.FCTextBox("TxtCantidad").Text.ToString.ToDecimal, gvr.DataKey("CveUM").ToString.ToEntero, gvr.DataKey("CvePS").ToString.ToEntero, PrecioEntrada, CveAF:=gvr.DataKey("CveAF").ToString.ToEntero, CveSeccionAlmacen:=gvr.FCDropDownList("DdlSeccionAlmacen").SelectedValue.ToEntero, Serie:=gvr.DataKey("Serie").ToString, Lote:=gvr.DataKey("Lote").ToString, FechaCaducidad:=gvr.DataKey("FechaCaducidad").ToDate, CveMovimientoDetalleEntrada:=gvr.DataKey("CveMovimientoDetalleTransitorio").ToString.ToEntero) Then
TextoError = "Ocurrió un error al guardar los movimientos de salida" ErrorMovInv = True
Exit For TextoError = "Ocurrió un error al guardar los movimientos de salida"
Exit For
End If
Else
CveMovimientoSalidaTransitorio = 0
End If End If
ElseIf cantidadDisponibleValidacion < 0 Then ElseIf cantidadDisponibleValidacion < 0 Then
@@ -1910,16 +1914,20 @@ Partial Class Inventarios_TraspasoAlmacen
Dim resultado As DataTable = ObjInventario.DtResultados Dim resultado As DataTable = ObjInventario.DtResultados
Dim importe As Decimal = resultado.SUMD("Total").RoundSQL Dim importe As Decimal = resultado.SUMD("Total").RoundSQL
Dim IdCtaContable As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("IdCtaContable", String.Format("CveAlmacen = {0}", DdlAlmacenTransitorioRecepcion.SelectedValue.ToEntero)).ToEntero Dim IdCtaContable As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("IdCtaContable", String.Format("CveAlmacen = {0}", DdlAlmacenTransitorioRecepcion.SelectedValue.ToEntero)).ToEntero
Dim tCveConcepto As Integer = 68
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, importe, TxtObservaciones.Text, 68, TxtObservaciones.Text, Fecha, IdCtaContable, -1, CveMovimientoAlmacen:=CveMovimientoSalidaTransitorio, ImporteMX:=importe, Contabilizable:=False) Then If CveMovimientoSalidaTransitorio = 0 Then
tCveConcepto = 289
End If
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, importe, TxtObservaciones.Text, tCveConcepto, TxtObservaciones.Text, Fecha, IdCtaContable, -1, CveMovimientoAlmacen:=CveMovimientoSalidaTransitorio, ImporteMX:=importe, Contabilizable:=False) Then
ErrorMovInv = True ErrorMovInv = True
End If End If
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, importe, TxtObservaciones.Text, 68, TxtObservaciones.Text, Fecha, IdCtaContable, -1, CveMovimientoAlmacen:=CveMovimientoEntrada, ImporteMX:=importe, Contabilizable:=False) Then If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, importe, TxtObservaciones.Text, 68, TxtObservaciones.Text, Fecha, IdCtaContable, -1, CveMovimientoAlmacen:=CveMovimientoEntrada, ImporteMX:=importe, Contabilizable:=False) Then
ErrorMovInv = True ErrorMovInv = True
End If
End If End If
End If End If
End If
End If End If

6
Ventas/Clientes.aspx
View File

@@ -577,10 +577,10 @@
<asp:TextBox ID="TxtPagina" CssClass="form-control" runat="server" MaxLength="50"></asp:TextBox> <asp:TextBox ID="TxtPagina" CssClass="form-control" runat="server" MaxLength="50"></asp:TextBox>
<label for="<%= TxtPagina.ClientID.ToString()%>">Página: </label> <label for="<%= TxtPagina.ClientID.ToString()%>">Página: </label>
</div> </div>
<div class="form-group form-md-line-input"> <%--<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtGiro" CssClass="form-control" runat="server" MaxLength="50"></asp:TextBox> <asp:TextBox ID="TxtGiro" CssClass="form-control" runat="server" MaxLength="50"></asp:TextBox>
<label for="<%= TxtGiro.ClientID.ToString()%>">Giro:</label> <label for="<%= TxtGiro.ClientID.ToString()%>">Giro:</label>
</div> </div>--%>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtNotificar" CssClass="form-control" runat="server" MaxLength="300"></asp:TextBox> <asp:TextBox ID="TxtNotificar" CssClass="form-control" runat="server" MaxLength="300"></asp:TextBox>
<asp:RegularExpressionValidator ID="REVEnotificar" runat="server" CssClass="help-block errorimput" ValidationExpression="(([a-zA-Z0-9_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)(\s*;\s*|\s*$))*" ControlToValidate="TxtNotificar" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Notificar A''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator> <asp:RegularExpressionValidator ID="REVEnotificar" runat="server" CssClass="help-block errorimput" ValidationExpression="(([a-zA-Z0-9_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)(\s*;\s*|\s*$))*" ControlToValidate="TxtNotificar" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Notificar A''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
@@ -607,7 +607,7 @@
<div class="form-group form-md-line-input input-iconright" id="DivPortletAsignaciones" runat="server"> <div class="form-group form-md-line-input input-iconright" id="DivPortletAsignaciones" runat="server">
<asp:DropDownList ID="DdlClasificacion" DataValueField="CveClienteClasificacion" DataTextField="ClienteClasificacion" Width="150px" runat="server" CssClass="form-control select2me"> <asp:DropDownList ID="DdlClasificacion" DataValueField="CveClienteClasificacion" DataTextField="ClienteClasificacion" Width="150px" runat="server" CssClass="form-control select2me">
</asp:DropDownList> </asp:DropDownList>
<label for="<%= DdlClasificacion.ClientID.ToString()%>">Clasificación:</label> <label for="<%= DdlClasificacion.ClientID.ToString()%>">Giro:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright" id="Div1" runat="server"> <div class="form-group form-md-line-input input-iconright" id="Div1" runat="server">

10
Ventas/Clientes.aspx.vb
View File

@@ -1465,7 +1465,7 @@ Partial Class Clientes
TxtEmailCotizacion.Text = ObjClientes.MailCotizacion TxtEmailCotizacion.Text = ObjClientes.MailCotizacion
TxtNotificar.Text = ObjClientes.NotificarA TxtNotificar.Text = ObjClientes.NotificarA
TxtPagina.Text = ObjClientes.Pagina TxtPagina.Text = ObjClientes.Pagina
TxtGiro.Text = ObjClientes.Giro 'TxtGiro.Text = ObjClientes.Giro
DdlPrecioLista.SelectedValue = ObjClientes.CvePrecioLista.ToString DdlPrecioLista.SelectedValue = ObjClientes.CvePrecioLista.ToString
TxtCC.Text = ObjClientes.NotificarA TxtCC.Text = ObjClientes.NotificarA
ChkMail.Checked = ObjClientes.EnviarFactura ChkMail.Checked = ObjClientes.EnviarFactura
@@ -2520,11 +2520,11 @@ Partial Class Clientes
MetodoPago = 1 MetodoPago = 1
End If End If
Dim Giro As String = If(DdlClasificacion.SelectedValue.ToEntero() <> -1, DdlClasificacion.SelectedItem.Text, "")
If ObjClientes.AddCliente(TxtNombre.Text.Trim, TxtNombreComercial.Text.Trim, TxtDireccion.Text.Trim, TxtNoExt.Text.Trim, TxtNoInt.Text.Trim, TxtColonia.Text.Trim, TxtLocalidad.Text.Trim, TxtCiudad.Text.Trim, DdlEstadoSAT.SelectedItem.Text.Trim, DdlSATPais.SelectedItem.Text.Trim, TxtRFC.Text.Trim, TxtCP.Text.Trim, TxtTelefono.Text.Trim.Trim.Replace(" ", "").Replace("(", "").Replace(")", "").Replace("-", "").Replace("_", ""), If ObjClientes.AddCliente(TxtNombre.Text.Trim, TxtNombreComercial.Text.Trim, TxtDireccion.Text.Trim, TxtNoExt.Text.Trim, TxtNoInt.Text.Trim, TxtColonia.Text.Trim, TxtLocalidad.Text.Trim, TxtCiudad.Text.Trim, DdlEstadoSAT.SelectedItem.Text.Trim, DdlSATPais.SelectedItem.Text.Trim, TxtRFC.Text.Trim, TxtCP.Text.Trim, TxtTelefono.Text.Trim.Trim.Replace(" ", "").Replace("(", "").Replace(")", "").Replace("-", "").Replace("_", ""),
TxtContacto.Text.Trim, TxtEmail.Text.Trim, TxtEmailCotizacion.Text.Trim, TxtNotificar.Text.Trim, TxtPagina.Text.Trim, TxtGiro.Text.Trim, DdlPrecioLista.SelectedValue.ToEntero, ChkMail.Checked, TxtRetIVA.Text.ToDouble, TxtContacto.Text.Trim, TxtEmail.Text.Trim, TxtEmailCotizacion.Text.Trim, TxtNotificar.Text.Trim, TxtPagina.Text.Trim, Giro, DdlPrecioLista.SelectedValue.ToEntero, ChkMail.Checked, TxtRetIVA.Text.ToDouble,
TxtRetISR.Text.ToDouble, ChkRetIVAFletesAcarreos.Checked, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, TxtNombreCorto.Text.Trim, DdlVendedor.SelectedValue.ToEntero, TxtPlazoCobranza.Text.Trim.ToEntero, TxtPlazoCobranzaRemision.Text.Trim.ToEntero, TxtRetISR.Text.ToDouble, ChkRetIVAFletesAcarreos.Checked, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, TxtNombreCorto.Text.Trim, DdlVendedor.SelectedValue.ToEntero, TxtPlazoCobranza.Text.Trim.ToEntero, TxtPlazoCobranzaRemision.Text.Trim.ToEntero,
DiasPago, DdlTipoPago.SelectedValue, DdlCtaContableClientes.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableAnticipos.SelectedValue.ToEntero, DiasPago, DdlTipoPago.SelectedValue, DdlCtaContableClientes.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableAnticipos.SelectedValue.ToEntero,
DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableRetIVA.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableRetISR.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableFondoGarantia.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableRetIVA.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableRetISR.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableFondoGarantia.SelectedValue.ToEntero,
@@ -2617,9 +2617,9 @@ Partial Class Clientes
Else Else
NombreCliente = TxtNombre.Text.Trim() NombreCliente = TxtNombre.Text.Trim()
End If End If
Dim Giro As String = If(DdlClasificacion.SelectedValue.ToEntero() <> -1, DdlClasificacion.SelectedItem.Text, "")
If ObjClientes.UpdateCliente(NombreCliente, TxtNombreComercial.Text.Trim, TxtDireccion.Text.Trim, TxtNoExt.Text.Trim, TxtNoInt.Text.Trim, TxtColonia.Text.Trim, TxtLocalidad.Text.Trim, TxtCiudad.Text.Trim, DdlEstadoSAT.SelectedItem.Text.Trim, DdlSATPais.SelectedItem.Text.Trim, TxtRFC.Text.Trim, TxtCP.Text.Trim, If ObjClientes.UpdateCliente(NombreCliente, TxtNombreComercial.Text.Trim, TxtDireccion.Text.Trim, TxtNoExt.Text.Trim, TxtNoInt.Text.Trim, TxtColonia.Text.Trim, TxtLocalidad.Text.Trim, TxtCiudad.Text.Trim, DdlEstadoSAT.SelectedItem.Text.Trim, DdlSATPais.SelectedItem.Text.Trim, TxtRFC.Text.Trim, TxtCP.Text.Trim,
TxtTelefono.Text.Trim.Replace(" ", "").Replace("(", "").Replace(")", "").Replace("-", "").Replace("_", ""), TxtContacto.Text.Trim, TxtEmail.Text.Trim, TxtEmailCotizacion.Text.Trim, TxtNotificar.Text.Trim, TxtPagina.Text, TxtGiro.Text, DdlPrecioLista.SelectedValue.ToEntero, ChkMail.Checked, TxtRetIVA.Text.ToDouble, TxtRetISR.Text.ToDouble, ChkRetIVAFletesAcarreos.Checked, TxtTelefono.Text.Trim.Replace(" ", "").Replace("(", "").Replace(")", "").Replace("-", "").Replace("_", ""), TxtContacto.Text.Trim, TxtEmail.Text.Trim, TxtEmailCotizacion.Text.Trim, TxtNotificar.Text.Trim, TxtPagina.Text, Giro, DdlPrecioLista.SelectedValue.ToEntero, ChkMail.Checked, TxtRetIVA.Text.ToDouble, TxtRetISR.Text.ToDouble, ChkRetIVAFletesAcarreos.Checked,
ChkEstado.Checked, TxtNombreCorto.Text.Trim, DdlVendedor.SelectedValue.ToEntero, TxtPlazoCobranza.Text.Trim.ToEntero, TxtPlazoCobranzaRemision.Text.Trim.ToEntero, DiasPago, DdlTipoPago.SelectedValue, ChkEstado.Checked, TxtNombreCorto.Text.Trim, DdlVendedor.SelectedValue.ToEntero, TxtPlazoCobranza.Text.Trim.ToEntero, TxtPlazoCobranzaRemision.Text.Trim.ToEntero, DiasPago, DdlTipoPago.SelectedValue,
DdlCtaContableClientes.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableAnticipos.SelectedValue.ToEntero, DdlCtaContableAnticipos.SelectedItem.Text, DdlCtaContableRetIVA.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableRetISR.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableAnticipos.SelectedValue.ToEntero, DdlCtaContableAnticipos.SelectedItem.Text, DdlCtaContableRetIVA.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableRetISR.SelectedValue.ToEntero,
DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableFondoGarantia.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableCompClientes.SelectedValue.ToEntero, DdlCtaContableCompClientes.SelectedItem.Text, DdlCtaContableCompAnticipos.SelectedValue.ToEntero, DdlCtaContableCompAnticipos.SelectedItem.Text, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableFondoGarantia.SelectedValue.ToEntero, DdlCtaContableClientes.SelectedItem.Text, DdlCtaContableCompClientes.SelectedValue.ToEntero, DdlCtaContableCompClientes.SelectedItem.Text, DdlCtaContableCompAnticipos.SelectedValue.ToEntero, DdlCtaContableCompAnticipos.SelectedItem.Text,

5
Ventas/RepCotizacionesxFacturar.aspx
View File

@@ -171,7 +171,10 @@
<div class="col-md-2"> <div class="col-md-2">
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;" selectedindexchange="DdlClientes_SelectedIndexChanged"></ADS:Dropdownlost> <ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;" selectedindexchange="DdlClientes_SelectedIndexChanged"></ADS:Dropdownlost>
</div> </div>
<label class="col-md-1">Estatus: </label>
<div class="col-md-2">
<asp:Dropdownlist ID="DdlEstatusFactura" Width="100%" runat="server" DataTextField="EstatusFactura" DataValueField="CveEstatusFactura" CssClass="ddlFiltros input-sm select2me Widthall" Style="width: 100%;" ></asp:Dropdownlist>
</div>
<%-- <label class="col-md-1 ">F. Venc. al:</label> <%-- <label class="col-md-1 ">F. Venc. al:</label>
<div class="col-md-2"> <div class="col-md-2">

10
Ventas/RepCotizacionesxFacturar.aspx.vb
View File

@@ -74,7 +74,7 @@ Partial Class RepCotizacionesxFacturar
Sucursales = IIf(DdlSubProyectos.GetSelectedValuesM = "", "-1", DdlSubProyectos.GetSelectedValuesM).ToString Sucursales = IIf(DdlSubProyectos.GetSelectedValuesM = "", "-1", DdlSubProyectos.GetSelectedValuesM).ToString
If ObjVentas.GetRepCotizacionesSinFacturar(FechaI.ToDate, FechaF.ToDate, Sucursales, CveCliente, UsuarioActual.CveEmpresa, CveUsuarioConsulta:=UsuarioActual.CveUsuario) Then If ObjVentas.GetRepCotizacionesSinFacturar(FechaI.ToDate, FechaF.ToDate, Sucursales, CveCliente, UsuarioActual.CveEmpresa, CveUsuarioConsulta:=UsuarioActual.CveUsuario, CveEstatusFactura:=DdlEstatusFactura.SelectedValue.ToEntero) Then
GvDatos.DataSource = ObjVentas.DtResultados GvDatos.DataSource = ObjVentas.DtResultados
DtVentas = ObjVentas.DtResultados DtVentas = ObjVentas.DtResultados
GvDatos.DataBind() GvDatos.DataBind()
@@ -139,6 +139,14 @@ Partial Class RepCotizacionesxFacturar
DdlSubProyectos.DataSource() = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1) DdlSubProyectos.DataSource() = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
DdlSubProyectos.DataBind() DdlSubProyectos.DataBind()
'DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1")) 'DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
'DdlEstatusFactura.DataSource = GlobalDTEstatusFactura().FiltraParametros("TipoDocto = 'Cot'")
'DdlEstatusFactura.DataBind()
DdlEstatusFactura.Items.Add(New ListItem("Registrada", "2"))
DdlEstatusFactura.Items.Add(New ListItem("Supervisada", "8"))
DdlEstatusFactura.Items.Add(New ListItem("Cancelada", "10"))
DdlEstatusFactura.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub End Sub
#End Region #End Region