[Home] [Help]
PACKAGE: APPS.WMS_CAROUSEL_INTEGRATION_PVT
Source
1 PACKAGE WMS_CAROUSEL_INTEGRATION_PVT AS
2 /* $Header: WMSCSPVS.pls 120.4 2005/10/17 04:38:37 simran noship $ */
3
4 send_pipe_exception EXCEPTION;
5 directive_exception EXCEPTION;
6 v_row wms_carousel_configuration%ROWTYPE;
7 v_directive wms_carousel_directive_queue%ROWTYPE;
8 v_msg_components wms_msg_components%ROWTYPE;
9 v_xml_msg NUMBER := 1;
10 v_msg_with_delimiter NUMBER := 2;
11 v_msg_without_delimiter NUMBER := 3;
12 v_vocollect_msg NUMBER := 4;
13
14 --
15 -- Cursor for all tasks of the request
16 CURSOR c_request_tasks (p_request_id IN NUMBER)
17 IS
18 SELECT *
19 FROM wms_device_requests_wcsv
20 WHERE request_id = p_request_id
21 ORDER BY sequence_id;
22
23 --
24 --
25 FUNCTION get_config_parameter (
26 p_name IN VARCHAR2,
27 p_device_type_id IN NUMBER DEFAULT NULL,
28 p_business_event_id IN NUMBER DEFAULT NULL,
29 p_sequence_id IN NUMBER DEFAULT NULL
30 )
31 RETURN VARCHAR2;
32
33 --
34 --
35 PROCEDURE process_request (
36 p_request_id IN NUMBER,
37 x_status_code OUT NOCOPY VARCHAR2,
38 x_status_msg OUT NOCOPY VARCHAR2,
39 x_device_status OUT NOCOPY VARCHAR2
40 );
41
42 FUNCTION get_device_type_id (p_device_id IN NUMBER)
43 RETURN NUMBER;
44
45 --
46 --
47 PROCEDURE add_task_directives (p_task IN c_request_tasks%ROWTYPE);
48
49 --
50 --
51 PROCEDURE get_directive_config (
52 p_task IN wms_device_requests_wcsv%ROWTYPE,
53 p_directive IN OUT NOCOPY wms_carousel_directive_queue%ROWTYPE,
54 p_dir_dep_seg_id OUT NOCOPY VARCHAR2,
55 p_dir_dep_seq_id OUT NOCOPY NUMBER
56 );
57
58 --
59 --
60 PROCEDURE add_directive_to_queue (
61 p_task IN wms_device_requests_wcsv%ROWTYPE,
62 p_directive IN OUT NOCOPY wms_carousel_directive_queue%ROWTYPE,
63 p_dir_dep_seg_id IN VARCHAR2,
64 p_dir_dep_seq_id IN NUMBER
65 );
66
67 --
68 --
69 PROCEDURE build_directive_string (
70 p_task IN wms_device_requests_wcsv%ROWTYPE,
71 p_query IN VARCHAR2,
72 p_result OUT NOCOPY VARCHAR2
73 );
74
75 --
76 --
77 FUNCTION get_dependency_id (
78 p_directive IN wms_carousel_directive_queue%ROWTYPE,
79 p_dir_dep_seg_id IN VARCHAR2,
80 p_dir_dep_seq_id IN NUMBER
81 )
82 RETURN NUMBER;
83
84 --
85 --
86 PROCEDURE process_directive_queue;
87
88 --
89 --
90 PROCEDURE send_directive (
91 p_device_id IN NUMBER,
92 p_pipe_name IN VARCHAR2,
93 p_addr IN VARCHAR2,
94 p_directive IN VARCHAR2,
95 p_time_out IN NUMBER
96 );
97
98 --
99 --
100 FUNCTION checksum (p_data IN VARCHAR2)
101 RETURN NUMBER;
102
103 PRAGMA RESTRICT_REFERENCES (checksum, WNDS, WNPS);
104
105 --
106 --
107 FUNCTION hex (p_data IN NUMBER)
108 RETURN VARCHAR2;
109
110 PRAGMA RESTRICT_REFERENCES (hex, WNDS, WNPS);
111
112 --
113 --
114 PROCEDURE LOG (p_device_id IN NUMBER, p_data IN VARCHAR2);
115
116 --
117 --
118 PROCEDURE notify_failure_to_wms (
119 p_request_id IN NUMBER,
120 p_task_id IN NUMBER
121 );
122
123 --
124 -- Bug# 4666748
125 PROCEDURE response_event_handler (
126 p_device_id IN VARCHAR2,
127 p_message IN VARCHAR2,
128 x_message_code OUT NOCOPY NUMBER,
129 x_return_status OUT NOCOPY VARCHAR2,
130 x_msg_count OUT NOCOPY NUMBER,
131 x_msg_data OUT NOCOPY VARCHAR2
132 );
133
134 --
135 -- Bug# 4666748
136 PROCEDURE process_response (
137 p_device_id IN NUMBER,
138 p_response IN VARCHAR2
139 );
140
141 --
142 --
143 PROCEDURE cancel_task (
144 p_request_id IN NUMBER,
145 p_device_id IN NUMBER,
146 p_task_id IN NUMBER DEFAULT NULL
147 );
148
149 --
150 --
151 PROCEDURE skip_task (
152 p_request_id IN NUMBER,
153 p_device_id IN NUMBER,
154 p_task_id IN NUMBER DEFAULT NULL
155 );
156
157 --
158 --
159 PROCEDURE complete_task (
160 p_request_id IN NUMBER,
161 p_device_id IN NUMBER,
162 p_task_id IN NUMBER DEFAULT NULL
163 );
164
165 --
166 --
167 PROCEDURE purge_queue;
168
169 PROCEDURE read_pipe_content(
170 p_device_id IN VARCHAR2,
171 x_pipe_name OUT NOCOPY VARCHAR2,
172 x_message_code OUT NOCOPY NUMBER,
173 x_message OUT NOCOPY VARCHAR2,
174 x_return_status OUT NOCOPY VARCHAR2,
175 x_msg_count OUT NOCOPY NUMBER,
176 x_msg_data OUT NOCOPY VARCHAR2
177 );
178
179 --
180 --
181 FUNCTION ascii_csv_to_string (
182 p_ascii_csv IN VARCHAR2
183 )
184 RETURN VARCHAR2;
185 --
186 --
187 PROCEDURE get_component_details (
188 p_device_id IN NUMBER,
189 p_template_id IN NUMBER,
190 p_component_no IN NUMBER,
191 x_component_code OUT NOCOPY NUMBER,
192 x_component_meaning OUT NOCOPY VARCHAR2,
193 x_start_comp_delimiter OUT NOCOPY VARCHAR2,
194 x_end_comp_delimiter OUT NOCOPY VARCHAR2,
195 x_return_status OUT NOCOPY VARCHAR2,
196 x_msg_count OUT NOCOPY NUMBER,
197 x_msg_data OUT NOCOPY VARCHAR2
198 );
199 --
200 --
201 PROCEDURE parse_device_response (
202 p_device_id IN NUMBER,
203 p_request_id IN NUMBER,
204 p_msg IN VARCHAR2,
205 p_template_id IN NUMBER,
206 x_return_status OUT NOCOPY VARCHAR2,
207 x_msg_count OUT NOCOPY NUMBER,
208 x_msg_data OUT NOCOPY VARCHAR2
209 );
210 --
211 --
212 PROCEDURE populate_response_record (
213 p_device_id IN NUMBER,
214 p_component_code IN NUMBER,
215 p_msg_component IN VARCHAR2,
216 p_response_record IN OUT NOCOPY WMS_WCS_DEVICE_GRP.MSG_COMPONENT_LOOKUP_TYPE
217 );
218 --
219 --
220 PROCEDURE log_response_record (
221 p_device_id IN NUMBER DEFAULT NULL,
222 p_response_record IN WMS_WCS_DEVICE_GRP.MSG_COMPONENT_LOOKUP_TYPE
223 );
224 --
225 --
226 END wms_carousel_integration_pvt;