SDO - how to create lines from PL/SQL

Question

Hello,
I need to create a line objet in a table (TRAJECTORY) from selected points on another table (STATION).
STATION description is
station_id number,
trajectory_id number,
longitude float,
latitude float,
shape mdsys.sdo_geometry
TRAJECTORY description is
trajectory_id number,
shape mdsys.sdo_geometry
I would like to do something like
update trajectory set shape =
MDSYS.SDO_GEOMETRY
     2002,
     NULL,
     NULL,
     MDSYS.SDO_ELEM_INFO_ARRAY(1,2,1),
     MDSYS.SDO_ORDINATE_ARRAY
     (select longitude, latitude from station S where S.trajectory_id = trajectory_id)
It does not work.
I do not want to use an SQLLOAD because it is supposed to be updated with a trigger or a regular call to a store procedure.
Thanks in advance for your help,
Vincent ROBINE

Answer 1

Thanks a lot for your advice,
I have tried what you suggest, it seems to work fine for small line, but it does not work for big string.
For the test I wish to make, I have the following result:
update cycle_voyage set shape = MDSYS.SDO_GEOMETRY(2002,0,NULL,MDSYS.SDO_ELEM_INFO_ARRAY
(1,2,1),MDSYS.SDO_ORDINATE_ARRAY(16.641400,42.758900,16.768600,42.597300,16.869500,42.471200,16.9806
00,42.326300,17.097500,42.184100,17.211500,42.041200,17....
...00)) where platform_code = 'YTFL' and cv_number = 0
longueur : 13690
BEGIN fillSdoOrdinate('YTFL',0); END;
ERREUR ` la ligne 1 :
ORA-00939: too many arguments for function
ORA-06512: at "CODBA.FILLSDOORDINATE", line 29
ORA-06512: at line 1
My procedure is done this way :
create or replace procedure fillSdoOrdinate (p_platform_code varchar2, p_cv_number number) is
l_listePoints varchar2(20000);
l_nbPoints number;
cursor listeCoords is
select longitude, latitude from station
where platform_code = p_platform_code
and cv_number = p_cv_number;
begin
l_listePoints := 'update cycle_voyage set shape = MDSYS.SDO_GEOMETRY(2002,0,NULL,MDSYS.SDO_ELEM_INFO_ARRAY (1,2,1),MDSYS.SDO_ORDINATE_ARRAY(';
l_nbPoints := 0;
for curCoords in listeCoords loop
     if (l_nbPoints >0) then
     l_listePoints := l_listePoints||',';
     end if;
     l_nbPoints := l_nbPoints +1;
     l_listePoints := l_listePoints||trim(to_char(curCoords.longitude,'9999.999999'))||','||trim(to_char(curCoords.latitude,'9999.999999'));
end loop;
l_listePoints := l_listePoints||')) where platform_code = '''||p_platform_code||''' and cv_number = '||to_char(p_cv_number);
dbms_output.put_line(substr(l_listePoints,1,245)||'...');
dbms_output.put_line('...'||substr(l_listePoints,length(l_listePoints) - 50,51));
dbms_output.put_line('longueur : '||to_char(length(l_listePoints)));
execute immediate l_listePoints;
end;
show errors
If the 'EXECUTE IMMEDIATE' is limited to 2000 characters, it wont work because this is not the longest line and it is already 13690 characters long.
Any help would be welcome,
Vincent ROBINE