Ir para conteúdo

Gerson Faria

Alunos
  • Total de itens

    4
  • Registro em

  • Última visita

Community Answers

  1. Gerson Faria's post in Tabela de DATAS was marked as the answer   
    Segue o código da dCalendario.
    fCTRC é a minha fato.
    let
        DataMin = List.Min(fCTRC[Data de Emissao]),
        AnoMin = Date.Year(DataMin),
        DataMax = List.Max(fCTRC[Data de Emissao]),
        AnoMax = Date.Year(DataMax),
        DataInicial = #date(AnoMin, 01,01),
        DataFinal = #date(AnoMax, 12, 31),
        Duracao = Duration.Days(DataFinal - DataInicial) + 1,
        Fonte = List.Dates(DataInicial, Duracao, #duration(1, 0, 0, 0)),
        #"Convertido para Tabela" = Table.FromList(Fonte, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
        #"Tipo Alterado" = Table.TransformColumnTypes(#"Convertido para Tabela",{{"Column1", type date}}),
        #"Colunas Renomeadas" = Table.RenameColumns(#"Tipo Alterado",{{"Column1", "Data"}}),
        #"Ano Inserido" = Table.AddColumn(#"Colunas Renomeadas", "Ano", each Date.Year([Data]), Int64.Type),
        #"Mês Inserido" = Table.AddColumn(#"Ano Inserido", "Mês", each Date.Month([Data]), Int64.Type),
        #"Nome do Mês Inserido" = Table.AddColumn(#"Mês Inserido", "Nome do Mês", each Date.MonthName([Data]), type text),
        #"Dia Inserido" = Table.AddColumn(#"Nome do Mês Inserido", "Dia", each Date.Day([Data]), Int64.Type),
        #"Nome do Dia Inserido" = Table.AddColumn(#"Dia Inserido", "Nome do Dia", each Date.DayOfWeekName([Data]), type text),
        #"Dia da Semana Inserido" = Table.AddColumn(#"Nome do Dia Inserido", "Dia da Semana", each Date.DayOfWeek([Data]), Int64.Type),
        #"Semana do Mês Inserida" = Table.AddColumn(#"Dia da Semana Inserido", "Semana do Mês", each Date.WeekOfMonth([Data]), Int64.Type),
        #"Consultas Mescladas" = Table.NestedJoin(#"Semana do Mês Inserida", {"Data"}, dFeriados, {"DATA"}, "dFeriados", JoinKind.LeftOuter),
        #"dFeriados Expandido" = Table.ExpandTableColumn(#"Consultas Mescladas", "dFeriados", {"ÚTIL"}, {"Auxiliar - Feriados"}),
        #"Valor Substituído" = Table.ReplaceValue(#"dFeriados Expandido",null,1,Replacer.ReplaceValue,{"Auxiliar - Feriados"}),
        #"Coluna Condicional Adicionada" = Table.AddColumn(#"Valor Substituído", "Dia Útil", each if [Dia da Semana] = 0 then 0 else if [Dia da Semana] = 6 then 0 else if [#"Auxiliar - Feriados"] = 0 then 0 else [#"Auxiliar - Feriados"]),
        #"Colunas Removidas" = Table.RemoveColumns(#"Coluna Condicional Adicionada",{"Auxiliar - Feriados"}),
        #"Tipo Alterado1" = Table.TransformColumnTypes(#"Colunas Removidas",{{"Dia Útil", type number}})
    in
        #"Tipo Alterado1"
×
×
  • Criar Novo...