Necesito si pueden colaborarme con el siguiente error u omisión de código
Publicado por Vanina (4 intervenciones) el 07/02/2018 15:19:28
Necesito de su ayuda para resolver el siguiente problema:
- Tengo una base de datos donde tengo una tabla de materiales con su respectivo stock
- Una tabla Orden de Pedidos y una sub tabla detalle de Orden de pedido
- Una tabla entrega de materiales con su sub tabla detalle entrega de materiales
Hasta ahí todo bien
Lo que deseo lograr es que cuando ingresen materiales a mi pañol:
- Estos se sumen al stock (el código funciona a la perfeccion)
- Y que estos a su vez, se descuenten de la orden de pedidos, mostrando asi, cuantos materiales de esa orden se entregaron y cuantos faltan entregar. (Aquí tengo el Problema de código)
El problema radica en:
Que cuando realizo la entrada de materiales a través de un formulario se descuentan los materiales de todas las Ordenes de Pedidos que poseen dentro de si mismos el mismo código de material. Lo que esta mal.
Dado que lo correcto sería, que solo se descuente el material correspondiente a de la Orden de Pedido que lo solicito puntualmente.
Hay que tener en cuenta que tengo diferentes ordenes de pedidos que solicitan el mismo material, pero el destino de cada orden de pedido es para una obra diferente.
Dentro del código, no se como colocar en la condición WHERE, que se debe sumar la entrega de la cantidad de un determinado material al que corresponda siempre y cuando el mismo corresponda a la Orden de Pedido realizada.
La resta de materiales pedidos que faltan entregar la realizo a través de una expresión.
Lo que necesito es que me vaya sumando la cantidad de materiales entregados correspondientes a una orden de pedido determinada para asi llevar el control de manera automática de que se entrego y de que falta entregar.
El código es el siguiente:
Quiero destacar que la tabla 2_Materiales, corresponde al listado de Materiales con su stock.
Y que la tabla Detalle_Pedido, corresponde a la sub tabla de Orden de Pedido de materiales donde se detallan los materiales solicitados con sus correspondientes Cantidades solicitadas .El nombre del campo Cantidad corresponde a la Cantidad de Material solicitado mediante la misma SubTabla.
Desde ya muchas gracias!
- Tengo una base de datos donde tengo una tabla de materiales con su respectivo stock
- Una tabla Orden de Pedidos y una sub tabla detalle de Orden de pedido
- Una tabla entrega de materiales con su sub tabla detalle entrega de materiales
Hasta ahí todo bien
Lo que deseo lograr es que cuando ingresen materiales a mi pañol:
- Estos se sumen al stock (el código funciona a la perfeccion)
- Y que estos a su vez, se descuenten de la orden de pedidos, mostrando asi, cuantos materiales de esa orden se entregaron y cuantos faltan entregar. (Aquí tengo el Problema de código)
El problema radica en:
Que cuando realizo la entrada de materiales a través de un formulario se descuentan los materiales de todas las Ordenes de Pedidos que poseen dentro de si mismos el mismo código de material. Lo que esta mal.
Dado que lo correcto sería, que solo se descuente el material correspondiente a de la Orden de Pedido que lo solicito puntualmente.
Hay que tener en cuenta que tengo diferentes ordenes de pedidos que solicitan el mismo material, pero el destino de cada orden de pedido es para una obra diferente.
Dentro del código, no se como colocar en la condición WHERE, que se debe sumar la entrega de la cantidad de un determinado material al que corresponda siempre y cuando el mismo corresponda a la Orden de Pedido realizada.
La resta de materiales pedidos que faltan entregar la realizo a través de una expresión.
Lo que necesito es que me vaya sumando la cantidad de materiales entregados correspondientes a una orden de pedido determinada para asi llevar el control de manera automática de que se entrego y de que falta entregar.
El código es el siguiente:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub Comando82_Click()
If MsgBox("¿Está seguro de realizar el Ingreso de materiales al Stock?", vbYesNo, "Aviso") = vbYes Then
With Me.Subfrm_Det_Entrada.Form.RecordsetClone
.MoveFirst Do While Not .EOFCurrentDb.Execute ("UPDATE 2_Materiales set Cantidad=Cantidad+" & !Cantidad & " WHERE CodMat=" & !CodMat)
.MoveNextLoop
End With
With Me.Subfrm_Det_Entrada.Form.RecordsetClone
.MoveFirst Do While Not .EOFCurrentDb.Execute ("UPDATE Detalle_Pedido set Cantidad=Cantidad+" & !Cantidad & " WHERE CodMat=" & !CodMat)
.MoveNextLoop
End With
End If
DoCmd.GoToRecord , , acNewRec
End Sub
Quiero destacar que la tabla 2_Materiales, corresponde al listado de Materiales con su stock.
Y que la tabla Detalle_Pedido, corresponde a la sub tabla de Orden de Pedido de materiales donde se detallan los materiales solicitados con sus correspondientes Cantidades solicitadas .El nombre del campo Cantidad corresponde a la Cantidad de Material solicitado mediante la misma SubTabla.
Desde ya muchas gracias!
Valora esta pregunta
0
