FUNCTION: MDSYS.GET_TOPO_GEOMETRY_LAYER_ARRAY

Source

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