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

-

Browse Source
This commit is contained in:
rrene
2023-11-13 08:32:19 -07:00
parent 2ff66c718f
commit 5782b4ee77
1 changed files with 7 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Compras/Compras.aspx.vb
View File

@@ -5361,12 +5361,15 @@ Partial Class Compras_Compras
Next Next
''insertar en prepólizas ''insertar en prepólizas
If CveMovimientoAlmacen > 0 Then
Dim tImporte As Decimal Dim tImporte As Decimal
If ObjInventario.GetMovimientosDetalle(CveMovimientoAlmacen, UsuarioActual.CveEmpresa) Then If ObjInventario.GetMovimientosDetalle(CveMovimientoAlmacen, UsuarioActual.CveEmpresa) Then
tImporte = ObjInventario.DtResultados.SUM("Total") tImporte = ObjInventario.DtResultados.SUM("Total")
End If End If
ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, tImporte, tImporte, 68, ObjInventario.Folio.ToString, ObjInventario.Folio.ToString, CveMovimientoAlmacen:=CveMovimientoInventario) ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, tImporte, tImporte, 68, ObjInventario.Folio.ToString, ObjInventario.Folio.ToString, CveMovimientoAlmacen:=CveMovimientoInventario)
End If End If
End If
Next Next
End If End If
End If End If