Conectar o Power BI

let
    ApiKeyValue = "COLE_SUA_CHAVE_AQUI",
    BaseUrl = "https://claude-data-hub.lovable.app",
    PageSize = 1000,

    // Filtros opcionais por mês (AAAAMM). Record vazio = sem filtro.

    FiltroBase = [],


    FetchPage = (offset as number) as record =>
        let
            Consulta = Record.Combine({
                FiltroBase,
                [
                    limit  = Number.ToText(PageSize),
                    offset = Number.ToText(offset)
                ]
            }),
            Resposta = Web.Contents(
                BaseUrl,
                [
                    RelativePath = "api/public/snapshots",
                    Query        = Consulta,
                    Headers      = [ #"x-api-key" = ApiKeyValue ]
                ]
            )
        in
            Json.Document(Resposta),

    PrimeiraPagina = FetchPage(0),

    // Falha explícita se a resposta não trouxer o total de linhas.
    TotalBruto = Record.FieldOrDefault(PrimeiraPagina, "count", null),
    Total =
        if TotalBruto = null or not Value.Is(TotalBruto, type number)
        then error "Resposta sem o campo 'count'. Verifique a chave de API (header x-api-key) e a URL do endpoint."
        else TotalBruto,

    OffsetsRestantes =
        if Total <= PageSize
        then {}
        else List.Generate(() => PageSize, each _ < Total, each _ + PageSize),

    PaginasRestantes = List.Transform(OffsetsRestantes, each FetchPage(_)[data]),
    TodasAsLinhas = List.Combine({ PrimeiraPagina[data] } & PaginasRestantes),

    Colunas = { "mesano", "ano", "mes", "tickets_nao_finalizados" },
    TabelaBruta = Table.FromRecords(TodasAsLinhas, Colunas, MissingField.UseNull),

    TabelaTipada = Table.TransformColumnTypes(TabelaBruta, {
        {"mesano", type date},
        {"ano", Int64.Type},
        {"mes", Int64.Type},
        {"tickets_nao_finalizados", Int64.Type}
    })
in
    TabelaTipada