[Home] [Help]
PACKAGE: APPS.HZ_ELOCATION_PKG
Source
1 PACKAGE hz_elocation_pkg AUTHID CURRENT_USER AS
2 /*$Header: ARHELOCS.pls 120.7 2011/08/25 18:31:14 nsinghai ship $*/
3
4 --------------------------------------------
5 -- declaration of global variables and types
6 --------------------------------------------
7 g_pkg_name CONSTANT VARCHAR2(30) := 'hz_elocation_pkg';
8 g_debug_count NUMBER := 0;
9 --g_debug BOOLEAN := FALSE;
10 g_index_name CONSTANT VARCHAR2(20) := 'hz_locations_n15';
11 g_index_owner CONSTANT VARCHAR2(2) := ''; -- Bug 12916969 . removed hard coding of 'ar'
12 g_commit_interval VARCHAR2(5) := '1000';
13
14 hz_geometry_default CONSTANT mdsys.sdo_geometry :=
15 mdsys.sdo_geometry(fnd_api.g_miss_num,
16 fnd_api.g_miss_num, NULL, NULL, NULL);
17 geometry_status_code_default CONSTANT VARCHAR2(30) := 'DIRTY';
18
19 TYPE geo_location_rec_type IS RECORD(
20 location_id NUMBER,
21 country VARCHAR2(60),
22 address1 VARCHAR2(240),
23 address2 VARCHAR2(240),
24 address3 VARCHAR2(240),
25 address4 VARCHAR2(240),
26 city VARCHAR2(60),
27 postal_code VARCHAR2(60),
28 state VARCHAR2(60),
29 province VARCHAR2(60),
30 county VARCHAR2(60),
31 geometry mdsys.sdo_geometry := hz_geometry_default,
32 geometry_status_code VARCHAR2(30) := geometry_status_code_default,
33 geometry_accuracy NUMBER
34 );
35
36
37
38 ------------------------------------
39 -- declaration of private procedures
40 ------------------------------------
41 --PROCEDURE enable_debug;
42 --PROCEDURE disable_debug;
43 PROCEDURE create_index;
44
45 PROCEDURE update_geometry (
46 errbuf OUT NOCOPY VARCHAR2,
47 retcode OUT NOCOPY VARCHAR2,
48 p_loc_type IN VARCHAR2 DEFAULT 'P',
49 p_site_use_type IN VARCHAR2 DEFAULT NULL,
50 p_country IN VARCHAR2 DEFAULT NULL,
51 p_iden_addr_only IN VARCHAR2 DEFAULT 'N',
52 p_incremental IN VARCHAR2 DEFAULT 'N',
53 p_all_partial IN VARCHAR2 DEFAULT 'ALL',
54 p_nb_row_update IN VARCHAR2 DEFAULT 'ALL',
55 p_nb_row IN NUMBER DEFAULT 20,
56 p_nb_try IN NUMBER DEFAULT 3
57
58 );
59
60 PROCEDURE rebuild_location_index (
61 errbuf OUT NOCOPY VARCHAR2,
62 retcode OUT NOCOPY VARCHAR2,
63 p_concurrent_mode IN VARCHAR2 DEFAULT 'Y'
64 );
65 --Bug12386319 In PROCEDURE update_geometry_all
66 --default value of p_nb_row is changed to 10.
67 --To avoid 'character string buffer too small' error When more rows are transmitted together .
68 PROCEDURE update_geometry_all (
69 errbuf OUT NOCOPY VARCHAR2,
70 retcode OUT NOCOPY VARCHAR2,
71 p_loc_type IN VARCHAR2 DEFAULT 'P',
72 p_site_use_type IN VARCHAR2 DEFAULT NULL,
73 p_country IN VARCHAR2 DEFAULT NULL,
74 p_iden_addr_only IN VARCHAR2 DEFAULT 'N',
75 p_incremental IN VARCHAR2 DEFAULT 'N',
76 p_all_partial IN VARCHAR2 DEFAULT 'ALL',
77 p_nb_row_update IN VARCHAR2 DEFAULT 'ALL',
78 p_state IN VARCHAR2 DEFAULT NULL,
79 p_province IN VARCHAR2 DEFAULT NULL,
80 p_city IN VARCHAR2 DEFAULT NULL,
81 p_geometry_accuracy IN VARCHAR2 DEFAULT NULL,
82 p_geometry_source IN VARCHAR2 DEFAULT 'ELOCATION',
83 p_party_site_status IN VARCHAR2 DEFAULT NULL,
84 p_nb_row IN NUMBER DEFAULT 10,
85 p_nb_try IN NUMBER DEFAULT 3
86 );
87
88 END hz_elocation_pkg;