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
  • Membros

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
  • Membros
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
  • Membros
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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...