diff --git a/App_Code/Timbrado.vb b/App_Code/Timbrado.vb index 6dc7cc9bd..28c10e7e6 100644 --- a/App_Code/Timbrado.vb +++ b/App_Code/Timbrado.vb @@ -2428,30 +2428,30 @@ Public Class Timbrado Next End If - 'If Ventas.CveComplementoTimbrado > 0 Then + If Ventas.CveComplementoTimbrado > 0 Then - ' Select Case Ventas.CveComplementoTimbrado - ' Case 5 'INE Proceso Ordinario Directivo Estatal" - ' cfdi.Ine11("Ordinario", "Directivo Estatal", "0") + Select Case Ventas.CveComplementoTimbrado + Case 5 'INE Proceso Ordinario Directivo Estatal" + cfdi.Ine11("Ordinario", "Directivo Estatal", "0") - ' cfdi.IneEntidad(Ventas.ComplementoINE.INEEntidad, "") - ' cfdi.IneContabilidad(Ventas.ComplementoINE.INEIdContabilidad) - ' Case 6 'INE Proceso Ordinario Ejecutivo Estatal" - ' cfdi.Ine11("Ordinario", "Ejecutivo Estatal", "0") + cfdi.IneEntidad(Ventas.ComplementoINE.INEEntidad, "") + If Ventas.ComplementoINE.INEIdContabilidad > 0 Then cfdi.IneContabilidad(Ventas.ComplementoINE.INEIdContabilidad) + Case 6 'INE Proceso Ordinario Ejecutivo Estatal" + cfdi.Ine11("Ordinario", "Ejecutivo Estatal", "0") - ' cfdi.IneEntidad(Ventas.ComplementoINE.INEEntidad, "") - ' cfdi.IneContabilidad(Ventas.ComplementoINE.INEIdContabilidad) - ' Case 7 'INE Proceso Ordinario Ejecutivo Nacional" + cfdi.IneEntidad(Ventas.ComplementoINE.INEEntidad, "") + If Ventas.ComplementoINE.INEIdContabilidad > 0 Then cfdi.IneContabilidad(Ventas.ComplementoINE.INEIdContabilidad) + Case 7 'INE Proceso Ordinario Ejecutivo Nacional" - ' cfdi.Ine11("Ordinario", "Ejecutivo Nacional", Ventas.ComplementoINE.INEIdContabilidad.ToString) - ' Case 8 'INE PreCampaƱa - ' cfdi.Ine11(Ventas.ComplementoINE.INETipoProceso, "", "0") + cfdi.Ine11("Ordinario", "Ejecutivo Nacional", Ventas.ComplementoINE.INEIdContabilidad.ToString) + Case 8 'INE PreCampaƱa + cfdi.Ine11(Ventas.ComplementoINE.INETipoProceso, "", "") - ' cfdi.IneEntidad(Ventas.ComplementoINE.INEEntidad, Ventas.ComplementoINE.INETipoComite) - ' cfdi.IneContabilidad(Ventas.ComplementoINE.INEIdContabilidad) - ' End Select + cfdi.IneEntidad(Ventas.ComplementoINE.INEEntidad, Ventas.ComplementoINE.INETipoComite) + 'If Ventas.ComplementoINE.INEIdContabilidad > 0 Then cfdi.IneContabilidad(Ventas.ComplementoINE.INEIdContabilidad) + End Select - 'End If + End If