-- cambio den contabilizar

This commit is contained in:
2023-08-11 19:21:24 -07:00
parent 2a9d969fec
commit c908e4046b

View File

@@ -3940,7 +3940,7 @@ Partial Class Inventarios_EntradasSalidas
Else Else
Dim tCveSubProyecto = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", $"CveAlmacen={DdlAlmacen.SelectedValue.ToEntero}").ToEntero Dim tCveSubProyecto = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", $"CveAlmacen={DdlAlmacen.SelectedValue.ToEntero}").ToEntero
Dim tCveConcepto As Integer = 69 Dim tCveConcepto As Integer = 69
If ObjInventario.CveConcepto = 37 Then If ObjInventario.CveConcepto = 37 Then
tCveConcepto = 181 tCveConcepto = 181
End If End If
@@ -3955,12 +3955,12 @@ Partial Class Inventarios_EntradasSalidas
Next Next
End If End If
End If
End If End If
End If End If
End If End If
End If End If
End If End If
End If
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, MovAlmacen, DtCostos.SUMD("Total").RoundSQL, DtCostos.SUMD("Total").RoundSQL, 68, Concepto, Concepto, CveVenta:=CveVenta, CveMovimientoAlmacen:=CveMovimiento, Contabilizable:=Contabilizable) Then If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, MovAlmacen, DtCostos.SUMD("Total").RoundSQL, DtCostos.SUMD("Total").RoundSQL, 68, Concepto, Concepto, CveVenta:=CveVenta, CveMovimientoAlmacen:=CveMovimiento, Contabilizable:=Contabilizable) Then
ErrorMovInv = True ErrorMovInv = True