20 lines
750 B
PowerQuery
20 lines
750 B
PowerQuery
(chemin as text, optional parametres as nullable record) as any =>
|
|
let
|
|
parametresBruts = if parametres = null then [] else parametres,
|
|
champsUtiles = List.Select(
|
|
Record.FieldNames(parametresBruts),
|
|
each Record.Field(parametresBruts, _) <> null and Record.Field(parametresBruts, _) <> ""
|
|
),
|
|
parametresNettoyes = Record.SelectFields(parametresBruts, champsUtiles),
|
|
reponse = Web.Contents(
|
|
ApiBaseUrl,
|
|
[
|
|
RelativePath = chemin,
|
|
Headers = [#"X-API-Key" = ApiKey, #"Accept" = "application/json"],
|
|
Query = parametresNettoyes
|
|
]
|
|
),
|
|
resultat = Json.Document(reponse)
|
|
in
|
|
resultat
|