let
    Источник = Json.Document(Web.Contents("https://common-api.wildberries.ru/api/v1/tariffs/box?date=2024-06-15", [Headers=[Authorization="............................................cCI6MTcyODY5NDM5NSwiaWQiOiI3MTEyZWQ1OS04NjA5LTQ3YTMtYjJjYS1hOTU5YjZkYWNlNTQiLCJpaWQiOjIzMDMwNjUxLCJvaWQiOjc0NTIxLCJzIjo2MCwic2lkIjoiMjY2OGJiNTgtZGQzNy01ZWY4LWFlMzgtMzNlZjIzOTU0Y2QzIiwidCI6ZmFsc2UsInVpZCI6MjMwMzA2NTF9.YFnzwihJogzJUGSMGyI_JnOIu8tDrMkfCJVUZVgxvIOBNXvmF-RRWXGLWiM44mbAKsmq3kOHJYUtSQ5G4MQq_w"]])),
    response = Источник[response],
    data = response[data],
    warehouseList = data[warehouseList],
  #"Преобразовано в таблицу" = Table.FromList(warehouseList, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
  #"Развернуто: Column1" = Table.ExpandRecordColumn(#"Преобразовано в таблицу", "Column1", {"boxDeliveryAndStorageExpr", "boxDeliveryBase", "boxDeliveryLiter", "boxStorageBase", "boxStorageLiter", "warehouseName"}, {"boxDeliveryAndStorageExpr", "boxDeliveryBase", "boxDeliveryLiter", "boxStorageBase", "boxStorageLiter", "warehouseName"})
in
    #"Развернуто: Column1"

Function FilePathURLToUNC( _
  strURL As String, _
  Optional bOnlyDir As Boolean = False, _
  Optional bCorpAcc As Boolean = False _
) As String
    
  Dim astr() As String, lLastElement As Long, li As Long
  astr = Split(strURL, "/")
  li = LBound(astr)
    If astr(li) <> "https:" Then
        FilePathURLToUNC = strURL
        Exit Function
    End If
  lLastElement = UBound(astr) 
  
  Dim strUNC As String
  If bCorpAcc Then
    strUNC = Environ("OneDrive")
    li = li + 6
  Else
    strUNC = Environ("OneDriveConsumer")
    li = li + 4
  End If
  For li = li To lLastElement
    If li = lLastElement And bOnlyDir Then Exit For
    strUNC = strUNC & "\" & astr(li)
  Next li

  FilePathURLToUNC = strUNC
    
End Function

(art)=>
let
    url = "https://card.wb.ru/cards/detail",
    headers = [
        #"Accept" = "*/*",
        #"Accept-Language" = "en-US,en;q=0.9",
        #"Connection" = "keep-alive",
        #"Origin" = "https://www.wildberries.ru",
        #"Referer" = "https://www.wildberries.ru/catalog/"&art&"/detail.aspx?targetUrl=GP",
        #"Sec-Fetch-Dest" = "empty",
        #"Sec-Fetch-Mode" = "cors",
        #"Sec-Fetch-Site" = "cross-site",
        #"User-Agent" = "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/107.0.0.0 Safari/537.36",
        #"sec-ch-ua" = "^\^Google",
        #"sec-ch-ua-mobile" = "?0",
        #"sec-ch-ua-platform" = "^\^Windows^^"
    ],
    parameters = [
        #"spp" = "26",
        #"regions" = "80,64,83,4,38,33,70,82,69,68,86,30,40,48,1,22,66,31",
        #"pricemarginCoeff" = "1.0",
        #"reg" = "1",
        #"appType" = "1",
        #"emp" = "0",
        #"locale" = "ru",
        #"lang" = "ru",
        #"curr" = "rub",
        #"couponsGeo" = "2,12,7,3,6,18,21",
        #"sppFixGeo" = "4",
        #"dest" = "-1029256,-85617,-543140,-1586279",
        #"nm" = art
    ],
    response = Web.Contents(url, [
        Query = parameters,
        Headers = headers
    ]),
    json = Json.Document( response ),
    totable = Table.PromoteHeaders(Table.Transpose(Record.ToTable(json[data][products]{0}))),
    #"Removed Columns" = Table.SelectColumns(totable,{"id", "name", "brand", "priceU", "sale", "salePriceU","sizes","rating"}),
    #"Divided Column" = Table.TransformColumns(#"Removed Columns", {{"priceU", each _ / 100, type number}, {"salePriceU", each _ / 100, type number}})
in
    #"Divided Column"