Como enviar uma solicitação POST com dados de formulário e parâmetros em PL / SQL
Estou tentando chamar o REST WebService em PL / SQL, mas não funciona. Eu recebo este erro:
Content-type must be multipart/form-data
Aqui está o que eu tenho:
DECLARE
req UTL_HTTP.REQ;
resp UTL_HTTP.RESP;
value VARCHAR2(1024); -- URL to post to
v_url VARCHAR2(200) := 'http://local/api/ws';
-- Post Parameters
v_param VARCHAR2(500) := 'art=11111\&qty=1';
v_param_length NUMBER := length(v_param);
BEGIN
req := UTL_HTTP.BEGIN_REQUEST (url=> v_url, method => 'POST');
UTL_HTTP.SET_HEADER(req, 'User-Agent', 'Mozilla/4.0');
UTL_HTTP.SET_HEADER (r => req,
name => 'Content-Type',
value => 'multipart/form-data; charset=utf-8; boundary=/');
UTL_HTTP.SET_HEADER (r => req,
name => 'Content-Length',
value => v_param_length);
UTL_HTTP.WRITE_TEXT (r => req,
data => v_param);
resp := UTL_HTTP.GET_RESPONSE(req);
LOOP
UTL_HTTP.READ_LINE(resp, value, TRUE);
DBMS_OUTPUT.PUT_LINE(value);
END LOOP;
UTL_HTTP.END_RESPONSE(resp);
EXCEPTION
WHEN UTL_HTTP.END_OF_BODY THEN
UTL_HTTP.END_RESPONSE(resp);
END;
Aqui está um exemplo com CURL:
curl -v -X POST -H "Content-Type: multipart/form-data" -F "art=11111" -F "qty=1" http://local/api/ws
Este exemplo funciona bem com curl, mas não sei por que não acontece no PL / SQL. Pode me ajudar ?