diff --git a/App_Code/ClsContabilidad.vb b/App_Code/ClsContabilidad.vb
index 8222c3ea9..d251f6f23 100644
--- a/App_Code/ClsContabilidad.vb
+++ b/App_Code/ClsContabilidad.vb
@@ -1026,7 +1026,7 @@ Public Class ClsContabilidad
                         Concepto = $"{NombreComercial} F:{SerieFolio}"
 
                 End Select
-            Case 119
+            Case 119, 158
                 Select Case CveConcepto
 
                     Case 2, 17 'Pago Proveedores
@@ -1038,13 +1038,13 @@ Public Class ClsContabilidad
                     Case 6 'Compra
 
                     Case 13, 61 'iva ventas
-                        Concepto = SerieFolio
+                        Concepto = String.Format("{0} - {1}", NombreComercial, SerieFolio)
 
                     Case 14, 19 'iva compras
                         Concepto = SerieFolio
 
                     Case 38, 39 'ieps ventas
-                        Concepto = SerieFolio
+                        Concepto = String.Format("{0} - {1}", NombreComercial, SerieFolio)
 
                     Case 25, 26 'eips compras
                         Concepto = SerieFolio