(AutoIt) Shopware 6 - Rename Category

See more Shopware 6 Examples

Changes the name of an existing category.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

; This example assumes the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.

$oHttp = ObjCreate("Chilkat.Http")
Local $bSuccess

; You'll need to know the category's id to update the name.
; See Find Shopware Category by Name for example code.

; Load the access token previously obtained in Shopware 6 OAuth2 Client Credentials
$oJsonToken = ObjCreate("Chilkat.JsonObject")
$oJsonToken.LoadFile("qa_data/tokens/shopware6.json")

; This causes the "Authorization: Bearer <access_token>" header to be added.
$oHttp.AuthToken = $oJsonToken.StringOf("access_token")

; Send a PATCH request where the category id is in the path and the new name is in the JSON body, like this:
; PATCH /api/v3/category/ab6e524bf224404cb4b675a76550b8cd
; {
;     "name": "new_category_name"
; }

Local $sCategoryId = "ab6e524bf224404cb4b675a76550b8cd"

$oSbUrl = ObjCreate("Chilkat.StringBuilder")
$oSbUrl.Append("https://my-shopware-6-shop.de/api/v3/category/")
$oSbUrl.Append($sCategoryId)

; Rename the category to "TestABC"
$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.UpdateString("name","TestABC")

Local $oResp = $oHttp.PText("PATCH",$oSbUrl.GetAsString(),$oJson.Emit(),"utf-8","application/json",False,False)
If ($oHttp.LastMethodSuccess = False) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

$oSbResponseBody = ObjCreate("Chilkat.StringBuilder")
$oResp.GetBodySb($oSbResponseBody)
$oJResp = ObjCreate("Chilkat.JsonObject")
$oJResp.LoadSb($oSbResponseBody)
$oJResp.EmitCompact = False

; A 204 response status code indicates success.
; The response body will be empty when successful.
ConsoleWrite("Response Body:" & @CRLF)
ConsoleWrite($oJResp.Emit() & @CRLF)

; If we get a 401 response, it may be that our access token expired and we need to fetch a new one.
Local $iRespStatusCode = $oResp.StatusCode
ConsoleWrite("Response Status Code = " & $iRespStatusCode & @CRLF)
If ($iRespStatusCode >= 400) Then
    ConsoleWrite("Response Header:" & @CRLF)
    ConsoleWrite($oResp.Header & @CRLF)
    ConsoleWrite("Failed." & @CRLF)

    Exit
EndIf