let
    DataMin = List.Min(fPCM[Data Criação]),
    DataMax = List.Max(fPCM[Data Criação]),
    AnoMin = Date.Year(DataMin),
    AnoMax = Date.Year(DataMax),
    DataInicial = #date(AnoMin, 1, 1),
    DataFinal = #date(AnoMax, 12, 31),
    Duracao = Duration.Days(DataFinal - DataInicial) + 1,
    
    Source = List.Dates(DataInicial, Duracao, #duration(1, 0, 0, 0)),
    #"Converted to Table" = Table.FromList(Source, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Changed Type" = Table.TransformColumnTypes(#"Converted to Table",{{"Column1", type date}}),
    #"Renamed Columns" = Table.RenameColumns(#"Changed Type",{{"Column1", "Data"}}),
    #"Inserted Year" = Table.AddColumn(#"Renamed Columns", "Ano", each Date.Year([Data]), Int64.Type),
    #"Inserted Month" = Table.AddColumn(#"Inserted Year", "Mes", each Date.Month([Data]), Int64.Type),
    #"Inserted Month Name" = Table.AddColumn(#"Inserted Month", "Nome do Mes", each Date.MonthName([Data]), type text),
    #"Inserted Quarter" = Table.AddColumn(#"Inserted Month Name", "Trimestre", each Date.QuarterOfYear([Data]), Int64.Type),
    #"Inserted Day" = Table.AddColumn(#"Inserted Quarter", "Dia", each Date.Day([Data]), Int64.Type),
    #"Inserted Day Name" = Table.AddColumn(#"Inserted Day", "Nome do dia", each Date.DayOfWeekName([Data]), type text),
    #"Inserted Day of Week" = Table.AddColumn(#"Inserted Day Name", "Dia da semana", each Date.DayOfWeek([Data]), Int64.Type),
    #"Coluna Personalizada Adicionada" = Table.AddColumn(#"Inserted Day of Week", "Mes-Ano", each Text.Combine({Date.ToText([Data], "MMM"), "-", Date.ToText([Data], "yyyy")}), type text),
    #"Personalização Adicionada" = Table.AddColumn(#"Coluna Personalizada Adicionada", "Class Mes-Ano", each 100*[Ano] + [Mes]),
    #"Tipo Alterado" = Table.TransformColumnTypes(#"Personalização Adicionada",{{"Class Mes-Ano", Int64.Type}}),
    #"Colocar Cada Palavra Em Maiúscula" = Table.TransformColumns(#"Tipo Alterado",{{"Nome do Mes", Text.Proper, type text}, {"Mes-Ano", Text.Proper, type text}}),
    #"Primeiros caracteres extraídos" = Table.TransformColumns(#"Colocar Cada Palavra Em Maiúscula", {{"Nome do Mes", each Text.Start(_, 3), type text}})
in
    #"Primeiros caracteres extraídos"