AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

numeropedimento

Browse Source
This commit is contained in:
rrene
2020-07-23 09:32:54 -07:00
parent cefe0093f9
commit 15129caaa0
1 changed files with 7 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
App_Code/Timbrado.vb
View File

@@ -1164,6 +1164,7 @@ Public Class Timbrado
End If
Next
If concep.CuentaPredial <> "" Then cfdi.agregarCuentaPredial(concep.CuentaPredial)
If concep.NumeroPedimento <> "" Then cfdi.agregarInformacionAduanera(concep.NumeroPedimento)
Next
End If
@@ -1749,6 +1750,7 @@ Public Class Timbrado
End If
Next
If concep.CuentaPredial <> "" Then cfdi.CuentaPredial(concep.CuentaPredial)
If concep.NumeroPedimento <> "" Then cfdi.InformacionAduanera(concep.NumeroPedimento)
Next
End If
@@ -2365,6 +2367,11 @@ Public Class Timbrado
End If
If concep.Noidentificacion <> "" Then comprobante.Conceptos(i).NoIdentificacion = concep.Noidentificacion
If concep.CuentaPredial <> "" Then comprobante.Conceptos(i).CuentaPredial = New Profact.TimbraCFDI33.ComprobanteConceptoCuentaPredial() With {.Numero = concep.CuentaPredial}
If concep.NumeroPedimento <> "" Then
comprobante.Conceptos(i).InformacionAduanera = New Profact.TimbraCFDI33.ComprobanteConceptoInformacionAduanera(1) {} 'solo un codigo por el momento
comprobante.Conceptos(i).InformacionAduanera(0) = New Profact.TimbraCFDI33.ComprobanteConceptoInformacionAduanera() With {.NumeroPedimento = concep.NumeroPedimento}
End If
j = 0
k = 0