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

--sumar los importes del movimiento detalle para la prepoliza del movimiento virtual

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2023-12-30 14:33:08 -07:00
parent 59bf3373df
commit 1d89523f95
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Inventarios/EntradasSalidas.aspx.vb
View File

@@ -5552,7 +5552,7 @@ Partial Class Inventarios_EntradasSalidas
End If End If
Dim tCveMovtoEntrada As Integer = If(tOrigen > 0, CveMovimientoVirtual, -1) Dim tCveMovtoEntrada As Integer = If(tOrigen > 0, CveMovimientoVirtual, -1)
Dim tCveMovtoSalida As Integer = If(tOrigen > 0, -1, CveMovimientoVirtual) Dim tCveMovtoSalida As Integer = If(tOrigen > 0, -1, CveMovimientoVirtual)
If Not ContabilizaMovimientoAlmacen(ObjConta, TxtFecha.Text.Replace(",", "").ToDate, "Virtual", "ES/GV", tCveMovtoSalida, tCveMovtoEntrada, DtPSVirtual.SUM("TotalCargo"), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, True, dttCosto, tCveSubProyecto) > 0 Then If Not ContabilizaMovimientoAlmacen(ObjConta, TxtFecha.Text.Replace(",", "").ToDate, "Virtual", "ES/GV", tCveMovtoSalida, tCveMovtoEntrada, dttCosto.SUMD("Total"), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, True, dttCosto, tCveSubProyecto) > 0 Then
ErrorMovInv = True ErrorMovInv = True
End If End If
End If End If