tienda nube

295 views
Skip to first unread message

Abel Flecha

unread,
Jul 10, 2023, 8:54:15 AM7/10/23
to Comunidad de Visual Foxpro en Español
Hola colegas, alguien tendrá un ejemplo de actualización de productos desde VFP9 utilizando esta plataforma?
Gracias!

Victor Espina

unread,
Jul 10, 2023, 9:58:54 AM7/10/23
to Comunidad de Visual Foxpro en Español
Por lo que veo es una simple interfaz REST.  Una vez que obtienes el access token,  es cuestion de enviar requests HTTP con un header "Authorization: bearer {access-token}" y procesar la respuesta que llega en formato JSON.  Por ejemplo, asi se veria un request para actualizar el precio de un producto usando mi libreria JSON:

DO JSON

LOCAL cAcessToken
cAccessToken = "61181d08b7e328d256736hdcb671c3ce50b8af5"

LOCAL cPayload
TEXT TO cPayLoad NOSHOW TEXTMERGE
{
  "id": 144,
  "image_id": null,
  "promotional_price": "19.00",
  "created_at": "2013-01-03T09:11:51-03:00",
  "depth": null,
  "height": null,
  "values": [
    {
      "en": "X-Large"
    }
  ],
  "price": "25.00",
  "product_id": 1234,
  "stock_management": true,
  "stock": 5,
  "sku": "BSG1234D",
  "mpn": null,
  "age_group": null,
  "gender": null,
  "updated_at": "2013-06-01T09:15:11-03:00",
  "weight": "2.75",
  "width": null,
  "cost": "10.99"
}
ENDTEXT

LOCAL cHeaers,oResp
TEXT TO cHeaders NOSHOW TEXTMERGE
Content-Type: application/json
Authorization: bearer <<cAccessToken>>
ENTEXT

oResp = JSON.httpRequest("PUT", "/products/1234/variantes/144", cPayload, cHeaders)
IF oResp.statuscode = 200
   MESSAGEBOX("Actualizado!")
ELSE
   MESSAGEBOX("Error " + ALLT(STR(oResp.statuscode)) + ": " + oResp.raw)
ENDIF

Saludos


Victor Espina

Abel Flecha

unread,
Jul 10, 2023, 12:42:13 PM7/10/23
to Comunidad de Visual Foxpro en Español
Gracias Victor, lo pondré en práctica!

Victor Espina

unread,
Jul 11, 2023, 9:07:08 AM7/11/23
to Comunidad de Visual Foxpro en Español
Olvide indicarte el link a la libreria:

Saludos

Victor Espina

José Antonio Peña Martínez

unread,
Jul 11, 2023, 10:48:54 AM7/11/23
to publice...@googlegroups.com
Dice Victor: " Por lo que veo es una simple interfaz REST" ... grande Victor que es algo que yo no conozco ... Saludos!

--
Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/5b9ec2eb-e0dd-49be-9516-c3e8f9a009e5n%40googlegroups.com.


--
Desarrollo de Sistemas TecnoPro
José Antonio Peña

Saludos!

Victor Espina

unread,
Jul 11, 2023, 11:49:52 AM7/11/23
to Comunidad de Visual Foxpro en Español
jajaja cuando digo "simple" es porque interactuar con un webservice tipo REST es infinitamente mas sencillo que hacerlo con los antiguos webservices basados en SOAP, a pesar de que en VFP no era tan complicado como, por ejemplo, en C#.   La primera vez que lo haces quizas te parezca un poco complicado esto del REST, pero te aseguro que pronto te daras cuenta que es super sencillo.

Victor Espina
Reply all
Reply to author
Forward
0 new messages