261: x_theme_id := 0;
262:
263: ELSIF(p_context_flag = 'IDENTIFY' OR p_context_flag = 'POINT_FEATURE' OR p_context_flag = 'POINT_FEATURE_AT_LOCATION') THEN
264:
265: select SDO_GEOMETRY(2001,8307,SDO_POINT_TYPE(p_x_coord,p_y_coord,null),null,null)
266: into l_geometry
267: from dual;
268:
269: IF(p_context_flag = 'IDENTIFY') THEN
476: SET
477: geometry = decode(l_is_invalid_geocode, 1, NULL,
478: MDSYS.SDO_GEOMETRY(2001,
479: 8307,
480: SDO_POINT_TYPE(p_long, p_lat, NULL),
481: NULL,
482: NULL)),
483: geometry_status_code = p_status,
484: last_update_date = sysdate,