354: debug(' --> l_result_int(J).accuracy_fact = ' || l_result_int(J).accuracy_fact, l_api_name, fnd_log.level_statement);
355: debug(' --> l_result_int(J).segment_id = ' || l_result_int(J).segment_id, l_api_name, fnd_log.level_statement);
356: END IF;
357:
358: x_resultsArray(J).locus := mdsys.sdo_geometry(2001,l_srid,
359: mdsys.sdo_point_type( l_result_int(J).lon
360: , l_result_int(J).lat
361: , 0),
362: mdsys.sdo_elem_info_array(1,1,1,3,0,5),
424: -- p_init_msg_list IN VARCHAR2 = NULL optional :=
425: -- x_return_status OUT VARCHAR2 :=
426: -- x_msg_count OUT NUMBER :=
427: -- x_msg_data OUT VARCHAR2 :=
428: -- p_locus MDSYS.SDO_GEOMETRY required :=
429: -- x_point OUT MDSYS.SDO_GEOMETRY
430: -- Version:
431: -- End Comments
432: PROCEDURE CSF_LocustoGeometry
425: -- x_return_status OUT VARCHAR2 :=
426: -- x_msg_count OUT NUMBER :=
427: -- x_msg_data OUT VARCHAR2 :=
428: -- p_locus MDSYS.SDO_GEOMETRY required :=
429: -- x_point OUT MDSYS.SDO_GEOMETRY
430: -- Version:
431: -- End Comments
432: PROCEDURE CSF_LocustoGeometry
433: ( p_api_version IN NUMBER
434: , p_init_msg_list IN VARCHAR2 default fnd_api.g_false
435: , x_return_status OUT NOCOPY VARCHAR2
436: , x_msg_count OUT NOCOPY NUMBER
437: , x_msg_data OUT NOCOPY VARCHAR2
438: , p_locus IN MDSYS.SDO_GEOMETRY
439: , x_point OUT NOCOPY MDSYS.SDO_GEOMETRY
440: )
441: IS
442: x_geom mdsys.sdo_geometry;
435: , x_return_status OUT NOCOPY VARCHAR2
436: , x_msg_count OUT NOCOPY NUMBER
437: , x_msg_data OUT NOCOPY VARCHAR2
438: , p_locus IN MDSYS.SDO_GEOMETRY
439: , x_point OUT NOCOPY MDSYS.SDO_GEOMETRY
440: )
441: IS
442: x_geom mdsys.sdo_geometry;
443: segmentGeometry mdsys.sdo_geometry;
438: , p_locus IN MDSYS.SDO_GEOMETRY
439: , x_point OUT NOCOPY MDSYS.SDO_GEOMETRY
440: )
441: IS
442: x_geom mdsys.sdo_geometry;
443: segmentGeometry mdsys.sdo_geometry;
444: segmentLength number;
445: coord POINT_COORD;
446: x_segid number;
439: , x_point OUT NOCOPY MDSYS.SDO_GEOMETRY
440: )
441: IS
442: x_geom mdsys.sdo_geometry;
443: segmentGeometry mdsys.sdo_geometry;
444: segmentLength number;
445: coord POINT_COORD;
446: x_segid number;
447: x_offset number;
500:
501: getSegmentLength(segmentGeometry.sdo_ordinates,segmentLength);
502: getCoordonSegment(segmentLength, segmentGeometry.sdo_ordinates,x_offset,coord);
503:
504: x_point := mdsys.sdo_geometry(2001,8307,mdsys.sdo_point_type(coord.long,coord.lat,0),null,null);
505:
506: x_return_status := FND_API.G_RET_STS_SUCCESS;
507: end if;
508:
532: -- p_init_msg_list IN VARCHAR2 : = NULL optional
533: -- x_return_status OUT VARCHAR2 :=
534: -- x_msg_count OUT NUMBER :=
535: -- x_msg_data OUT VARCHAR2 :=
536: -- p_point MDSYS.SDO_GEOMETRY := required
537: -- x_locus MDSYS.SDO_GEOMETRY
538: -- Version:
539: -- End Comments
540: PROCEDURE CSF_GeometrytoLocus
533: -- x_return_status OUT VARCHAR2 :=
534: -- x_msg_count OUT NUMBER :=
535: -- x_msg_data OUT VARCHAR2 :=
536: -- p_point MDSYS.SDO_GEOMETRY := required
537: -- x_locus MDSYS.SDO_GEOMETRY
538: -- Version:
539: -- End Comments
540: PROCEDURE CSF_GeometrytoLocus
541: ( p_api_version IN NUMBER
542: , p_init_msg_list IN VARCHAR2 default FND_API.G_FALSE
543: , x_return_status OUT NOCOPY VARCHAR2
544: , x_msg_count OUT NOCOPY NUMBER
545: , x_msg_data OUT NOCOPY VARCHAR2
546: , p_point IN MDSYS.SDO_GEOMETRY
547: , x_locus OUT NOCOPY MDSYS.SDO_GEOMETRY
548: )
549: IS
550:
543: , x_return_status OUT NOCOPY VARCHAR2
544: , x_msg_count OUT NOCOPY NUMBER
545: , x_msg_data OUT NOCOPY VARCHAR2
546: , p_point IN MDSYS.SDO_GEOMETRY
547: , x_locus OUT NOCOPY MDSYS.SDO_GEOMETRY
548: )
549: IS
550:
551: l_api_name CONSTANT VARCHAR2(30) := 'CSF_GeometrytoLocus';
581: -- p_init_msg_list IN VARCHAR2 := NULL optional
582: -- x_return_status OUT VARCHAR2 :=
583: -- x_msg_count OUT NUMBER :=
584: -- x_msg_data OUT VARCHAR2 :=
585: -- p_point MDSYS.SDO_GEOMETRY := required
586: -- x_timezone OUT NUMBER
587: -- Version:
588: -- End Comments
589:
592: , p_init_msg_list IN VARCHAR2 default FND_API.G_FALSE
593: , x_return_status OUT NOCOPY VARCHAR2
594: , x_msg_count OUT NOCOPY NUMBER
595: , x_msg_data OUT NOCOPY VARCHAR2
596: , p_locus IN MDSYS.SDO_GEOMETRY
597: , x_timezone OUT NOCOPY NUMBER
598: )
599: IS
600: