This commit is contained in:
janeth arvizu
2019-08-30 12:59:02 -07:00
763 changed files with 196246 additions and 9 deletions

View File

@@ -10281,6 +10281,13 @@ Partial Class Ventas
End If
End If
'EN CASO DE SER REFACTURACION DE ANTICIPO SE ACTUALIZAN LAS VENTAS APLICADAS HACIA EL NUEVO
If NuevaFactura = 1 AndAlso CveDevolucion > 0 AndAlso ObjFactura.TipoDocto.Contiene("Ant") Then
If Not ObjVentas.TraspasaVentasAplicadasAnt(ObjFactura.CveVenta, CveDevolucion, UsuarioActual.CveEmpresa) Then
ErrorPrepoliza = True
End If
End If
Return ErrorPrepoliza
Catch ex As Exception
GuardaLog(ex.ToString())