ventas, considerar en actualziar el recalculo de ieps
This commit is contained in:
@@ -9199,7 +9199,7 @@ Partial Class Clientes
|
||||
Dim Serie As String = ""
|
||||
|
||||
If FolioNotaCredito(Tipo) Then
|
||||
Folio = FolioNotaAcumulador
|
||||
Folio = -1
|
||||
Serie = SerieNotaAcumulador
|
||||
End If
|
||||
|
||||
@@ -9305,9 +9305,9 @@ Partial Class Clientes
|
||||
End If
|
||||
|
||||
ObjFactura.FechaEjecucion = Now
|
||||
ObjFactura.CveSubProyecto = DdlSubProyecto.SelectedValue.ToEntero
|
||||
ObjFactura.CveSubProyectoCobranza = DdlSubProyecto.SelectedValue.ToEntero
|
||||
ObjFactura.CveSubProyectoEjecucion = DdlSubProyecto.SelectedValue.ToEntero
|
||||
ObjFactura.CveSubProyecto = UsuarioActual.CveSubProyecto
|
||||
ObjFactura.CveSubProyectoCobranza = UsuarioActual.CveSubProyecto
|
||||
ObjFactura.CveSubProyectoEjecucion = UsuarioActual.CveSubProyecto
|
||||
ObjFactura.AtencionA = "-1"
|
||||
ObjFactura.MotivoDescuento = ""
|
||||
ObjFactura.Observaciones = ""
|
||||
|
||||
Reference in New Issue
Block a user