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;
