Ir para conteúdo
  • 0

ATUALIZAÇÃO DE RELATÓRIO - NÃO ESTA ATUALIZANDO


Anderson Souto
Ir para solução Solucionado por Bruno Abdalla de Souza ,

Pergunta

7 respostass a esta questão

Posts Recomendados

  • 0
  • Alunos

OK, tenta colar isto no seu relatório. Só não esqueça de trocar o caminho do arquivo, que mudei aqui para a pasta do meu computador.

let
    Fonte = Folder.Files("D:\OneDrive\Cursos\Business_Inteligence\PowerBI\Leonardo Karpinski\PowerBI_Experience\Forum\PowerQuery\20230112_NaoEstaAtualizandoRelatorio\BaseDados\Pontualidade"),
    #"Linhas Filtradas" = Table.SelectRows(Fonte, each not Text.StartsWith([Name], "~")),
    #"Personalização Adicionada" = Table.AddColumn(#"Linhas Filtradas", "Conteudo", each Excel.Workbook([Content])),
    #"Outras Colunas Removidas" = Table.SelectColumns(#"Personalização Adicionada",{"Name", "Conteudo"}),
    #"Conteudo Expandido" = Table.ExpandTableColumn(#"Outras Colunas Removidas", "Conteudo", {"Name", "Data", "Item", "Kind", "Hidden"}, {"Name.1", "Data", "Item", "Kind", "Hidden"}),
    #"Outras Colunas Removidas1" = Table.SelectColumns(#"Conteudo Expandido",{"Name", "Data"}),
    #"Data Expandido" = Table.Buffer(Table.ExpandTableColumn(#"Outras Colunas Removidas1", "Data", {"Column1", "Column2", "Column3", "Column4", "Column5", "Column6", "Column7", "Column8", "Column9", "Column10", "Column11", "Column12", "Column13", "Column14"}, {"Column1", "Column2", "Column3", "Column4", "Column5", "Column6", "Column7", "Column8", "Column9", "Column10", "Column11", "Column12", "Column13", "Column14"})),
    #"Linhas Filtradas1" = Table.SelectRows(#"Data Expandido", each ([Column4] <> null)),
    #"Colunas Removidas3" = Table.RemoveColumns(#"Linhas Filtradas1",{"Name"}),
    #"Cabeçalhos Promovidos" = Table.PromoteHeaders(#"Colunas Removidas3", [PromoteAllScalars=true]),
    #"Índice Adicionado" = Table.AddIndexColumn(#"Cabeçalhos Promovidos", "Índice", 0, 1, Int64.Type),
    #"Personalização Adicionada3" = Table.AddColumn(#"Índice Adicionado", "DataOriginal", each #"Linhas Filtradas1"[Name]{[Índice]}),
    #"Colunas Removidas4" = Table.RemoveColumns(#"Personalização Adicionada3",{"Índice"}),
    #"Preenchido Acima" = Table.FillUp(#"Colunas Removidas4",{"Veículo"}),
    #"Linhas Filtradas2" = Table.SelectRows(#"Preenchido Acima", each ([Fim] <> "Fim")),
    #"Adição Inserida" = Table.AddColumn(#"Linhas Filtradas2", "Prefixo", each Number.From([Veículo]) + 1100000, type number),
    #"Tipo Alterado" = Table.TransformColumnTypes(#"Adição Inserida",{{"Prefixo", type text}}),
    #"Erros Substituídos" = Table.ReplaceErrorValues(#"Tipo Alterado", {{"Prefixo", "06"}}),
    #"Consultas Mescladas" = Table.NestedJoin(#"Erros Substituídos", {"Prefixo"}, dVeiculos, {"Prefixo"}, "dVeiculos", JoinKind.LeftOuter),
    #"dVeiculos Expandido" = Table.ExpandTableColumn(#"Consultas Mescladas", "dVeiculos", {"Indice"}, {"Indice"}),
    #"Colunas Removidas" = Table.RemoveColumns(#"dVeiculos Expandido",{"Veículo"}),
    #"Outras Colunas Removidas2" = Table.SelectColumns(#"Colunas Removidas",{"Pegada", "Início", "Fim", "Sentido", "Motorista", "Linha", "Status", "Pontualidade", "Observacões", "Desvios", "Inspetor / Aux. Monitoramento", "DataOriginal", "Prefixo", "Indice"}),
    #"Tipo Alterado2" = Table.TransformColumnTypes(#"Outras Colunas Removidas2",{{"Indice", type text}}),
    #"Colunas Renomeadas" = Table.RenameColumns(#"Tipo Alterado2",{{"Pegada", "Data"}}),
    #"Tipo Alterado3" = Table.TransformColumnTypes(#"Colunas Renomeadas",{{"Prefixo", type text}}),
    #"Erros Removidos" = Table.RemoveRowsWithErrors(#"Tipo Alterado3", {"Prefixo"}),
    #"Personalização Adicionada1" = Table.AddColumn(#"Erros Removidos", "Cliente", each List.Accumulate( dClientes , "" , 
