1 PACKAGE FTE_DIST_INT_PKG AUTHID CURRENT_USER AS
2 /* $Header: FTEDISIS.pls 115.2 2003/09/13 19:40:47 ablundel noship $ */
3
4 -- ------------------------------------------------------------------------------------------- --
5 -- --
6 -- Tables and records for input --
7 -- ---------------------------- --
8 -- --
9 -- ------------------------------------------------------------------------------------------- --
10 TYPE fte_dist_input_rec IS RECORD(origin_id NUMBER,
11 destination_id NUMBER);
12 TYPE fte_dist_input_tab IS TABLE OF fte_dist_input_rec INDEX BY BINARY_INTEGER;
13
14
15 TYPE fte_dist_search_rec IS RECORD(origin_id NUMBER,
16 destination_id NUMBER,
17 origin_loc_id NUMBER,
18 dest_loc_id NUMBER);
19 TYPE fte_dist_search_tab IS TABLE OF fte_dist_search_rec INDEX BY BINARY_INTEGER;
20
21
22 TYPE fte_dist_output_rec IS RECORD (location_region_flag VARCHAR2(1),
23 origin_location_id NUMBER,
24 destination_location_id NUMBER,
25 origin_region_id NUMBER,
26 destination_region_id NUMBER,
27 type VARCHAR2(30),
28 distance NUMBER,
29 distance_uom VARCHAR2(3),
30 transit_time NUMBER,
31 transit_time_uom VARCHAR2(3),
32 status VARCHAR2(1),
33 error_msg VARCHAR2(240),
34 msg_id NUMBER);
35 TYPE fte_dist_output_tab IS TABLE OF fte_dist_output_rec INDEX BY BINARY_INTEGER;
36
37
38 TYPE fte_dist_output_message_rec IS RECORD (sequence_number NUMBER,
39 message_type VARCHAR2(1),
40 message_code VARCHAR2(30),
41 message_text VARCHAR2(2000),
42 level VARCHAR2(30),
43 location_region_flag VARCHAR2(1),
44 table_origin_id NUMBER,
45 table_destination_id NUMBER,
46 input_origin_id NUMBER,
47 input_destination_id NUMBER);
48 TYPE fte_dist_output_message_tab IS TABLE OF fte_dist_output_message_rec INDEX BY BINARY_INTEGER;
49 -- ----------------------------------------------------------------------------------------- --
50
51
52
53
54 -- -----------------------------------------------------------------------------------
55 -- GLOBAL VARIABLES/CONSTANTS
56 -- --------------------------
57 --
58 -- -----------------------------------------------------------------------------------
59 g_max_table_size CONSTANT PLS_INTEGER := 150;
60
61
62 TYPE fte_dist_tmp_num_table IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
63 TYPE fte_dist_tmp_flag_table IS TABLE OF VARCHAR2(1) INDEX BY BINARY_INTEGER;
64 TYPE fte_dist_tmp_uom_table IS TABLE OF VARCHAR2(3) INDEX BY BINARY_INTEGER;
65 TYPE fte_dist_tmp_char4_table IS TABLE OF VARCHAR2(4) INDEX BY BINARY_INTEGER;
66 TYPE fte_dist_tmp_code_table IS TABLE OF VARCHAR2(30) INDEX BY BINARY_INTEGER;
67 TYPE fte_dist_tmp_desc_table IS TABLE OF VARCHAR2(240) INDEX BY BINARY_INTEGER;
68 TYPE fte_dist_tmp_msg_table IS TABLE OF VARCHAR2(2000) INDEX BY BINARY_INTEGER;
69 TYPE fte_dist_tmp_date_table IS TABLE OF DATE INDEX BY BINARY_INTEGER;
70
71
72
73
74
75 -- ------------------------------------------------------------------------------------------- --
76 -- --
77 -- PROCEDURE DEFINITONS --
78 -- -------------------- --
79 -- --
80 -- ------------------------------------------------------------------------------------------- --
81 PROCEDURE GET_DISTANCE_TIME(p_distance_input_tab IN OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_input_tab,
82 p_location_region_flag IN VARCHAR2,
83 p_messaging_yn IN VARCHAR2,
84 p_api_version IN VARCHAR2,
85 p_command IN VARCHAR2,
86 x_distance_output_tab OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_output_tab,
87 x_distance_message_tab OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_output_message_tab,
88 x_return_message OUT NOCOPY VARCHAR2,
89 x_return_status OUT NOCOPY VARCHAR2);
90
91
92
93 PROCEDURE LOG_DISTANCE_MESSAGES(p_message_type_tab IN OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_tmp_flag_table,
94 p_message_code_tab IN OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_tmp_code_table,
95 p_message_text_tab IN OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_tmp_msg_table,
96 p_location_region_flag_tab IN OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_tmp_flag_table,
97 p_level_tab IN OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_tmp_code_table,
98 p_table_origin_id_tab IN OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_tmp_num_table,
99 p_table_destination_id_tab IN OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_tmp_num_table,
100 p_input_origin_id_tab IN OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_tmp_num_table,
101 p_input_destination_tab IN OUT NOCOPY FTE_DIST_INT_PKG.fte_dist_tmp_num_table,
102 x_return_status OUT NOCOPY VARCHAR2,
103 x_return_message OUT NOCOPY VARCHAR2);
104
105
106 END FTE_DIST_INT_PKG;