-Correccion de mensaje al validar productos SAT
This commit is contained in:
@@ -1228,7 +1228,7 @@ Public Class Timbrado
|
|||||||
Dim CodigoIncorrecto = (From c In Ventas.Timbre.Conceptos Where (c.ClaveProdServ = "01010101") OrElse (c.ClaveProdServ = "84111506" AndAlso Not UsuarioActual.CveEmpresa.Contiene(2, 70, 144))
|
Dim CodigoIncorrecto = (From c In Ventas.Timbre.Conceptos Where (c.ClaveProdServ = "01010101") OrElse (c.ClaveProdServ = "84111506" AndAlso Not UsuarioActual.CveEmpresa.Contiene(2, 70, 144))
|
||||||
Select c.ClaveProdServ, c.Descripcion)
|
Select c.ClaveProdServ, c.Descripcion)
|
||||||
Dim Str As New StringBuilder
|
Dim Str As New StringBuilder
|
||||||
Str.Append("Los siguentes productos tienen especificado un código no permitido por el SAT: <br/>")
|
Str.Append("Los siguientes productos tienen especificado un código no permitido por el SAT: <br/>")
|
||||||
For Each dr In CodigoIncorrecto
|
For Each dr In CodigoIncorrecto
|
||||||
Str.AppendFormat(" - {0} <br/>", dr.Descripcion)
|
Str.AppendFormat(" - {0} <br/>", dr.Descripcion)
|
||||||
Next
|
Next
|
||||||
|
|||||||
Reference in New Issue
Block a user