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
484: SET
485: geometry = decode(l_is_invalid_geocode, 1, NULL,
486: MDSYS.SDO_GEOMETRY(2001,
487: 8307,
488: SDO_POINT_TYPE(p_long, p_lat, NULL),
489: NULL,
490: NULL)),
491: geometry_status_code = p_status,
492: geometry_source = p_geo_source,