create or replace package body google_maps_js_pkg as /* Purpose: Package handles Google Maps integration with JavaScript Remarks: see http://code.google.com/apis/maps/documentation/javascript/v2/reference.html Who Date Description ------ ---------- -------------------------------- MBR 05.02.2011 Created */ g_map_id varchar2(255); g_map_options t_map_options; g_point_list google_maps_pkg.t_point_list; procedure init_map (p_map_id in varchar2, p_options in t_map_options := null) as begin /* Purpose: initialize map Remarks: Who Date Description ------ ---------- -------------------------------- MBR 05.02.2011 Created */ g_map_id := p_map_id; g_map_options := p_options; g_point_list.delete; end init_map; procedure add_point (p_point in google_maps_pkg.t_point) as begin /* Purpose: add point to map Remarks: Who Date Description ------ ---------- -------------------------------- MBR 05.02.2011 Created */ if g_point_list.count = 0 then g_point_list(1) := p_point; else g_point_list(g_point_list.last+1) := p_point; end if; end add_point; procedure render_map_script as l_str string_util_pkg.t_max_pl_varchar2; begin /* Purpose: render map script Remarks: Who Date Description ------ ---------- -------------------------------- MBR 05.02.2011 Created */ htp.p(' '); end render_map_script; procedure render_map_placeholder (p_style in varchar2 := null, p_attributes in varchar2 := null) as l_str string_util_pkg.t_max_pl_varchar2; begin /* Purpose: render map placeholder Remarks: Who Date Description ------ ---------- -------------------------------- MBR 05.02.2011 Created */ htp.p('
'); end render_map_placeholder; end google_maps_js_pkg; /