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

Agregar el concepto 1 en facturas en 0

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2020-04-02 10:20:01 -07:00
parent 49876d1abb
commit afe6c3ce2e
2 changed files with 5 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Ventas/Ventas.aspx.vb
View File

@@ -10902,7 +10902,7 @@ Partial Class Ventas
End Select End Select
If importeMovimiento <> 0 And Not ErrorPrepoliza Then If (importeMovimiento <> 0 OrElse (importeMovimiento = 0 AndAlso ObjFactura.Total = 0 AndAlso ConceptoContable = 1)) And Not ErrorPrepoliza Then
If IdCtaContable <= 0 Then If IdCtaContable <= 0 Then
CuentasContablesInvalidas.Append("<br>" & GlobalDTContaConceptosContables(-1).FiltroPrimero(String.Format("CveConceptoContable = {0}", ConceptoContable))("ConceptoContable").ToString) CuentasContablesInvalidas.Append("<br>" & GlobalDTContaConceptosContables(-1).FiltroPrimero(String.Format("CveConceptoContable = {0}", ConceptoContable))("ConceptoContable").ToString)
@@ -10930,7 +10930,7 @@ Partial Class Ventas
End If End If
'TRASPASA PAGADO 'TRASPASA PAGADO (ObjFacturaNC.Pagado > 0) AndAlso
If ObjFactura.TipoDocto.Contiene("Ing", "Ant") AndAlso ObjFactura.NuevaFactura = 1 Then If ObjFactura.TipoDocto.Contiene("Ing", "Ant") AndAlso ObjFactura.NuevaFactura = 1 Then
If Not ObjConta.TraspasarSaldosPrePolizasRefacturacion(ObjFacturaNC.CveVenta, ObjFactura.CveVenta, ObjFactura.CvePrePoliza, CvePlantilaPoliza, UsuarioActual.CveEmpresa) Then If Not ObjConta.TraspasarSaldosPrePolizasRefacturacion(ObjFacturaNC.CveVenta, ObjFactura.CveVenta, ObjFactura.CvePrePoliza, CvePlantilaPoliza, UsuarioActual.CveEmpresa) Then
ErrorList.Add("Ocurrió un error al agregar la bitacora de Póliza Virtual.") ErrorList.Add("Ocurrió un error al agregar la bitacora de Póliza Virtual.")
@@ -22252,7 +22252,7 @@ Partial Class Ventas
Exit Sub Exit Sub
End If End If
'SOLO APLICA DEVOLUCION SI TIENE MOVIMIENTOS DE ALMACEN
If VentaSaldoAlmacen < 0 Then If VentaSaldoAlmacen < 0 Then
LBAplicaDevolucion.Visible = True LBAplicaDevolucion.Visible = True
ElseIf VentaSaldoAlmacen >= 0 Then ElseIf VentaSaldoAlmacen >= 0 Then

2
vwd.webinfo
View File

@@ -44,6 +44,8 @@