Databases Reference
In-Depth Information
IS
l retval APEX PLUGIN.T PROCESS EXEC RESULT;
l yahoo appid VARCHAR2(500) := p plugin.attribute 01;
l address item VARCHAR2(100) := p process.attribute 01;
l lat item VARCHAR2(100) := p process.attribute 02;
l long item VARCHAR2(100) := p process.attribute 03;
l address item val VARCHAR2(32767);
l rest result XMLTYPE;
l parm name list WWV FLOW GLOBAL.VC ARR2;
l parm value list WWV FLOW GLOBAL.VC ARR2;
l error VARCHAR2(32767);
l found count PLS INTEGER;
PROCEDURE clear lat long
IS
BEGIN
apex util.set session state(l lat item, '');
apex util.set session state(l long item, '');
END;
BEGIN
IF apex application.g debug
THEN
apex plugin util.debug process(
p plugin => p plugin,
p process => p process
);
END IF;
l address item val := v(l address item);
IF l address item val IS NULL
THEN
clear lat long;
ELSE
l parm name list(1) := 'appid';
l parm value list(1) := l yahoo appid;
l parm name list(2) := 'flags';
l parm value list(2) := 'C'; --Only return coordinate data and match quality elements
l parm name list(3) := 'location';
l parm value list(3) := REPLACE(REPLACE(l address item val, CHR(13)||CHR(10), ' '),
CHR(10), ' ');
l rest result := xmltype(
apex web service.make rest request(
p url => 'http://where.yahooapis.com/geocode',
p http method => 'GET',
p parm name => l parm name list,
p parm value => l parm value list
)
