GDiaz - Compras Prontos Pagos
This commit is contained in:
1865
App_Code/ClsCompraManager.vb
Normal file
1865
App_Code/ClsCompraManager.vb
Normal file
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@@ -5205,13 +5205,13 @@ Partial Class Compras_eFacturas
|
||||
Exit For
|
||||
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.CveProveedor = GvRow.DataKey("CveProveedor").ToEntero
|
||||
CompraActual.CveTipoProveedor = 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.Descripcion = TxtDescripcionCompra.Text.Trim
|
||||
CompraActual.NombreProveedor = GvRow.DataKey("NombreProveedor")
|
||||
@@ -5250,7 +5250,9 @@ Partial Class Compras_eFacturas
|
||||
|
||||
End Class
|
||||
|
||||
Public Class Compra2
|
||||
|
||||
|
||||
Public Class ClsCompraManager
|
||||
|
||||
Enum EnumCargaCompra
|
||||
DesdeXML
|
||||
@@ -6941,7 +6943,7 @@ Public Class Compra2
|
||||
End If
|
||||
|
||||
If respuesta Then
|
||||
If Not AddPrepolizaDetalles(ObjConta) Then respuesta = False
|
||||
If Not AddPrePolizaDetalles(ObjConta) Then respuesta = False
|
||||
End If
|
||||
|
||||
If respuesta AndAlso ObjConta.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual, 4) Then
|
||||
@@ -7064,7 +7066,6 @@ End Class
|
||||
|
||||
|
||||
|
||||
|
||||
Public Class GeneralesAPIeFacturas
|
||||
|
||||
Inherits ADSNetLibraryzdE.HelpersE.ConexionesE.SIGAPIE.BaseSIGAPIeFacturas
|
||||
|
||||
Reference in New Issue
Block a user