topic Re: Preencher meses sem valor in Brasil

Preencher meses sem valor

girino777 — Thu, 14 Jun 2018 20:26:53 GMT

Boa Tarde Amigos..

Tenho uma tabela com o Ano_Mês e o Valor, porém nem todos os meses eu tenho valor nessa tabela.

Ex:

2018-01 - 10.000,00

2018-02 - 23.000,00

2018-05 - 40.000,00

2018-07 - 50.000,00

A minha dúvida é:

Preciso que os períodos de 2018-03, 2018-04 e 2018-06 sejam carregados com o valor do último mês.

Ex:

2018-01 - 10.000,00

2018-02 - 23.000,00

2018-03 - 23.000,00

2018-04 - 23.000,00

2018-05 - 40.000,00

2018-06 - 40.000,00

2018-07 - 50.000,00

Tem como fazer isso na carga ?

Obrigado

Renato

Re: Preencher meses sem valor

Thiago_Justen_ — Thu, 14 Jun 2018 21:29:53 GMT

Renato,

Teste assim:

set vMaxData=date(today());

set vMinData=Date(AddMonths(today(),-24)); //Troque o 24 pela qtde de meses que você quer retroagir

tempCal:

Load

$(vMinData)+iterno()-1 as tempdata,

date($(vMinData)+iterno()-1) as Data,

Date($(vMinData)+iterno()-1,'YYYY-MM') as Ano_Mês

autogenerate 1 while $(vMinData)+iterno()-1<=$(vMaxData);

Left Join (tempCal)

Load

Ano_Mês,

Valor

From Sua_Base;

Re: Preencher meses sem valor

luizclaudio — Thu, 14 Jun 2018 22:03:16 GMT

Renato

Esse campo Ano_Mês é data ou texto?

A tabela é em Excel?

A saída é utilizar a função peek(), mas talvez que fazer tratamento do campo para comparar as informações

Re: Preencher meses sem valor

girino777 — Thu, 14 Jun 2018 22:05:50 GMT

Olá Luis

O campo é texto.

A tabela é do banco de dados.

Re: Preencher meses sem valor

Anonymous — Fri, 15 Jun 2018 00:52:01 GMT

Olá, Renato!

Tente o script abaixo:

Dados:
Load Date#(Ano_Mês, 'YYYY-MM') As Ano_Mês,
     Valor
Inline
[Ano_Mês, Valor
2018-01, 10.000,00
2018-02, 23.000,00
2018-05, 40.000,00
2018-07, 50.000,00
];


Tmp:
First 1
Load Date(Min(Ano_Mês)) As MinAno_Mês,
     Num(((Year(Max(Ano_Mês)) * 12) + Month(Max(Ano_Mês))) - (((Year(Min(Ano_Mês)) * 12) + Month(Min(Ano_Mês)))) + 1) As Intervalo
Resident Dados;

Tmp2:
Load Date(AddMonths(Peek('MinAno_Mês', 0, 'Tmp'), RowNo() - 1), 'YYYY-MM') As Ano_Mês
AutoGenerate(Peek('Intervalo'));

Left Join
Load * Resident Dados;

Resultado:
NoConcatenate
Load Ano_Mês,
     If(IsNull(Valor), Peek('Valor'), Valor) As Valor
Resident Tmp2
Order By Ano_Mês;

Drop Tables Tmp, Tmp2, Dados;

Resultado:

Re: Preencher meses sem valor

Thiago_Justen_ — Fri, 15 Jun 2018 01:19:50 GMT

Bela solução Daniel! Funciona perfeitamente e com os requisitos que o Renato possui..

Eu escolheria a sua solução para fechar a thread!

Re: Preencher meses sem valor

girino777 — Fri, 15 Jun 2018 11:47:03 GMT

Olá Daniel

Bom Dia.!

Eu rodei com os dados da minha tabela e esta apresentando um erro.

Re: Preencher meses sem valor

Anonymous — Fri, 15 Jun 2018 11:51:22 GMT

Tem como você disponibilizar parte desses dados num excel para eu dar uma olhada?

Re: Preencher meses sem valor

girino777 — Fri, 15 Jun 2018 12:00:04 GMT

Opa...

Segue o qvf e o qvd.

Muito Obrigado

Re: Preencher meses sem valor

Anonymous — Fri, 15 Jun 2018 13:53:39 GMT

O seu qvd carrega normalmente com o script que postei, e roda sem erros aqui.

O problema é que os dados estão agrupados por "familia", e cada "familia" aparentemente tem dois valores para cada "Ano_Mês". Neste caso, eu não sei qual dos dois valores que deve ser copiado para o próximo período, caso ele esteja faltando. Sem contar que você aparentemente tem duas colunas de valores ("estoque" e "cvm").

Todos esses detalhes foram omitidos no seu post inicial, e receio que boa parte da lógica que empreguei na minha resposta tenha que ser alterada.