Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 28-04-2010
Rom@n Rom@n is offline
Miembro
 
Registrado: oct 2007
Posts: 25
Poder: 0
Rom@n Va por buen camino
Smile sentencia sql para el control de existencias de un sistema de inventarios multialmace

Hola expertos espero esten muy bien, siempre es un gusto saludarlos y saber que siempre estan ahi para ayudar a ser mejores programadores.

Les quiero mostrar el codigo sql que utilizo en un sistema de inventarios multialmacen con punto de venta, me sirve para actualizar el campo 'existe' de una tabla llamada 'tab_stock' la cual me dice la cantidad existente por producto y por almacen, esta consulta se enlaza con otra tabla que se llama 'venta' donde se guardan las ventas registradas en los puntos de venta, la consulta cambia un poco solo en la ultima condicion 'WHERE' dependiendo el proceso en el que se encuentre por ejemplo esta que muestro es cuando estamos en un proceso de compra y solo actualizo los productos que estoy comprando o dandole entrada al almacen, pues bien mi cuestion es si alguien me entiende y me pueda decir si el metodo que utilizo es bueno o malo o si conocen una mejor manera de hacerlo poder cambiarlo aun funcionandome bien hasta ahora. utilizo delphi7 y MySQL(adoconnection MyODBC, MySQL Workbench 5.2)
.
Código SQL [-]
 update tab_stock ts set ts.existe=(SELECT
                SUM( If( tipo_mov =1, cantidad, 0 ) )+
                SUM( If( tipo_mov =2, cantidad, 0 ) )-
                SUM( If( tipo_mov =3, cantidad, 0 ) )-
(select IF(sum(cantidad)>0,sum(cantidad),0) from venta v where v.id_almacen=:ida and v.id_producto=ts.id_producto)-
                SUM( If( tipo_mov =5, cantidad, 0 ) )+
                SUM( If( tipo_mov =6, cantidad, 0 ) )+
                SUM( If( tipo_mov =7, cantidad, 0 ) )-
                SUM( If( tipo_mov =8, cantidad, 0 ) )+
                FROM tab_detalle_compra tdc 
                WHERE tdc.id_almacen=:ida
                 AND tdc.id_producto=ts.id_producto)
                WHERE ts.id_almacen=:ida
                 AND ts.id_producto IN(select id_producto from tab_detalle_compra where id_compra=:idc))
muchas gracias amigos espero sus comentarios
Responder Con Cita
  #2  
Antiguo 29-04-2010
Avatar de Ñuño Martínez
Ñuño Martínez Ñuño Martínez is offline
Moderador
 
Registrado: jul 2006
Ubicación: Ciudad Catedral, Españistán
Posts: 6.000
Poder: 25
Ñuño Martínez Tiene un aura espectacularÑuño Martínez Tiene un aura espectacular
Hola rom@n. También es un gusto ver que sigues en la brecha.

Personalmente yo no lo haría en SQL. Es decir, obtendría los datos que necesito y los computaría en Delphi. Las consultas SQL con tantos SUM, tantos IF y tantas operaciones aritméticas no suelen ser muy eficientes.
__________________
Proyectos actuales --> Allegro 5 Pascal ¡y Delphi!|MinGRo Game Engine
Responder Con Cita
  #3  
Antiguo 05-05-2010
Rom@n Rom@n is offline
Miembro
 
Registrado: oct 2007
Posts: 25
Poder: 0
Rom@n Va por buen camino
Thumbs up Gracias Ñuño

Hola Ñuño Martinez disculpa por no responder antes.

Lo que me comentas es muy buena idea, pero no lo hago de esa manera porque creo que es poco redundante al momento de hacer updates o modificaciones por ejemplo:

1.-campturo una entrada o compra nueva y guardo
2.-aumenta mi inventario al guardar segun el detalle
3.-me doy cuenta que tengo un error de captura en esa compra registrada
4.-la localizo y entro a modificar el error
5.-al guardar me duplicaria el inventario.

para evitar que se dupliquen las cantidades en el inventario lo unico que se me ocurre antes de entrar a modificar primero descontar del inventario todo lo que contenga mi entrada para que al guardar los cambios no se dupliquen las cantidades, ademas si cancelo la modificacion tendria que dar de alta de nuevo seria igual que guardar cambios, todo eso se me hace redundante amenos que al campo existe de la tabla stock aplique una sentencia sql que obtenga la suma de todas las entradas menos todas las salidas.

se puede decir que casi no tengo experiencia en esto si tu podrias ayudar a escojer el mejor camino para lograrlo te lo agradeceria mucho estoy dispuesto a programar lo que me propongas. muchas gracias.
Responder Con Cita
  #4  
Antiguo 05-05-2010
Avatar de Ñuño Martínez
Ñuño Martínez Ñuño Martínez is offline
Moderador
 
Registrado: jul 2006
Ubicación: Ciudad Catedral, Españistán
Posts: 6.000
Poder: 25
Ñuño Martínez Tiene un aura espectacularÑuño Martínez Tiene un aura espectacular
No sé si lo he pillado, pero...
Cita:
Empezado por Rom@n Ver Mensaje
1.-campturo una entrada o compra nueva y guardo
2.-aumenta mi inventario al guardar segun el detalle
3.-me doy cuenta que tengo un error de captura en esa compra registrada
4.-la localizo y entro a modificar el error
5.-al guardar me duplicaria el inventario.
No tiene por qué duplicar si utilizas UPDATE en ese paso, en lugar de un SELECT.

También puedes agrupar las acciones en "transacciones", las cuales tienen la ventaja de poder deshacerse. Así si detectas un error puedes cancelarlo y reconstruir la transacción de nuevo.
__________________
Proyectos actuales --> Allegro 5 Pascal ¡y Delphi!|MinGRo Game Engine
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Sistema de control en tiempo real FGarcia Varios 2 15-08-2008 16:30:15
duda sobre control de existencias de articulos gmontes Firebird e Interbase 7 10-01-2006 02:28:45
Sugerencia para un módulo de Inventarios JorgeBec Varios 2 10-12-2005 22:04:28
Proyecto de un sistema de facturacion y control de pasientes estebanx Varios 2 16-12-2004 21:50:02
sentencia sql para access aip Conexión con bases de datos 2 17-02-2004 19:18:52


La franja horaria es GMT +2. Ahora son las 23:19:03.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi