diff --git a/Planeacion/CatProyectos.aspx.vb b/Planeacion/CatProyectos.aspx.vb index 86b5e5325..4b6b6937f 100644 --- a/Planeacion/CatProyectos.aspx.vb +++ b/Planeacion/CatProyectos.aspx.vb @@ -83,11 +83,13 @@ Partial Class CatProyectos Private Sub RecargaGlobal() GlobalDTProyectos(UsuarioActual.CveEmpresa) = Nothing + GlobalDTProyectosUsuarios(-1, -1, UsuarioActual.CveEmpresa, -1) = Nothing End Sub Private Sub CargaSuproyectos() GlobalDTSubProyectos(UsuarioActual.CveEmpresa) = Nothing + GlobalDTProyectosUsuarios(-1, -1, UsuarioActual.CveEmpresa, -1) = Nothing 'Dim ObjSubProyectos As New ClsSubProyectos 'If ObjSubProyectos.GetSubProyectos(UsuarioActual.CveEmpresa) Then diff --git a/Ventas/RepCancelacionesPorRespuesta.aspx.cs b/Ventas/RepCancelacionesPorRespuesta.aspx.cs index 32eccfd58..ebbb2a994 100644 --- a/Ventas/RepCancelacionesPorRespuesta.aspx.cs +++ b/Ventas/RepCancelacionesPorRespuesta.aspx.cs @@ -151,11 +151,20 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas { //VERIFICA EL ESTATUS DE LA FACTURA NUEVA, SI ESTA ESTÁ CANCELADA, SE MANDA UNA CANCELACIÓN SIN FOLIO DE SUSTITUCIÓN Y CON EL CÓDIGO 02 Timbrado.AcuseCancelacionSAT VigenciaExtra = Timbrado.VerificarVigenciaSAT(FolioSustitucion, UsuarioActual.Empresa.RFC, RFCReceptorSustitucion, Total.ToString(), true); - if (VigenciaExtra.Estado.ToUpper() == "CANCELADO") + if (VigenciaExtra != null) { - FolioSustitucion = ""; - CveMotivoSustitucion = get_GlobalDTMotivosCancelacionEmpresa(UsuarioActual.CveEmpresa, CveSATMotivoCancelacion: 2).FiltroPrimeroValor("CveMotivoCancelacion").ToEntero(); + if (VigenciaExtra.Estado.ToUpper() == "CANCELADO") + { + FolioSustitucion = ""; + CveMotivoSustitucion = get_GlobalDTMotivosCancelacionEmpresa(UsuarioActual.CveEmpresa, CveSATMotivoCancelacion: 2).FiltroPrimeroValor("CveMotivoCancelacion").ToEntero(); + } } + else + { + Alert("No se pudo comprobar la vigencia de la factura ante el SAT. El servicio no se encuentra disponible", TipoMensaje.MsgError); + return; + } + } @@ -221,11 +230,20 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas { //VERIFICA EL ESTATUS DE LA FACTURA NUEVA, SI ESTA ESTÁ CANCELADA, SE MANDA UNA CANCELACIÓN SIN FOLIO DE SUSTITUCIÓN Y CON EL CÓDIGO 02 Timbrado.AcuseCancelacionSAT VigenciaExtra = Timbrado.VerificarVigenciaSAT(FolioSustitucion, UsuarioActual.Empresa.RFC, RFCReceptorSustitucion, Total.ToString(), true); - if (VigenciaExtra.Estado.ToUpper() == "CANCELADO") + if (VigenciaExtra != null) { - FolioSustitucion = ""; - CveMotivoCancelacion = get_GlobalDTMotivosCancelacionEmpresa(UsuarioActual.CveEmpresa, CveSATMotivoCancelacion: 2).FiltroPrimeroValor("CveMotivoCancelacion").ToEntero(); - } + if (VigenciaExtra.Estado.ToUpper() == "CANCELADO") + { + FolioSustitucion = ""; + CveMotivoCancelacion = get_GlobalDTMotivosCancelacionEmpresa(UsuarioActual.CveEmpresa, CveSATMotivoCancelacion: 2).FiltroPrimeroValor("CveMotivoCancelacion").ToEntero(); + } + } + else + { + Alert("No se pudo comprobar la vigencia de la factura ante el SAT. El servicio no se encuentra disponible", TipoMensaje.MsgError); + return; + } + var respCancelacion = CancelarDocumento(CveVenta, -1, CveCliente, Folio, Uuid, "", NowADS(), TipoDocto, Total.ToDouble(), UsuarioActual.Empresa.CvePAC, EsRefacturacion: true, FolioSustitucion: FolioSustitucion, CveEstatusRefacturacion: CveEstatusRefacturacion, CveMotivoCancelacion: CveMotivoCancelacion);