DBA Data[Home] [Help]

PACKAGE BODY: APPS.ASO_ORDER_FEEDBACK_UPDATE_PVT

Source


1 PACKAGE BODY ASO_ORDER_FEEDBACK_UPDATE_PVT  AS
2 /* $Header: asovomub.pls 120.1 2005/06/29 12:42:37 appldev ship $ */
3 
4 
5 -- ---------------------------------------------------------
6 -- Define global variables
7 -- ---------------------------------------------------------
8 G_PKG_NAME CONSTANT VARCHAR2(30) := 'ASO_ORDER_FEEDBACK_UPDATE_PVT';
9 G_USER CONSTANT VARCHAR2(30) := FND_GLOBAL.USER_ID;
10 
11 
12 -- ---------------------------------------------------------
13 -- Define Procedures
14 -- ---------------------------------------------------------
15 
16 --------------------------------------------------------------------------
17 
18 -- Start of comments
19 --  API name   : UPDATE_NOTICE
20 --  Type       : Private
21 --  Function   : This API is the PRIVATE API that is invoked by Order Manager
22 --               to communicate any changes (inserts/updates/deletes) to the
23 --               Order Entities to Oracle Order Capture application.
24 --  Pre-reqs   : None.
25 --
26 --  Standard IN Parameters:
27 --   p_api_version       IN   NUMBER    Required
28 --   p_init_msg_list     IN   VARCHAR2  Optional
29 --                                      Default = FND_API.G_FALSE
30 --   p_commit            IN   VARCHAR2  Optional
31 --                                      Default = FND_API.G_FALSE
32 --
33 --  Standard OUT NOCOPY /* file.sql.39 change */   Parameters:
34 --   x_return_status     OUT NOCOPY /* file.sql.39 change */    VARCHAR2(1)
35 --   x_msg_count         OUT NOCOPY /* file.sql.39 change */    NUMBER
36 --   x_msg_data          OUT NOCOPY /* file.sql.39 change */    VARCHAR2(2000)
37 --
38 --  UPDATE_NOTICE specific IN Parameters:
39 --
40 --   p_header_rec                    IN  OE_Order_PUB.Header_Rec_Type OPTIONAL
41 --                                       Default := OE_Order_PUB.G_MISS_HEADER_REC
42 --   p_old_header_rec                IN  OE_Order_PUB.Header_Rec_Type
43 --                                       Default := OE_ORDER_PUB.G_MISS_HEADER_REC
44 --   p_Header_Adj_tbl                IN  OE_Order_PUB.Header_Adj_Tbl_Type
45 --                                       Default := OE_ORDER_PUB.G_MISS_HEADER_ADJ_TBL
46 --   p_old_Header_Adj_tbl            IN  OE_Order_PUB.Header_Adj_Tbl_Type
47 --                                       Default := OE_ORDER_PUB.G_MISS_HEADER_ADJ_TBL
48 --   p_Header_Price_Att_tbl          IN  OE_Order_PUB.Header_Price_Att_Tbl_Type
49 --                                       Default := OE_ORDER_PUB.G_MISS_HEADER_PRICE_ATT_TBL
50 --   p_old_Header_Price_Att_tbl      IN  OE_Order_PUB.Header_Price_Att_Tbl_Type
51 --                                       Default := OE_ORDER_PUB.G_MISS_HEADER_PRICE_ATT_TBL
52 --   p_Header_Adj_Att_tbl            IN  OE_Order_PUB.Header_Adj_Att_Tbl_Type
53 --                                       Default := OE_ORDER_PUB.G_MISS_HEADER_ADJ_ATT_TBL
54 --   p_old_Header_Adj_Att_tbl        IN  OE_Order_PUB.Header_Adj_Att_Tbl_Type
55 --                                       Default := OE_ORDER_PUB.G_MISS_HEADER_ADJ_ATT_TBL
56 --   p_Header_Adj_Assoc_tbl          IN  OE_Order_PUB.Header_Adj_Assoc_Tbl_Type
57 --                                       Default := OE_ORDER_PUB.G_MISS_HEADER_ADJ_ASSOC_TBL
58 --   p_old_Header_Adj_Assoc_tbl      IN  OE_Order_PUB.Header_Adj_Assoc_Tbl_Type
59 --                                       Default := OE_ORDER_PUB.G_MISS_HEADER_ADJ_ASSOC_TBL
60 --   p_Header_Scredit_tbl            IN  OE_Order_PUB.Header_Scredit_Tbl_Type
61 --                                       Default := OE_ORDER_PUB.G_MISS_HEADER_SCREDIT_TBL
62 --   p_old_Header_Scredit_tbl        IN  OE_Order_PUB.Header_Scredit_Tbl_Type
63 --                                       Default := OE_ORDER_PUB.G_MISS_HEADER_SCREDIT_TBL
64 --   p_line_tbl                      IN  OE_Order_PUB.Line_Tbl_Type
65 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_TBL
66 --   p_old_line_tbl                  IN  OE_Order_PUB.Line_Tbl_Type
67 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_TBL
68 --   p_Line_Adj_tbl                  IN  OE_Order_PUB.Line_Adj_Tbl_Type
69 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_ADJ_TBL
70 --   p_old_Line_Adj_tbl              IN  OE_Order_PUB.Line_Adj_Tbl_Type
71 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_ADJ_TBL
72 --   p_Line_price_Att_tbl            IN  OE_Order_PUB.Line_Price_Att_Tbl_Type
73 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_PRICE_ATT_TBL
74 --   p_old_Line_Price_Att_tbl        IN  OE_Order_PUB.Line_Price_Att_Tbl_Type
75 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_PRICE_ATT_TBL
76 --   p_Line_Adj_Att_tbl              IN  OE_Order_PUB.Line_Adj_Att_Tbl_Type
77 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_ADJ_ATT_TBL
78 --   p_old_Line_Adj_Att_tbl          IN  OE_Order_PUB.Line_Adj_Att_Tbl_Type
79 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_ADJ_ATT_TBL
80 --   p_Line_Adj_Assoc_tbl            IN  OE_Order_PUB.Line_Adj_Assoc_Tbl_Type
81 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_ADJ_ASSOC_TBL
82 --   p_old_Line_Adj_Assoc_tbl        IN  OE_Order_PUB.Line_Adj_Assoc_Tbl_Type
83 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_ADJ_ASSOC_TBL
84 --   p_Line_Scredit_tbl              IN  OE_Order_PUB.Line_Scredit_Tbl_Type
85 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_SCREDIT_TBL
86 --   p_old_Line_Scredit_tbl          IN  OE_Order_PUB.Line_Scredit_Tbl_Type
87 --                                       Default := OE_ORDER_PUB.G_MISS_LINE_SCREDIT_TBL
88 --   p_Lot_Serial_tbl                IN  OE_Order_PUB.Lot_Serial_Tbl_Type
89 --                                       Default := OE_ORDER_PUB.G_MISS_LOT_SERIAL_TBL
90 --   p_old_Lot_Serial_tbl            IN  OE_Order_PUB.Lot_Serial_Tbl_Type
91 --                                       Default := OE_ORDER_PUB.G_MISS_LOT_SERIAL_TBL
92 --   p_action_request_tbl            IN  OE_Order_PUB.Request_Tbl_Type
93 --                                       Default := OE_ORDER_PUB.G_MISS_REQUEST_TBL
94 --
95 -- p_app_short_name                  IN  VARCHAR2(30)       := NULL      ,
96 -- p_queue_type                      IN  VARCHAR2(30)       := 'OF_QUEUE'
97 --
98 --
99 --  UPDATE_NOTICE specific OUT NOCOPY /* file.sql.39 change */   Parameters:
100 --   none
101 --
102 --  Version :  Current version   1.0
103 --             Initial version   1.0
104 --
105 -- End of comments
106 --------------------------------------------------------------------------
107 
108 PROCEDURE UPDATE_NOTICE
109 (
110  p_api_version                   IN  NUMBER,
111  p_init_msg_list                 IN  VARCHAR2 :=  FND_API.G_FALSE,
112  p_commit                        IN  VARCHAR2 := FND_API.G_FALSE,
113  x_return_status                 OUT NOCOPY /* file.sql.39 change */   VARCHAR2,
114  x_msg_count                     OUT NOCOPY /* file.sql.39 change */   NUMBER,
115  x_msg_data                      OUT NOCOPY /* file.sql.39 change */   VARCHAR2,
116  p_header_rec                    IN  OE_Order_PUB.Header_Rec_Type :=
117                                         OE_Order_PUB.G_MISS_HEADER_REC,
118  p_old_header_rec                IN  OE_Order_PUB.Header_Rec_Type :=
119                                         OE_Order_PUB.G_MISS_HEADER_REC,
120  p_Header_Adj_tbl                IN  OE_Order_PUB.Header_Adj_Tbl_Type :=
121                                         OE_Order_PUB.G_MISS_HEADER_ADJ_TBL,
122  p_old_Header_Adj_tbl            IN  OE_Order_PUB.Header_Adj_Tbl_Type :=
123                                         OE_Order_PUB.G_MISS_HEADER_ADJ_TBL,
124  p_Header_price_Att_tbl          IN  OE_Order_PUB.Header_Price_Att_Tbl_Type :=
125                                         OE_Order_PUB.G_MISS_HEADER_PRICE_ATT_TBL,
126  p_old_Header_Price_Att_tbl      IN  OE_Order_PUB.Header_Price_Att_Tbl_Type :=
127                                         OE_Order_PUB.G_MISS_HEADER_PRICE_ATT_TBL,
128  p_Header_Adj_Att_tbl            IN  OE_Order_PUB.Header_Adj_Att_Tbl_Type :=
129                                         OE_Order_PUB.G_MISS_HEADER_ADJ_ATT_TBL,
130  p_old_Header_Adj_Att_tbl        IN  OE_Order_PUB.Header_Adj_Att_Tbl_Type :=
131                                         OE_Order_PUB.G_MISS_HEADER_ADJ_ATT_TBL,
132  p_Header_Adj_Assoc_tbl          IN  OE_Order_PUB.Header_Adj_Assoc_Tbl_Type :=
133                                         OE_Order_PUB.G_MISS_HEADER_ADJ_ASSOC_TBL,
134  p_old_Header_Adj_Assoc_tbl      IN  OE_Order_PUB.Header_Adj_Assoc_Tbl_Type :=
135                                         OE_Order_PUB.G_MISS_HEADER_ADJ_ASSOC_TBL,
136  p_Header_Scredit_tbl            IN  OE_Order_PUB.Header_Scredit_Tbl_Type :=
137                                         OE_Order_PUB.G_MISS_HEADER_SCREDIT_TBL,
138  p_old_Header_Scredit_tbl        IN  OE_Order_PUB.Header_Scredit_Tbl_Type :=
139                                         OE_Order_PUB.G_MISS_HEADER_SCREDIT_TBL,
140  p_line_tbl                      IN  OE_Order_PUB.Line_Tbl_Type :=
141                                         OE_Order_PUB.G_MISS_LINE_TBL,
142  p_old_line_tbl                  IN  OE_Order_PUB.Line_Tbl_Type :=
143                                         OE_Order_PUB.G_MISS_LINE_TBL,
144  p_Line_Adj_tbl                  IN  OE_Order_PUB.Line_Adj_Tbl_Type :=
145                                         OE_Order_PUB.G_MISS_LINE_ADJ_TBL,
146  p_old_Line_Adj_tbl              IN  OE_Order_PUB.Line_Adj_Tbl_Type :=
147                                         OE_Order_PUB.G_MISS_LINE_ADJ_TBL,
148  p_Line_price_Att_tbl            IN  OE_Order_PUB.Line_Price_Att_Tbl_Type :=
149                                         OE_Order_PUB.G_MISS_LINE_PRICE_ATT_TBL,
150  p_old_Line_Price_Att_tbl        IN  OE_Order_PUB.Line_Price_Att_Tbl_Type :=
151                                         OE_Order_PUB.G_MISS_LINE_PRICE_ATT_TBL,
152  p_Line_Adj_Att_tbl              IN  OE_Order_PUB.Line_Adj_Att_Tbl_Type :=
153                                         OE_Order_PUB.G_MISS_LINE_ADJ_ATT_TBL,
154  p_old_Line_Adj_Att_tbl          IN  OE_Order_PUB.Line_Adj_Att_Tbl_Type :=
155                                         OE_Order_PUB.G_MISS_LINE_ADJ_ATT_TBL,
156  p_Line_Adj_Assoc_tbl            IN  OE_Order_PUB.Line_Adj_Assoc_Tbl_Type :=
157                                         OE_Order_PUB.G_MISS_LINE_ADJ_ASSOC_TBL,
158  p_old_Line_Adj_Assoc_tbl        IN  OE_Order_PUB.Line_Adj_Assoc_Tbl_Type :=
159                                         OE_Order_PUB.G_MISS_LINE_ADJ_ASSOC_TBL,
160  p_Line_Scredit_tbl              IN  OE_Order_PUB.Line_Scredit_Tbl_Type :=
161                                         OE_Order_PUB.G_MISS_LINE_SCREDIT_TBL,
162  p_old_Line_Scredit_tbl          IN  OE_Order_PUB.Line_Scredit_Tbl_Type :=
163                                         OE_Order_PUB.G_MISS_LINE_SCREDIT_TBL,
164  p_Lot_Serial_tbl                IN  OE_Order_PUB.Lot_Serial_Tbl_Type :=
165                                         OE_Order_PUB.G_MISS_LOT_SERIAL_TBL,
166  p_old_Lot_Serial_tbl            IN  OE_Order_PUB.Lot_Serial_Tbl_Type :=
167                                         OE_Order_PUB.G_MISS_LOT_SERIAL_TBL,
168  p_action_request_tbl            IN  OE_Order_PUB.Request_Tbl_Type   :=
169                                         OE_Order_PUB.G_MISS_REQUEST_TBL,
170  p_app_short_name                IN  VARCHAR2         := NULL,
171  p_queue_type                    IN  VARCHAR2       := 'OF_QUEUE'
172 )
173 IS
174 l_api_name	CONSTANT		VARCHAR2(30)	:= 'UPDATE_NOTICE';
175 l_api_version	CONSTANT		NUMBER			:= 1.0;
176 l_header_type					SYSTEM.ASO_Header_Type;
177 l_old_header_type				SYSTEM.ASO_Header_Type;
178 l_header_adj_var_type			SYSTEM.ASO_Header_Adj_Var_Type;
179 l_old_header_adj_var			SYSTEM.ASO_Header_Adj_Var_Type;
180 l_header_price_att_var_type		SYSTEM.ASO_Header_Price_Att_Var_Type;
181 l_old_header_price_att_var		SYSTEM.ASO_Header_Price_Att_Var_Type;
182 l_header_adj_att_var_type		SYSTEM.ASO_Header_Adj_Att_Var_Type;
183 l_old_header_adj_att_var		     SYSTEM.ASO_Header_Adj_Att_Var_Type;
184 l_header_adj_assoc_var_type		SYSTEM.ASO_Header_Adj_Assoc_Var_Type;
185 l_old_header_adj_assoc_var		SYSTEM.ASO_Header_Adj_Assoc_Var_Type;
186 l_header_scredit_var_type		SYSTEM.ASO_Header_Scredit_Var_Type;
187 l_old_header_scredit_var			SYSTEM.ASO_Header_Scredit_Var_Type;
188 l_line_var_type				SYSTEM.ASO_Line_Var_Type;
189 l_old_line_var					SYSTEM.ASO_Line_Var_Type;
190 l_line_adj_var_type				SYSTEM.ASO_Line_Adj_Var_Type;
191 l_old_line_adj_var				SYSTEM.ASO_Line_Adj_Var_Type;
192 l_line_price_att_var_type		SYSTEM.ASO_Line_Price_Att_Var_Type;
193 l_old_line_price_att_var			SYSTEM.ASO_Line_Price_Att_Var_Type;
194 l_line_adj_att_var_type			SYSTEM.ASO_Line_Adj_Att_Var_Type;
195 l_old_line_adj_att_var			SYSTEM.ASO_Line_Adj_Att_Var_Type;
196 l_line_adj_assoc_var_type		SYSTEM.ASO_Line_Adj_Assoc_Var_Type;
197 l_old_line_adj_assoc_var			SYSTEM.ASO_Line_Adj_Assoc_Var_Type;
198 l_line_scredit_var_type			SYSTEM.ASO_Line_Scredit_Var_Type;
199 l_old_line_scredit_var			SYSTEM.ASO_Line_Scredit_Var_Type;
200 l_lot_serial_var_type			SYSTEM.ASO_Lot_Serial_Var_Type;
201 l_old_lot_serial_var			SYSTEM.ASO_Lot_Serial_Var_Type;
202 l_request_var_type		          SYSTEM.ASO_Request_Var_Type;
203 l_aso_order_feedback_type		SYSTEM.ASO_ORDER_FEEDBACK_TYPE;
204 BEGIN
205 
206 -- Standard Start of API savepoint
207 
208 	SAVEPOINT	UPDATE_NOTICE_PVT;
209 
210 -- Standard call to check for call compatibility.
211 
212 	IF NOT FND_API.Compatible_API_Call (l_api_version ,
213 					    p_api_version ,
214 					    l_api_name ,
215 					    G_PKG_NAME )
216 		THEN
217 		  RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
218 	END IF;
219 
220 -- Initialize message list if p_init_msg_list is set to TRUE.
221 
222 	IF FND_API.to_Boolean( p_init_msg_list ) THEN
223 		FND_MSG_PUB.initialize;
224 	END IF;
225 
226 --  Initialize API return status to success
227 
228 	x_return_status := FND_API.G_RET_STS_SUCCESS;
229 
230 -- UPDATE_NOTICE API specific input parameter validation logic
231 -- none
232 
233 -- API Body
234 
235      ASO_Header_Rec_To_Type( p_header_rec , l_header_type);
236 	ASO_Header_Rec_To_Type( p_old_header_rec , l_old_header_type);
237 
238 	ASO_Header_Adj_Tbl_To_Var( p_Header_Adj_tbl , l_header_adj_var_type);
239 	ASO_Header_Adj_Tbl_To_Var( p_old_Header_Adj_tbl , l_old_header_adj_var);
240 
241 	ASO_Header_Adj_Assoc_Tbl_T_Var( p_Header_Adj_Assoc_tbl , l_header_adj_assoc_var_type);
242      ASO_Header_Adj_Assoc_Tbl_T_Var( p_old_Header_Adj_Assoc_tbl , l_old_header_adj_assoc_var);
243 
244 	ASO_Header_Adj_Att_Tbl_To_Var( p_Header_Adj_Att_tbl , l_header_adj_att_var_type);
245      ASO_Header_Adj_Att_Tbl_To_Var( p_old_Header_Adj_Att_tbl, l_old_header_adj_att_var);
246 
247 	ASO_Header_Price_Tbl_To_Var( p_Header_price_Att_tbl , l_header_price_att_var_type);
248      ASO_Header_Price_Tbl_To_Var( p_old_Header_Price_Att_tbl, l_old_header_price_att_var);
249 
250 	ASO_Header_Scredit_Tbl_To_Var( p_Header_Scredit_tbl , l_header_scredit_var_type);
251      ASO_Header_Scredit_Tbl_To_Var( p_old_Header_Scredit_tbl , l_old_header_scredit_var);
252 
253 	ASO_Line_Tbl_To_Var( p_line_tbl , l_line_var_type);
254      ASO_Line_Tbl_To_Var( p_old_line_tbl , l_old_line_var);
255 
256      ASO_Line_Adj_Tbl_To_Var( p_Line_Adj_tbl , l_line_adj_var_type);
257 	ASO_Line_Adj_Tbl_To_Var( p_old_Line_Adj_tbl , l_old_line_adj_var);
258 
259      ASO_Line_Adj_Assoc_Tbl_To_Var( p_Line_Adj_Assoc_tbl , l_line_adj_assoc_var_type);
260 	ASO_Line_Adj_Assoc_Tbl_To_Var( p_old_Line_Adj_Assoc_tbl , l_old_line_adj_assoc_var);
261 
262      ASO_Line_Adj_Att_Tbl_To_Var( p_Line_Adj_Att_tbl , l_line_adj_att_var_type);
263 	ASO_Line_Adj_Att_Tbl_To_Var( p_old_Line_Adj_Att_tbl , l_old_line_adj_att_var);
264 
265      ASO_Line_Price_Att_Tbl_To_Var( p_Line_Price_Att_tbl , l_line_price_att_var_type);
266 	ASO_Line_Price_Att_Tbl_To_Var( p_old_Line_Price_Att_tbl , l_old_line_price_att_var);
267 
268      ASO_Line_Scredit_Tbl_To_Var( p_Line_Scredit_tbl , l_line_scredit_var_type);
269 	ASO_Line_Scredit_Tbl_To_Var( p_old_Line_Scredit_tbl , l_old_line_scredit_var);
270 
271      ASO_Lot_Serial_Tbl_To_Var( p_Lot_Serial_tbl , l_lot_serial_var_type);
272 	ASO_Lot_Serial_Tbl_To_Var( p_old_Lot_Serial_tbl , l_old_lot_serial_var);
273 
274      ASO_Request_Tbl_To_Var( p_action_request_tbl , l_request_var_type);
275 
276 	l_aso_order_feedback_type  :=  SYSTEM.ASO_ORDER_FEEDBACK_TYPE(
277 											     l_header_type,
278 												l_old_header_type,
279 												l_header_adj_var_type,
280 												l_old_header_adj_var,
281 												l_header_price_att_var_type,
282 												l_old_header_price_att_var ,
283 												l_header_adj_att_var_type,
284 												l_old_header_adj_att_var,
285 												l_header_adj_assoc_var_type,
286 												l_old_header_adj_assoc_var,
287 												l_header_scredit_var_type,
291 												l_line_adj_var_type,
288 												l_old_header_scredit_var,
289 												l_line_var_type,
290 												l_old_line_var,
292 												l_old_line_adj_var,
293 												l_line_price_att_var_type,
294 												l_old_line_price_att_var,
295 												l_line_adj_att_var_type,
296 												l_old_line_adj_att_var,
297 												l_line_adj_assoc_var_type,
298 												l_old_line_adj_assoc_var,
299 												l_line_scredit_var_type,
300 												l_old_line_scredit_var,
301 												l_lot_serial_var_type,
302 												l_old_lot_serial_var,
303 												l_request_var_type
304 												);
305 
306 	ASO_Order_Feedback_ENQ		(
307 							   l_aso_order_feedback_type,
308 							   p_queue_type,
309 							   p_commit,
310 							   p_app_short_name
311 							);
312 
313 -- End of API Body
314 
315 -- Standard check of p_commit.
316 
317 	IF FND_API.To_Boolean( p_commit ) THEN
318 		COMMIT WORK;
319 	END IF;
320 
321 -- Standard call to get message count and if count is 1, get message info.
322 
323 	FND_MSG_PUB.Count_And_Get
324 		(p_count => x_msg_count ,
325 	      p_data => x_msg_data
326 		);
327 
328 EXCEPTION
329 
330 	WHEN FND_API.G_EXC_ERROR THEN
331 		ROLLBACK TO  UPDATE_NOTICE_PVT;
332 		x_return_status := FND_API.G_RET_STS_ERROR ;
333 		FND_MSG_PUB.Count_And_Get
334 			(p_count => x_msg_count ,
335 			 p_data => x_msg_data
336 			);
337 	WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
338 		ROLLBACK TO  UPDATE_NOTICE_PVT;
339 		x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
340 		FND_MSG_PUB.Count_And_Get
341 			(p_count => x_msg_count ,
342 		 	 p_data => x_msg_data
343       	);
344 	WHEN OTHERS THEN
345 		ROLLBACK TO UPDATE_NOTICE_PVT;
346 		x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
347 		IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
348 			FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
349 		END IF;
350 		FND_MSG_PUB.Count_And_Get
351 			(p_count => x_msg_count ,
352 			 p_data => x_msg_data
353 			);
354 END UPDATE_NOTICE;
355 
356 PROCEDURE ASO_Header_Rec_To_Type
357 (
358      p_header_rec        IN   OE_Order_PUB.Header_Rec_Type ,
359      x_header_type       OUT NOCOPY /* file.sql.39 change */    SYSTEM.ASO_Header_Type
360 )
361 IS
362 BEGIN
363      x_header_type := SYSTEM.ASO_Header_Type(
364 p_header_rec.accounting_rule_id
365 , p_header_rec.agreement_id
366 , p_header_rec.attribute1
367 , p_header_rec.attribute10
368 , p_header_rec.attribute11
369 , p_header_rec.attribute12
370 , p_header_rec.attribute13
371 , p_header_rec.attribute14
372 , p_header_rec.attribute15
373 , p_header_rec.attribute2
374 , p_header_rec.attribute3
375 , p_header_rec.attribute4
376 , p_header_rec.attribute5
377 , p_header_rec.attribute6
378 , p_header_rec.attribute7
379 , p_header_rec.attribute8
380 , p_header_rec.attribute9
381 , p_header_rec.booked_flag
382 , p_header_rec.cancelled_flag
383 , p_header_rec.context
384 , p_header_rec.conversion_rate
385 , p_header_rec.conversion_rate_date
386 , p_header_rec.conversion_type_code
387 , p_header_rec.created_by
388 , p_header_rec.creation_date
389 , p_header_rec.cust_po_number
390 , p_header_rec.deliver_to_contact_id
391 , p_header_rec.deliver_to_org_id
392 , p_header_rec.demand_class_code
393 , p_header_rec.earliest_schedule_limit
394 , p_header_rec.expiration_date
395 , p_header_rec.fob_point_code
396 , p_header_rec.freight_carrier_code
397 , p_header_rec.freight_terms_code
398 , p_header_rec.global_attribute1
399 , p_header_rec.global_attribute10
400 , p_header_rec.global_attribute11
401 , p_header_rec.global_attribute12
402 , p_header_rec.global_attribute13
403 , p_header_rec.global_attribute14
404 , p_header_rec.global_attribute15
405 , p_header_rec.global_attribute16
406 , p_header_rec.global_attribute17
407 , p_header_rec.global_attribute18
408 , p_header_rec.global_attribute19
409 , p_header_rec.global_attribute2
410 , p_header_rec.global_attribute20
411 , p_header_rec.global_attribute3
412 , p_header_rec.global_attribute4
413 , p_header_rec.global_attribute5
414 , p_header_rec.global_attribute6
415 , p_header_rec.global_attribute7
416 , p_header_rec.global_attribute8
417 , p_header_rec.global_attribute9
418 , p_header_rec.global_attribute_category
419 , p_header_rec.TP_CONTEXT
420 , p_header_rec.TP_ATTRIBUTE1
421 , p_header_rec.TP_ATTRIBUTE2
422 , p_header_rec.TP_ATTRIBUTE3
423 , p_header_rec.TP_ATTRIBUTE4
424 , p_header_rec.TP_ATTRIBUTE5
425 , p_header_rec.TP_ATTRIBUTE6
426 , p_header_rec.TP_ATTRIBUTE7
427 , p_header_rec.TP_ATTRIBUTE8
428 , p_header_rec.TP_ATTRIBUTE9
429 , p_header_rec.TP_ATTRIBUTE10
430 , p_header_rec.TP_ATTRIBUTE11
431 , p_header_rec.TP_ATTRIBUTE12
432 , p_header_rec.TP_ATTRIBUTE13
433 , p_header_rec.TP_ATTRIBUTE14
434 , p_header_rec.TP_ATTRIBUTE15
435 , p_header_rec.header_id
436 , p_header_rec.invoice_to_contact_id
437 , p_header_rec.invoice_to_org_id
438 , p_header_rec.invoicing_rule_id
439 , p_header_rec.last_updated_by
440 , p_header_rec.last_update_date
441 , p_header_rec.last_update_login
442 , p_header_rec.latest_schedule_limit
443 , p_header_rec.open_flag
447 , p_header_rec.order_number
444 , p_header_rec.order_category_code
445 , p_header_rec.ordered_date
446 , p_header_rec.order_date_type_code
448 , p_header_rec.order_source_id
449 , p_header_rec.order_type_id
450 , p_header_rec.org_id
451 , p_header_rec.orig_sys_document_ref
452 , p_header_rec.partial_shipments_allowed
453 , p_header_rec.payment_term_id
454 , p_header_rec.price_list_id
455 , p_header_rec.pricing_date
456 , p_header_rec.program_application_id
457 , p_header_rec.program_id
458 , p_header_rec.program_update_date
459 , p_header_rec.request_date
460 , p_header_rec.request_id
461 , p_header_rec.return_reason_code
462 , p_header_rec.salesrep_id
463 , p_header_rec.sales_channel_code
464 , p_header_rec.shipment_priority_code
465 , p_header_rec.shipping_method_code
466 , p_header_rec.ship_from_org_id
467 , p_header_rec.ship_tolerance_above
468 , p_header_rec.ship_tolerance_below
469 , p_header_rec.ship_to_contact_id
470 , p_header_rec.ship_to_org_id
471 , p_header_rec.sold_from_org_id
472 , p_header_rec.sold_to_contact_id
473 , p_header_rec.sold_to_org_id
474 , p_header_rec.source_document_id
475 , p_header_rec.source_document_type_id
476 , p_header_rec.tax_exempt_flag
477 , p_header_rec.tax_exempt_number
478 , p_header_rec.tax_exempt_reason_code
479 , p_header_rec.tax_point_code
480 , p_header_rec.transactional_curr_code
481 , p_header_rec.version_number
482 , p_header_rec.return_status
483 , p_header_rec.db_flag
484 , p_header_rec.operation
485 , p_header_rec.first_ack_code
486 , p_header_rec.first_ack_date
487 , p_header_rec.last_ack_code
488 , p_header_rec.last_ack_date
489 , p_header_rec.change_reason
490 , p_header_rec.change_comments
491 , p_header_rec.change_sequence
492 , p_header_rec.change_request_code
493 , p_header_rec.ready_flag
494 , p_header_rec.status_flag
495 , p_header_rec.force_apply_flag
496 , p_header_rec.drop_ship_flag
497 , p_header_rec.customer_payment_term_id
498 , p_header_rec.payment_type_code
499 , p_header_rec.payment_amount
500 , p_header_rec.check_number
501 , p_header_rec.credit_card_code
502 , p_header_rec.credit_card_holder_name
503 , p_header_rec.credit_card_number
504 , p_header_rec.credit_card_expiration_date
505 , p_header_rec.credit_card_approval_code
506 , p_header_rec.shipping_instructions
507 , p_header_rec.packing_instructions
508 , p_header_rec.flow_status_code
509 );
510 END ASO_Header_Rec_To_Type;
511 
512 PROCEDURE ASO_Header_Adj_Tbl_To_Var
513 (
514     p_header_adj_tbl_type	IN	OE_Order_PUB.Header_Adj_Tbl_Type,
515     x_header_adj_var_type  OUT NOCOPY /* file.sql.39 change */   	SYSTEM.ASO_Header_Adj_Var_Type
516 )
517 IS
518     l_header_adj_type              SYSTEM.ASO_Header_Adj_Type;
519     i                              NUMBER;
520     j                              NUMBER := 1;
521 BEGIN
522         IF p_header_adj_tbl_type.COUNT = 0 THEN
523 		 return;
524         END IF;
525 
526         i := p_header_adj_tbl_type.FIRST;
527         WHILE i IS NOT NULL LOOP
528 
529         l_header_adj_type := SYSTEM.ASO_Header_Adj_Type
530 ( p_header_adj_tbl_type(i).attribute1
531 , p_header_adj_tbl_type(i).attribute10
532 , p_header_adj_tbl_type(i).attribute11
533 , p_header_adj_tbl_type(i).attribute12
534 , p_header_adj_tbl_type(i).attribute13
535 , p_header_adj_tbl_type(i).attribute14
536 , p_header_adj_tbl_type(i).attribute15
537 , p_header_adj_tbl_type(i).attribute2
538 , p_header_adj_tbl_type(i).attribute3
539 , p_header_adj_tbl_type(i).attribute4
540 , p_header_adj_tbl_type(i).attribute5
541 , p_header_adj_tbl_type(i).attribute6
542 , p_header_adj_tbl_type(i).attribute7
543 , p_header_adj_tbl_type(i).attribute8
544 , p_header_adj_tbl_type(i).attribute9
545 , p_header_adj_tbl_type(i).automatic_flag
546 , p_header_adj_tbl_type(i).context
547 , p_header_adj_tbl_type(i).created_by
548 , p_header_adj_tbl_type(i).creation_date
549 , p_header_adj_tbl_type(i).discount_id
550 , p_header_adj_tbl_type(i).discount_line_id
551 , p_header_adj_tbl_type(i).header_id
552 , p_header_adj_tbl_type(i).last_updated_by
553 , p_header_adj_tbl_type(i).last_update_date
554 , p_header_adj_tbl_type(i).last_update_login
555 , p_header_adj_tbl_type(i).line_id
556 , p_header_adj_tbl_type(i).percent
557 , p_header_adj_tbl_type(i).price_adjustment_id
558 , p_header_adj_tbl_type(i).program_application_id
559 , p_header_adj_tbl_type(i).program_id
560 , p_header_adj_tbl_type(i).program_update_date
561 , p_header_adj_tbl_type(i).request_id
562 , p_header_adj_tbl_type(i).return_status
563 , p_header_adj_tbl_type(i).db_flag
564 , p_header_adj_tbl_type(i).operation
565 , p_header_adj_tbl_type(i).orig_sys_discount_ref
566 , p_header_adj_tbl_type(i).change_request_code
567 , p_header_adj_tbl_type(i).status_flag
568 , p_header_adj_tbl_type(i).list_header_id
569 , p_header_adj_tbl_type(i).list_line_id
570 , p_header_adj_tbl_type(i).list_line_type_code
571 , p_header_adj_tbl_type(i).modifier_mechanism_type_code
572 , p_header_adj_tbl_type(i).modified_from
573 , p_header_adj_tbl_type(i).modified_to
574 , p_header_adj_tbl_type(i).updated_flag
575 , p_header_adj_tbl_type(i).update_allowed
576 , p_header_adj_tbl_type(i).applied_flag
577 , p_header_adj_tbl_type(i).change_reason_code
578 , p_header_adj_tbl_type(i).change_reason_text
582 , p_header_adj_tbl_type(i).tax_code
579 , p_header_adj_tbl_type(i).operand
580 , p_header_adj_tbl_type(i).arithmetic_operator
581 , p_header_adj_tbl_type(i).cost_id
583 , p_header_adj_tbl_type(i).tax_exempt_flag
584 , p_header_adj_tbl_type(i).tax_exempt_number
585 , p_header_adj_tbl_type(i).tax_exempt_reason_code
586 , p_header_adj_tbl_type(i).parent_adjustment_id
587 , p_header_adj_tbl_type(i).invoiced_flag
588 , p_header_adj_tbl_type(i).estimated_flag
589 , p_header_adj_tbl_type(i).inc_in_sales_performance
590 , p_header_adj_tbl_type(i).split_action_code
591 , p_header_adj_tbl_type(i).adjusted_amount
592 , p_header_adj_tbl_type(i).pricing_phase_id
593 );
594 IF i =  p_header_adj_tbl_type.FIRST then
595   x_header_adj_var_type := SYSTEM.ASO_Header_Adj_Var_Type(l_header_adj_type);
596 ELSE
597   x_header_adj_var_type.EXTEND;
598   x_header_adj_var_type(j) := l_header_adj_type;
599 END IF;
600 j := j + 1;
601 i := p_header_adj_tbl_type.NEXT(i);
602 END LOOP;
603 END ASO_Header_Adj_Tbl_To_Var;
604 
605 
606 PROCEDURE ASO_Header_Adj_Assoc_Tbl_T_Var
607 (
608     p_header_adj_assoc_tbl_type IN        OE_Order_PUB.Header_Adj_Assoc_Tbl_Type,
609     x_header_adj_assoc_var_type OUT NOCOPY /* file.sql.39 change */         SYSTEM.ASO_Header_Adj_Assoc_Var_Type
610 )
611 IS
612 l_header_adj_assoc_type                   SYSTEM.ASO_Header_Adj_Assoc_Type;
613 i                                         NUMBER;
614 j                                         NUMBER :=  1;
615 BEGIN
616     IF p_header_adj_assoc_tbl_type.count = 0  THEN
617        return;
618     END IF;
619 
620     i  :=  p_header_adj_assoc_tbl_type.FIRST;
621 
622     WHILE i IS NOT NULL LOOP
623       l_header_adj_assoc_type := SYSTEM.ASO_Header_Adj_Assoc_Type
624                                 ( p_header_adj_assoc_tbl_type(i).price_adj_assoc_id
625                                 , p_header_adj_assoc_tbl_type(i).line_id
626                                 , p_header_adj_assoc_tbl_type(i).Line_Index
627                                 , p_header_adj_assoc_tbl_type(i).price_adjustment_id
628                                 , p_header_adj_assoc_tbl_type(i).Adj_index
629                                 , p_header_adj_assoc_tbl_type(i).creation_date
630                                 , p_header_adj_assoc_tbl_type(i).created_by
631                                 , p_header_adj_assoc_tbl_type(i).last_update_date
632                                 , p_header_adj_assoc_tbl_type(i).last_updated_by
633                                 , p_header_adj_assoc_tbl_type(i).last_update_login
634                                 , p_header_adj_assoc_tbl_type(i).program_application_id
635                                 , p_header_adj_assoc_tbl_type(i).program_id
636                                 , p_header_adj_assoc_tbl_type(i).program_update_date
637                                 , p_header_adj_assoc_tbl_type(i).request_id
638                                 , p_header_adj_assoc_tbl_type(i).return_status
639                                 , p_header_adj_assoc_tbl_type(i).db_flag
640                                 , p_header_adj_assoc_tbl_type(i).operation
641                                 );
642       IF i = p_header_adj_assoc_tbl_type.FIRST then
643          x_header_adj_assoc_var_type := SYSTEM.ASO_Header_Adj_Assoc_Var_Type
644 								(l_header_adj_assoc_type);
645       ELSE
646          x_header_adj_assoc_var_type.EXTEND;
647          x_header_adj_assoc_var_type(j) :=  l_header_adj_assoc_type;
648       END IF;
649 	 j := j + 1;
650       i  := p_header_adj_assoc_tbl_type.NEXT(i);
651       END LOOP;
652 END ASO_Header_Adj_Assoc_Tbl_T_Var;
653 
654 PROCEDURE ASO_Header_Adj_Att_Tbl_To_Var
655 (
656    p_header_adj_att_tbl_type  IN  OE_Order_PUB.Header_Adj_Att_Tbl_Type,
657    x_header_adj_att_var_type  OUT NOCOPY /* file.sql.39 change */   SYSTEM.ASO_Header_Adj_Att_Var_Type
658 )
659 IS
660    l_header_adj_att_type          SYSTEM.ASO_Header_Adj_Att_Type;
661    i                              NUMBER;
662    j                              NUMBER := 1;
663 BEGIN
664     IF p_header_adj_att_tbl_type.COUNT = 0 THEN
665        return;
666     END IF;
667 
668     i  := p_header_adj_att_tbl_type.FIRST;
669 
670     WHILE i IS NOT NULL LOOP
671 l_header_adj_att_type  := SYSTEM.ASO_Header_Adj_Att_Type
672 ( p_header_adj_att_tbl_type(i).price_adj_attrib_id
673 , p_header_adj_att_tbl_type(i).price_adjustment_id
674 , p_header_adj_att_tbl_type(i).Adj_index
675 , p_header_adj_att_tbl_type(i).flex_title
676 , p_header_adj_att_tbl_type(i).pricing_context
677 , p_header_adj_att_tbl_type(i).pricing_attribute
678 , p_header_adj_att_tbl_type(i).creation_date
679 , p_header_adj_att_tbl_type(i).created_by
680 , p_header_adj_att_tbl_type(i).last_update_date
681 , p_header_adj_att_tbl_type(i).last_updated_by
682 , p_header_adj_att_tbl_type(i).last_update_login
683 , p_header_adj_att_tbl_type(i).program_application_id
684 , p_header_adj_att_tbl_type(i).program_id
685 , p_header_adj_att_tbl_type(i).program_update_date
686 , p_header_adj_att_tbl_type(i).request_id
687 , p_header_adj_att_tbl_type(i).pricing_attr_value_from
688 , p_header_adj_att_tbl_type(i).pricing_attr_value_to
689 , p_header_adj_att_tbl_type(i).comparison_operator
690 , p_header_adj_att_tbl_type(i).return_status
691 , p_header_adj_att_tbl_type(i).db_flag
692 , p_header_adj_att_tbl_type(i).operation
693 );
694     IF i = p_header_adj_att_tbl_type.FIRST THEN
698     x_header_adj_att_var_type(j) :=  l_header_adj_att_type;
695        x_header_adj_att_var_type := SYSTEM.ASO_Header_Adj_Att_Var_Type(l_header_adj_att_type);
696     ELSE
697     x_header_adj_att_var_type.EXTEND;
699     END IF;
700     j := j + 1;
701     i  := p_header_adj_att_tbl_type.NEXT(i);
702     END LOOP;
703 END ASO_Header_Adj_Att_Tbl_To_Var;
704 
705 PROCEDURE ASO_Header_Price_Tbl_To_Var
706 (
707    p_header_price_att_tbl_type  IN  OE_Order_PUB.Header_Price_Att_Tbl_Type,
708    x_header_price_att_var_type  OUT NOCOPY /* file.sql.39 change */   SYSTEM.ASO_Header_Price_Att_Var_Type
709 )
710 IS
711    l_header_price_att_type          SYSTEM.ASO_Header_Price_Att_Type;
712    i                                NUMBER;
713    j                                NUMBER := 1;
714 BEGIN
715     IF p_header_price_att_tbl_type.COUNT = 0 THEN
716        return;
717     END IF;
718 
719     i    := p_header_price_att_tbl_type.FIRST;
720     WHILE i IS NOT NULL LOOP
721 l_header_price_att_type := SYSTEM.ASO_Header_Price_Att_Type
722 ( p_header_price_att_tbl_type(i).order_price_attrib_id
723 , p_header_price_att_tbl_type(i). header_id
724 , p_header_price_att_tbl_type(i).line_id
725 , p_header_price_att_tbl_type(i).creation_date
726 , p_header_price_att_tbl_type(i).created_by
727 , p_header_price_att_tbl_type(i).last_update_date
728 , p_header_price_att_tbl_type(i).last_updated_by
729 , p_header_price_att_tbl_type(i).last_update_login
730 , p_header_price_att_tbl_type(i).program_application_id
731 , p_header_price_att_tbl_type(i).program_id
732 , p_header_price_att_tbl_type(i).program_update_date
733 , p_header_price_att_tbl_type(i).request_id
734 , p_header_price_att_tbl_type(i).flex_title
735 , p_header_price_att_tbl_type(i).pricing_context
736 , p_header_price_att_tbl_type(i).pricing_attribute1
737 , p_header_price_att_tbl_type(i).pricing_attribute2
738 , p_header_price_att_tbl_type(i).pricing_attribute3
739 , p_header_price_att_tbl_type(i).pricing_attribute4
740 , p_header_price_att_tbl_type(i).pricing_attribute5
741 , p_header_price_att_tbl_type(i).pricing_attribute6
742 , p_header_price_att_tbl_type(i).pricing_attribute7
743 , p_header_price_att_tbl_type(i).pricing_attribute8
744 , p_header_price_att_tbl_type(i).pricing_attribute9
745 , p_header_price_att_tbl_type(i).pricing_attribute10
746 , p_header_price_att_tbl_type(i).pricing_attribute11
747 , p_header_price_att_tbl_type(i).pricing_attribute12
748 , p_header_price_att_tbl_type(i).pricing_attribute13
749 , p_header_price_att_tbl_type(i).pricing_attribute14
750 , p_header_price_att_tbl_type(i).pricing_attribute15
751 , p_header_price_att_tbl_type(i).pricing_attribute16
752 , p_header_price_att_tbl_type(i).pricing_attribute17
753 , p_header_price_att_tbl_type(i).pricing_attribute18
754 , p_header_price_att_tbl_type(i).pricing_attribute19
755 , p_header_price_att_tbl_type(i).pricing_attribute20
756 , p_header_price_att_tbl_type(i).pricing_attribute21
757 , p_header_price_att_tbl_type(i).pricing_attribute22
758 , p_header_price_att_tbl_type(i).pricing_attribute23
759 , p_header_price_att_tbl_type(i).pricing_attribute24
760 , p_header_price_att_tbl_type(i).pricing_attribute25
761 , p_header_price_att_tbl_type(i).pricing_attribute26
762 , p_header_price_att_tbl_type(i).pricing_attribute27
763 , p_header_price_att_tbl_type(i).pricing_attribute28
764 , p_header_price_att_tbl_type(i).pricing_attribute29
765 , p_header_price_att_tbl_type(i).pricing_attribute30
766 , p_header_price_att_tbl_type(i).pricing_attribute31
767 , p_header_price_att_tbl_type(i).pricing_attribute32
768 , p_header_price_att_tbl_type(i).pricing_attribute33
769 , p_header_price_att_tbl_type(i).pricing_attribute34
770 , p_header_price_att_tbl_type(i).pricing_attribute35
771 , p_header_price_att_tbl_type(i).pricing_attribute36
772 , p_header_price_att_tbl_type(i).pricing_attribute37
773 , p_header_price_att_tbl_type(i).pricing_attribute38
774 , p_header_price_att_tbl_type(i).pricing_attribute39
775 , p_header_price_att_tbl_type(i).pricing_attribute40
776 , p_header_price_att_tbl_type(i).pricing_attribute41
777 , p_header_price_att_tbl_type(i).pricing_attribute42
778 , p_header_price_att_tbl_type(i).pricing_attribute43
779 , p_header_price_att_tbl_type(i).pricing_attribute44
780 , p_header_price_att_tbl_type(i).pricing_attribute45
781 , p_header_price_att_tbl_type(i).pricing_attribute46
782 , p_header_price_att_tbl_type(i).pricing_attribute47
783 , p_header_price_att_tbl_type(i).pricing_attribute48
784 , p_header_price_att_tbl_type(i).pricing_attribute49
785 , p_header_price_att_tbl_type(i).pricing_attribute50
786 , p_header_price_att_tbl_type(i).pricing_attribute51
787 , p_header_price_att_tbl_type(i).pricing_attribute52
788 , p_header_price_att_tbl_type(i).pricing_attribute53
789 , p_header_price_att_tbl_type(i).pricing_attribute54
790 , p_header_price_att_tbl_type(i).pricing_attribute55
791 , p_header_price_att_tbl_type(i).pricing_attribute56
792 , p_header_price_att_tbl_type(i).pricing_attribute57
793 , p_header_price_att_tbl_type(i).pricing_attribute58
794 , p_header_price_att_tbl_type(i).pricing_attribute59
795 , p_header_price_att_tbl_type(i).pricing_attribute60
796 , p_header_price_att_tbl_type(i).pricing_attribute61
797 , p_header_price_att_tbl_type(i).pricing_attribute62
798 , p_header_price_att_tbl_type(i).pricing_attribute63
799 , p_header_price_att_tbl_type(i).pricing_attribute64
800 , p_header_price_att_tbl_type(i).pricing_attribute65
801 , p_header_price_att_tbl_type(i).pricing_attribute66
802 , p_header_price_att_tbl_type(i).pricing_attribute67
806 , p_header_price_att_tbl_type(i).pricing_attribute71
803 , p_header_price_att_tbl_type(i).pricing_attribute68
804 , p_header_price_att_tbl_type(i).pricing_attribute69
805 , p_header_price_att_tbl_type(i).pricing_attribute70
807 , p_header_price_att_tbl_type(i).pricing_attribute72
808 , p_header_price_att_tbl_type(i).pricing_attribute73
809 , p_header_price_att_tbl_type(i).pricing_attribute74
810 , p_header_price_att_tbl_type(i).pricing_attribute75
811 , p_header_price_att_tbl_type(i).pricing_attribute76
812 , p_header_price_att_tbl_type(i).pricing_attribute77
813 , p_header_price_att_tbl_type(i).pricing_attribute78
814 , p_header_price_att_tbl_type(i).pricing_attribute79
815 , p_header_price_att_tbl_type(i).pricing_attribute80
816 , p_header_price_att_tbl_type(i).pricing_attribute81
817 , p_header_price_att_tbl_type(i).pricing_attribute82
818 , p_header_price_att_tbl_type(i).pricing_attribute83
819 , p_header_price_att_tbl_type(i).pricing_attribute84
820 , p_header_price_att_tbl_type(i).pricing_attribute85
821 , p_header_price_att_tbl_type(i).pricing_attribute86
822 , p_header_price_att_tbl_type(i).pricing_attribute87
823 , p_header_price_att_tbl_type(i).pricing_attribute88
824 , p_header_price_att_tbl_type(i).pricing_attribute89
825 , p_header_price_att_tbl_type(i).pricing_attribute90
826 , p_header_price_att_tbl_type(i).pricing_attribute91
827 , p_header_price_att_tbl_type(i).pricing_attribute92
828 , p_header_price_att_tbl_type(i).pricing_attribute93
829 , p_header_price_att_tbl_type(i).pricing_attribute94
830 , p_header_price_att_tbl_type(i).pricing_attribute95
831 , p_header_price_att_tbl_type(i).pricing_attribute96
832 , p_header_price_att_tbl_type(i).pricing_attribute97
833 , p_header_price_att_tbl_type(i).pricing_attribute98
834 , p_header_price_att_tbl_type(i).pricing_attribute99
835 , p_header_price_att_tbl_type(i).pricing_attribute100
836 , p_header_price_att_tbl_type(i).context
837 , p_header_price_att_tbl_type(i).attribute1
838 , p_header_price_att_tbl_type(i).attribute2
839 , p_header_price_att_tbl_type(i).attribute3
840 , p_header_price_att_tbl_type(i).attribute4
841 , p_header_price_att_tbl_type(i).attribute5
842 , p_header_price_att_tbl_type(i).attribute6
843 , p_header_price_att_tbl_type(i).attribute7
844 , p_header_price_att_tbl_type(i).attribute8
845 , p_header_price_att_tbl_type(i).attribute9
846 , p_header_price_att_tbl_type(i).attribute10
847 , p_header_price_att_tbl_type(i).attribute11
848 , p_header_price_att_tbl_type(i).attribute12
849 , p_header_price_att_tbl_type(i).attribute13
850 , p_header_price_att_tbl_type(i).attribute14
851 , p_header_price_att_tbl_type(i).attribute15
852 , p_header_price_att_tbl_type(i).return_status
853 , p_header_price_att_tbl_type(i).db_flag
854 , p_header_price_att_tbl_type(i).operation
855 );
856 IF i = p_header_price_att_tbl_type.FIRST then
857   x_header_price_att_var_type := SYSTEM.ASO_Header_Price_Att_Var_Type(l_header_price_att_type);
858 ELSE
859   x_header_price_att_var_type.EXTEND;
860   x_header_price_att_var_type(j) := l_header_price_att_type;
861 END IF;
862 j := j + 1;
863 i := p_header_price_att_tbl_type.NEXT(i);
864 END LOOP;
865 END ASO_Header_Price_Tbl_To_Var;
866 
867 
868 PROCEDURE ASO_Header_Scredit_Tbl_To_Var
869 (
870    p_header_scredit_tbl_type	IN  OE_Order_PUB.Header_Scredit_Tbl_Type,
871    x_header_scredit_var_type OUT NOCOPY /* file.sql.39 change */   SYSTEM.ASO_Header_Scredit_Var_Type
872 )
873 IS
874    l_header_scredit_type          SYSTEM.ASO_Header_Scredit_Type;
875    i                              NUMBER;
876    j                              NUMBER := 1;
877 BEGIN
878     IF p_header_scredit_tbl_type.COUNT = 0 THEN
879        return;
880     END IF;
881 
882     i   := p_header_scredit_tbl_type.FIRST;
883     WHILE i IS NOT NULL LOOP
884 l_header_scredit_type := SYSTEM.ASO_Header_Scredit_Type
885 (  p_header_scredit_tbl_type(i).attribute1
886 ,  p_header_scredit_tbl_type(i).attribute10
887 ,  p_header_scredit_tbl_type(i).attribute11
888 ,  p_header_scredit_tbl_type(i).attribute12
889 ,  p_header_scredit_tbl_type(i).attribute13
890 ,  p_header_scredit_tbl_type(i).attribute14
891 ,  p_header_scredit_tbl_type(i).attribute15
892 ,  p_header_scredit_tbl_type(i).attribute2
893 ,  p_header_scredit_tbl_type(i).attribute3
894 ,  p_header_scredit_tbl_type(i).attribute4
895 ,  p_header_scredit_tbl_type(i).attribute5
896 ,  p_header_scredit_tbl_type(i).attribute6
897 ,  p_header_scredit_tbl_type(i).attribute7
898 ,  p_header_scredit_tbl_type(i).attribute8
899 ,  p_header_scredit_tbl_type(i).attribute9
900 ,  p_header_scredit_tbl_type(i).context
901 ,  p_header_scredit_tbl_type(i).created_by
902 ,  p_header_scredit_tbl_type(i).creation_date
903 ,  p_header_scredit_tbl_type(i).dw_update_advice_flag
904 ,  p_header_scredit_tbl_type(i).header_id
905 ,  p_header_scredit_tbl_type(i).last_updated_by
906 ,  p_header_scredit_tbl_type(i).last_update_date
907 ,  p_header_scredit_tbl_type(i).last_update_login
908 ,  p_header_scredit_tbl_type(i).line_id
909 ,  p_header_scredit_tbl_type(i).percent
910 ,  p_header_scredit_tbl_type(i).salesrep_id
911 ,  p_header_scredit_tbl_type(i). sales_credit_id
912 ,  p_header_scredit_tbl_type(i).wh_update_date
913 ,  p_header_scredit_tbl_type(i).return_status
914 ,  p_header_scredit_tbl_type(i).db_flag
915 ,  p_header_scredit_tbl_type(i).operation
916 ,  p_header_scredit_tbl_type(i).orig_sys_credit_ref
917 ,  p_header_scredit_tbl_type(i).change_request_code
921   x_header_scredit_var_type := SYSTEM.ASO_Header_Scredit_Var_Type(l_header_scredit_type);
918 ,  p_header_scredit_tbl_type(i).status_flag
919 );
920 IF i = p_header_scredit_tbl_type.FIRST then
922 ELSE
923   x_header_scredit_var_type.EXTEND;
924   x_header_scredit_var_type(j) :=  l_header_scredit_type;
925 END IF;
926   j := j + 1;
927   i  := p_header_scredit_tbl_type.NEXT(i);
928 END LOOP;
929 END ASO_Header_Scredit_Tbl_To_Var;
930 
931 PROCEDURE ASO_Line_Tbl_To_Var
932 (
933    p_line_tbl_type		IN	OE_Order_PUB.Line_Tbl_Type,
934    x_line_var_type	 OUT NOCOPY /* file.sql.39 change */  	SYSTEM.ASO_Line_Var_Type
935 )
936 IS
937    l_line_type             SYSTEM.ASO_Line_Type;
938    l_semi_processed_flag   VARCHAR2(3);
939    i                       NUMBER;
940    j                       NUMBER := 1;
941 BEGIN
942     IF p_line_tbl_type.COUNT = 0 THEN
943        return;
944     END IF;
945 
946     i  := p_line_tbl_type.FIRST;
947     WHILE i IS NOT NULL LOOP
948       if p_line_tbl_type(i).semi_processed_flag then
949          l_semi_processed_flag := FND_API.G_TRUE;
950       elsif p_line_tbl_type(i).semi_processed_flag is null then
951          l_semi_processed_flag := NULL;
952       else
953          l_semi_processed_flag := FND_API.G_FALSE;
954       end if;
955 
956 l_line_type := SYSTEM.ASO_Line_Type
957 ( p_line_tbl_type(i).accounting_rule_id
958 , p_line_tbl_type(i).actual_arrival_date
959 , p_line_tbl_type(i).actual_shipment_date
960 , p_line_tbl_type(i).agreement_id
961 , p_line_tbl_type(i).arrival_set_id
962 , p_line_tbl_type(i).ato_line_id
963 , p_line_tbl_type(i).attribute1
964 , p_line_tbl_type(i).attribute10
965 , p_line_tbl_type(i).attribute11
966 , p_line_tbl_type(i).attribute12
967 , p_line_tbl_type(i).attribute13
968 , p_line_tbl_type(i).attribute14
969 , p_line_tbl_type(i).attribute15
970 , p_line_tbl_type(i).attribute2
971 , p_line_tbl_type(i).attribute3
972 , p_line_tbl_type(i).attribute4
973 , p_line_tbl_type(i).attribute5
974 , p_line_tbl_type(i).attribute6
975 , p_line_tbl_type(i).attribute7
976 , p_line_tbl_type(i).attribute8
977 , p_line_tbl_type(i).attribute9
978 , p_line_tbl_type(i).authorized_to_ship_flag
979 , p_line_tbl_type(i).auto_selected_quantity
980 , p_line_tbl_type(i).booked_flag
981 , p_line_tbl_type(i).cancelled_flag
982 , p_line_tbl_type(i).cancelled_quantity
983 , p_line_tbl_type(i).commitment_id
984 , p_line_tbl_type(i).component_code
985 , p_line_tbl_type(i).component_number
986 , p_line_tbl_type(i).component_sequence_id
987 , p_line_tbl_type(i).config_header_id
988 , p_line_tbl_type(i).config_rev_nbr
989 , p_line_tbl_type(i).config_display_sequence
990 , p_line_tbl_type(i).configuration_id
991 , p_line_tbl_type(i).context
992 , p_line_tbl_type(i).created_by
993 , p_line_tbl_type(i).creation_date
994 , p_line_tbl_type(i).credit_invoice_line_id
995 , p_line_tbl_type(i).customer_dock_code
996 , p_line_tbl_type(i).customer_job
997 , p_line_tbl_type(i).customer_production_line
998 , p_line_tbl_type(i).customer_trx_line_id
999 , p_line_tbl_type(i).cust_model_serial_number
1000 , p_line_tbl_type(i).cust_po_number
1001 , p_line_tbl_type(i).cust_production_seq_num
1002 , p_line_tbl_type(i).delivery_lead_time
1003 , p_line_tbl_type(i).deliver_to_contact_id
1004 , p_line_tbl_type(i).deliver_to_org_id
1005 , p_line_tbl_type(i).demand_bucket_type_code
1006 , p_line_tbl_type(i).demand_class_code
1007 , p_line_tbl_type(i).dep_plan_required_flag
1008 , p_line_tbl_type(i).earliest_acceptable_date
1009 , p_line_tbl_type(i).end_item_unit_number
1010 , p_line_tbl_type(i).explosion_date
1011 , p_line_tbl_type(i).fob_point_code
1012 , p_line_tbl_type(i).freight_carrier_code
1013 , p_line_tbl_type(i).freight_terms_code
1014 , p_line_tbl_type(i).fulfilled_quantity
1015 , p_line_tbl_type(i).global_attribute1
1016 , p_line_tbl_type(i).global_attribute10
1017 , p_line_tbl_type(i).global_attribute11
1018 , p_line_tbl_type(i).global_attribute12
1019 , p_line_tbl_type(i).global_attribute13
1020 , p_line_tbl_type(i).global_attribute14
1021 , p_line_tbl_type(i).global_attribute15
1022 , p_line_tbl_type(i).global_attribute16
1023 , p_line_tbl_type(i).global_attribute17
1024 , p_line_tbl_type(i).global_attribute18
1025 , p_line_tbl_type(i).global_attribute19
1026 , p_line_tbl_type(i).global_attribute2
1027 , p_line_tbl_type(i).global_attribute20
1028 , p_line_tbl_type(i).global_attribute3
1029 , p_line_tbl_type(i).global_attribute4
1030 , p_line_tbl_type(i).global_attribute5
1031 , p_line_tbl_type(i).global_attribute6
1032 , p_line_tbl_type(i).global_attribute7
1033 , p_line_tbl_type(i).global_attribute8
1034 , p_line_tbl_type(i).global_attribute9
1035 , p_line_tbl_type(i).global_attribute_category
1036 , p_line_tbl_type(i).header_id
1037 , p_line_tbl_type(i).industry_attribute1
1038 , p_line_tbl_type(i).industry_attribute10
1039 , p_line_tbl_type(i).industry_attribute11
1040 , p_line_tbl_type(i).industry_attribute12
1041 , p_line_tbl_type(i).industry_attribute13
1042 , p_line_tbl_type(i).industry_attribute14
1043 , p_line_tbl_type(i).industry_attribute15
1044 , p_line_tbl_type(i).industry_attribute16
1045 , p_line_tbl_type(i).industry_attribute17
1046 , p_line_tbl_type(i).industry_attribute18
1047 , p_line_tbl_type(i).industry_attribute19
1048 , p_line_tbl_type(i).industry_attribute20
1049 , p_line_tbl_type(i).industry_attribute21
1050 , p_line_tbl_type(i).industry_attribute22
1054 , p_line_tbl_type(i).industry_attribute26
1051 , p_line_tbl_type(i).industry_attribute23
1052 , p_line_tbl_type(i).industry_attribute24
1053 , p_line_tbl_type(i).industry_attribute25
1055 , p_line_tbl_type(i).industry_attribute27
1056 , p_line_tbl_type(i).industry_attribute28
1057 , p_line_tbl_type(i).industry_attribute29
1058 , p_line_tbl_type(i).industry_attribute30
1059 , p_line_tbl_type(i).industry_attribute2
1060 , p_line_tbl_type(i).industry_attribute3
1061 , p_line_tbl_type(i).industry_attribute4
1062 , p_line_tbl_type(i).industry_attribute5
1063 , p_line_tbl_type(i).industry_attribute6
1064 , p_line_tbl_type(i).industry_attribute7
1065 , p_line_tbl_type(i).industry_attribute8
1066 , p_line_tbl_type(i).industry_attribute9
1067 , p_line_tbl_type(i).industry_context
1068 , p_line_tbl_type(i).TP_CONTEXT
1069 , p_line_tbl_type(i).TP_ATTRIBUTE1
1070 , p_line_tbl_type(i).TP_ATTRIBUTE2
1071 , p_line_tbl_type(i).TP_ATTRIBUTE3
1072 , p_line_tbl_type(i).TP_ATTRIBUTE4
1073 , p_line_tbl_type(i).TP_ATTRIBUTE5
1074 , p_line_tbl_type(i).TP_ATTRIBUTE6
1075 , p_line_tbl_type(i).TP_ATTRIBUTE7
1076 , p_line_tbl_type(i).TP_ATTRIBUTE8
1077 , p_line_tbl_type(i).TP_ATTRIBUTE9
1078 , p_line_tbl_type(i).TP_ATTRIBUTE10
1079 , p_line_tbl_type(i).TP_ATTRIBUTE11
1080 , p_line_tbl_type(i).TP_ATTRIBUTE12
1081 , p_line_tbl_type(i).TP_ATTRIBUTE13
1082 , p_line_tbl_type(i).TP_ATTRIBUTE14
1083 , p_line_tbl_type(i).TP_ATTRIBUTE15
1084 , p_line_tbl_type(i).intermed_ship_to_org_id
1085 , p_line_tbl_type(i).intermed_ship_to_contact_id
1086 , p_line_tbl_type(i).inventory_item_id
1087 , p_line_tbl_type(i).invoice_interface_status_code
1088 , p_line_tbl_type(i).invoice_to_contact_id
1089 , p_line_tbl_type(i).invoice_to_org_id
1090 , p_line_tbl_type(i).invoicing_rule_id
1091 , p_line_tbl_type(i).ordered_item
1092 , p_line_tbl_type(i).item_revision
1093 , p_line_tbl_type(i).item_type_code
1094 , p_line_tbl_type(i).last_updated_by
1095 , p_line_tbl_type(i).last_update_date
1096 , p_line_tbl_type(i).last_update_login
1097 , p_line_tbl_type(i).latest_acceptable_date
1098 , p_line_tbl_type(i).line_category_code
1099 , p_line_tbl_type(i).line_id
1100 , p_line_tbl_type(i).line_number
1101 , p_line_tbl_type(i).line_type_id
1102 , p_line_tbl_type(i).link_to_line_ref
1103 , p_line_tbl_type(i).link_to_line_id
1104 , p_line_tbl_type(i).link_to_line_index
1105 , p_line_tbl_type(i).model_group_number
1106 , p_line_tbl_type(i).mfg_component_sequence_id
1107 , p_line_tbl_type(i).open_flag
1108 , p_line_tbl_type(i).option_flag
1109 , p_line_tbl_type(i).option_number
1110 , p_line_tbl_type(i).ordered_quantity
1111 , p_line_tbl_type(i).order_quantity_uom
1112 , p_line_tbl_type(i).org_id
1113 , p_line_tbl_type(i).orig_sys_document_ref
1114 , p_line_tbl_type(i).orig_sys_line_ref
1115 , p_line_tbl_type(i).over_ship_reason_code
1116 , p_line_tbl_type(i).over_ship_resolved_flag
1117 , p_line_tbl_type(i).payment_term_id
1118 , p_line_tbl_type(i).planning_priority
1119 , p_line_tbl_type(i).price_list_id
1120 , p_line_tbl_type(i).pricing_attribute1
1121 , p_line_tbl_type(i).pricing_attribute10
1122 , p_line_tbl_type(i).pricing_attribute2
1123 , p_line_tbl_type(i).pricing_attribute3
1124 , p_line_tbl_type(i).pricing_attribute4
1125 , p_line_tbl_type(i).pricing_attribute5
1126 , p_line_tbl_type(i).pricing_attribute6
1127 , p_line_tbl_type(i).pricing_attribute7
1128 , p_line_tbl_type(i).pricing_attribute8
1129 , p_line_tbl_type(i).pricing_attribute9
1130 , p_line_tbl_type(i).pricing_context
1131 , p_line_tbl_type(i).pricing_date
1132 , p_line_tbl_type(i).pricing_quantity
1133 , p_line_tbl_type(i).pricing_quantity_uom
1134 , p_line_tbl_type(i).program_application_id
1135 , p_line_tbl_type(i).program_id
1136 , p_line_tbl_type(i).program_update_date
1137 , p_line_tbl_type(i).project_id
1138 , p_line_tbl_type(i).promise_date
1139 , p_line_tbl_type(i).re_source_flag
1140 , p_line_tbl_type(i).reference_customer_trx_line_id
1141 , p_line_tbl_type(i).reference_header_id
1142 , p_line_tbl_type(i).reference_line_id
1143 , p_line_tbl_type(i).reference_type
1144 , p_line_tbl_type(i).request_date
1145 , p_line_tbl_type(i).request_id
1146 , p_line_tbl_type(i).reserved_quantity
1147 , p_line_tbl_type(i).return_attribute1
1148 , p_line_tbl_type(i).return_attribute10
1149 , p_line_tbl_type(i).return_attribute11
1150 , p_line_tbl_type(i).return_attribute12
1151 , p_line_tbl_type(i).return_attribute13
1152 , p_line_tbl_type(i).return_attribute14
1153 , p_line_tbl_type(i).return_attribute15
1154 , p_line_tbl_type(i).return_attribute2
1155 , p_line_tbl_type(i).return_attribute3
1156 , p_line_tbl_type(i).return_attribute4
1157 , p_line_tbl_type(i).return_attribute5
1158 , p_line_tbl_type(i).return_attribute6
1159 , p_line_tbl_type(i).return_attribute7
1160 , p_line_tbl_type(i).return_attribute8
1161 , p_line_tbl_type(i).return_attribute9
1162 , p_line_tbl_type(i).return_context
1163 , p_line_tbl_type(i).return_reason_code
1164 , p_line_tbl_type(i).rla_schedule_type_code
1165 , p_line_tbl_type(i).salesrep_id
1166 , p_line_tbl_type(i).schedule_arrival_date
1167 , p_line_tbl_type(i).schedule_ship_date
1168 , p_line_tbl_type(i).schedule_action_code
1169 , p_line_tbl_type(i).schedule_status_code
1170 , p_line_tbl_type(i).shipment_number
1171 , p_line_tbl_type(i).shipment_priority_code
1172 , p_line_tbl_type(i).shipped_quantity
1173 , p_line_tbl_type(i).shipping_interfaced_flag
1174 , p_line_tbl_type(i).shipping_method_code
1175 , p_line_tbl_type(i).shipping_quantity
1176 , p_line_tbl_type(i).shipping_quantity_uom
1177 , p_line_tbl_type(i).ship_from_org_id
1181 , p_line_tbl_type(i).ship_tolerance_below
1178 , p_line_tbl_type(i).ship_model_complete_flag
1179 , p_line_tbl_type(i).ship_set_id
1180 , p_line_tbl_type(i).ship_tolerance_above
1182 , p_line_tbl_type(i).ship_to_contact_id
1183 , p_line_tbl_type(i).ship_to_org_id
1184 , p_line_tbl_type(i).sold_to_org_id
1185 , p_line_tbl_type(i).sold_from_org_id
1186 , p_line_tbl_type(i).sort_order
1187 , p_line_tbl_type(i).source_document_id
1188 , p_line_tbl_type(i).source_document_line_id
1189 , p_line_tbl_type(i).source_document_type_id
1190 , p_line_tbl_type(i).source_type_code
1191 , p_line_tbl_type(i).split_from_line_id
1192 , p_line_tbl_type(i).task_id
1193 , p_line_tbl_type(i).tax_code
1194 , p_line_tbl_type(i).tax_date
1195 , p_line_tbl_type(i).tax_exempt_flag
1196 , p_line_tbl_type(i).tax_exempt_number
1197 , p_line_tbl_type(i).tax_exempt_reason_code
1198 , p_line_tbl_type(i).tax_point_code
1199 , p_line_tbl_type(i).tax_rate
1200 , p_line_tbl_type(i).tax_value
1201 , p_line_tbl_type(i).top_model_line_ref
1202 , p_line_tbl_type(i).top_model_line_id
1203 , p_line_tbl_type(i).top_model_line_index
1204 , p_line_tbl_type(i).unit_list_price
1205 , p_line_tbl_type(i).unit_selling_price
1206 , p_line_tbl_type(i).veh_cus_item_cum_key_id
1207 , p_line_tbl_type(i).visible_demand_flag
1208 , p_line_tbl_type(i).return_status
1209 , p_line_tbl_type(i).db_flag
1210 , p_line_tbl_type(i).operation
1211 , p_line_tbl_type(i).first_ack_code
1212 , p_line_tbl_type(i).first_ack_date
1213 , p_line_tbl_type(i).last_ack_code
1214 , p_line_tbl_type(i).last_ack_date
1215 , p_line_tbl_type(i).change_reason
1216 , p_line_tbl_type(i).change_comments
1217 , p_line_tbl_type(i).arrival_set
1218 , p_line_tbl_type(i).ship_set
1219 , p_line_tbl_type(i).order_source_id
1220 , p_line_tbl_type(i).orig_sys_shipment_ref
1221 , p_line_tbl_type(i).change_sequence
1222 , p_line_tbl_type(i).change_request_code
1223 , p_line_tbl_type(i).status_flag
1224 , p_line_tbl_type(i).drop_ship_flag
1225 , p_line_tbl_type(i).customer_line_number
1226 , p_line_tbl_type(i).customer_shipment_number
1227 , p_line_tbl_type(i).customer_item_net_price
1228 , p_line_tbl_type(i).customer_payment_term_id
1229 , p_line_tbl_type(i).ordered_item_id
1230 , p_line_tbl_type(i).item_identifier_type
1231 , p_line_tbl_type(i).shipping_instructions
1232 , p_line_tbl_type(i).packing_instructions
1233 , p_line_tbl_type(i).calculate_price_flag
1234 , p_line_tbl_type(i).invoiced_quantity
1235 , p_line_tbl_type(i).service_txn_reason_code
1236 , p_line_tbl_type(i).service_txn_comments
1237 , p_line_tbl_type(i).service_duration
1238 , p_line_tbl_type(i).service_period
1239 , p_line_tbl_type(i).service_start_date
1240 , p_line_tbl_type(i).service_end_date
1241 , p_line_tbl_type(i).service_coterminate_flag
1242 , p_line_tbl_type(i).unit_list_percent
1243 , p_line_tbl_type(i).unit_selling_percent
1244 , p_line_tbl_type(i).unit_percent_base_price
1245 , p_line_tbl_type(i).service_number
1246 , p_line_tbl_type(i).service_reference_type_code
1247 , p_line_tbl_type(i).service_reference_line_id
1248 , p_line_tbl_type(i).service_reference_system_id
1249 , p_line_tbl_type(i).service_ref_order_number
1250 , p_line_tbl_type(i).service_ref_line_number
1251 , p_line_tbl_type(i).service_ref_shipment_number
1252 , p_line_tbl_type(i).service_ref_option_number
1253 , p_line_tbl_type(i).service_line_index
1254 , p_line_tbl_type(i).Line_set_id
1255 , p_line_tbl_type(i).split_by
1256 , p_line_tbl_type(i).Split_Action_Code
1257 , p_line_tbl_type(i).shippable_flag
1258 , p_line_tbl_type(i).model_remnant_flag
1259 , p_line_tbl_type(i).flow_status_code
1260 , p_line_tbl_type(i).fulfilled_flag
1261 , p_line_tbl_type(i).fulfillment_method_code
1262 , l_semi_processed_flag
1263 );
1264 IF i = p_line_tbl_type.FIRST then
1265   x_line_var_type := SYSTEM.ASO_Line_Var_Type(l_line_type);
1266 ELSE
1267   x_line_var_type.EXTEND;
1268   x_line_var_type(j) :=  l_line_type;
1269 END IF;
1270   j := j + 1;
1271   i  := p_line_tbl_type.NEXT(i);
1272 END LOOP;
1273 END ASO_Line_Tbl_To_Var;
1274 
1275 PROCEDURE ASO_Line_Adj_Tbl_To_Var
1276 (
1277 	p_line_adj_tbl_type	IN	OE_Order_PUB.Line_Adj_Tbl_Type  ,
1278 	x_line_adj_var_type OUT NOCOPY /* file.sql.39 change */  	SYSTEM.ASO_Line_Adj_Var_Type
1279 )
1280 IS
1281      l_line_adj_type          SYSTEM.ASO_Line_Adj_Type;
1282      i                        NUMBER;
1283 	j                        NUMBER := 1;
1284 BEGIN
1285     IF p_line_adj_tbl_type.COUNT = 0 THEN
1286        return;
1287     END IF;
1288 
1289     i  := p_line_adj_tbl_type.FIRST;
1290     WHILE i IS NOT NULL LOOP
1291 l_line_adj_type := SYSTEM.ASO_Line_Adj_Type
1292 ( p_line_adj_tbl_type(i).attribute1
1293 , p_line_adj_tbl_type(i).attribute10
1294 , p_line_adj_tbl_type(i).attribute11
1295 , p_line_adj_tbl_type(i).attribute12
1296 , p_line_adj_tbl_type(i).attribute13
1297 , p_line_adj_tbl_type(i).attribute14
1298 , p_line_adj_tbl_type(i).attribute15
1299 , p_line_adj_tbl_type(i).attribute2
1300 , p_line_adj_tbl_type(i).attribute3
1301 , p_line_adj_tbl_type(i).attribute4
1302 , p_line_adj_tbl_type(i).attribute5
1303 , p_line_adj_tbl_type(i).attribute6
1304 , p_line_adj_tbl_type(i).attribute7
1305 , p_line_adj_tbl_type(i).attribute8
1306 , p_line_adj_tbl_type(i).attribute9
1307 , p_line_adj_tbl_type(i).automatic_flag
1308 , p_line_adj_tbl_type(i).context
1309 , p_line_adj_tbl_type(i).created_by
1310 , p_line_adj_tbl_type(i).creation_date
1314 , p_line_adj_tbl_type(i).last_updated_by
1311 , p_line_adj_tbl_type(i).discount_id
1312 , p_line_adj_tbl_type(i).discount_line_id
1313 , p_line_adj_tbl_type(i).header_id
1315 , p_line_adj_tbl_type(i).last_update_date
1316 , p_line_adj_tbl_type(i).last_update_login
1317 , p_line_adj_tbl_type(i).line_id
1318 , p_line_adj_tbl_type(i).percent
1319 , p_line_adj_tbl_type(i).price_adjustment_id
1320 , p_line_adj_tbl_type(i).program_application_id
1321 , p_line_adj_tbl_type(i).program_id
1322 , p_line_adj_tbl_type(i).program_update_date
1323 , p_line_adj_tbl_type(i).request_id
1324 , p_line_adj_tbl_type(i).return_status
1325 , p_line_adj_tbl_type(i).db_flag
1326 , p_line_adj_tbl_type(i).operation
1327 , p_line_adj_tbl_type(i).line_index
1328 , p_line_adj_tbl_type(i).orig_sys_discount_ref
1329 , p_line_adj_tbl_type(i).change_request_code
1330 , p_line_adj_tbl_type(i).status_flag
1331 , p_line_adj_tbl_type(i).list_header_id
1332 , p_line_adj_tbl_type(i).list_line_id
1333 , p_line_adj_tbl_type(i).list_line_type_code
1334 , p_line_adj_tbl_type(i).modifier_mechanism_type_code
1335 , p_line_adj_tbl_type(i).modified_from
1336 , p_line_adj_tbl_type(i).modified_to
1337 , p_line_adj_tbl_type(i).updated_flag
1338 , p_line_adj_tbl_type(i).update_allowed
1339 , p_line_adj_tbl_type(i).applied_flag
1340 , p_line_adj_tbl_type(i).change_reason_code
1341 , p_line_adj_tbl_type(i).change_reason_text
1342 , p_line_adj_tbl_type(i).operand
1343 , p_line_adj_tbl_type(i).arithmetic_operator
1344 , p_line_adj_tbl_type(i).cost_id
1345 , p_line_adj_tbl_type(i).tax_code
1346 , p_line_adj_tbl_type(i).tax_exempt_flag
1347 , p_line_adj_tbl_type(i).tax_exempt_number
1348 , p_line_adj_tbl_type(i).tax_exempt_reason_code
1349 , p_line_adj_tbl_type(i).parent_adjustment_id
1350 , p_line_adj_tbl_type(i).invoiced_flag
1351 , p_line_adj_tbl_type(i).estimated_flag
1352 , p_line_adj_tbl_type(i).inc_in_sales_performance
1353 , p_line_adj_tbl_type(i).split_action_code
1354 , p_line_adj_tbl_type(i).adjusted_amount
1355 , p_line_adj_tbl_type(i).pricing_phase_id
1356 );
1357 IF i = p_line_adj_tbl_type.FIRST then
1358   x_line_adj_var_type := SYSTEM.ASO_Line_Adj_Var_Type(l_line_adj_type);
1359 ELSE
1360   x_line_adj_var_type.EXTEND;
1361   x_line_adj_var_type(j) :=  l_line_adj_type;
1362 END IF;
1363   j := j + 1;
1364   i  := p_line_adj_tbl_type.NEXT(i);
1365 END LOOP;
1366 END ASO_Line_Adj_Tbl_To_Var;
1367 
1368 PROCEDURE ASO_Line_Adj_Assoc_Tbl_To_Var
1369 (
1370    p_line_adj_assoc_tbl_type	IN      OE_Order_PUB.Line_Adj_Assoc_Tbl_Type,
1371    x_line_adj_assoc_var_type OUT NOCOPY /* file.sql.39 change */       SYSTEM.ASO_Line_Adj_Assoc_Var_Type
1372 )
1373 IS
1374    l_line_adj_assoc_type              SYSTEM.ASO_Line_Adj_Assoc_Type;
1375    i                                  NUMBER;
1376    j                                  NUMBER := 1;
1377 BEGIN
1378     IF p_line_adj_assoc_tbl_type.COUNT = 0 THEN
1379        return;
1380     END IF;
1381 
1382     i := p_line_adj_assoc_tbl_type.FIRST;
1383     WHILE i IS NOT NULL LOOP
1384 l_line_adj_assoc_type := SYSTEM.ASO_Line_Adj_Assoc_Type
1385 ( p_line_adj_assoc_tbl_type(i).price_adj_assoc_id
1386 , p_line_adj_assoc_tbl_type(i).line_id
1387 , p_line_adj_assoc_tbl_type(i).Line_index
1388 , p_line_adj_assoc_tbl_type(i).price_adjustment_id
1389 , p_line_adj_assoc_tbl_type(i).Adj_index
1390 , p_line_adj_assoc_tbl_type(i).creation_date
1391 , p_line_adj_assoc_tbl_type(i).created_by
1392 , p_line_adj_assoc_tbl_type(i).last_update_date
1393 , p_line_adj_assoc_tbl_type(i).last_updated_by
1394 , p_line_adj_assoc_tbl_type(i).last_update_login
1395 , p_line_adj_assoc_tbl_type(i).program_application_id
1396 , p_line_adj_assoc_tbl_type(i).program_id
1397 , p_line_adj_assoc_tbl_type(i).program_update_date
1398 , p_line_adj_assoc_tbl_type(i).request_id
1399 , p_line_adj_assoc_tbl_type(i).return_status
1400 , p_line_adj_assoc_tbl_type(i).db_flag
1401 , p_line_adj_assoc_tbl_type(i).operation
1402 );
1403 IF i = p_line_adj_assoc_tbl_type.FIRST then
1404   x_line_adj_assoc_var_type := SYSTEM.ASO_Line_Adj_Assoc_Var_Type(l_line_adj_assoc_type);
1405 ELSE
1406   x_line_adj_assoc_var_type.EXTEND;
1407   x_line_adj_assoc_var_type(j) :=  l_line_adj_assoc_type;
1408 END IF;
1409   j := j + 1;
1410   i := p_line_adj_assoc_tbl_type.NEXT(i);
1411 END LOOP;
1412 END ASO_Line_Adj_Assoc_Tbl_To_Var;
1413 
1414 
1415 PROCEDURE ASO_Line_Adj_Att_Tbl_To_Var
1416 (
1417     p_line_adj_att_tbl_type IN	 OE_Order_PUB.Line_Adj_Att_Tbl_Type,
1418     x_line_adj_att_var_type OUT NOCOPY /* file.sql.39 change */       SYSTEM.ASO_Line_Adj_Att_Var_Type
1419 )
1420 IS
1421     l_line_adj_att_type             SYSTEM.ASO_Line_Adj_Att_Type;
1422     i                               NUMBER;
1423     j                               NUMBER := 1;
1424 BEGIN
1425     IF p_line_adj_att_tbl_type.COUNT = 0 THEN
1426        return;
1427     END IF;
1428 
1429     i  := p_line_adj_att_tbl_type.FIRST;
1430 
1431     WHILE i IS NOT NULL LOOP
1432 l_line_adj_att_type := SYSTEM.ASO_Line_Adj_Att_Type
1433 ( p_line_adj_att_tbl_type(i).price_adj_attrib_id
1434 , p_line_adj_att_tbl_type(i).price_adjustment_id
1435 , p_line_adj_att_tbl_type(i).Adj_index
1436 , p_line_adj_att_tbl_type(i).flex_title
1437 , p_line_adj_att_tbl_type(i).pricing_context
1438 , p_line_adj_att_tbl_type(i).pricing_attribute
1439 , p_line_adj_att_tbl_type(i).creation_date
1443 , p_line_adj_att_tbl_type(i).last_update_login
1440 , p_line_adj_att_tbl_type(i).created_by
1441 , p_line_adj_att_tbl_type(i).last_update_date
1442 , p_line_adj_att_tbl_type(i).last_updated_by
1444 , p_line_adj_att_tbl_type(i).program_application_id
1445 , p_line_adj_att_tbl_type(i).program_id
1446 , p_line_adj_att_tbl_type(i).program_update_date
1447 , p_line_adj_att_tbl_type(i).request_id
1448 , p_line_adj_att_tbl_type(i).pricing_attr_value_from
1449 , p_line_adj_att_tbl_type(i).pricing_attr_value_to
1450 , p_line_adj_att_tbl_type(i).comparison_operator
1451 , p_line_adj_att_tbl_type(i).return_status
1452 , p_line_adj_att_tbl_type(i).db_flag
1453 , p_line_adj_att_tbl_type(i).operation
1454 );
1455 IF i = p_line_adj_att_tbl_type.FIRST then
1456   x_line_adj_att_var_type := SYSTEM.ASO_Line_Adj_Att_Var_Type(l_line_adj_att_type);
1457 ELSE
1458   x_line_adj_att_var_type.EXTEND;
1459   x_line_adj_att_var_type(j) :=  l_line_adj_att_type;
1460 END IF;
1461 j := j + 1;
1462 i := p_line_adj_att_tbl_type.NEXT(i);
1463 END LOOP;
1464 END ASO_Line_Adj_Att_Tbl_To_Var;
1465 
1466 PROCEDURE ASO_Line_Price_Att_Tbl_To_Var
1467 (
1468      p_line_price_att_tbl_type IN      OE_Order_PUB.Line_Price_Att_Tbl_Type,
1469      x_line_price_att_var_type OUT NOCOPY /* file.sql.39 change */       SYSTEM.ASO_Line_Price_Att_Var_Type
1470 )
1471 IS
1472      l_line_price_att_type             SYSTEM.ASO_Line_Price_Att_Type;
1473      i                                 NUMBER;
1474 	j                                 NUMBER := 1;
1475 BEGIN
1476 
1477     IF p_line_price_att_tbl_type.COUNT = 0 THEN
1478        return;
1479     END IF;
1480 
1481     i  := p_line_price_att_tbl_type.FIRST;
1482 
1483     WHILE i IS NOT NULL LOOP
1484 l_line_price_att_type := SYSTEM.ASO_Line_Price_Att_Type
1485 ( p_line_price_att_tbl_type(i).order_price_attrib_id
1486 , p_line_price_att_tbl_type(i).header_id
1487 , p_line_price_att_tbl_type(i).line_id
1488 , p_line_price_att_tbl_type(i).line_index
1489 , p_line_price_att_tbl_type(i).creation_date
1490 , p_line_price_att_tbl_type(i).created_by
1491 , p_line_price_att_tbl_type(i).last_update_date
1492 , p_line_price_att_tbl_type(i).last_updated_by
1493 , p_line_price_att_tbl_type(i).last_update_login
1494 , p_line_price_att_tbl_type(i).program_application_id
1495 , p_line_price_att_tbl_type(i).program_id
1496 , p_line_price_att_tbl_type(i).program_update_date
1497 , p_line_price_att_tbl_type(i).request_id
1498 , p_line_price_att_tbl_type(i).flex_title
1499 , p_line_price_att_tbl_type(i).pricing_context
1500 , p_line_price_att_tbl_type(i).pricing_attribute1
1501 , p_line_price_att_tbl_type(i).pricing_attribute2
1502 , p_line_price_att_tbl_type(i).pricing_attribute3
1503 , p_line_price_att_tbl_type(i).pricing_attribute4
1504 , p_line_price_att_tbl_type(i).pricing_attribute5
1505 , p_line_price_att_tbl_type(i).pricing_attribute6
1506 , p_line_price_att_tbl_type(i).pricing_attribute7
1507 , p_line_price_att_tbl_type(i).pricing_attribute8
1508 , p_line_price_att_tbl_type(i).pricing_attribute9
1509 , p_line_price_att_tbl_type(i).pricing_attribute10
1510 , p_line_price_att_tbl_type(i).pricing_attribute11
1511 , p_line_price_att_tbl_type(i).pricing_attribute12
1512 , p_line_price_att_tbl_type(i).pricing_attribute13
1513 , p_line_price_att_tbl_type(i).pricing_attribute14
1514 , p_line_price_att_tbl_type(i).pricing_attribute15
1515 , p_line_price_att_tbl_type(i).pricing_attribute16
1516 , p_line_price_att_tbl_type(i).pricing_attribute17
1517 , p_line_price_att_tbl_type(i).pricing_attribute18
1518 , p_line_price_att_tbl_type(i).pricing_attribute19
1519 , p_line_price_att_tbl_type(i).pricing_attribute20
1520 , p_line_price_att_tbl_type(i).pricing_attribute21
1521 , p_line_price_att_tbl_type(i).pricing_attribute22
1522 , p_line_price_att_tbl_type(i).pricing_attribute23
1523 , p_line_price_att_tbl_type(i).pricing_attribute24
1524 , p_line_price_att_tbl_type(i).pricing_attribute25
1525 , p_line_price_att_tbl_type(i).pricing_attribute26
1526 , p_line_price_att_tbl_type(i).pricing_attribute27
1527 , p_line_price_att_tbl_type(i).pricing_attribute28
1528 , p_line_price_att_tbl_type(i).pricing_attribute29
1529 , p_line_price_att_tbl_type(i).pricing_attribute30
1530 , p_line_price_att_tbl_type(i).pricing_attribute31
1531 , p_line_price_att_tbl_type(i).pricing_attribute32
1532 , p_line_price_att_tbl_type(i).pricing_attribute33
1533 , p_line_price_att_tbl_type(i).pricing_attribute34
1534 , p_line_price_att_tbl_type(i).pricing_attribute35
1535 , p_line_price_att_tbl_type(i).pricing_attribute36
1536 , p_line_price_att_tbl_type(i).pricing_attribute37
1537 , p_line_price_att_tbl_type(i).pricing_attribute38
1538 , p_line_price_att_tbl_type(i).pricing_attribute39
1539 , p_line_price_att_tbl_type(i).pricing_attribute40
1540 , p_line_price_att_tbl_type(i).pricing_attribute41
1541 , p_line_price_att_tbl_type(i).pricing_attribute42
1542 , p_line_price_att_tbl_type(i).pricing_attribute43
1543 , p_line_price_att_tbl_type(i).pricing_attribute44
1544 , p_line_price_att_tbl_type(i).pricing_attribute45
1545 , p_line_price_att_tbl_type(i).pricing_attribute46
1546 , p_line_price_att_tbl_type(i).pricing_attribute47
1547 , p_line_price_att_tbl_type(i).pricing_attribute48
1548 , p_line_price_att_tbl_type(i).pricing_attribute49
1549 , p_line_price_att_tbl_type(i).pricing_attribute50
1550 , p_line_price_att_tbl_type(i).pricing_attribute51
1551 , p_line_price_att_tbl_type(i).pricing_attribute52
1552 , p_line_price_att_tbl_type(i).pricing_attribute53
1556 , p_line_price_att_tbl_type(i).pricing_attribute57
1553 , p_line_price_att_tbl_type(i).pricing_attribute54
1554 , p_line_price_att_tbl_type(i).pricing_attribute55
1555 , p_line_price_att_tbl_type(i).pricing_attribute56
1557 , p_line_price_att_tbl_type(i).pricing_attribute58
1558 , p_line_price_att_tbl_type(i).pricing_attribute59
1559 , p_line_price_att_tbl_type(i).pricing_attribute60
1560 , p_line_price_att_tbl_type(i).pricing_attribute61
1561 , p_line_price_att_tbl_type(i).pricing_attribute62
1562 , p_line_price_att_tbl_type(i).pricing_attribute63
1563 , p_line_price_att_tbl_type(i).pricing_attribute64
1564 , p_line_price_att_tbl_type(i).pricing_attribute65
1565 , p_line_price_att_tbl_type(i).pricing_attribute66
1566 , p_line_price_att_tbl_type(i).pricing_attribute67
1567 , p_line_price_att_tbl_type(i).pricing_attribute68
1568 , p_line_price_att_tbl_type(i).pricing_attribute69
1569 , p_line_price_att_tbl_type(i).pricing_attribute70
1570 , p_line_price_att_tbl_type(i).pricing_attribute71
1571 , p_line_price_att_tbl_type(i).pricing_attribute72
1572 , p_line_price_att_tbl_type(i).pricing_attribute73
1573 , p_line_price_att_tbl_type(i).pricing_attribute74
1574 , p_line_price_att_tbl_type(i).pricing_attribute75
1575 , p_line_price_att_tbl_type(i).pricing_attribute76
1576 , p_line_price_att_tbl_type(i).pricing_attribute77
1577 , p_line_price_att_tbl_type(i).pricing_attribute78
1578 , p_line_price_att_tbl_type(i).pricing_attribute79
1579 , p_line_price_att_tbl_type(i).pricing_attribute80
1580 , p_line_price_att_tbl_type(i).pricing_attribute81
1581 , p_line_price_att_tbl_type(i).pricing_attribute82
1582 , p_line_price_att_tbl_type(i).pricing_attribute83
1583 , p_line_price_att_tbl_type(i).pricing_attribute84
1584 , p_line_price_att_tbl_type(i).pricing_attribute85
1585 , p_line_price_att_tbl_type(i).pricing_attribute86
1586 , p_line_price_att_tbl_type(i).pricing_attribute87
1587 , p_line_price_att_tbl_type(i).pricing_attribute88
1588 , p_line_price_att_tbl_type(i).pricing_attribute89
1589 , p_line_price_att_tbl_type(i).pricing_attribute90
1590 , p_line_price_att_tbl_type(i).pricing_attribute91
1591 , p_line_price_att_tbl_type(i).pricing_attribute92
1592 , p_line_price_att_tbl_type(i).pricing_attribute93
1593 , p_line_price_att_tbl_type(i).pricing_attribute94
1594 , p_line_price_att_tbl_type(i).pricing_attribute95
1595 , p_line_price_att_tbl_type(i).pricing_attribute96
1596 , p_line_price_att_tbl_type(i).pricing_attribute97
1597 , p_line_price_att_tbl_type(i).pricing_attribute98
1598 , p_line_price_att_tbl_type(i).pricing_attribute99
1599 , p_line_price_att_tbl_type(i).pricing_attribute100
1600 , p_line_price_att_tbl_type(i).context
1601 , p_line_price_att_tbl_type(i).attribute1
1602 , p_line_price_att_tbl_type(i).attribute2
1603 , p_line_price_att_tbl_type(i).attribute3
1604 , p_line_price_att_tbl_type(i).attribute4
1605 , p_line_price_att_tbl_type(i).attribute5
1606 , p_line_price_att_tbl_type(i).attribute6
1607 , p_line_price_att_tbl_type(i).attribute7
1608 , p_line_price_att_tbl_type(i).attribute8
1609 , p_line_price_att_tbl_type(i).attribute9
1610 , p_line_price_att_tbl_type(i).attribute10
1611 , p_line_price_att_tbl_type(i).attribute11
1612 , p_line_price_att_tbl_type(i).attribute12
1613 , p_line_price_att_tbl_type(i).attribute13
1614 , p_line_price_att_tbl_type(i).attribute14
1615 , p_line_price_att_tbl_type(i).attribute15
1616 , p_line_price_att_tbl_type(i).return_status
1617 , p_line_price_att_tbl_type(i).db_flag
1618 , p_line_price_att_tbl_type(i).operation
1619 );
1620 IF i = p_line_price_att_tbl_type.FIRST then
1621   x_line_price_att_var_type := SYSTEM.ASO_Line_Price_Att_Var_Type(l_line_price_att_type
1622 );
1623 ELSE
1624   x_line_price_att_var_type.EXTEND;
1625   x_line_price_att_var_type(j) :=  l_line_price_att_type;
1626 END IF;
1627   j := j + 1;
1628   i := p_line_price_att_tbl_type.NEXT(i);
1629 END LOOP;
1630 END ASO_Line_Price_Att_Tbl_To_Var;
1631 
1632 PROCEDURE ASO_Line_Scredit_Tbl_To_Var
1633 (
1634     p_line_scredit_tbl_type IN      OE_Order_PUB.Line_Scredit_Tbl_Type,
1635     x_line_scredit_var_type OUT NOCOPY /* file.sql.39 change */  	 SYSTEM.ASO_Line_Scredit_Var_Type
1636 )
1637 IS
1638     l_line_scredit_type             SYSTEM.ASO_Line_Scredit_Type;
1639     i                               NUMBER;
1640     j                               NUMBER := 1;
1641 BEGIN
1642     IF p_line_scredit_tbl_type.COUNT  = 0 THEN
1643        return;
1644     END IF;
1645 
1646     i := p_line_scredit_tbl_type.FIRST;
1647     WHILE i IS NOT NULL LOOP
1648 l_line_scredit_type := SYSTEM.ASO_Line_Scredit_Type
1649 ( p_line_scredit_tbl_type(i).attribute1
1650 , p_line_scredit_tbl_type(i).attribute10
1651 , p_line_scredit_tbl_type(i).attribute11
1652 , p_line_scredit_tbl_type(i).attribute12
1653 , p_line_scredit_tbl_type(i).attribute13
1654 , p_line_scredit_tbl_type(i).attribute14
1655 , p_line_scredit_tbl_type(i).attribute15
1656 , p_line_scredit_tbl_type(i).attribute2
1657 , p_line_scredit_tbl_type(i).attribute3
1658 , p_line_scredit_tbl_type(i).attribute4
1659 , p_line_scredit_tbl_type(i).attribute5
1660 , p_line_scredit_tbl_type(i).attribute6
1661 , p_line_scredit_tbl_type(i).attribute7
1662 , p_line_scredit_tbl_type(i).attribute8
1663 , p_line_scredit_tbl_type(i).attribute9
1664 , p_line_scredit_tbl_type(i).context
1665 , p_line_scredit_tbl_type(i).created_by
1666 , p_line_scredit_tbl_type(i).creation_date
1667 , p_line_scredit_tbl_type(i).dw_update_advice_flag
1668 , p_line_scredit_tbl_type(i).header_id
1669 , p_line_scredit_tbl_type(i).last_updated_by
1670 , p_line_scredit_tbl_type(i).last_update_date
1674 , p_line_scredit_tbl_type(i).salesrep_id
1671 , p_line_scredit_tbl_type(i).last_update_login
1672 , p_line_scredit_tbl_type(i).line_id
1673 , p_line_scredit_tbl_type(i).percent
1675 , p_line_scredit_tbl_type(i).sales_credit_id
1676 , p_line_scredit_tbl_type(i).wh_update_date
1677 , p_line_scredit_tbl_type(i).return_status
1678 , p_line_scredit_tbl_type(i).db_flag
1679 , p_line_scredit_tbl_type(i).operation
1680 , p_line_scredit_tbl_type(i).line_index
1681 , p_line_scredit_tbl_type(i).orig_sys_credit_ref
1682 , p_line_scredit_tbl_type(i).change_request_code
1683 , p_line_scredit_tbl_type(i).status_flag
1684 );
1685 IF i = p_line_scredit_tbl_type.FIRST then
1686   x_line_scredit_var_type := SYSTEM.ASO_Line_Scredit_Var_Type
1687 						(l_line_scredit_type);
1688 ELSE
1689   x_line_scredit_var_type.EXTEND;
1690   x_line_scredit_var_type(j) :=  l_line_scredit_type;
1691 END IF;
1692   j := j + 1;
1693   i :=  p_line_scredit_tbl_type.NEXT(i);
1694 END LOOP;
1695 END ASO_Line_Scredit_Tbl_To_Var;
1696 
1697 
1698 PROCEDURE ASO_Lot_Serial_Tbl_To_Var
1699 (
1700     p_lot_serial_tbl_type   IN      OE_Order_PUB.Lot_Serial_Tbl_Type,
1701     x_lot_serial_var_type   OUT NOCOPY /* file.sql.39 change */       SYSTEM.ASO_Lot_Serial_Var_Type)
1702 IS
1703     l_lot_serial_type               SYSTEM.ASO_Lot_Serial_Type;
1704     i                               NUMBER;
1705     j                               NUMBER := 1;
1706 BEGIN
1707     IF p_lot_serial_tbl_type.COUNT = 0 THEN
1708        return;
1709     END IF;
1710 
1711     i  := p_lot_serial_tbl_type.FIRST;
1712 
1713     WHILE i IS NOT NULL LOOP
1714 l_lot_serial_type := SYSTEM.ASO_Lot_Serial_Type
1715 ( p_lot_serial_tbl_type(i).attribute1
1716 , p_lot_serial_tbl_type(i).attribute10
1717 , p_lot_serial_tbl_type(i).attribute11
1718 , p_lot_serial_tbl_type(i).attribute12
1719 , p_lot_serial_tbl_type(i).attribute13
1720 , p_lot_serial_tbl_type(i).attribute14
1721 , p_lot_serial_tbl_type(i).attribute15
1722 , p_lot_serial_tbl_type(i).attribute2
1723 , p_lot_serial_tbl_type(i).attribute3
1724 , p_lot_serial_tbl_type(i).attribute4
1725 , p_lot_serial_tbl_type(i).attribute5
1726 , p_lot_serial_tbl_type(i).attribute6
1727 , p_lot_serial_tbl_type(i).attribute7
1728 , p_lot_serial_tbl_type(i).attribute8
1729 , p_lot_serial_tbl_type(i).attribute9
1730 , p_lot_serial_tbl_type(i).context
1731 , p_lot_serial_tbl_type(i).created_by
1732 , p_lot_serial_tbl_type(i).creation_date
1733 , p_lot_serial_tbl_type(i).from_serial_number
1734 , p_lot_serial_tbl_type(i).last_updated_by
1735 , p_lot_serial_tbl_type(i).last_update_date
1736 , p_lot_serial_tbl_type(i).last_update_login
1737 , p_lot_serial_tbl_type(i).line_id
1738 , p_lot_serial_tbl_type(i).lot_number
1739 , p_lot_serial_tbl_type(i).lot_serial_id
1740 , p_lot_serial_tbl_type(i).quantity
1741 , p_lot_serial_tbl_type(i).to_serial_number
1742 , p_lot_serial_tbl_type(i).return_status
1743 , p_lot_serial_tbl_type(i).db_flag
1744 , p_lot_serial_tbl_type(i).operation
1745 , p_lot_serial_tbl_type(i).line_index
1746 , p_lot_serial_tbl_type(i).orig_sys_lotserial_ref
1747 , p_lot_serial_tbl_type(i).change_request_code
1748 , p_lot_serial_tbl_type(i).status_flag
1749 , p_lot_serial_tbl_type(i).line_set_id
1750 );
1751 IF i = p_lot_serial_tbl_type.FIRST then
1752   x_lot_serial_var_type := SYSTEM.ASO_Lot_Serial_Var_Type(l_lot_serial_type);
1753 ELSE
1754   x_lot_serial_var_type.EXTEND;
1755   x_lot_serial_var_type(j) :=  l_lot_serial_type;
1756 END IF;
1757   j := j + 1;
1758   i := p_lot_serial_tbl_type.NEXT(i);
1759 END LOOP;
1760 END ASO_Lot_Serial_Tbl_To_Var;
1761 
1762 PROCEDURE ASO_Request_Tbl_To_Var
1763 (
1764     p_request_tbl_type      IN      OE_Order_PUB.Request_Tbl_Type,
1765     x_request_var_type      OUT NOCOPY /* file.sql.39 change */       SYSTEM.ASO_Request_Var_Type
1766 )
1767 IS
1768     l_request_type                  SYSTEM.ASO_Request_Type;
1769     i                               NUMBER;
1770     j                               NUMBER := 1;
1771 BEGIN
1772     if p_request_tbl_type.COUNT = 0 THEN
1773        return;
1774     END IF;
1775 
1776     i  := p_request_tbl_type.FIRST;
1777     WHILE i IS NOT NULL LOOP
1778       l_request_type := SYSTEM.ASO_Request_Type
1779 (
1780 p_request_tbl_type(i).Entity_code
1781 , p_request_tbl_type(i).Entity_id
1782 , p_request_tbl_type(i).Entity_index
1783 , p_request_tbl_type(i).request_type
1784 , p_request_tbl_type(i).return_status
1785 , p_request_tbl_type(i).request_unique_key1
1786 , p_request_tbl_type(i).request_unique_key2
1787 , p_request_tbl_type(i).request_unique_key3
1788 , p_request_tbl_type(i).request_unique_key4
1789 , p_request_tbl_type(i).request_unique_key5
1790 , p_request_tbl_type(i).param1
1791 , p_request_tbl_type(i).param2
1792 , p_request_tbl_type(i).param3
1793 , p_request_tbl_type(i).param4
1794 , p_request_tbl_type(i).param5
1795 , p_request_tbl_type(i).param6
1796 , p_request_tbl_type(i).param7
1797 , p_request_tbl_type(i).param8
1798 , p_request_tbl_type(i).param9
1799 , p_request_tbl_type(i).param10
1800 , p_request_tbl_type(i).param11
1801 , p_request_tbl_type(i).param12
1802 , p_request_tbl_type(i).param13
1803 , p_request_tbl_type(i).param14
1804 , p_request_tbl_type(i).param15
1805 , p_request_tbl_type(i).param16
1806 , p_request_tbl_type(i).param17
1807 , p_request_tbl_type(i).param18
1808 , p_request_tbl_type(i).param19
1809 , p_request_tbl_type(i).param20
1810 , p_request_tbl_type(i).param21
1811 , p_request_tbl_type(i).param22
1815 , p_request_tbl_type(i).long_param1
1812 , p_request_tbl_type(i).param23
1813 , p_request_tbl_type(i).param24
1814 , p_request_tbl_type(i).param25
1816 , p_request_tbl_type(i).date_param1
1817 , p_request_tbl_type(i).date_param2
1818 , p_request_tbl_type(i).date_param3
1819 , p_request_tbl_type(i).date_param4
1820 , p_request_tbl_type(i).date_param5
1821 , p_request_tbl_type(i).processed
1822 );
1823 IF i = p_request_tbl_type.FIRST then
1824   x_request_var_type := SYSTEM.ASO_Request_Var_Type(l_request_type);
1825 ELSE
1826   x_request_var_type.EXTEND;
1827   x_request_var_type(j) :=  l_request_type;
1828 END IF;
1829   j := j + 1;
1830   i := p_request_tbl_type.NEXT(i);
1831 END LOOP;
1832 END ASO_Request_Tbl_To_Var;
1833 
1834 
1835 PROCEDURE ASO_Order_Feedback_ENQ
1836 (
1837     p_aso_order_feedback_type IN      SYSTEM.ASO_ORDER_FEEDBACK_TYPE,
1838     p_queue_type              IN      VARCHAR2,
1839     p_commit                  IN      VARCHAR2,
1840     p_app_short_name          IN      VARCHAR2
1841 )
1842 IS
1843     l_enq_msgid          RAW(16);
1844     l_eopt               dbms_aq.enqueue_options_t;
1845     l_mprop              dbms_aq.message_properties_t;
1846     l_expiration         VARCHAR2(30);
1847     queue_name           VARCHAR2(30);
1848 BEGIN
1849 
1850     FND_PROFILE.GET('ASO_OF_RETENTION_TIME', l_expiration);
1851     if l_expiration is not null then
1852 	 l_mprop.expiration           := to_number(l_expiration);
1853     else
1854       l_mprop.expiration           := dbms_aq.NEVER;
1855     end if;
1856 
1857     if p_queue_type = 'OF_QUEUE' then
1858 	 l_eopt.visibility            := dbms_aq.ON_COMMIT;
1859 	 queue_name                   := ASO_QUEUE.ASO_OF_Q;
1860       ASO_CRM_Recipients(l_mprop.recipient_list);
1861     else
1862 	 queue_name                   := ASO_QUEUE.ASO_OF_EXCP_Q;
1863 	 l_mprop.recipient_list(0)    := sys.aq$_agent(p_app_short_name, NULL, NULL);
1864       if p_commit = FND_API.G_TRUE then
1865         l_eopt.visibility            := dbms_aq.IMMEDIATE;
1866       else
1867         l_eopt.visibility            := dbms_aq.ON_COMMIT;
1868       end if;
1869     end if;
1870 
1871     if l_mprop.recipient_list.COUNT >0 then
1872       dbms_aq.enqueue (
1873                        queue_name => queue_name,
1874                        enqueue_options => l_eopt,
1875                        message_properties => l_mprop,
1876                        payload => p_aso_order_feedback_type,
1877                        msgid => l_enq_msgid
1878                       );
1879     end if;
1880 END ASO_Order_Feedback_ENQ;
1881 
1882 PROCEDURE ASO_CRM_Recipients
1883 (
1884 p_recipient_list        OUT NOCOPY /* file.sql.39 change */         DBMS_AQ.aq$_recipient_list_t
1885 )
1886 IS
1887    l_lookup_code        VARCHAR2(30);
1888    l_app_info           BOOLEAN;
1889    l_status             VARCHAR2(30) ;
1890    l_industry           VARCHAR2(30);
1891    l_schema             VARCHAR2(30);
1892    i                    NUMBER := 0;
1893    CURSOR c1 is
1894 		 SELECT LOOKUP_CODE from ASO_LOOKUPS where
1895 		 LOOKUP_TYPE = 'ASO_ORDER_FEEDBACK_CRM_APPS'
1896 		 and enabled_flag = 'Y' and
1897 		 sysdate between nvl(start_date_active, sysdate)
1898 		 and nvl(end_date_active,sysdate);
1899 BEGIN
1900 
1901   OPEN c1;
1902   LOOP
1903     FETCH c1 INTO l_lookup_code;
1904     EXIT WHEN (c1%NOTFOUND);
1905 --   code commented OUT NOCOPY /* file.sql.39 change */ because of performance issue bug 1708811
1906 --    l_app_info                   := FND_INSTALLATION.GET_APP_INFO
1907 --                                 (l_lookup_code, l_status, l_industry, l_schema);
1908 --    IF l_status IS NOT NULL THEN
1909        p_recipient_list(i) := sys.aq$_agent(l_lookup_code, NULL, NULL);
1910        i := i +1;
1911 --    END IF;
1912   END LOOP;
1913   CLOSE c1;
1914 END ASO_CRM_Recipients;
1915 
1916 END ASO_ORDER_FEEDBACK_UPDATE_PVT;