Luis_Py | |
| 2008-04-16 04:09 - Respuestas: 1 - Tema nº: 2512894
Características: Windows XP Profesional 1.5 GB RAM, PIV 3.06 Ghz., 160 GB, PCI-E ATI 256.
Hola a todos. He leído hace poco en este sitio un caso similar al que estoy tratando de solucionar y ha decir verdad, he implementado una respuesta de ebolo y me ha funcionado a medias. Estoy desarrollando una aplicación en Access 2003 para controlar las entradas y salidas (en realidad se alquilan) de los productos de un depósito de artículos para montar espectáculos. Tengo varias tablas, pero las que manejan el STOCK son las siguientes: [Productos], con los campos IdProducto (PrimaryKey) pero tipo TEXTO, Nombre, StockOriginal, StockActual. Estos dos últimos campos los necesito así porque quiero saber en todo momento cuántos productos había originalmente, ya que se van a ir agregando o dando de baja. La otra tabla es [Salidas], con los campos IdSalida (PrimaryKey, Numérico), IdCliente (Numérico, relacionado con otra tabla), DesdeFecha, HastaFecha y Cantidad (Numérico). Básicamente, necesito que al cargar las "Salidas" en un formulario, me actualice el campo "StockActual" la tabla "Productos". Implementé una respuesta de EBOLO que había dado a un usuario hace un tiempo y funcionó para mi también, pero no sé por qué ocurre que para que funcione, el campo IdProducto, de la tabla Productos, debe ser numérico. En realidad quiero cargar este campo con un lector de código de barras, y tengo algunos problemas con el tipo numérico, en cambio el tipo texto no me genera ningún inconveniente. Desde un formulario para cargar la tabla "Salidas" e colocado esto desde la condición "Después de Insertar":
Dim consulta As String
consulta = "UPDATE PRODUCTOS SET PRODUCTOS.[STOCKACTUAL] = [STOCKACTUAL] -" & Me.Cantidad
consulta = consulta & " WHERE (((PRODUCTOS.[IDPRODUCTO])=" & Me.IdProducto & "))"
MsgBox consulta
CurrentDb.Execute consulta
Como les expliqué: Funciona si el campo IDPRODUCTO es un campo tipo Número, pero no tipo Texto. ¿A qué se debe y como lo soluciono?
Gracias desde Paraguay
| |
|