Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 26-11-2018
Avatar de mRoman
mRoman mRoman is offline
Miembro
 
Registrado: nov 2003
Posts: 646
Poder: 23
mRoman Va por buen camino
Cita:
Empezado por Casimiro Notevi Ver Mensaje
No explicas nada sobre cómo se va a usar eso, pero básicamente crearía una tabla con los horarios disponibles, otra tabla donde almacenar asociación de pedido-horario, y le asignaría pedidos hasta completar 10 por cada horario. Una vez ha llegado a 10, pasar al siguiente horario de la tabla horarios disponibles.
Gracias casimiro...efectivamente no explique nada de como se va a usar. Explico:

El cliente quiere no saturase de trabajo y poder controlar la cantidad de pedidos a realizar para no quedar mal con sus clientes, así que me encargo que el sistema cuidara que por cada hora solo se permitan 10 pedidos....

Lo que llevo: (pruebas)

Cree una tabla llamada FECHA_CRITICA, en la cual tiene estos campos:
Código:
mes numeric(2)
anio numeric(4)
hora_inicial time
hora_final time
maximo_pedidos numeric(2)
y otra tabla con los pedidos, que básicamente solo le cree 3 campos:

Código:
id_pedido numeric(2)
fecha_levantamiento_pedido date /*que pude ser también timestamp, para no tener 2 campos*/
hora_levantamiento_pedido time
A la tabla de PEDIDOS le cree un trigger para que valide la fecha y el horario por cada INSERT o UPDATE q se le haga a la tabla.
Código SQL [-]
CREATE TRIGGER TRG_VALIDAR_FECHA_CRITICA FOR AGENDA_PEDIDO
ACTIVE AFTER INSERT OR UPDATE POSITION 0
AS
declare variable vmaximopedidos numeric(2);
declare variable vtotpedidos numeric(3);
begin
select a.maximo_pedidos,
       count(*) as tot_pedidos
     from fecha_critica a,
          agenda_pedido b
     where a.mes =extract(month from new.fecha_pedido)
       and a.anio=extract (year from new.fecha_pedido)
       and new.hora_pedido between a.hora_inicial and a.hora_final
     group by a.maximo_pedidos
     into :vmaximopedidos,
          :vtotpedidos;
     if (:vTotPedidos>=:vMaximoPedidos) then
     begin
          exception exc_horario_saturado;
     end
end

Hasta ahorita esto me ha resultado...pero no sé si sea la mas adecuada, sigo probando.

Gracias por tus comentarios y tu tiempo Casimiro!...y a todos los q consulten y lean este hilo, también muchas gracias.

Saludos.
__________________
Miguel Román

Afectuoso saludo desde tierras mexicanas....un aguachile?, con unas "cetaseas" bien "muertas"?, VENTE PUES !!
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Gestión de pedidos a través de la Web Delphitest Delphi para la web 4 22-05-2015 09:44:08
Crear una agenda Victorialerda Varios 5 13-07-2012 22:36:52
pedidos sergioperez Tablas planas 23 21-01-2011 22:53:56
Crear Agenda con componentes standard de Delphi FNADALO Varios 3 26-07-2004 13:04:53
Crear una agenda MAGRANA Varios 5 02-07-2004 13:16:24


La franja horaria es GMT +2. Ahora son las 14:37:38.


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