Oracle内でJSONを操作する簡単な方法はありますか?ウェブサービスを頻繁に呼び出すために使用するストアドプロシージャがあります。JSONは、ウェブ開発のコンテキストでよく知っている形式ですが、ストアドプロシージャ内でJSONを操作するための最良の方法は何ですか?たとえば、URIからCLOB応答を受け取り、それをJSONオブジェクトに変換して、そこから値を取得しますか?
参考までに、ここに私がURLをフェッチするために使用した手順があります
create or replace procedure macp_URL_GET(url_resp in out clob, v_url in varchar2) is
req Utl_Http.req;
resp Utl_Http.resp;
NAME VARCHAR2 (255);
VALUE VARCHAR2 (1023);
v_msg VARCHAR2 (80);
v_ans clob;
-- v_url VARCHAR2 (32767) := 'http://www.macalester.edu/';
BEGIN
/* request that exceptions are raised for error Status Codes */
Utl_Http.set_response_error_check (ENABLE => TRUE );
/* allow testing for exceptions like Utl_Http.Http_Server_Error */
Utl_Http.set_detailed_excp_support (ENABLE => TRUE );
/*
Utl_Http.set_proxy (
proxy => 'www-proxy.us.Oracle.com',
no_proxy_domains => 'us.Oracle.com'
);
*/
req := Utl_Http.begin_request (url => v_url, method => 'GET');
/*
Alternatively use method => 'POST' and Utl_Http.Write_Text to
build an arbitrarily long message
*/
/*
Utl_Http.set_authentication (
r => req,
username => 'SomeUser',
PASSWORD => 'SomePassword',
scheme => 'Basic',
for_proxy => FALSE --this info is for the target Web server
);
*/
Utl_Http.set_header (r => req, NAME => 'User-Agent', VALUE => 'Mozilla/4.0');
resp := Utl_Http.get_response (r => req);
/*
DBMS_OUTPUT.put_line ('Status code: ' || resp.status_code);
DBMS_OUTPUT.put_line ('Reason phrase: ' || resp.reason_phrase);
FOR i IN 1 .. Utl_Http.get_header_count (r => resp)
LOOP
Utl_Http.get_header (r => resp, n => i, NAME => NAME, VALUE => VALUE);
DBMS_OUTPUT.put_line (NAME || ': ' || VALUE);
END LOOP;
*/
--test
BEGIN
LOOP
Utl_Http.read_text (r => resp, DATA => v_msg);
--DBMS_OUTPUT.put_line (v_msg);
v_ans := v_ans || v_msg;
url_resp := url_resp || v_msg;
END LOOP;
EXCEPTION
WHEN Utl_Http.end_of_body
THEN
NULL;
END;
--test
Utl_Http.end_response (r => resp);
--url_resp := v_ans;
EXCEPTION
/*
The exception handling illustrates the use of "pragma-ed" exceptions
like Utl_Http.Http_Client_Error. In a realistic example, the program
would use these when it coded explicit recovery actions.
Request_Failed is raised for all exceptions after calling
Utl_Http.Set_Detailed_Excp_Support ( ENABLE=>FALSE )
And it is NEVER raised after calling with ENABLE=>TRUE
*/
WHEN Utl_Http.request_failed
THEN
DBMS_OUTPUT.put_line (
'Request_Failed: ' || Utl_Http.get_detailed_sqlerrm
);
url_resp :='Request_Failed: ' || Utl_Http.get_detailed_sqlerrm;
/* raised by URL http://xxx.Oracle.com/ */
WHEN Utl_Http.http_server_error
THEN
DBMS_OUTPUT.put_line (
'Http_Server_Error: ' || Utl_Http.get_detailed_sqlerrm
);
url_resp := 'Http_Server_Error: ' || Utl_Http.get_detailed_sqlerrm;
/* raised by URL http://otn.Oracle.com/xxx */
WHEN Utl_Http.http_client_error
THEN
DBMS_OUTPUT.put_line (
'Http_Client_Error: ' || Utl_Http.get_detailed_sqlerrm
);
url_resp := 'Http_Client_Error: ' || Utl_Http.get_detailed_sqlerrm;
/* code for all the other defined exceptions you can recover from */
WHEN OTHERS
THEN
DBMS_OUTPUT.put_line (SQLERRM);
url_resp := SQLERRM;
END;
それをテストする
begin
macp_url_get(url_resp => :url_resp,
'http://maps.googleapis.com/maps/api/geocode/json?address=55105&sensor=false');
end;
(私はgoogleapiがxml応答を許可することを知っていますが、私が定期的に使用する他のWeb APIがあり、そのデフォルトはJSONです)
Oracle Databaseリリース12cリリース1(12.1.0.2)を使用している場合は、JSONをデータベースのVARCHAR2
、CLOB
、またはBLOB
列に格納してから、クエリを実行できます。 SQLではJSONパス式(XMLのXPath式に類似)を使用します。
SQL関数を使用できますjson_value
、json_query
、およびjson_table
、およびSQL条件json_exists
、is json
、is not json
、およびjson_textcontains
を使用して、データをクエリします。
関数json_query
およびjson_table
は、XMLのSQL/XML標準関数XMLQuery
およびXMLTable
に類似しています。条件json_exists
は、XMLのXMLExists
に類似しています。
is json
チェック制約を定義することにより、JSON列のデータが実際に有効なJSONデータであることを確認します。データにJSON固有のインデックスを定義できます。
JSON in Oracle Database を参照してください。
(所属:私はOracleで働いています。このWebサイトで表明する見解は私個人のものであり、必ずしもOracleの見解を反映しているわけではありません。)
PL/JSONプロジェクトを見てください https://github.com/pljson/pljson