Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(PureBasic) Shopware Create a New ProductSee more Shopware ExamplesCreate a new product in Shopware. For more information, see https://developers.shopware.com/developers-guide/rest-api/examples/article/#step-1-create-a-new-product
IncludeFile "CkHttpResponse.pb" IncludeFile "CkHttp.pb" IncludeFile "CkStringBuilder.pb" IncludeFile "CkJsonObject.pb" Procedure ChilkatExample() ; This example assumes the Chilkat API to have been previously unlocked. ; See Global Unlock Sample for sample code. http.i = CkHttp::ckCreate() If http.i = 0 Debug "Failed to create object." ProcedureReturn EndIf CkHttp::setCkLogin(http, "api_username") CkHttp::setCkPassword(http, "api_key") CkHttp::setCkBasicAuth(http, 1) ; Use this online tool to generate code from sample JSON: ; Generate Code to Create JSON ; The following JSON is sent in the request body. ; { ; "name": "Sport Shoes", ; "active": true, ; "tax": 19, ; "supplier": "Sport Shoes Inc.", ; "categories": [ ; { ; "id": 384 ; } ; ], ; "mainDetail": { ; "number": "turn", ; "active": true, ; "prices": [ ; { ; "customerGroupKey": "EK", ; "price": 999 ; } ; ] ; } ; } json.i = CkJsonObject::ckCreate() If json.i = 0 Debug "Failed to create object." ProcedureReturn EndIf CkJsonObject::ckUpdateString(json,"name","Sport Shoes") CkJsonObject::ckUpdateBool(json,"active",1) CkJsonObject::ckUpdateInt(json,"tax",19) CkJsonObject::ckUpdateString(json,"supplier","Sport Shoes Inc.") CkJsonObject::ckUpdateInt(json,"categories[0].id",384) CkJsonObject::ckUpdateString(json,"mainDetail.number","turn") CkJsonObject::ckUpdateBool(json,"mainDetail.active",1) CkJsonObject::ckUpdateString(json,"mainDetail.prices[0].customerGroupKey","EK") CkJsonObject::ckUpdateInt(json,"mainDetail.prices[0].price",999) resp.i = CkHttp::ckPostJson3(http,"https://my-shopware-shop.com/api/articles","application/json",json) If CkHttp::ckLastMethodSuccess(http) = 0 Debug CkHttp::ckLastErrorText(http) CkHttp::ckDispose(http) CkJsonObject::ckDispose(json) ProcedureReturn EndIf sbResponseBody.i = CkStringBuilder::ckCreate() If sbResponseBody.i = 0 Debug "Failed to create object." ProcedureReturn EndIf CkHttpResponse::ckGetBodySb(resp,sbResponseBody) jResp.i = CkJsonObject::ckCreate() If jResp.i = 0 Debug "Failed to create object." ProcedureReturn EndIf CkJsonObject::ckLoadSb(jResp,sbResponseBody) CkJsonObject::setCkEmitCompact(jResp, 0) Debug "Response Body:" Debug CkJsonObject::ckEmit(jResp) ; A 201 response code indicates success. respStatusCode.i = CkHttpResponse::ckStatusCode(resp) Debug "Response Status Code = " + Str(respStatusCode) If respStatusCode >= 400 Debug "Response Header:" Debug CkHttpResponse::ckHeader(resp) Debug "Failed." CkHttpResponse::ckDispose(resp) CkHttp::ckDispose(http) CkJsonObject::ckDispose(json) CkStringBuilder::ckDispose(sbResponseBody) CkJsonObject::ckDispose(jResp) ProcedureReturn EndIf CkHttpResponse::ckDispose(resp) ; Sample JSON response: ; (Sample code for parsing the JSON response is shown below) ; { ; "success": true, ; "data": { ; "id": 8312, ; "location": "https:\/\/my-shopware-shop.com\/api\/articles\/8312" ; } ; } ; Sample code for parsing the JSON response... ; Use the following online tool to generate parsing code from sample JSON: ; Generate Parsing Code from JSON success.i = CkJsonObject::ckBoolOf(jResp,"success") dataId.i = CkJsonObject::ckIntOf(jResp,"data.id") dataLocation.s = CkJsonObject::ckStringOf(jResp,"data.location") CkHttp::ckDispose(http) CkJsonObject::ckDispose(json) CkStringBuilder::ckDispose(sbResponseBody) CkJsonObject::ckDispose(jResp) ProcedureReturn EndProcedure |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.