Olá pessoal,
Tenho as seguintes tabelas:
a004_formapagto
- FPagto_ID
- FPagto_Nome (à Vista, A Prazo, …)
a005_condicoespagto
- CPagto_ID
- FPagto_ID
- CPagto_Dia (1, 15, 30, 45, …)
d001_planilhas
- Planilha_ID
- Cliente_ID
- FPagto_ID
- Planilha_DtCompetencia
- Planilha_Valor
…
d002_detalhes
- Detalhe_ID
- Planilha_ID
- Detalhe_Parcela
- Detalhe_Valor
- Detalhe_Vencimento
…
O que estou precisando fazer?
Criar um botão na aplicação FrmCadPlanilhas que faça o processo abaixo e abra a aplicação FrmCadDetalhes;
Criar uma variável vlParcela com partida inicial de 0 (zero);
Gerar a consulta abaixo e, com base nela, percorre-la e incrementando a variável vlParcela (vlParcela = vlParcela + 1) parra fazer os inserts na tabela d002_detalhes:
SELECT A.Planilha_ID, A.FPagto_ID, A.Planilha_DtCompetencia,
A.Planilha_Valor / (SELECT COUNT(*) FROM a005_condicoespagto X WHERE X.FPagto_ID = B.FPagto_ID) AS VALOR,
ADDDATE( A.Planilha_DtCompetencia, INTERVAL C.CPagto_Dia DAY) AS VENCIMENTO
B.FPagto_Nome, C.CPagto_Dia
FROM d001_planilhas A
INNER JOIN a004_formapagto B ON (B.FPagto_ID = A.FPagto_ID)
INNER JOIN a005_condicoespagto C ON (C.FPagto_ID = B.FPagto_ID)
WHERE A.Planilha_ID = {Planilha_ID}
Não sei se consegui ser claro, mas é isso. Se houver uma forma mais prática, favor postem aqui.
Grato,
Ilano