Consuming Rest APIs through Power BI and Paginate

[TinoC]

This is my first attempting at consuming Rest APIs through power query. After much struggle, i am able to make an API call successfully. It returns only 80 records. The documentation says that I have to append page number at the end of the query string to succesfully paginate.

Something like this:

let
Source = Web.Page(Web.Contents("https://" , [Headers=[Authorization="Token XXXXXXXXXX", #"Content_Type"="application/json"]],
[RelativePath="?page=" & Number.ToText(page),
Query=[Headers=
[Authorization="xxxxxxxxxxxxxxxxxxxxxxxxxxxx",
Content_Type="application/json"]]]))

in

Source

Essentially I need to code to dynamically change the "page=" over any number of pages it may be. Could you please help me to complete the code

[TinoC]

I got this code but I can't get it to work:

let

Source = Web.Page(Web.Contents("https://" , [Headers=[Authorization="Token xxxxx", #"Content_Type"="application/json"]],

[RelativePath="?page=" & Number.ToText(page),

Query=[Headers=

[Authorization="xxxxxxxxxxxxxxxxxxxxxxxxxxxx",

Content_Type="application/json"]]]))

in

Source

= List.Generate( 

() => [Page Number=0, Func=null],

each [Page Number] = 1 or Table.RowCount([Func]) > 1,

each [Page Number=_[Page Number]+1,

Func=GetData([Page Number]+1)],

each _[Func])

[TinoC]

Thanks for your answer Mark, now it generates the following error:

Expression.Error: 3 arguments were passed to a function which expects between 1 and 2.
Details:
Pattern=
Arguments=[List]

[mahoneypat]

Here's one way to do it in the query editor.  To see how it works, just create a blank query, open the Advanced Editor and replace the text there with the M code below.  Not sure why you need Web.Page and Web.Contents.  Usually just Web.Contents is needed.

let
    Source = List.Numbers(1, 10,1),
    #"Converted to Table" = Table.FromList(Source, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Changed Type" = Table.TransformColumnTypes(#"Converted to Table",{{"Column1", type text}}),
    #"Renamed Columns" = Table.RenameColumns(#"Changed Type",{{"Column1", "PageNumber"}}),
    #"Added Custom" = Table.AddColumn(#"Renamed Columns", "WebContents", each Web.Page(Web.Contents("https://" , [Headers=[Authorization="Token XXXXXXXXXX", #"Content_Type"="application/json"]],
[RelativePath="?page=" & [PageNumber],
Query=[Headers=
[Authorization="xxxxxxxxxxxxxxxxxxxxxxxxxxxx",
Content_Type="application/json"]]])))
in
    #"Added Custom"

Pat