Início / dba / Perguntas / 299845
Accepted
User1974
Asked: 2021-09-20 13:48:06 +0800 CST

Extraia vértices de linha SDO_GEOMETRY em uma coluna de tabela aninhada (em um conjunto de resultados de consulta)

  • 772

Oráculo 18c:

Em um post relacionado, demonstrei como usar a função GetVertices() e a função Table() para extrair os vértices de uma linha SDO_GEOMETRY:

Selecione os vértices de linha SDO_GEOMETRY como linhas

select  
    a.line_id, b.id as vertex_id, b.x, b.y
from
    a_sdo_geometry_tbl a, 
    table(sdo_util.getvertices(a.shape)) b       --<<--Here

   LINE_ID  VERTEX_ID          X          Y
---------- ---------- ---------- ----------
         1          1 671539.685 4863324.18
         1          2 671595.050 4863343.17
         1          3 671614.014 4863350.34
         1          4 671622.204 4863353.53

         2          1 71534.5567 4863119.99
         2          2 671640.738 4863157.13
         2          3 671684.862 4863172.02

Como exercício de aprendizado, quero criar minha própria versão da função GetVertices() usando PL/SQL.

Estou aberto a ideias sobre que tipo de mecanismo usar; qualquer um dos seguintes seria bom:

  • SQL básico
  • Cláusula MODEL
  • Função personalizada

O ponto é, eu quero aprender como extrair os vértices e colocá-los em uma coluna de tabela aninhada em uma consulta, assim como a função GetVertices() faz.

SDO_UTIL.GETVERTICES

Esta função retorna um objeto de MDSYS.VERTEX_SET_TYPE, que consiste em uma tabela de objetos de MDSYS.VERTEX_TYPE. O Oracle Spatial and Graph define o tipo VERTEX_SET_TYPE como:

CREATE TYPE vertex_set_type as TABLE OF vertex_type;

O Oracle Spatial and Graph define o tipo de objeto VERTEX_TYPE como:

CREATE TYPE vertex_type AS OBJECT
   (x   NUMBER,
    y   NUMBER,
    z   NUMBER,
    w   NUMBER,
    v5  NUMBER,
    v6  NUMBER,
    v7  NUMBER,
    v8  NUMBER,
    v9  NUMBER,
    v10 NUMBER,
    v11 NUMBER,
    id  NUMBER);

Nota: Os tipos VERTEX_SET_TYPE e VERTEX_TYPE destinam-se ao uso apenas pelo Oracle. Não use esses tipos em definições de coluna ou funções que você cria.

Pergunta:

Existe uma maneira de extrair os vértices de uma linha SDO_GEOMETRY em uma coluna de tabela aninhada em uma consulta - sem usar a função GetVertices()? A saída seria um conjunto de resultados de consulta, não uma tabela estática.

Dicas:

As seguintes funções podem ser úteis:

PointN: Retorna um ponto que é o enésimo vértice na coleção de vértices

GetNumVertices: Retorna o número de vértices na geometria de entrada.

oracle trigger

1 respostas

  1. Best Answer

    Parece que a única maneira de fazer isso é criando um tipo personalizado e uma função personalizada:

    CREATE TYPE vertex_type_cust AS object
(
  x  NUMBER,
  y  NUMBER,
  z  NUMBER,
  w  NUMBER,
  id NUMBER );

CREATE TYPE vertex_set_type_cust AS TABLE OF vertex_type_cust;

CREATE OR replace FUNCTION getvertices_cust(geometry mdsys.sdo_geometry)
  RETURN vertex_set_type_cust
IS
  i      NUMBER;
  dims   NUMBER;
  coords NUMBER;
  result vertex_set_type_cust;
  dim mdsys.sdo_dim_array;
  is_zero BOOLEAN;
  etype   NUMBER;
BEGIN
  result := vertex_set_type_cust();
  -- handle the POINT case here
  IF (geometry.sdo_ordinates IS NULL) THEN
    result.extend;
    result(1) := vertex_type_cust(geometry.sdo_point.x, geometry.sdo_point.y, geometry.sdo_point.z,NULL,1);
    RETURN result;
  END IF;
  -- all other cases here
  coords := geometry.sdo_ordinates.count;
  dims := geometry.get_dims;
  IF (dims = 0) THEN
    RETURN result;
  END IF;
  coords := coords/dims;
  FOR i          IN 0 .. coords-1
  LOOP
    result.extend;
    IF (dims = 2) THEN
      result(i+1) := vertex_type_cust(geometry.sdo_ordinates(2*i+1), geometry.sdo_ordinates(2*i+2), NULL,NULL,i+1);
    ELSIF (dims = 3) THEN
      result(i+1) := vertex_type_cust(geometry.sdo_ordinates(3*i+1), geometry.sdo_ordinates(3*i+2), geometry.sdo_ordinates(3*i+3) ,NULL,i+1);
    ELSIF (dims = 4) THEN
      result(i+1) := vertex_type_cust(geometry.sdo_ordinates(4*i+1), geometry.sdo_ordinates(4*i+2), geometry.sdo_ordinates(4*i+3), geometry.sdo_ordinates(4*i+4), i+1);
    END IF;
  END LOOP;
  RETURN result;
END;

    Dados de teste:

    create table a_sdo_geometry_tbl (line_id integer, shape mdsys.sdo_geometry);

insert into a_sdo_geometry_tbl (line_id, shape) 
values (1, sdo_geometry (2002, null, null, sdo_elem_info_array (1,2,1), 
    sdo_ordinate_array (671539.6852734378,4863324.181436138, 671595.0500703361,4863343.166556185, 671614.013553706,4863350.343483042, 671622.2044153381,4863353.525396131))  );

insert into a_sdo_geometry_tbl (line_id, shape) 
values (2, sdo_geometry (2002, null, null, sdo_elem_info_array (1,2,1), 
    sdo_ordinate_array (71534.5567096211,4863119.991809748, 671640.7384688659,4863157.132745253, 671684.8621150404,4863172.022995591))  );

insert into a_sdo_geometry_tbl (line_id, shape) 
values (3, sdo_geometry (2002, null, null, sdo_elem_info_array (1,2,1), 
    sdo_ordinate_array (671622.2044153381,4863353.525396131, 671633.3267164109,4863357.846229106, 671904.0614077691,4863451.286166754))  );

insert into a_sdo_geometry_tbl (line_id, shape) 
values (4, sdo_geometry (2002, null, null, sdo_elem_info_array (1,2,1), 
    sdo_ordinate_array (671684.8620521119,4863172.022995591, 671892.1496144319,4863244.141440067, 671951.2156571196,4863264.824310392, 671957.4471461186,4863266.847617676, 671966.8243856924,4863269.146632658))  )

    Use a função personalizada:

    select
    a.line_id,
    b.id as vertex_id,
    b.x, 
    b.y
from
    a_sdo_geometry_tbl a
cross join
    table(getvertices_cust(a.shape)) b  
order by 
    a.line_id, b.id;
    • 0

relate perguntas