FUNCTION: MDSYS.GET_TOPO_GEOMETRY_LAYER_TABLE

Source

1 function get_Topo_Geometry_Layer_Table (
2    Topo_Geometry_Layers IN SDO_Topo_Geometry_Layer_Array) return
3   SDO_Topo_Geometry_Layer_Table DETERMINISTIC IS
4 tp_table SDO_Topo_Geometry_Layer_Table;
5 layer SDO_TOPO_GEOMETRY_LAYER;
6 layer_tab SDO_Topo_Geometry_Layer_Table;
7 idx number;
8 begin
9   layer := Topo_Geometry_Layers(1);
10   if (layer IS NULL) then
11     return SDO_Topo_Geometry_Layer_Table(SDO_TOPO_GEOMETRY_LAYER(NULL,NULL,NULL,NULL,NULL,NULL,NULL));
12   else
13    layer_tab := SDO_Topo_Geometry_Layer_Table();
14    for idx in 1 .. Topo_Geometry_Layers.count loop
15     layer_tab.extend;
16     layer_tab(idx) := Topo_Geometry_Layers(idx);
17    end loop;
18    return layer_tab;
19   end if;
20 
21 end;