GetResourcePolicy Delphi (DLL) Example
var
begin
CkAuthAws_putAccessKey(authAws,'AWS_ACCESS_KEY');CkAuthAws_putSecretKey(authAws,'AWS_SECRET_KEY');CkAuthAws_putRegion(authAws,'us-west-2');CkAuthAws_putServiceName(authAws,'secretsmanager');CkRest_SetAuthAws(rest,authAws);success := CkRest_Connect(rest,'secretsmanager.us-west-2.amazonaws.com',443,True,True);CkJsonObject_UpdateString(json,'SecretId','string');CkRest_AddHeader(rest,'Content-Type','application/x-amz-json-1.1');CkRest_AddHeader(rest,'X-Amz-Target','secretsmanager.GetResourcePolicy');CkJsonObject_EmitSb(json,sbRequestBody);success := CkRest_FullRequestSb(rest,'POST','/',sbRequestBody,sbResponseBody);CkJsonObject_LoadSb(jResp,sbResponseBody);
