Leandro Lambertini

Members
  • Content Count

    4
  • Joined

  • Last visited

Everything posted by Leandro Lambertini

  1. Então pessoal era isso mesmo, meu vendedor não estava com os dados completos. Cadastrei manualmente um item no ML e depois disso liberou para publicar via API. Infelizmente pelo delphi não consegui ter o retorno completo do erro, apenas o código do mesmo. Aproveitando, existe algum método para verificar se o Access Token ainda é valido?
  2. Olá Rodrigo, vlw pelas dicas ai! Mas olha só eu descobri o que é, eu consumir o método pelo Postman, e lá retornou: { "message": "seller.unable_to_list", "error": "User LALE5273790 (279710442) is unable to list.", "status": 403, "cause": [ "identification_pending", "identification_empty_or_invalid_doc_type" ] } Vou correr atrás aqui de preencher a identificação e acredito que já vai dar certo! Obrigado!
  3. Olá pessoal tudo bem? Estou desenvolvimento uma integração utilizando o Delphi como linguagem, estou tentando publicar um primeiro item. Já gerei o Access Token, já consegui consumir o post para criar um usuário de teste, porém ao tentar publicar um produto estou tendo o retorno: HTTP/1.1 403 Forbidden Tenho a impressão de ser algo relacionado a permissão, porém verfiquei que estou com as seguintes permissões: Read, Offline Access e Write Estou enviando o meu item desta forma: Json := '{'+ '"title":"Item de teste - Nao Ofertar",'+ '"category_id": "MLB3530",'+ '"price":1,'+ '"currency_id":"BRL",'+ '"available_quantity":1,'+ '"buying_mode":"buy_it_now",'+ '"listing_type_id":"gold_special",'+ '"condition":"new",'+ '"description": "Item de test - No Ofertar",'+ '"video_id": "YOUTUBE_ID_HERE",'+ '"warranty": "12 months",'+ '"pictures":['+ '{"source":"http://mlb-s2-p.mlstatic.com/976752-MLB26236865495_102017-I.jpg"}'+ ']'+ '}'; JsonToSend := TStringStream.Create( UTF8Encode(Json) ); Response := TStringStream.Create(''); IdHTTPMercadoLivre := TIdHTTP.create(nil); try IdHTTPMercadoLivre.Request.ContentType := 'application/json'; IdHTTPMercadoLivre.Request.Method := 'POST'; IdHTTPMercadoLivre.Post('https://api.mercadolibre.com/items?access_token=APP_USR-6851505103268247-102506-9bf0a1a3b3f7371eafaaa1ef0a6f15a8__I_H__-279710442', JsonToSend, Response); Memo1.Lines.Text := Response.DataString; except on E: EIdHTTPProtocolException do begin Memo1.Lines.Text := E.ClassName + ': '+E.Message; end; Será que alguém já passou por isso? Muito obrigado galera!