(state, current) =>
    if Text.Contains([Linha], current, Comparer.OrdinalIgnoreCase) then current
    else state )),
    #"Tipo Alterado4" = Table.TransformColumnTypes(#"Personalização Adicionada1",{{"Cliente", type text}}),
    #"Coluna Condicional Adicionada" = Table.AddColumn(#"Tipo Alterado4", "Inspetor / Auxiliar ", each if [#"Inspetor / Aux. Monitoramento"] = "Angela" then "Angela / Thais" else if [#"Inspetor / Aux. Monitoramento"] = "Urias" then "Urias / Adriano" else if [#"Inspetor / Aux. Monitoramento"] = "Zamir" then "Zamir / Marcos" else [#"Inspetor / Aux. Monitoramento"], type text),
    #"Colunas Removidas1" = Table.RemoveColumns(#"Coluna Condicional Adicionada",{"Inspetor / Auxiliar "}),
    #"Coluna Condicional Adicionada1" = Table.AddColumn(#"Colunas Removidas1", "Inspetores / Monitoramento", each if [#"Inspetor / Aux. Monitoramento"] = "Angela" then "Angela / Thais" else if [#"Inspetor / Aux. Monitoramento"] = "Urias" then "Urias / Adriano" else if [#"Inspetor / Aux. Monitoramento"] = "Zamir" then "Zamir / Marcos" else [#"Inspetor / Aux. Monitoramento"], type text),
    #"Preenchido Abaixo" = Table.FillDown(#"Coluna Condicional Adicionada1",{"Prefixo"}),
    #"Colunas Removidas2" = Table.RemoveColumns(#"Preenchido Abaixo",{"Inspetores / Monitoramento"}),
    #"Personalização Adicionada2" = Table.AddColumn(#"Colunas Removidas2", "Ano", each 2022),
    #"Tipo Alterado5" = Table.TransformColumnTypes(#"Personalização Adicionada2",{{"Ano", Int64.Type}}),
    #"Texto Extraído Antes do Delimitador" = Table.TransformColumns(#"Tipo Alterado5", {{"DataOriginal", each Text.BeforeDelimiter(_, ".xlsx"), type text}}),
    #"Valor Substituído" = Table.ReplaceValue(#"Texto Extraído Antes do Delimitador","_","/",Replacer.ReplaceText,{"DataOriginal"}),
    #"Tipo Alterado1" = Table.TransformColumnTypes(#"Valor Substituído",{{"DataOriginal", type date}})
in
    #"Tipo Alterado1"

 

Link para o comentário
Compartilhar em outros sites

  • 0
  • Alunos
54 minutos atrás, Bruno Abdalla de Souza disse:

OK, tenta colar isto no seu relatório. Só não esqueça de trocar o caminho do arquivo, que mudei aqui para a pasta do meu computador.

