Hello everyone.
I have a script that reads my table where contains the date, supplier and value.
Data | Fornecedor | Valor |
| | 5.925.210,16 |
03/2011 | 46 | 2.005.965,00 |
04/2011 | 46 | 1.796.951,21 |
05/2011 | 46 | 2.122.293,95 |
Then it divides the value in plots and writes this information into a file QVD with the vendor name.
STORE Parcelas_Compra INTO D:\Desenv\Qvd_Fluxo\TMP_Parcelas_Compra_$(fornecedor).qvd;
The problem he writes only the last record in QVD.
He is overlapping the previous information.
Data1 | Fornecedor | Vendas Previstas |
| | |
05/2011 | 46 | 2.122.293,95 |
What would be the best way to resolve this issue?
My script.
Unqualify *;
FOR k = 0 TO (NoOfRows('Datas')-1)
LET Frequencia_média = peek('Datas.Frequencia_média', $(k));
LET Frequencia_Compra = peek('Datas.Frequencia_Compra', $(k));
LET data = peek('Datas.Data', $(k));
LET parcela = peek('Datas.Parcelas', $(k));
LET fornecedor = peek('Fornecedor', $(k));
LET V_Compra = peek('Datas.Valor_Compra', $(k));
LET Prazo = peek('Datas.Prazos', $(k));
LET vValorParcela = (Num('$(V_Compra)')/Num('$(parcela)'));
//LET V_Venda = peek('Valor_Venda', $(k));
FOR a = 1 to ($(Frequencia_Compra))
FOR i = 0 to ($(parcela)-1)
Parcelas_Compra:
LOAD
//Date(Date('$(data)','DD/MM/YYYY')+('$(Prazo)'*'$(i)'),'DD/MM/YYYY') +'$(a)'*('$(Prazo)'-1)+(1-'$(a)') as Data,
Date(Date('$(data)','DD/MM/YYYY') + '$(Frequencia_média)' * '$(a)'-1 ,'DD/MM/YYYY')+ ('$(i)'+1)*'$(Prazo)' as Data_Compra,
'$(i)'+1 as Parcelas,
'$(parcela)' as Total_Parcelas,
'$(fornecedor)' as Fornecedor,
'$(V_Compra)' as Valor_Compra,
//'$(V_Venda)' as Valor_Venda,
'$(Prazo)' as Prazos,
'$(vValorParcela)' as Valor_Parcela
//'$(Periodo1)' as Periodo1
AUTOGENERATE(1);
NEXT i
NEXT a
STORE Parcelas_Compra INTO D:\Desenv\Qvd_Fluxo\TMP_Parcelas_Compra_$(fornecedor).qvd;
DROP TABLE Parcelas_Compra;
NEXT k