ActiveDelphi

[wcrisostomo]

bom dia amigos do forum, venho aki para pedir a ajuda de vcs, e o seguinte, tenho uma tabela chamado tarifario, eu quero relalizar um calculo baseado em alguns dados dessa tabela, a estrutura dela e a seguinte:

CREATE TABLE TARIFARIO (
CODIGO INTEGER NOT NULL,
NOME_PACOTE VARCHAR(100),
PER_INI DATE,
PER_FIM DATE,
SGL_DBL FLOAT,
ADC_ADT FLOAT,
ADC_CHD FLOAT,
CHD_FREE FLOAT,
COD_HOTEL INTEGER,
NOME_HOTEL VARCHAR(100),
DATACAD DATE
);

onde tenho cadastrada varias tarifas, eu quero informar duas datas(dataini e datafim) e o sistema buscar as tarifas relacionadas a esse periodo e depois disso calcular da seguinte forma:
sgl_dbl * quantidade de dias uteis
sgl_dbl * quantidade de dias final de semana, pois la tem tarifas so para final de semana e so para dias uteis, detalhe, na consulta vou filtrar tambem pelo nome do hotel(nome_hotel)

se alguem puder me ajudar ficarei grato !!

[raquelreis]

Boa Tarde,

1)

[wcrisostomo]

entao raquelreis, em relacao a buscar a tarifa de acordo com a data eu ja consegui, agora tenho que depois que fazer essa consulta, efetuar o calculo, pois e um sistema de agencia de turismo, o meu cliente quer apenas jogar o intervalo de datas e o nome do hotel e ja trazer o calculo pronto, so que o problema e que na tabela existe tarifas para final de semana e dias uteis, entao tenho que identificar na consulta as tarifas para cada situacao, e somar so nao sei como, ja tentei de tudo, se vc tiver alguma sujestao, meu banco e o firebird 2.1 e programo em delphi 2010, se souber fazer pelo delphi tambem serve, o importante e fazer esse calculo !!!!

[raquelreis]

Bom dia amigo.
Olha tbm sou novata, mas acho q vc deve fazer o cálculo de dias úteis e finais de semana separados.
Defina 2 variáveis para receber esse valor (tarifaUteis,tarifaFimdeSemana).
O código que postei no post anterior soma os dias úteis no intervalo informado. Mas vc pode mudar.

[raquelreis]

Bom dia,
vc poderia descrever os campos:
CODIGO INTEGER NOT NULL,
NOME_PACOTE VARCHAR(100),
PER_INI DATE,
PER_FIM DATE,
SGL_DBL FLOAT,
ADC_ADT FLOAT,
ADC_CHD FLOAT,
CHD_FREE FLOAT,
COD_HOTEL INTEGER,
NOME_HOTEL VARCHAR(100),
DATACAD DATE
para q possa fazer um teste. Ou seja, um exemplo de informação.

[wcrisostomo]

CREATE GENERATOR GEN_TARIFARIO_ID;

CREATE TABLE TARIFARIO (
CODIGO INTEGER NOT NULL,
NOME_PACOTE VARCHAR(100),
PER_INI DATE,
PER_FIM DATE,
SGL_DBL FLOAT,
ADC_ADT FLOAT,
ADC_CHD FLOAT,
CHD_FREE FLOAT,
COD_HOTEL INTEGER,
NOME_HOTEL VARCHAR(100),
DATACAD DATE
);

entao raquel nao deu certo nao esta retornando nada !!!

[raquelreis]

Boa Tarde,

Pode me dá exemplo de valores do seu campo.
Ex:
Codigo = 1
NOME_PACOTE = 'pacote teste'
PER_INI DATE = '01/01/2012'
PER_FIM DATE = '03/01/2012'
etc...

[wcrisostomo]

vamos fazer o seguinte, nao estou em casa agora mas quando chegar em casa eu te mando alguns inserts via script, ai vc executa e insere na tabela, assim vc vai entender o que eu quero !!

[wcrisostomo]

boa noite raquelreis como o prometido ai vai alguns inserts para vc inserir na tabela para avaliar a situacao ...
obs: os campos nome_hotel2,nome_hotel3,nome_hotel4,nome_hotel5,per_ini2,per_ini3,per_ini4,per_ini5,per_fim2,per_fim3,per_fim4,per_fim5 estao vazios, entao nao considere eles na tabela !!!