let
    Fonte = Folder.Files("D:\OneDrive\Cursos\Business_Inteligence\PowerBI\Leonardo Karpinski\PowerBI_Experience\Forum\PowerQuery\20230112_NaoEstaAtualizandoRelatorio\BaseDados\Pontualidade"),
    #"Linhas Filtradas" = Table.SelectRows(Fonte, each not Text.StartsWith([Name], "~")),
    #"Personalização Adicionada" = Table.AddColumn(#"Linhas Filtradas", "Conteudo", each Excel.Workbook([Content])),
    #"Outras Colunas Removidas" = Table.SelectColumns(#"Personalização Adicionada",{"Name", "Conteudo"}),
    #"Conteudo Expandido" = Table.ExpandTableColumn(#"Outras Colunas Removidas", "Conteudo", {"Name", "Data", "Item", "Kind", "Hidden"}, {"Name.1", "Data", "Item", "Kind", "Hidden"}),
    #"Outras Colunas Removidas1" = Table.SelectColumns(#"Conteudo Expandido",{"Name", "Data"}),
    #"Data Expandido" = Table.Buffer(Table.ExpandTableColumn(#"Outras Colunas Removidas1", "Data", {"Column1", "Column2", "Column3", "Column4", "Column5", "Column6", "Column7", "Column8", "Column9", "Column10", "Column11", "Column12", "Column13", "Column14"}, {"Column1", "Column2", "Column3", "Column4", "Column5", "Column6", "Column7", "Column8", "Column9", "Column10", "Column11", "Column12", "Column13", "Column14"})),
    #"Linhas Filtradas1" = Table.SelectRows(#"Data Expandido", each ([Column4] <> null)),
    #"Colunas Removidas3" = Table.RemoveColumns(#"Linhas Filtradas1",{"Name"}),
    #"Cabeçalhos Promovidos" = Table.PromoteHeaders(#"Colunas Removidas3", [PromoteAllScalars=true]),
    #"Índice Adicionado" = Table.AddIndexColumn(#"Cabeçalhos Promovidos", "Índice", 0, 1, Int64.Type),
    #"Personalização Adicionada3" = Table.AddColumn(#"Índice Adicionado", "DataOriginal", each #"Linhas Filtradas1"[Name]{[Índice]}),
    #"Colunas Removidas4" = Table.RemoveColumns(#"Personalização Adicionada3",{"Índice"}),
    #"Preenchido Acima" = Table.FillUp(#"Colunas Removidas4",{"Veículo"}),
    #"Linhas Filtradas2" = Table.SelectRows(#"Preenchido Acima", each ([Fim] <> "Fim")),
    #"Adição Inserida" = Table.AddColumn(#"Linhas Filtradas2", "Prefixo", each Number.From([Veículo]) + 1100000, type number),
    #"Tipo Alterado" = Table.TransformColumnTypes(#"Adição Inserida",{{"Prefixo", type text}}),
    #"Erros Substituídos" = Table.ReplaceErrorValues(#"Tipo Alterado", {{"Prefixo", "06"}}),
    #"Consultas Mescladas" = Table.NestedJoin(#"Erros Substituídos", {"Prefixo"}, dVeiculos, {"Prefixo"}, "dVeiculos", JoinKind.LeftOuter),
    #"dVeiculos Expandido" = Table.ExpandTableColumn(#"Consultas Mescladas", "dVeiculos", {"Indice"}, {"Indice"}),
    #"Colunas Removidas" = Table.RemoveColumns(#"dVeiculos Expandido",{"Veículo"}),
    #"Outras Colunas Removidas2" = Table.SelectColumns(#"Colunas Removidas",{"Pegada", "Início", "Fim", "Sentido", "Motorista", "Linha", "Status", "Pontualidade", "Observacões", "Desvios", "Inspetor / Aux. Monitoramento", "DataOriginal", "Prefixo", "Indice"}),
    #"Tipo Alterado2" = Table.TransformColumnTypes(#"Outras Colunas Removidas2",{{"Indice", type text}}),
    #"Colunas Renomeadas" = Table.RenameColumns(#"Tipo Alterado2",{{"Pegada", "Data"}}),
    #"Tipo Alterado3" = Table.TransformColumnTypes(#"Colunas Renomeadas",{{"Prefixo", type text}}),
    #"Erros Removidos" = Table.RemoveRowsWithErrors(#"Tipo Alterado3", {"Prefixo"}),
    #"Personalização Adicionada1" = Table.AddColumn(#"Erros Removidos", "Cliente", each List.Accumulate( dClientes , "" , 
