--FIX carga global.
--FIX validacion de vigencia sat
This commit is contained in:
@@ -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
|
||||
|
||||
|
||||
@@ -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);
|
||||
|
||||
|
||||
Reference in New Issue
Block a user