INSERT INTO TARIFARIO (CODIGO, NOME_PACOTE, PER_INI, PER_FIM, SGL_DBL, ADC_ADT, ADC_CHD, CHD_FREE, COD_HOTEL, NOME_HOTEL, DATACAD, NOME_HOTEL2, NOME_HOTEL3, NOME_HOTEL4, NOME_HOTEL5, PER_INI2, PER_FIM2, PER_INI3, PER_FIM3, PER_INI4, PER_FIM4, PER_INI5, PER_FIM5)
VALUES (1, 'GD GRAND HOTEL - B.TEMPORADA PROMOCAO FEV/MAR/ABR', '2012-01-29', '2012-02-17', 175, 70, 43, 0, NULL, 'GOLDEN DOLPHIN GRAND HOTEL', '2012-01-10', NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
INSERT INTO TARIFARIO (CODIGO, NOME_PACOTE, PER_INI, PER_FIM, SGL_DBL, ADC_ADT, ADC_CHD, CHD_FREE, COD_HOTEL, NOME_HOTEL, DATACAD, NOME_HOTEL2, NOME_HOTEL3, NOME_HOTEL4, NOME_HOTEL5, PER_INI2, PER_FIM2, PER_INI3, PER_FIM3, PER_INI4, PER_FIM4, PER_INI5, PER_FIM5)
VALUES (2, 'GD GRAND HOTEL - B.TEMPORADA PROMOCAO FEV/MAR/ABR', '2012-02-22', '2012-04-05', 175, 70, 43, 0, NULL, 'GOLDEN DOLPHIN GRAND HOTEL', '2012-01-10', NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
INSERT INTO TARIFARIO (CODIGO, NOME_PACOTE, PER_INI, PER_FIM, SGL_DBL, ADC_ADT, ADC_CHD, CHD_FREE, COD_HOTEL, NOME_HOTEL, DATACAD, NOME_HOTEL2, NOME_HOTEL3, NOME_HOTEL4, NOME_HOTEL5, PER_INI2, PER_FIM2, PER_INI3, PER_FIM3, PER_INI4, PER_FIM4, PER_INI5, PER_FIM5)
VALUES (3, 'GD GRAND HOTEL - B.TEMPORADA PROMOCAO FEV/MAR/ABR', '2012-04-08', '2012-04-28', 175, 70, 43, 0, NULL, 'GOLDEN DOLPHIN GRAND HOTEL', '2012-01-10', NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
INSERT INTO TARIFARIO (CODIGO, NOME_PACOTE, PER_INI, PER_FIM, SGL_DBL, ADC_ADT, ADC_CHD, CHD_FREE, COD_HOTEL, NOME_HOTEL, DATACAD, NOME_HOTEL2, NOME_HOTEL3, NOME_HOTEL4, NOME_HOTEL5, PER_INI2, PER_FIM2, PER_INI3, PER_FIM3, PER_INI4, PER_FIM4, PER_INI5, PER_FIM5)
VALUES (4, 'GD GRAND HOTEL - BAIXA T. DOM A SEX 01/05 A 01/06/2012', '2012-05-01', '2012-05-04', 184, 74, 46, 0, NULL, 'GOLDEN DOLPHIN GRAND HOTEL', '2012-01-10', NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
INSERT INTO TARIFARIO (CODIGO, NOME_PACOTE, PER_INI, PER_FIM, SGL_DBL, ADC_ADT, ADC_CHD, CHD_FREE, COD_HOTEL, NOME_HOTEL, DATACAD, NOME_HOTEL2, NOME_HOTEL3, NOME_HOTEL4, NOME_HOTEL5, PER_INI2, PER_FIM2, PER_INI3, PER_FIM3, PER_INI4, PER_FIM4, PER_INI5, PER_FIM5)
VALUES (5, 'GD GRAND HOTEL - BAIXA T. DOM A SEX 01/05 A 01/06/2012', '2012-05-06', '2012-05-11', 184, 74, 46, 0, NULL, 'GOLDEN DOLPHIN GRAND HOTEL', '2012-01-10', NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
INSERT INTO TARIFARIO (CODIGO, NOME_PACOTE, PER_INI, PER_FIM, SGL_DBL, ADC_ADT, ADC_CHD, CHD_FREE, COD_HOTEL, NOME_HOTEL, DATACAD, NOME_HOTEL2, NOME_HOTEL3, NOME_HOTEL4, NOME_HOTEL5, PER_INI2, PER_FIM2, PER_INI3, PER_FIM3, PER_INI4, PER_FIM4, PER_INI5, PER_FIM5)
VALUES (6, 'GD GRAND HOTEL - BAIXA T. DOM A SEX 01/05 A 01/06/2012', '2012-05-13', '2012-05-18', 184, 74, 46, 0, NULL, 'GOLDEN DOLPHIN GRAND HOTEL', '2012-01-10', NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
INSERT INTO TARIFARIO (CODIGO, NOME_PACOTE, PER_INI, PER_FIM, SGL_DBL, ADC_ADT, ADC_CHD, CHD_FREE, COD_HOTEL, NOME_HOTEL, DATACAD, NOME_HOTEL2, NOME_HOTEL3, NOME_HOTEL4, NOME_HOTEL5, PER_INI2, PER_FIM2, PER_INI3, PER_FIM3, PER_INI4, PER_FIM4, PER_INI5, PER_FIM5)
VALUES (7, 'GD GRAND HOTEL - BAIXA T. DOM A SEX 01/05 A 01/06/2012', '2012-05-20', '2012-05-25', 184, 74, 46, 0, NULL, 'GOLDEN DOLPHIN GRAND HOTEL', '2012-01-10', NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
INSERT INTO TARIFARIO (CODIGO, NOME_PACOTE, PER_INI, PER_FIM, SGL_DBL, ADC_ADT, ADC_CHD, CHD_FREE, COD_HOTEL, NOME_HOTEL, DATACAD, NOME_HOTEL2, NOME_HOTEL3, NOME_HOTEL4, NOME_HOTEL5, PER_INI2, PER_FIM2, PER_INI3, PER_FIM3, PER_INI4, PER_FIM4, PER_INI5, PER_FIM5)
VALUES (8, 'GD GRAND HOTEL - BAIXA T. DOM A SEX 01/05 A 01/06/2012', '2012-05-27', '2012-06-01', 184, 74, 46, 0, NULL, 'GOLDEN DOLPHIN GRAND HOTEL', '2012-01-10', NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
INSERT INTO TARIFARIO (CODIGO, NOME_PACOTE, PER_INI, PER_FIM, SGL_DBL, ADC_ADT, ADC_CHD, CHD_FREE, COD_HOTEL, NOME_HOTEL, DATACAD, NOME_HOTEL2, NOME_HOTEL3, NOME_HOTEL4, NOME_HOTEL5, PER_INI2, PER_FIM2, PER_INI3, PER_FIM3, PER_INI4, PER_FIM4, PER_INI5, PER_FIM5)
VALUES (9, 'GD GRAND HOTEL BAIXTA T. DOM A SEX 03/06 A 29/06/2012', '2012-06-03', '2012-06-07', 184, 74, 46, 0, NULL, 'GOLDEN DOLPHIN GRAND HOTEL', '2012-01-10', NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);

COMMIT WORK;

[raquelreis]

Bom dia,
Ok entendi, já fiz os inserts. Mas o que quero saber ainda não é isso.
O que significa os campos SGL_DBL,ADC_ADT, ADC_CHD, CHD_FREE???
Exemplo o campo CODIGO é a chave primária da tabela e é autoincremento.
Já o campo NOME_PACOTE armazena o nome do pacote. etc....
Pq vc falou que tem tarifas diferentes entre dias úteis e final de semana.
Quem no seu banco representa cada uma?

[raquelreis]

Bom dia, olhe seu e-mail. Fiz um exemplo de calculo entre datas.
Quem sabe ajuda.
Plz Não responder por e-mail. Apenas MP.

[wcrisostomo]

[wcrisostomo]

bom dia, sobre o email que vc me enviou, eu ja tenho aquela rotina, o que preciso e separar na consulta as tarifas, por exemplo:
vamos supor que na consulta me trouxe :
cod = 30
nome_pacote: baixa temporada sexta a domingo
sgl_dbl= 177,00
adc_adt = 100,00
adc_chd = 85,00
nome_hotel = golden dolphin grand hotel
per_ini = 06/01
per_fim = 08/01

cod = 33
nome_pacote: baixa temporada domingo a sexta
sgl_dbl= 150,00
adc_adt = 80,00
adc_chd = 50,00
nome_hotel = golden dolphin grand hotel
per_ini = 09/01
per_fim = 13/01

entao o que eu quero e que o sistema separa nessa consulta quantas diarias deu no codigo 30 e multiplica pela tarifa pertencente a ele depois faça o mesmo com o codigo 33 para depois somar os dois e dar o valor do pacote para o cliente, lembrando que tem que respeitar o periodo inicial e final que o cliente ira informar !!!

e esse o problema espero que me ajude !!! obrigado !!

[raquelreis]

Bom dia,
Você já usou o Group By? Ele organiza os dados por grupos, ai vc pode definir.
Na sua tabela, como os inserts que vc me mandou usei assim:

[wcrisostomo]

ok vou testar e depois te falo !!