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

GDiaz - Compras Prontos Pagos

Browse Source
This commit is contained in:
rakcsle
2024-03-23 13:16:39 -07:00
parent fa4a186cda
commit d034f59768
3 changed files with 4188 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1865
App_Code/ClsCompraManager.vb Normal file
View File

File diff suppressed because it is too large Load Diff

2341
Compras/Compras.aspx.vb
View File

File diff suppressed because it is too large Load Diff

11
Compras/eFacturas.aspx.vb
View File

@@ -5205,13 +5205,13 @@ Partial Class Compras_eFacturas
Exit For Exit For
End If End If
Dim CompraActual As New Compra2(CFDIXmlPath, Compra2.EnumCargaCompra.DesdeArchivo, GlobalDTTiposGastos(UsuarioActual.CveEmpresa), UsuarioActual) Dim CompraActual As New ClsCompraManager(CFDIXmlPath, ClsCompraManager.EnumCargaCompra.DesdeArchivo, GlobalDTTiposGastos(UsuarioActual.CveEmpresa), UsuarioActual)
CompraActual.CveFactura = GvRow.DataKey("CveFactura").ToEntero CompraActual.CveFactura = GvRow.DataKey("CveFactura").ToEntero
CompraActual.CveProveedor = GvRow.DataKey("CveProveedor").ToEntero CompraActual.CveProveedor = GvRow.DataKey("CveProveedor").ToEntero
CompraActual.CveTipoProveedor = GvRow.DataKey("CveTipoProveedor").ToEntero CompraActual.CveTipoProveedor = GvRow.DataKey("CveTipoProveedor").ToEntero
CompraActual.CveTipoConceptoProveedor = GvRow.DataKey("CveTipoProveedor").ToEntero CompraActual.CveTipoConceptoProveedor = GvRow.DataKey("CveTipoProveedor").ToEntero
CompraActual.TipoCompra = Compra2.EnumTipoCompra.Sin_definir CompraActual.TipoCompra = ClsCompraManager.EnumTipoCompra.Sin_definir
CompraActual.IEPSGasto = True CompraActual.IEPSGasto = True
CompraActual.Descripcion = TxtDescripcionCompra.Text.Trim CompraActual.Descripcion = TxtDescripcionCompra.Text.Trim
CompraActual.NombreProveedor = GvRow.DataKey("NombreProveedor") CompraActual.NombreProveedor = GvRow.DataKey("NombreProveedor")
@@ -5250,7 +5250,9 @@ Partial Class Compras_eFacturas
End Class End Class
Public Class Compra2
Public Class ClsCompraManager
Enum EnumCargaCompra Enum EnumCargaCompra
DesdeXML DesdeXML
@@ -6941,7 +6943,7 @@ Public Class Compra2
End If End If
If respuesta Then If respuesta Then
If Not AddPrepolizaDetalles(ObjConta) Then respuesta = False If Not AddPrePolizaDetalles(ObjConta) Then respuesta = False
End If End If
If respuesta AndAlso ObjConta.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual, 4) Then If respuesta AndAlso ObjConta.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual, 4) Then
@@ -7064,7 +7066,6 @@ End Class
Public Class GeneralesAPIeFacturas Public Class GeneralesAPIeFacturas
Inherits ADSNetLibraryzdE.HelpersE.ConexionesE.SIGAPIE.BaseSIGAPIeFacturas Inherits ADSNetLibraryzdE.HelpersE.ConexionesE.SIGAPIE.BaseSIGAPIeFacturas