(state, current) =>
    if Text.Contains([Linha], current, Comparer.OrdinalIgnoreCase) then current
    else state )),
    #"Tipo Alterado4" = Table.TransformColumnTypes(#"Personalização Adicionada1",{{"Cliente", type text}}),
    #"Coluna Condicional Adicionada" = Table.AddColumn(#"Tipo Alterado4", "Inspetor / Auxiliar ", each if [#"Inspetor / Aux. Monitoramento"] = "Angela" then "Angela / Thais" else if [#"Inspetor / Aux. Monitoramento"] = "Urias" then "Urias / Adriano" else if [#"Inspetor / Aux. Monitoramento"] = "Zamir" then "Zamir / Marcos" else [#"Inspetor / Aux. Monitoramento"], type text),
    #"Colunas Removidas1" = Table.RemoveColumns(#"Coluna Condicional Adicionada",{"Inspetor / Auxiliar "}),
    #"Coluna Condicional Adicionada1" = Table.AddColumn(#"Colunas Removidas1", "Inspetores / Monitoramento", each if [#"Inspetor / Aux. Monitoramento"] = "Angela" then "Angela / Thais" else if [#"Inspetor / Aux. Monitoramento"] = "Urias" then "Urias / Adriano" else if [#"Inspetor / Aux. Monitoramento"] = "Zamir" then "Zamir / Marcos" else [#"Inspetor / Aux. Monitoramento"], type text),
    #"Preenchido Abaixo" = Table.FillDown(#"Coluna Condicional Adicionada1",{"Prefixo"}),
    #"Colunas Removidas2" = Table.RemoveColumns(#"Preenchido Abaixo",{"Inspetores / Monitoramento"}),
    #"Personalização Adicionada2" = Table.AddColumn(#"Colunas Removidas2", "Ano", each 2022),
    #"Tipo Alterado5" = Table.TransformColumnTypes(#"Personalização Adicionada2",{{"Ano", Int64.Type}}),
    #"Texto Extraído Antes do Delimitador" = Table.TransformColumns(#"Tipo Alterado5", {{"DataOriginal", each Text.BeforeDelimiter(_, ".xlsx"), type text}}),
    #"Valor Substituído" = Table.ReplaceValue(#"Texto Extraído Antes do Delimitador","_","/",Replacer.ReplaceText,{"DataOriginal"}),
    #"Tipo Alterado1" = Table.TransformColumnTypes(#"Valor Substituído",{{"DataOriginal", type date}})
in
    #"Tipo Alterado1"

 

Não deu certo, o código travou o relatório.
Estou achando que o erro esta aqui.

image.png.e2afada7b14091daedb780905ea5d619.png

Link para o comentário
Compartilhar em outros sites

  • 0
  • Alunos
26 minutos atrás, Bruno Abdalla de Souza disse:

Copia a o código que passei aqui, clica em fPontualidade, entra no editor avançado,, apaga o que está lá em copia de novo. Aperta OK. Sò nao esquece de trocar o camiho do arquivo para o do seu computador.

Não atualiza, fica carregando e não vai.
image.png.94e9e53ac8df49b16c3e18db4f32d5fe.png

Link para o comentário
Compartilhar em outros sites

Faça login para comentar

Você vai ser capaz de deixar um comentário após fazer o login



Entrar Agora
×
×
  • Criar Novo...