[Home] [Help]
PACKAGE BODY: APPS.ASO_UTILITY_PVT
Source
1 PACKAGE BODY ASO_UTILITY_PVT as
2 /* $Header: asovutlb.pls 120.29 2012/01/03 05:42:36 rassharm ship $ */
3 --
4 -- NAME
5 -- ASO_UTILITY_PVT
6 --
7 -- HISTORY
8 -- 10/18/2002 hyang - 2633507, performance fix
9 --
10
11 G_PKG_NAME CONSTANT VARCHAR2(30):='ASO_UTILITY_PVT';
12 G_FILE_NAME CONSTANT VARCHAR2(12):='asovutlb.pls';
13
14 PROCEDURE Start_API(
15 p_api_name IN VARCHAR2,
16 p_pkg_name IN VARCHAR2,
17 p_init_msg_list IN VARCHAR2,
18 p_l_api_version IN NUMBER,
19 p_api_version IN NUMBER,
20 p_api_type IN VARCHAR2,
21 x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
22 IS
23 BEGIN
24 NULL;
25 END Start_API;
26
27
28 PROCEDURE End_API(
29 x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
30 x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
31 IS
32 BEGIN
33 NULL;
34 END End_API;
35
36
37 PROCEDURE Handle_Exceptions(
38 P_API_NAME IN VARCHAR2,
39 P_PKG_NAME IN VARCHAR2,
40 P_EXCEPTION_LEVEL IN NUMBER := FND_API.G_MISS_NUM,
41 P_SQLCODE IN NUMBER :=NULL,
42 P_SQLERRM IN VARCHAR2 := NULL,
43 P_PACKAGE_TYPE IN VARCHAR2,
44 X_MSG_COUNT OUT NOCOPY /* file.sql.39 change */ NUMBER,
45 X_MSG_DATA OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
46 X_RETURN_STATUS OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
47 IS
48 l_api_name VARCHAR2(30);
49 l_len_sqlerrm Number ;
50 i number := 1;
51
52 BEGIN
53 l_api_name := UPPER(p_api_name);
54
55 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
56 aso_debug_pub.add('Exception in package : '|| P_PKG_NAME, 1, 'N');
57 aso_debug_pub.add('Exception in API : '|| P_API_NAME, 1, 'N');
58 aso_debug_pub.add('SQLCODE : '|| P_SQLCODE, 1, 'N');
59 aso_debug_pub.add('SQLERRM : '|| P_SQLERRM, 1, 'N');
60 END IF;
61
62 DBMS_TRANSACTION.ROLLBACK_SAVEPOINT(l_api_name || p_package_type);
63 IF p_exception_level = FND_MSG_PUB.G_MSG_LVL_ERROR
64 THEN
65 x_return_status := FND_API.G_RET_STS_ERROR;
66 FND_MSG_PUB.Count_And_Get(
67 p_count => x_msg_count,
68 p_data => x_msg_data);
69 ELSIF p_exception_level = FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
70 THEN
71 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
72 FND_MSG_PUB.Count_And_Get(
73 p_count => x_msg_count,
74 p_data => x_msg_data);
75 ELSIF p_exception_level = G_EXC_OTHERS
76 THEN
77 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
78
79 FND_MESSAGE.Set_Name('ASO', 'ASO_ERROR_RETURNED');
80 FND_MESSAGE.Set_token('PKG_NAME' , p_pkg_name);
81 FND_MESSAGE.Set_token('API_NAME' , p_api_name);
82 FND_MSG_PUB.ADD;
83 l_len_sqlerrm := Length(P_SQLERRM) ;
84 While l_len_sqlerrm >= i Loop
85 FND_MESSAGE.Set_Name('ASO', 'ASO_SQLERRM');
86 FND_MESSAGE.Set_token('ERR_TEXT' , substr(P_SQLERRM,i,240));
87 i := i + 240;
88 FND_MSG_PUB.ADD;
89 end loop;
90
91
92 FND_MSG_PUB.Count_And_Get(
93 p_count => x_msg_count,
94 p_data => x_msg_data);
95
96 END IF;
97
98 END Handle_Exceptions;
99
100
101
102
103 FUNCTION get_subOrderBy(p_col_choice IN NUMBER, p_col_name IN VARCHAR2)
104 RETURN VARCHAR2 IS
105 l_col_name varchar2(30);
106 begin
107
108 if (p_col_choice is NULL and p_col_name is NOT NULL)
109 or (p_col_choice is NOT NULL and p_col_name is NULL)
110 then
111 if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)
112 then
113 fnd_message.set_name('ASO', 'API_MISSING_ORDERBY_ELEMENT');
114 fnd_msg_pub.add;
115 end if;
116 raise fnd_api.g_exc_error;
117 end if;
118
119
120 if (nls_upper(p_col_name) = 'CUSTOMER_NAME')
121 then
122 l_col_name := ' nls_upper' ||'(' ||p_col_name|| ')';
123 else
124 l_col_name := p_col_name;
125 end if;
126
127 if (mod(p_col_choice, 10) = 1)
128 then
129 return(l_col_name || ' ASC, ');
130 elsif (mod(p_col_choice, 10) = 0)
131 then
132 return(l_col_name || ' DESC, ');
133 else
134 if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)
135 then
136 fnd_message.set_name('ASO', 'API_INVALID_ORDERBY_CHOICE');
137 fnd_message.set_token('PARAM',p_col_choice, false);
138 fnd_msg_pub.add;
139 end if;
140 raise fnd_api.g_exc_error;
141 return '';
142 end if;
143 end;
144
145 PROCEDURE Translate_OrderBy
146 ( p_api_version_number IN NUMBER,
147 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
148 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
149 p_order_by_tbl IN UTIL_ORDER_BY_TBL_TYPE,
150 x_order_by_clause OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
151 x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
152 x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
153 x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
154 ) IS
155
156 TYPE OrderByTabTyp is TABLE of VARCHAR2(80) INDEX BY BINARY_INTEGER;
157 l_sortedOrderBy_tbl OrderByTabTyp;
158 i BINARY_INTEGER := 1;
159 j BINARY_INTEGER := 1;
160 l_order_by_clause VARCHAR2(2000) := NULL;
161 l_api_name CONSTANT VARCHAR2(30) := 'Translate_OrderBy';
162 l_api_version_number CONSTANT NUMBER := 1.0;
163 G_USER_ID NUMBER := FND_GLOBAL.User_Id;
164 begin
165 -- Standard call to check for call compatibility.
166 IF NOT FND_API.Compatible_API_Call (l_api_version_number,
167 p_api_version_number,
168 l_api_name,
169 G_PKG_NAME)
170 THEN
171 IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
172 THEN
173 FND_MESSAGE.Set_Name('ASO', 'API_UNEXP_ERROR_IN_PROCESSING');
174 FND_MESSAGE.Set_Token('ROW', 'TRANSLATE_ORDERBY', TRUE);
175 FND_MSG_PUB.ADD;
176 END IF;
177 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
178 END IF;
179
180 -- Initialize message list if p_init_msg_list is set to TRUE.
181 IF FND_API.to_Boolean( p_init_msg_list )
182 THEN
183 FND_MSG_PUB.initialize;
184 END IF;
185
186 -- Initialize API return status to success
187 --
188 x_return_status := FND_API.G_RET_STS_SUCCESS;
189
190 --
191 -- API body
192 --
193
194 -- Validate Environment
195
196 IF G_User_Id IS NULL
197 THEN
198 IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
199 THEN
200 FND_MESSAGE.Set_Name('ASO', 'UT_CANNOT_GET_PROFILE_VALUE');
201 FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
202 FND_MSG_PUB.ADD;
203 END IF;
204 END IF;
205
206 -- initialize the table to ''.
207 for i in 1..p_order_by_tbl.count loop
208 l_sortedOrderBy_tbl(i) := '';
209 end loop;
210
211 -- We allow the choice seqence order such as 41, 20, 11, ...
212 -- So, we need to sort it first(put them into a table),
213 -- then loop through the whole table.
214
215 for j in 1..p_order_by_tbl.count loop
216 if (p_order_by_tbl(j).col_choice is NOT NULL)
217 then
218 l_sortedOrderBy_tbl(floor(p_order_by_tbl(j).col_choice/10)) :=
219 get_subOrderBy(p_order_by_tbl(j).col_choice,
220 p_order_by_tbl(j).col_name);
221 end if;
222 end loop;
223
224 for i in 1..p_order_by_tbl.count loop
225 l_order_by_clause := l_order_by_clause || l_sortedOrderBy_tbl(i);
226 end loop;
227 l_order_by_clause := rtrim(l_order_by_clause); -- trim ''
228 l_order_by_clause := rtrim(l_order_by_clause, ','); -- trim last ,
229 x_order_by_clause := l_order_by_clause;
230
231 EXCEPTION
232
233 WHEN FND_API.G_EXC_ERROR THEN
234
235 x_return_status := FND_API.G_RET_STS_ERROR ;
236
237 FND_MSG_PUB.Count_And_Get
238 ( p_count => x_msg_count,
239 p_data => x_msg_data
240 );
241
242
243 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
244
245 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
246
247 FND_MSG_PUB.Count_And_Get
248 ( p_count => x_msg_count,
249 p_data => x_msg_data
250 );
251
252
253 WHEN OTHERS THEN
254
255
256 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
257
258 IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
259 THEN
260 FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
261 END IF;
262
263 FND_MSG_PUB.Count_And_Get
264 ( p_count => x_msg_count,
265 p_data => x_msg_data
266 );
267
268 end Translate_OrderBy;
269
270
271 PROCEDURE Debug_Message(
272 p_msg_level IN NUMBER,
273 -- p_app_name IN VARCHAR2 := 'ASO',
274 p_msg IN VARCHAR2)
275 IS
276 l_length NUMBER;
277 l_start NUMBER := 1;
278 l_substring VARCHAR2(30);
279 BEGIN
280 IF FND_MSG_PUB.Check_Msg_Level(p_msg_level)
281 THEN
282 /*
283 l_length := length(p_msg);
284
285 -- FND_MESSAGE doesn't allow message name to be over 30 chars
286 -- chop message name if length > 30
287 WHILE l_length > 30 LOOP
288 l_substring := substr(p_msg, l_start, 30);
289
290 FND_MESSAGE.Set_Name('ASO', l_substring);
291 -- FND_MESSAGE.Set_Name(p_app_name, l_substring);
292 l_start := l_start + 30;
293 l_length := l_length - 30;
294 FND_MSG_PUB.Add;
295 END LOOP;
296
297 l_substring := substr(p_msg, l_start);
298 FND_MESSAGE.Set_Name('ASO', l_substring);
299 --dbms_output.put_line('l_substring: ' || l_substring);
300 -- FND_MESSAGE.Set_Name(p_app_name, p_msg);
301 FND_MSG_PUB.Add;
302 */
303 l_length := length(p_msg);
304
305 -- FND_MESSAGE doesn't allow message name to be over 30 chars
306 -- chop message name if length > 30
307 IF l_length > 30
308 THEN
309 l_substring := substr(p_msg, l_start, 30);
310 FND_MESSAGE.Set_Name('ASO', l_substring);
311 ELSE
312 FND_MESSAGE.Set_Name('ASO', p_msg);
313 END IF;
314
315 FND_MSG_PUB.Add;
316 END IF;
317 END Debug_Message;
318
319
320 PROCEDURE Set_Message(
321 p_msg_level IN NUMBER,
322 p_msg_name IN VARCHAR2,
323 p_token1 IN VARCHAR2,
324 p_token1_value IN VARCHAR2
325 )
326 IS
327 BEGIN
328 NULL;
329 END Set_Message;
330
331 PROCEDURE Set_Message(
332 p_msg_level IN NUMBER,
333 p_app_name IN VARCHAR2,
334 p_msg_name IN VARCHAR2,
335 p_token1 IN VARCHAR2,
336 p_token1_value IN VARCHAR2,
337 p_token2 IN VARCHAR2,
338 p_token2_value IN VARCHAR2
339 )
340 IS
341 BEGIN
342 NULL;
343 END Set_Message;
344
345 PROCEDURE Set_Message(
346 p_msg_level IN NUMBER,
347 p_app_name IN VARCHAR2,
348 p_msg_name IN VARCHAR2,
349 p_token1 IN VARCHAR2,
350 p_token1_value IN VARCHAR2,
351 p_token2 IN VARCHAR2,
352 p_token2_value IN VARCHAR2,
353 p_token3 IN VARCHAR2,
354 p_token3_value IN VARCHAR2
355 )
356 IS
357 BEGIN
358 NULL;
359 END Set_Message;
360
361
362
363 PROCEDURE Set_Message(
364 p_msg_level IN NUMBER,
365 p_app_name IN VARCHAR2,
366 p_msg_name IN VARCHAR2,
367 p_token1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
368 p_token1_value IN VARCHAR2 := FND_API.G_MISS_CHAR,
369 p_token2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
370 p_token2_value IN VARCHAR2 := FND_API.G_MISS_CHAR,
371 p_token3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
372 p_token3_value IN VARCHAR2 := FND_API.G_MISS_CHAR,
373 p_token4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
374 p_token4_value IN VARCHAR2 := FND_API.G_MISS_CHAR,
375 p_token5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
376 p_token5_value IN VARCHAR2 := FND_API.G_MISS_CHAR,
377 p_token6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
378 p_token6_value IN VARCHAR2 := FND_API.G_MISS_CHAR,
379 p_token7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
380 p_token7_value IN VARCHAR2 := FND_API.G_MISS_CHAR
381 )
382 IS
383 BEGIN
384 NULL;
385 END Set_Message;
386
387 PROCEDURE Gen_Flexfield_Where(
388 p_flex_where_tbl_type IN ASO_UTILITY_PVT.flex_where_tbl_type,
389 x_flex_where_clause OUT NOCOPY /* file.sql.39 change */ VARCHAR2) IS
390 l_flex_where_cl VARCHAR2(2000) := NULL;
391 BEGIN
392 IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
393 null;
394 --dbms_output.put_line('ASO_UTILITY_PVT Generate Flexfield Where: begin');
395 END IF;
396
397 FOR i IN 1..p_flex_where_tbl_type.count LOOP
398 IF (p_flex_where_tbl_type(i).value IS NOT NULL
399 AND p_flex_where_tbl_type(i).value <> FND_API.G_MISS_CHAR) THEN
400 l_flex_where_cl := l_flex_where_cl||' AND '||p_flex_where_tbl_type(i).name
401 || ' = :p_ofso_flex_var'||i;
402 END IF;
403 END LOOP;
404 x_flex_where_clause := l_flex_where_cl;
405
406 IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
407 null;
408 --dbms_output.put_line('ASO_UTILITY_PVT Generate Flexfield Where: end');
409 END IF;
410 END;
411
412 PROCEDURE Bind_Flexfield_Where(
413 p_cursor_id IN NUMBER,
414 p_flex_where_tbl_type IN ASO_UTILITY_PVT.flex_where_tbl_type) IS
415 BEGIN
416 IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
417 null;
418 --dbms_output.put_line('ASO_UTILITY_PVT Bind Flexfield Where: begin');
419 END IF;
420
421 FOR i IN 1..p_flex_where_tbl_type.count LOOP
422 IF (p_flex_where_tbl_type(i).value IS NOT NULL
423 AND p_flex_where_tbl_type(i).value <> FND_API.G_MISS_CHAR) THEN
424 DBMS_SQL.Bind_Variable(p_cursor_id, ':p_ofso_flex_var'||i,
425 p_flex_where_tbl_type(i).value);
426 END IF;
427 END LOOP;
428
429 IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
430 null;
431 --dbms_output.put_line('ASO_UTILITY_PVT Bind Flexfield Where: end');
432 END IF;
433 END;
434
435
436
437 PROCEDURE Get_Messages (
438 p_message_count IN NUMBER,
439 x_msgs OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
440 IS
441
442 l_msg_list VARCHAR2(2000) := '
443 ';
444 l_temp_msg VARCHAR2(2000);
445
446
447 l_appl_short_name VARCHAR2(20) ;
448 l_message_name VARCHAR2(30) ;
449 l_prefix_msg VARCHAR2(2000);
450 l_id NUMBER;
451 l_message_num NUMBER;
452
453 l_msg_count NUMBER;
454 l_msg_data VARCHAR2(2000);
455
456 Cursor Get_Appl_Id (x_short_name VARCHAR2) IS
457 SELECT application_id
458 FROM fnd_application_vl
459 WHERE application_short_name = x_short_name;
460
461 Cursor Get_Message_Num (x_msg VARCHAR2, x_id NUMBER, x_lang_id NUMBER) IS
462 SELECT msg.message_number
463 FROM fnd_new_messages msg, fnd_languages_vl lng
464 WHERE msg.message_name = x_msg
465 and msg.application_id = x_id
466 and lng.LANGUAGE_CODE = msg.language_code
467 and lng.language_id = x_lang_id;
468 BEGIN
469
470
471
472 FOR l_count in 1..NVL(p_message_count,1) LOOP
473 l_temp_msg := fnd_msg_pub.get(l_count, fnd_api.g_true);
474
475 fnd_message.parse_encoded(l_temp_msg, l_appl_short_name, l_message_name);
476
477 OPEN Get_Appl_Id (l_appl_short_name);
478 FETCH Get_Appl_Id into l_id;
479 CLOSE Get_Appl_Id;
480
481 l_message_num := NULL;
482 IF l_id is not NULL
483 THEN
484 OPEN Get_Message_Num (l_message_name, l_id,
485 to_number(NVL(FND_PROFILE.Value('LANGUAGE'), '0')));
486 FETCH Get_Message_Num into l_message_num;
487 CLOSE Get_Message_Num;
488 END IF;
489
490
491 IF NVL(l_message_num, 0) <> 0
492 THEN
493 l_prefix_msg := 'APP-' || to_char(l_message_num) || ': ';
494 ELSE
495 l_prefix_msg := NULL;
496 END IF;
497
498 l_temp_msg := fnd_msg_pub.get(l_count, fnd_api.g_false);
499
500 EXIT WHEN (Length(l_msg_list) + Length(l_prefix_msg) + Length(l_temp_msg)) > 2000;
501
502 l_msg_list := l_msg_list || l_prefix_msg || l_temp_msg;
503
504 l_msg_list := l_msg_list || '
505 ';
506 END LOOP;
507
508 x_msgs := substr(l_msg_list, 0, 2000);
509
510 END Get_Messages;
511
512 FUNCTION Query_Header_Row (
513 P_Qte_Header_Id IN NUMBER
514 ) RETURN ASO_QUOTE_PUB.qte_header_rec_Type
515 IS
516 l_qte_header_rec ASO_QUOTE_PUB.qte_header_rec_Type;
517 BEGIN
518 Select
519 quote_header_id,
520 CREATION_DATE,
521 CREATED_BY,
522 LAST_UPDATE_DATE,
523 LAST_UPDATED_BY,
524 LAST_UPDATE_LOGIN,
525 REQUEST_ID,
526 PROGRAM_APPLICATION_ID,
527 PROGRAM_ID,
528 PROGRAM_UPDATE_DATE,
529 ORG_ID,
530 QUOTE_NAME,
531 QUOTE_NUMBER,
532 QUOTE_VERSION,
533 QUOTE_STATUS_ID,
534 QUOTE_SOURCE_CODE,
535 QUOTE_EXPIRATION_DATE,
536 PRICE_FROZEN_DATE,
537 QUOTE_PASSWORD,
538 ORIGINAL_SYSTEM_REFERENCE,
539 PARTY_ID,
540 CUST_ACCOUNT_ID,
541 INVOICE_TO_CUST_ACCOUNT_ID,
542 ORG_CONTACT_ID,
543 PHONE_ID,
544 INVOICE_TO_PARTY_SITE_ID,
545 INVOICE_TO_PARTY_ID,
546 ORIG_MKTG_SOURCE_CODE_ID,
547 MARKETING_SOURCE_CODE_ID,
548 ORDER_TYPE_ID,
549 QUOTE_CATEGORY_CODE,
550 ORDERED_DATE,
551 ACCOUNTING_RULE_ID,
552 INVOICING_RULE_ID,
553 EMPLOYEE_PERSON_ID,
554 PRICE_LIST_ID,
555 CURRENCY_CODE,
556 TOTAL_LIST_PRICE,
557 TOTAL_ADJUSTED_AMOUNT,
558 TOTAL_ADJUSTED_PERCENT,
559 TOTAL_TAX,
560 TOTAL_SHIPPING_CHARGE,
561 SURCHARGE,
562 TOTAL_QUOTE_PRICE,
563 PAYMENT_AMOUNT,
564 EXCHANGE_RATE,
565 EXCHANGE_TYPE_CODE,
566 EXCHANGE_RATE_DATE,
567 CONTRACT_ID,
568 SALES_CHANNEL_CODE,
569 ORDER_ID,
570 RESOURCE_ID,
571 ATTRIBUTE_CATEGORY,
572 ATTRIBUTE1,
573 ATTRIBUTE2,
574 ATTRIBUTE3,
575 ATTRIBUTE4,
576 ATTRIBUTE5,
577 ATTRIBUTE6,
578 ATTRIBUTE7,
579 ATTRIBUTE8,
580 ATTRIBUTE9,
581 ATTRIBUTE10,
582 ATTRIBUTE11,
583 ATTRIBUTE12,
584 ATTRIBUTE13,
585 ATTRIBUTE14,
586 ATTRIBUTE15,
587 ATTRIBUTE16,
588 ATTRIBUTE17,
589 ATTRIBUTE18,
590 ATTRIBUTE19,
591 ATTRIBUTE20,
592 CONTRACT_TEMPLATE_ID,
593 CONTRACT_TEMPLATE_MAJOR_VER,
594 CONTRACT_REQUESTER_ID,
595 CONTRACT_APPROVAL_LEVEL,
596 PUBLISH_FLAG,
597 RESOURCE_GRP_ID,
598 SOLD_TO_PARTY_SITE_ID,
599 DISPLAY_ARITHMETIC_OPERATOR,
600 MAX_VERSION_FLAG,
601 QUOTE_TYPE,
602 QUOTE_DESCRIPTION,
603 MINISITE_ID,
604 CUST_PARTY_ID,
605 INVOICE_TO_CUST_PARTY_ID,
606 PRICING_STATUS_INDICATOR,
607 TAX_STATUS_INDICATOR,
608 PRICE_UPDATED_DATE,
609 TAX_UPDATED_DATE,
610 RECALCULATE_FLAG,
611 PRICE_REQUEST_ID,
612 CREDIT_UPDATE_DATE,
613 -- hyang new okc
614 Customer_Name_And_Title,
615 Customer_Signature_Date,
616 Supplier_Name_And_Title,
617 Supplier_Signature_Date,
618 -- end of hyang new okc
619 END_CUSTOMER_PARTY_ID,
620 END_CUSTOMER_PARTY_SITE_ID,
621 END_CUSTOMER_CUST_ACCOUNT_ID,
622 END_CUSTOMER_CUST_PARTY_ID,
623 AUTOMATIC_PRICE_FLAG,
624 AUTOMATIC_TAX_FLAG,
625 ASSISTANCE_REQUESTED,
626 ASSISTANCE_REASON_CODE,
627 OBJECT_VERSION_NUMBER
628 /* ,
629 -- ER 12879412
630 / PRODUCT_FISC_CLASSIFICATION,
631 TRX_BUSINESS_CATEGORY
632 */
633 INTO
634 l_qte_header_rec.quote_header_id,
635 l_qte_header_rec.CREATION_DATE,
636 l_qte_header_rec.CREATED_BY,
637 l_qte_header_rec.LAST_UPDATE_DATE,
638 l_qte_header_rec.LAST_UPDATED_BY,
639 l_qte_header_rec.LAST_UPDATE_LOGIN,
640 l_qte_header_rec.REQUEST_ID,
641 l_qte_header_rec.PROGRAM_APPLICATION_ID,
642 l_qte_header_rec.PROGRAM_ID,
643 l_qte_header_rec.PROGRAM_UPDATE_DATE,
644 l_qte_header_rec.ORG_ID,
645 l_qte_header_rec.QUOTE_NAME,
646 l_qte_header_rec.QUOTE_NUMBER,
647 l_qte_header_rec.QUOTE_VERSION,
648 l_qte_header_rec.QUOTE_STATUS_ID,
649 l_qte_header_rec.QUOTE_SOURCE_CODE,
650 l_qte_header_rec.QUOTE_EXPIRATION_DATE,
651 l_qte_header_rec.PRICE_FROZEN_DATE,
652 l_qte_header_rec.QUOTE_PASSWORD,
653 l_qte_header_rec.ORIGINAL_SYSTEM_REFERENCE,
654 l_qte_header_rec.PARTY_ID,
655 l_qte_header_rec.CUST_ACCOUNT_ID,
656 l_qte_header_rec.INVOICE_TO_CUST_ACCOUNT_ID,
657 l_qte_header_rec.ORG_CONTACT_ID,
658 l_qte_header_rec.PHONE_ID,
659 l_qte_header_rec.INVOICE_TO_PARTY_SITE_ID,
660 l_qte_header_rec.INVOICE_TO_PARTY_ID,
661 l_qte_header_rec.ORIG_MKTG_SOURCE_CODE_ID,
662 l_qte_header_rec.MARKETING_SOURCE_CODE_ID,
663 l_qte_header_rec.ORDER_TYPE_ID,
664 l_qte_header_rec.QUOTE_CATEGORY_CODE,
665 l_qte_header_rec.ORDERED_DATE,
666 l_qte_header_rec.ACCOUNTING_RULE_ID,
667 l_qte_header_rec.INVOICING_RULE_ID,
668 l_qte_header_rec.EMPLOYEE_PERSON_ID,
669 l_qte_header_rec.PRICE_LIST_ID,
670 l_qte_header_rec.CURRENCY_CODE,
671 l_qte_header_rec.TOTAL_LIST_PRICE,
672 l_qte_header_rec.TOTAL_ADJUSTED_AMOUNT,
673 l_qte_header_rec.TOTAL_ADJUSTED_PERCENT,
674 l_qte_header_rec.TOTAL_TAX,
675 l_qte_header_rec.TOTAL_SHIPPING_CHARGE,
676 l_qte_header_rec.SURCHARGE,
677 l_qte_header_rec.TOTAL_QUOTE_PRICE,
678 l_qte_header_rec.PAYMENT_AMOUNT,
679 l_qte_header_rec.EXCHANGE_RATE,
680 l_qte_header_rec.EXCHANGE_TYPE_CODE,
681 l_qte_header_rec.EXCHANGE_RATE_DATE,
682 l_qte_header_rec.CONTRACT_ID,
683 l_qte_header_rec.SALES_CHANNEL_CODE,
684 l_qte_header_rec.ORDER_ID,
685 l_qte_header_rec.RESOURCE_ID,
686 l_qte_header_rec.ATTRIBUTE_CATEGORY,
687 l_qte_header_rec.ATTRIBUTE1,
688 l_qte_header_rec.ATTRIBUTE2,
689 l_qte_header_rec.ATTRIBUTE3,
690 l_qte_header_rec.ATTRIBUTE4,
691 l_qte_header_rec.ATTRIBUTE5,
692 l_qte_header_rec.ATTRIBUTE6,
693 l_qte_header_rec.ATTRIBUTE7,
694 l_qte_header_rec.ATTRIBUTE8,
695 l_qte_header_rec.ATTRIBUTE9,
696 l_qte_header_rec.ATTRIBUTE10,
697 l_qte_header_rec.ATTRIBUTE11,
698 l_qte_header_rec.ATTRIBUTE12,
699 l_qte_header_rec.ATTRIBUTE13,
700 l_qte_header_rec.ATTRIBUTE14,
701 l_qte_header_rec.ATTRIBUTE15,
702 l_qte_header_rec.ATTRIBUTE16,
703 l_qte_header_rec.ATTRIBUTE17,
704 l_qte_header_rec.ATTRIBUTE18,
705 l_qte_header_rec.ATTRIBUTE19,
706 l_qte_header_rec.ATTRIBUTE20,
707 l_qte_header_rec.CONTRACT_TEMPLATE_ID,
708 l_qte_header_rec.CONTRACT_TEMPLATE_MAJOR_VER,
709 l_qte_header_rec.CONTRACT_REQUESTER_ID,
710 l_qte_header_rec.CONTRACT_APPROVAL_LEVEL,
711 l_qte_header_rec.PUBLISH_FLAG,
712 l_qte_header_rec.RESOURCE_GRP_ID,
713 l_qte_header_rec.SOLD_TO_PARTY_SITE_ID,
714 l_qte_header_rec.DISPLAY_ARITHMETIC_OPERATOR,
715 l_qte_header_rec.MAX_VERSION_FLAG,
716 l_qte_header_rec.QUOTE_TYPE,
717 l_qte_header_rec.QUOTE_DESCRIPTION,
718 l_qte_header_rec.MINISITE_ID,
719 l_qte_header_rec.CUST_PARTY_ID,
720 l_qte_header_rec.INVOICE_TO_CUST_PARTY_ID,
721 l_qte_header_rec.PRICING_STATUS_INDICATOR,
722 l_qte_header_rec.TAX_STATUS_INDICATOR,
723 l_qte_header_rec.PRICE_UPDATED_DATE,
724 l_qte_header_rec.TAX_UPDATED_DATE,
725 l_qte_header_rec.RECALCULATE_FLAG,
726 l_qte_header_rec.PRICE_REQUEST_ID,
727 l_qte_header_rec.CREDIT_UPDATE_DATE,
728 -- hyang new okc
729 l_qte_header_rec.Customer_Name_And_Title,
730 l_qte_header_rec.Customer_Signature_Date,
731 l_qte_header_rec.Supplier_Name_And_Title,
732 l_qte_header_rec.Supplier_Signature_Date,
733 -- end of hyang new okc
734 l_qte_header_rec.END_CUSTOMER_PARTY_ID,
735 l_qte_header_rec.END_CUSTOMER_PARTY_SITE_ID,
736 l_qte_header_rec.END_CUSTOMER_CUST_ACCOUNT_ID,
737 l_qte_header_rec.END_CUSTOMER_CUST_PARTY_ID,
738 l_qte_header_rec.AUTOMATIC_PRICE_FLAG,
739 l_qte_header_rec.AUTOMATIC_TAX_FLAG,
740 l_qte_header_rec.ASSISTANCE_REQUESTED,
741 l_qte_header_rec.ASSISTANCE_REASON_CODE,
742 l_qte_header_rec.OBJECT_VERSION_NUMBER
743 /* ,
744 -- ER 12879412
745 l_qte_header_rec.PRODUCT_FISC_CLASSIFICATION,
746 l_qte_header_rec.TRX_BUSINESS_CATEGORY */
747
748
749
750 FROM ASO_QUOTE_HEADERS_ALL
751 WHERE quote_header_id = p_qte_header_id;
752 RETURN l_qte_header_rec;
753 EXCEPTION
754 WHEN NO_DATA_FOUND THEN
755 RAISE NO_DATA_FOUND;
756 WHEN OTHERS THEN
757 IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
758 FND_MESSAGE.Set_Name('ASO', 'ASO_API_ERROR_IN_QUERY');
759 FND_MSG_PUB.ADD;
760 END IF;
761 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
762 END Query_Header_Row;
763
764
765 FUNCTION Query_Price_Adj_Rows (
766 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM,
767 P_Qte_Line_Id IN NUMBER := FND_API.G_MISS_NUM
768 ) RETURN ASO_QUOTE_PUB.Price_Adj_Tbl_Type
769 IS
770 CURSOR c_price_adj_hdr IS
771 SELECT
772 PRICE_ADJUSTMENT_ID,
773 CREATION_DATE,
774 CREATED_BY,
775 LAST_UPDATE_DATE,
776 LAST_UPDATED_BY,
777 LAST_UPDATE_LOGIN,
778 PROGRAM_APPLICATION_ID,
779 PROGRAM_ID,
780 PROGRAM_UPDATE_DATE,
781 REQUEST_ID,
782 QUOTE_HEADER_ID,
783 QUOTE_LINE_ID,
784 MODIFIER_HEADER_ID,
785 MODIFIER_LINE_ID,
786 MODIFIER_LINE_TYPE_CODE,
787 MODIFIER_MECHANISM_TYPE_CODE,
788 MODIFIED_FROM,
789 MODIFIED_TO,
790 OPERAND,
791 ARITHMETIC_OPERATOR,
792 AUTOMATIC_FLAG,
793 UPDATE_ALLOWABLE_FLAG,
794 UPDATED_FLAG,
795 APPLIED_FLAG,
796 ON_INVOICE_FLAG,
797 PRICING_PHASE_ID,
798 ATTRIBUTE_CATEGORY,
799 ATTRIBUTE1,
800 ATTRIBUTE2,
801 ATTRIBUTE3,
802 ATTRIBUTE4,
803 ATTRIBUTE5,
804 ATTRIBUTE6,
805 ATTRIBUTE7,
806 ATTRIBUTE8,
807 ATTRIBUTE9,
808 ATTRIBUTE10,
809 ATTRIBUTE11,
810 ATTRIBUTE12,
811 ATTRIBUTE13,
812 ATTRIBUTE14,
813 ATTRIBUTE15,
814 ATTRIBUTE16,
815 ATTRIBUTE17,
816 ATTRIBUTE18,
817 ATTRIBUTE19,
818 ATTRIBUTE20,
819 TAX_CODE,
820 TAX_EXEMPT_FLAG,
821 TAX_EXEMPT_NUMBER,
822 TAX_EXEMPT_REASON_CODE,
823 PARENT_ADJUSTMENT_ID,
824 INVOICED_FLAG,
825 ESTIMATED_FLAG,
826 INC_IN_SALES_PERFORMANCE,
827 SPLIT_ACTION_CODE,
828 ADJUSTED_AMOUNT,
829 CHARGE_TYPE_CODE,
830 CHARGE_SUBTYPE_CODE,
831 RANGE_BREAK_QUANTITY,
832 ACCRUAL_CONVERSION_RATE,
833 PRICING_GROUP_SEQUENCE,
834 ACCRUAL_FLAG,
835 LIST_LINE_NO,
836 SOURCE_SYSTEM_CODE,
837 BENEFIT_QTY,
838 BENEFIT_UOM_CODE,
839 PRINT_ON_INVOICE_FLAG,
840 EXPIRATION_DATE,
841 REBATE_TRANSACTION_TYPE_CODE,
842 REBATE_TRANSACTION_REFERENCE,
843 REBATE_PAYMENT_SYSTEM_CODE,
844 REDEEMED_DATE,
845 REDEEMED_FLAG,
846 MODIFIER_LEVEL_CODE,
847 PRICE_BREAK_TYPE_CODE,
848 SUBSTITUTION_ATTRIBUTE,
849 PRORATION_TYPE_CODE,
850 INCLUDE_ON_RETURNS_FLAG,
851 CREDIT_OR_CHARGE_FLAG,
852 ORIG_SYS_DISCOUNT_REF,
853 CHANGE_REASON_CODE,
854 CHANGE_REASON_TEXT,
855 COST_ID,
856 LIST_LINE_TYPE_CODE,
857 UPDATE_ALLOWED,
858 CHANGE_SEQUENCE,
859 LIST_HEADER_ID,
860 LIST_LINE_ID,
861 QUOTE_SHIPMENT_ID,
862 OPERAND_PER_PQTY,
863 ADJUSTED_AMOUNT_PER_PQTY,
864 OBJECT_VERSION_NUMBER
865 FROM ASO_PRICE_ADJUSTMENTS
866 WHERE quote_header_id = p_qte_header_id
867 AND quote_line_id IS NULL;
868
869 CURSOR c_price_adj_line IS
870 SELECT
871 PRICE_ADJUSTMENT_ID,
872 CREATION_DATE,
873 CREATED_BY,
874 LAST_UPDATE_DATE,
875 LAST_UPDATED_BY,
876 LAST_UPDATE_LOGIN,
877 PROGRAM_APPLICATION_ID,
878 PROGRAM_ID,
879 PROGRAM_UPDATE_DATE,
880 REQUEST_ID,
881 QUOTE_HEADER_ID,
882 QUOTE_LINE_ID,
883 MODIFIER_HEADER_ID,
884 MODIFIER_LINE_ID,
885 MODIFIER_LINE_TYPE_CODE,
886 MODIFIER_MECHANISM_TYPE_CODE,
887 MODIFIED_FROM,
888 MODIFIED_TO,
889 OPERAND,
890 ARITHMETIC_OPERATOR,
891 AUTOMATIC_FLAG,
892 UPDATE_ALLOWABLE_FLAG,
893 UPDATED_FLAG,
894 APPLIED_FLAG,
895 ON_INVOICE_FLAG,
896 PRICING_PHASE_ID,
897 ATTRIBUTE_CATEGORY,
898 ATTRIBUTE1,
899 ATTRIBUTE2,
900 ATTRIBUTE3,
901 ATTRIBUTE4,
902 ATTRIBUTE5,
903 ATTRIBUTE6,
904 ATTRIBUTE7,
905 ATTRIBUTE8,
906 ATTRIBUTE9,
907 ATTRIBUTE10,
908 ATTRIBUTE11,
909 ATTRIBUTE12,
910 ATTRIBUTE13,
911 ATTRIBUTE14,
912 ATTRIBUTE15,
913 ATTRIBUTE16,
914 ATTRIBUTE17,
915 ATTRIBUTE18,
916 ATTRIBUTE19,
917 ATTRIBUTE20,
918 TAX_CODE,
919 TAX_EXEMPT_FLAG,
920 TAX_EXEMPT_NUMBER,
921 TAX_EXEMPT_REASON_CODE,
922 PARENT_ADJUSTMENT_ID,
923 INVOICED_FLAG,
924 ESTIMATED_FLAG,
925 INC_IN_SALES_PERFORMANCE,
926 SPLIT_ACTION_CODE,
927 ADJUSTED_AMOUNT,
928 CHARGE_TYPE_CODE,
929 CHARGE_SUBTYPE_CODE,
930 RANGE_BREAK_QUANTITY,
931 ACCRUAL_CONVERSION_RATE,
932 PRICING_GROUP_SEQUENCE,
933 ACCRUAL_FLAG,
934 LIST_LINE_NO,
935 SOURCE_SYSTEM_CODE,
936 BENEFIT_QTY,
937 BENEFIT_UOM_CODE,
938 PRINT_ON_INVOICE_FLAG,
939 EXPIRATION_DATE,
940 REBATE_TRANSACTION_TYPE_CODE,
941 REBATE_TRANSACTION_REFERENCE,
942 REBATE_PAYMENT_SYSTEM_CODE,
943 REDEEMED_DATE,
944 REDEEMED_FLAG,
945 MODIFIER_LEVEL_CODE,
946 PRICE_BREAK_TYPE_CODE,
947 SUBSTITUTION_ATTRIBUTE,
948 PRORATION_TYPE_CODE,
949 INCLUDE_ON_RETURNS_FLAG,
950 CREDIT_OR_CHARGE_FLAG,
951 ORIG_SYS_DISCOUNT_REF,
952 CHANGE_REASON_CODE,
953 CHANGE_REASON_TEXT,
954 COST_ID,
955 LIST_LINE_TYPE_CODE,
956 UPDATE_ALLOWED,
957 CHANGE_SEQUENCE,
958 LIST_HEADER_ID,
959 LIST_LINE_ID,
960 QUOTE_SHIPMENT_ID,
961 OPERAND_PER_PQTY,
962 ADJUSTED_AMOUNT_PER_PQTY,
963 OBJECT_VERSION_NUMBER
964 FROM ASO_PRICE_ADJUSTMENTS
965 WHERE quote_header_id = p_qte_header_id
966 AND quote_line_id IS NOT NULL
967 AND quote_line_id = p_qte_line_id;
968
969 l_price_adj_rec ASO_QUOTE_PUB.Price_Adj_Rec_Type;
970 l_price_adj_tbl ASO_QUOTE_PUB.Price_Adj_Tbl_Type;
971 BEGIN
972 IF P_Qte_Line_Id is NULL or P_Qte_Line_Id = FND_API.G_MISS_NUM THEN
973 FOR price_adj_rec IN c_price_adj_hdr LOOP
974 l_price_adj_rec.PRICE_ADJUSTMENT_ID := price_adj_rec.PRICE_ADJUSTMENT_ID;
975 l_price_adj_rec.CREATION_DATE := price_adj_rec.CREATION_DATE;
976 l_price_adj_rec.CREATED_BY := price_adj_rec.CREATED_BY;
977 l_price_adj_rec.LAST_UPDATE_DATE := price_adj_rec.LAST_UPDATE_DATE;
978 l_price_adj_rec.LAST_UPDATED_BY := price_adj_rec.LAST_UPDATED_BY;
979 l_price_adj_rec.LAST_UPDATE_LOGIN := price_adj_rec.LAST_UPDATE_LOGIN;
980 l_price_adj_rec.REQUEST_ID := price_adj_rec.REQUEST_ID;
981 l_price_adj_rec.PROGRAM_APPLICATION_ID := price_adj_rec.PROGRAM_APPLICATION_ID;
982 l_price_adj_rec.PROGRAM_ID := price_adj_rec.PROGRAM_ID;
983 l_price_adj_rec.PROGRAM_UPDATE_DATE := price_adj_rec.PROGRAM_UPDATE_DATE;
984 l_price_adj_rec.QUOTE_HEADER_ID := price_adj_rec.QUOTE_HEADER_ID;
985 l_price_adj_rec.QUOTE_LINE_ID := price_adj_rec.QUOTE_LINE_ID;
986 l_price_adj_rec.MODIFIER_HEADER_ID := price_adj_rec.MODIFIER_HEADER_ID;
987 l_price_adj_rec.MODIFIER_LINE_ID := price_adj_rec.MODIFIER_LINE_ID;
988 l_price_adj_rec.MODIFIER_LINE_TYPE_CODE := price_adj_rec.MODIFIER_LINE_TYPE_CODE;
989 l_price_adj_rec.MODIFIER_MECHANISM_TYPE_CODE := price_adj_rec.MODIFIER_MECHANISM_TYPE_CODE;
990 l_price_adj_rec.MODIFIED_FROM := price_adj_rec.MODIFIED_FROM;
991 l_price_adj_rec.MODIFIED_TO := price_adj_rec.MODIFIED_TO;
992 l_price_adj_rec.OPERAND := price_adj_rec.OPERAND;
993 l_price_adj_rec.ARITHMETIC_OPERATOR := price_adj_rec.ARITHMETIC_OPERATOR;
994 l_price_adj_rec.AUTOMATIC_FLAG := price_adj_rec.AUTOMATIC_FLAG;
995 l_price_adj_rec.UPDATE_ALLOWABLE_FLAG := price_adj_rec.UPDATE_ALLOWABLE_FLAG;
996 l_price_adj_rec.UPDATED_FLAG := price_adj_rec.UPDATED_FLAG;
997 l_price_adj_rec.APPLIED_FLAG := price_adj_rec.APPLIED_FLAG;
998 l_price_adj_rec.ON_INVOICE_FLAG := price_adj_rec.ON_INVOICE_FLAG;
999 l_price_adj_rec.PRICING_PHASE_ID := price_adj_rec.PRICING_PHASE_ID;
1000 l_price_adj_rec.QUOTE_SHIPMENT_ID := price_adj_rec.QUOTE_SHIPMENT_ID;
1001 l_price_adj_rec.ATTRIBUTE_CATEGORY := price_adj_rec.ATTRIBUTE_CATEGORY;
1002 l_price_adj_rec.ATTRIBUTE1 := price_adj_rec.ATTRIBUTE1;
1003 l_price_adj_rec.ATTRIBUTE2 := price_adj_rec.ATTRIBUTE2;
1004 l_price_adj_rec.ATTRIBUTE3 := price_adj_rec.ATTRIBUTE3;
1005 l_price_adj_rec.ATTRIBUTE4 := price_adj_rec.ATTRIBUTE4;
1006 l_price_adj_rec.ATTRIBUTE5 := price_adj_rec.ATTRIBUTE5;
1007 l_price_adj_rec.ATTRIBUTE6 := price_adj_rec.ATTRIBUTE6;
1008 l_price_adj_rec.ATTRIBUTE7 := price_adj_rec.ATTRIBUTE7;
1009 l_price_adj_rec.ATTRIBUTE8 := price_adj_rec.ATTRIBUTE8;
1010 l_price_adj_rec.ATTRIBUTE9 := price_adj_rec.ATTRIBUTE9;
1011 l_price_adj_rec.ATTRIBUTE10 := price_adj_rec.ATTRIBUTE10;
1012 l_price_adj_rec.ATTRIBUTE11 := price_adj_rec.ATTRIBUTE11;
1013 l_price_adj_rec.ATTRIBUTE12 := price_adj_rec.ATTRIBUTE12;
1014 l_price_adj_rec.ATTRIBUTE13 := price_adj_rec.ATTRIBUTE13;
1015 l_price_adj_rec.ATTRIBUTE14 := price_adj_rec.ATTRIBUTE14;
1016 l_price_adj_rec.ATTRIBUTE15 := price_adj_rec.ATTRIBUTE15;
1017 l_price_adj_rec.ATTRIBUTE16 := price_adj_rec.ATTRIBUTE16;
1018 l_price_adj_rec.ATTRIBUTE17 := price_adj_rec.ATTRIBUTE17;
1019 l_price_adj_rec.ATTRIBUTE18 := price_adj_rec.ATTRIBUTE18;
1020 l_price_adj_rec.ATTRIBUTE19 := price_adj_rec.ATTRIBUTE19;
1021 l_price_adj_rec.ATTRIBUTE20 := price_adj_rec.ATTRIBUTE20;
1022 l_price_adj_rec.TAX_CODE := price_adj_rec.TAX_CODE;
1023 l_price_adj_rec.TAX_EXEMPT_FLAG := price_adj_rec.TAX_EXEMPT_FLAG;
1024 l_price_adj_rec.TAX_EXEMPT_NUMBER := price_adj_rec.TAX_EXEMPT_NUMBER;
1025 l_price_adj_rec.TAX_EXEMPT_REASON_CODE := price_adj_rec.TAX_EXEMPT_REASON_CODE;
1026 l_price_adj_rec.PARENT_ADJUSTMENT_ID := price_adj_rec.PARENT_ADJUSTMENT_ID;
1027 l_price_adj_rec.INVOICED_FLAG := price_adj_rec.INVOICED_FLAG;
1028 l_price_adj_rec.ESTIMATED_FLAG := price_adj_rec.ESTIMATED_FLAG;
1029 l_price_adj_rec.INC_IN_SALES_PERFORMANCE := price_adj_rec.INC_IN_SALES_PERFORMANCE;
1030 l_price_adj_rec.SPLIT_ACTION_CODE := price_adj_rec.SPLIT_ACTION_CODE;
1031 l_price_adj_rec.ADJUSTED_AMOUNT := price_adj_rec.ADJUSTED_AMOUNT;
1032 l_price_adj_rec.CHARGE_TYPE_CODE := price_adj_rec.CHARGE_TYPE_CODE;
1033 l_price_adj_rec.CHARGE_SUBTYPE_CODE := price_adj_rec.CHARGE_SUBTYPE_CODE;
1034 l_price_adj_rec.RANGE_BREAK_QUANTITY := price_adj_rec.RANGE_BREAK_QUANTITY;
1035 l_price_adj_rec.ACCRUAL_CONVERSION_RATE := price_adj_rec.ACCRUAL_CONVERSION_RATE;
1036 l_price_adj_rec.PRICING_GROUP_SEQUENCE := price_adj_rec.PRICING_GROUP_SEQUENCE;
1037 l_price_adj_rec.ACCRUAL_FLAG := price_adj_rec.ACCRUAL_FLAG;
1038 l_price_adj_rec.LIST_LINE_NO := price_adj_rec.LIST_LINE_NO;
1039 l_price_adj_rec.SOURCE_SYSTEM_CODE := price_adj_rec.SOURCE_SYSTEM_CODE;
1040 l_price_adj_rec.BENEFIT_QTY := price_adj_rec.BENEFIT_QTY;
1041 l_price_adj_rec.BENEFIT_UOM_CODE := price_adj_rec.BENEFIT_UOM_CODE;
1042 l_price_adj_rec.PRINT_ON_INVOICE_FLAG := price_adj_rec.PRINT_ON_INVOICE_FLAG;
1043 l_price_adj_rec.EXPIRATION_DATE := price_adj_rec.EXPIRATION_DATE;
1044 l_price_adj_rec.REBATE_TRANSACTION_TYPE_CODE := price_adj_rec.REBATE_TRANSACTION_TYPE_CODE;
1045 l_price_adj_rec.REBATE_TRANSACTION_REFERENCE := price_adj_rec.REBATE_TRANSACTION_REFERENCE;
1046 l_price_adj_rec.REBATE_PAYMENT_SYSTEM_CODE := price_adj_rec.REBATE_PAYMENT_SYSTEM_CODE;
1047 l_price_adj_rec.REDEEMED_DATE := price_adj_rec.REDEEMED_DATE;
1048 l_price_adj_rec.REDEEMED_FLAG := price_adj_rec.REDEEMED_FLAG;
1049 l_price_adj_rec.MODIFIER_LEVEL_CODE := price_adj_rec.MODIFIER_LEVEL_CODE;
1050 l_price_adj_rec.PRICE_BREAK_TYPE_CODE := price_adj_rec.PRICE_BREAK_TYPE_CODE;
1051 l_price_adj_rec.SUBSTITUTION_ATTRIBUTE := price_adj_rec.SUBSTITUTION_ATTRIBUTE;
1052 l_price_adj_rec.PRORATION_TYPE_CODE := price_adj_rec.PRORATION_TYPE_CODE;
1053 l_price_adj_rec.INCLUDE_ON_RETURNS_FLAG := price_adj_rec.INCLUDE_ON_RETURNS_FLAG;
1054 l_price_adj_rec.CREDIT_OR_CHARGE_FLAG := price_adj_rec.CREDIT_OR_CHARGE_FLAG;
1055 l_price_adj_rec.ORIG_SYS_DISCOUNT_REF := price_adj_rec.ORIG_SYS_DISCOUNT_REF;
1056 l_price_adj_rec.CHANGE_REASON_CODE := price_adj_rec.CHANGE_REASON_CODE;
1057 l_price_adj_rec.CHANGE_REASON_TEXT := price_adj_rec.CHANGE_REASON_TEXT;
1058 l_price_adj_rec.COST_ID := price_adj_rec.COST_ID;
1059 --l_price_adj_rec.LIST_LINE_TYPE_CODE := price_adj_rec.LIST_LINE_TYPE_CODE;
1060 l_price_adj_rec.UPDATE_ALLOWED := price_adj_rec.UPDATE_ALLOWED;
1061 l_price_adj_rec.CHANGE_SEQUENCE := price_adj_rec.CHANGE_SEQUENCE;
1062 l_price_adj_rec.OBJECT_VERSION_NUMBER := price_adj_rec.OBJECT_VERSION_NUMBER;
1063 l_price_adj_rec.OPERAND_PER_PQTY := price_adj_rec.OPERAND_PER_PQTY;
1064 l_price_adj_rec.ADJUSTED_AMOUNT_PER_PQTY := price_adj_rec.ADJUSTED_AMOUNT_PER_PQTY;
1065
1066 l_price_adj_tbl(l_price_adj_tbl.COUNT+1) := l_price_adj_rec;
1067 END LOOP;
1068 ELSIF P_Qte_Line_Id is NOT NULL OR P_Qte_Line_Id <> FND_API.G_MISS_NUM THEN
1069 FOR price_adj_rec IN c_price_adj_line LOOP
1070 l_price_adj_rec.PRICE_ADJUSTMENT_ID := price_adj_rec.PRICE_ADJUSTMENT_ID;
1071 l_price_adj_rec.CREATION_DATE := price_adj_rec.CREATION_DATE;
1072 l_price_adj_rec.CREATED_BY := price_adj_rec.CREATED_BY;
1073 l_price_adj_rec.LAST_UPDATE_DATE := price_adj_rec.LAST_UPDATE_DATE;
1074 l_price_adj_rec.LAST_UPDATED_BY := price_adj_rec.LAST_UPDATED_BY;
1075 l_price_adj_rec.LAST_UPDATE_LOGIN := price_adj_rec.LAST_UPDATE_LOGIN;
1076 l_price_adj_rec.REQUEST_ID := price_adj_rec.REQUEST_ID;
1077 l_price_adj_rec.PROGRAM_APPLICATION_ID := price_adj_rec.PROGRAM_APPLICATION_ID;
1078 l_price_adj_rec.PROGRAM_ID := price_adj_rec.PROGRAM_ID;
1079 l_price_adj_rec.PROGRAM_UPDATE_DATE := price_adj_rec.PROGRAM_UPDATE_DATE;
1080 l_price_adj_rec.QUOTE_HEADER_ID := price_adj_rec.QUOTE_HEADER_ID;
1081 l_price_adj_rec.QUOTE_LINE_ID := price_adj_rec.QUOTE_LINE_ID;
1082 l_price_adj_rec.MODIFIER_HEADER_ID := price_adj_rec.MODIFIER_HEADER_ID;
1083 l_price_adj_rec.MODIFIER_LINE_ID := price_adj_rec.MODIFIER_LINE_ID;
1084 l_price_adj_rec.MODIFIER_LINE_TYPE_CODE := price_adj_rec.MODIFIER_LINE_TYPE_CODE;
1085 l_price_adj_rec.MODIFIER_MECHANISM_TYPE_CODE := price_adj_rec.MODIFIER_MECHANISM_TYPE_CODE;
1086 l_price_adj_rec.MODIFIED_FROM := price_adj_rec.MODIFIED_FROM;
1087 l_price_adj_rec.MODIFIED_TO := price_adj_rec.MODIFIED_TO;
1088 l_price_adj_rec.OPERAND := price_adj_rec.OPERAND;
1089 l_price_adj_rec.ARITHMETIC_OPERATOR := price_adj_rec.ARITHMETIC_OPERATOR;
1090 l_price_adj_rec.AUTOMATIC_FLAG := price_adj_rec.AUTOMATIC_FLAG;
1091 l_price_adj_rec.UPDATE_ALLOWABLE_FLAG := price_adj_rec.UPDATE_ALLOWABLE_FLAG;
1092 l_price_adj_rec.UPDATED_FLAG := price_adj_rec.UPDATED_FLAG;
1093 l_price_adj_rec.APPLIED_FLAG := price_adj_rec.APPLIED_FLAG;
1094 l_price_adj_rec.ON_INVOICE_FLAG := price_adj_rec.ON_INVOICE_FLAG;
1095 l_price_adj_rec.PRICING_PHASE_ID := price_adj_rec.PRICING_PHASE_ID;
1096 l_price_adj_rec.QUOTE_SHIPMENT_ID := price_adj_rec.QUOTE_SHIPMENT_ID;
1097 l_price_adj_rec.ATTRIBUTE_CATEGORY := price_adj_rec.ATTRIBUTE_CATEGORY;
1098 l_price_adj_rec.ATTRIBUTE1 := price_adj_rec.ATTRIBUTE1;
1099 l_price_adj_rec.ATTRIBUTE2 := price_adj_rec.ATTRIBUTE2;
1100 l_price_adj_rec.ATTRIBUTE3 := price_adj_rec.ATTRIBUTE3;
1101 l_price_adj_rec.ATTRIBUTE4 := price_adj_rec.ATTRIBUTE4;
1102 l_price_adj_rec.ATTRIBUTE5 := price_adj_rec.ATTRIBUTE5;
1103 l_price_adj_rec.ATTRIBUTE6 := price_adj_rec.ATTRIBUTE6;
1104 l_price_adj_rec.ATTRIBUTE7 := price_adj_rec.ATTRIBUTE7;
1105 l_price_adj_rec.ATTRIBUTE8 := price_adj_rec.ATTRIBUTE8;
1106 l_price_adj_rec.ATTRIBUTE9 := price_adj_rec.ATTRIBUTE9;
1107 l_price_adj_rec.ATTRIBUTE10 := price_adj_rec.ATTRIBUTE10;
1108 l_price_adj_rec.ATTRIBUTE11 := price_adj_rec.ATTRIBUTE11;
1109 l_price_adj_rec.ATTRIBUTE12 := price_adj_rec.ATTRIBUTE12;
1110 l_price_adj_rec.ATTRIBUTE13 := price_adj_rec.ATTRIBUTE13;
1111 l_price_adj_rec.ATTRIBUTE14 := price_adj_rec.ATTRIBUTE14;
1112 l_price_adj_rec.ATTRIBUTE15 := price_adj_rec.ATTRIBUTE15;
1113 l_price_adj_rec.ATTRIBUTE16 := price_adj_rec.ATTRIBUTE16;
1114 l_price_adj_rec.ATTRIBUTE17 := price_adj_rec.ATTRIBUTE17;
1115 l_price_adj_rec.ATTRIBUTE18 := price_adj_rec.ATTRIBUTE18;
1116 l_price_adj_rec.ATTRIBUTE19 := price_adj_rec.ATTRIBUTE19;
1117 l_price_adj_rec.ATTRIBUTE20 := price_adj_rec.ATTRIBUTE20;
1118 l_price_adj_rec.TAX_CODE := price_adj_rec.TAX_CODE;
1119 l_price_adj_rec.TAX_EXEMPT_FLAG := price_adj_rec.TAX_EXEMPT_FLAG;
1120 l_price_adj_rec.TAX_EXEMPT_NUMBER := price_adj_rec.TAX_EXEMPT_NUMBER;
1121 l_price_adj_rec.TAX_EXEMPT_REASON_CODE := price_adj_rec.TAX_EXEMPT_REASON_CODE;
1122 l_price_adj_rec.PARENT_ADJUSTMENT_ID := price_adj_rec.PARENT_ADJUSTMENT_ID;
1123 l_price_adj_rec.INVOICED_FLAG := price_adj_rec.INVOICED_FLAG;
1124 l_price_adj_rec.ESTIMATED_FLAG := price_adj_rec.ESTIMATED_FLAG;
1125 l_price_adj_rec.INC_IN_SALES_PERFORMANCE := price_adj_rec.INC_IN_SALES_PERFORMANCE;
1126 l_price_adj_rec.SPLIT_ACTION_CODE := price_adj_rec.SPLIT_ACTION_CODE;
1127 l_price_adj_rec.ADJUSTED_AMOUNT := price_adj_rec.ADJUSTED_AMOUNT;
1128 l_price_adj_rec.CHARGE_TYPE_CODE := price_adj_rec.CHARGE_TYPE_CODE;
1129 l_price_adj_rec.CHARGE_SUBTYPE_CODE := price_adj_rec.CHARGE_SUBTYPE_CODE;
1130 l_price_adj_rec.RANGE_BREAK_QUANTITY := price_adj_rec.RANGE_BREAK_QUANTITY;
1131 l_price_adj_rec.ACCRUAL_CONVERSION_RATE := price_adj_rec.ACCRUAL_CONVERSION_RATE;
1132 l_price_adj_rec.PRICING_GROUP_SEQUENCE := price_adj_rec.PRICING_GROUP_SEQUENCE;
1133 l_price_adj_rec.ACCRUAL_FLAG := price_adj_rec.ACCRUAL_FLAG;
1134 l_price_adj_rec.LIST_LINE_NO := price_adj_rec.LIST_LINE_NO;
1135 l_price_adj_rec.SOURCE_SYSTEM_CODE := price_adj_rec.SOURCE_SYSTEM_CODE;
1136 l_price_adj_rec.BENEFIT_QTY := price_adj_rec.BENEFIT_QTY;
1137 l_price_adj_rec.BENEFIT_UOM_CODE := price_adj_rec.BENEFIT_UOM_CODE;
1138 l_price_adj_rec.PRINT_ON_INVOICE_FLAG := price_adj_rec.PRINT_ON_INVOICE_FLAG;
1139 l_price_adj_rec.EXPIRATION_DATE := price_adj_rec.EXPIRATION_DATE;
1140 l_price_adj_rec.REBATE_TRANSACTION_TYPE_CODE := price_adj_rec.REBATE_TRANSACTION_TYPE_CODE;
1141 l_price_adj_rec.REBATE_TRANSACTION_REFERENCE := price_adj_rec.REBATE_TRANSACTION_REFERENCE;
1142 l_price_adj_rec.REBATE_PAYMENT_SYSTEM_CODE := price_adj_rec.REBATE_PAYMENT_SYSTEM_CODE;
1143 l_price_adj_rec.REDEEMED_DATE := price_adj_rec.REDEEMED_DATE;
1144 l_price_adj_rec.REDEEMED_FLAG := price_adj_rec.REDEEMED_FLAG;
1145 l_price_adj_rec.MODIFIER_LEVEL_CODE := price_adj_rec.MODIFIER_LEVEL_CODE;
1146 l_price_adj_rec.PRICE_BREAK_TYPE_CODE := price_adj_rec.PRICE_BREAK_TYPE_CODE;
1147 l_price_adj_rec.SUBSTITUTION_ATTRIBUTE := price_adj_rec.SUBSTITUTION_ATTRIBUTE;
1148 l_price_adj_rec.PRORATION_TYPE_CODE := price_adj_rec.PRORATION_TYPE_CODE;
1149 l_price_adj_rec.INCLUDE_ON_RETURNS_FLAG := price_adj_rec.INCLUDE_ON_RETURNS_FLAG;
1150 l_price_adj_rec.CREDIT_OR_CHARGE_FLAG := price_adj_rec.CREDIT_OR_CHARGE_FLAG;
1151 l_price_adj_rec.ORIG_SYS_DISCOUNT_REF := price_adj_rec.ORIG_SYS_DISCOUNT_REF;
1152 l_price_adj_rec.CHANGE_REASON_CODE := price_adj_rec.CHANGE_REASON_CODE;
1153 l_price_adj_rec.CHANGE_REASON_TEXT := price_adj_rec.CHANGE_REASON_TEXT;
1154 l_price_adj_rec.COST_ID := price_adj_rec.COST_ID;
1155 --l_price_adj_rec.LIST_LINE_TYPE_CODE := price_adj_rec.LIST_LINE_TYPE_CODE;
1156 l_price_adj_rec.UPDATE_ALLOWED := price_adj_rec.UPDATE_ALLOWED;
1157 l_price_adj_rec.CHANGE_SEQUENCE := price_adj_rec.CHANGE_SEQUENCE;
1158 l_price_adj_rec.OBJECT_VERSION_NUMBER := price_adj_rec.OBJECT_VERSION_NUMBER;
1159 l_price_adj_rec.OPERAND_PER_PQTY := price_adj_rec.OPERAND_PER_PQTY;
1160 l_price_adj_rec.ADJUSTED_AMOUNT_PER_PQTY := price_adj_rec.ADJUSTED_AMOUNT_PER_PQTY;
1161
1162 l_price_adj_tbl(l_price_adj_tbl.COUNT+1) := l_price_adj_rec;
1163 END LOOP;
1164
1165 END IF;
1166 RETURN l_price_adj_tbl;
1167 END Query_Price_Adj_Rows;
1168
1169 FUNCTION Query_Price_Adj_NonPRG_Rows (
1170 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM,
1171 P_Qte_Line_Id IN NUMBER := FND_API.G_MISS_NUM
1172 ) RETURN ASO_QUOTE_PUB.Price_Adj_Tbl_Type
1173 IS
1174 CURSOR c_price_adj_hdr IS
1175 SELECT
1176 PRICE_ADJUSTMENT_ID,
1177 CREATION_DATE,
1178 CREATED_BY,
1179 LAST_UPDATE_DATE,
1180 LAST_UPDATED_BY,
1181 LAST_UPDATE_LOGIN,
1182 PROGRAM_APPLICATION_ID,
1183 PROGRAM_ID,
1184 PROGRAM_UPDATE_DATE,
1185 REQUEST_ID,
1186 QUOTE_HEADER_ID,
1187 QUOTE_LINE_ID,
1188 MODIFIER_HEADER_ID,
1189 MODIFIER_LINE_ID,
1190 MODIFIER_LINE_TYPE_CODE,
1191 MODIFIER_MECHANISM_TYPE_CODE,
1192 MODIFIED_FROM,
1193 MODIFIED_TO,
1194 OPERAND,
1195 ARITHMETIC_OPERATOR,
1196 AUTOMATIC_FLAG,
1197 UPDATE_ALLOWABLE_FLAG,
1198 UPDATED_FLAG,
1199 APPLIED_FLAG,
1200 ON_INVOICE_FLAG,
1201 PRICING_PHASE_ID,
1202 ATTRIBUTE_CATEGORY,
1203 ATTRIBUTE1,
1204 ATTRIBUTE2,
1205 ATTRIBUTE3,
1206 ATTRIBUTE4,
1207 ATTRIBUTE5,
1208 ATTRIBUTE6,
1209 ATTRIBUTE7,
1210 ATTRIBUTE8,
1211 ATTRIBUTE9,
1212 ATTRIBUTE10,
1213 ATTRIBUTE11,
1214 ATTRIBUTE12,
1215 ATTRIBUTE13,
1216 ATTRIBUTE14,
1217 ATTRIBUTE15,
1218 ATTRIBUTE16,
1219 ATTRIBUTE17,
1220 ATTRIBUTE18,
1221 ATTRIBUTE19,
1222 ATTRIBUTE20,
1223 TAX_CODE,
1224 TAX_EXEMPT_FLAG,
1225 TAX_EXEMPT_NUMBER,
1226 TAX_EXEMPT_REASON_CODE,
1227 PARENT_ADJUSTMENT_ID,
1228 INVOICED_FLAG,
1229 ESTIMATED_FLAG,
1230 INC_IN_SALES_PERFORMANCE,
1231 SPLIT_ACTION_CODE,
1232 ADJUSTED_AMOUNT,
1233 CHARGE_TYPE_CODE,
1234 CHARGE_SUBTYPE_CODE,
1235 RANGE_BREAK_QUANTITY,
1236 ACCRUAL_CONVERSION_RATE,
1237 PRICING_GROUP_SEQUENCE,
1238 ACCRUAL_FLAG,
1239 LIST_LINE_NO,
1240 SOURCE_SYSTEM_CODE,
1241 BENEFIT_QTY,
1242 BENEFIT_UOM_CODE,
1243 PRINT_ON_INVOICE_FLAG,
1244 EXPIRATION_DATE,
1245 REBATE_TRANSACTION_TYPE_CODE,
1246 REBATE_TRANSACTION_REFERENCE,
1247 REBATE_PAYMENT_SYSTEM_CODE,
1248 REDEEMED_DATE,
1249 REDEEMED_FLAG,
1250 MODIFIER_LEVEL_CODE,
1251 PRICE_BREAK_TYPE_CODE,
1252 SUBSTITUTION_ATTRIBUTE,
1253 PRORATION_TYPE_CODE,
1254 INCLUDE_ON_RETURNS_FLAG,
1255 CREDIT_OR_CHARGE_FLAG,
1256 ORIG_SYS_DISCOUNT_REF,
1257 CHANGE_REASON_CODE,
1258 CHANGE_REASON_TEXT,
1259 COST_ID,
1260 LIST_LINE_TYPE_CODE,
1261 UPDATE_ALLOWED,
1262 CHANGE_SEQUENCE,
1263 LIST_HEADER_ID,
1264 LIST_LINE_ID,
1265 QUOTE_SHIPMENT_ID,
1266 OPERAND_PER_PQTY,
1267 ADJUSTED_AMOUNT_PER_PQTY,
1268 OBJECT_VERSION_NUMBER
1269 FROM ASO_PRICE_ADJUSTMENTS
1270 WHERE quote_header_id = p_qte_header_id
1271 AND quote_line_id IS NULL;
1272
1273 CURSOR c_price_adj_line IS
1274 SELECT
1275 PRICE_ADJUSTMENT_ID,
1276 CREATION_DATE,
1277 CREATED_BY,
1278 LAST_UPDATE_DATE,
1279 LAST_UPDATED_BY,
1280 LAST_UPDATE_LOGIN,
1281 PROGRAM_APPLICATION_ID,
1282 PROGRAM_ID,
1283 PROGRAM_UPDATE_DATE,
1284 REQUEST_ID,
1285 QUOTE_HEADER_ID,
1286 QUOTE_LINE_ID,
1287 MODIFIER_HEADER_ID,
1288 MODIFIER_LINE_ID,
1289 MODIFIER_LINE_TYPE_CODE,
1290 MODIFIER_MECHANISM_TYPE_CODE,
1291 MODIFIED_FROM,
1292 MODIFIED_TO,
1293 OPERAND,
1294 ARITHMETIC_OPERATOR,
1295 AUTOMATIC_FLAG,
1296 UPDATE_ALLOWABLE_FLAG,
1297 UPDATED_FLAG,
1298 APPLIED_FLAG,
1299 ON_INVOICE_FLAG,
1300 PRICING_PHASE_ID,
1301 ATTRIBUTE_CATEGORY,
1302 ATTRIBUTE1,
1303 ATTRIBUTE2,
1304 ATTRIBUTE3,
1305 ATTRIBUTE4,
1306 ATTRIBUTE5,
1307 ATTRIBUTE6,
1308 ATTRIBUTE7,
1309 ATTRIBUTE8,
1310 ATTRIBUTE9,
1311 ATTRIBUTE10,
1312 ATTRIBUTE11,
1313 ATTRIBUTE12,
1314 ATTRIBUTE13,
1315 ATTRIBUTE14,
1316 ATTRIBUTE15,
1317 ATTRIBUTE16,
1318 ATTRIBUTE17,
1319 ATTRIBUTE18,
1320 ATTRIBUTE19,
1321 ATTRIBUTE20,
1322 TAX_CODE,
1323 TAX_EXEMPT_FLAG,
1324 TAX_EXEMPT_NUMBER,
1325 TAX_EXEMPT_REASON_CODE,
1326 PARENT_ADJUSTMENT_ID,
1327 INVOICED_FLAG,
1328 ESTIMATED_FLAG,
1329 INC_IN_SALES_PERFORMANCE,
1330 SPLIT_ACTION_CODE,
1331 ADJUSTED_AMOUNT,
1332 CHARGE_TYPE_CODE,
1333 CHARGE_SUBTYPE_CODE,
1334 RANGE_BREAK_QUANTITY,
1335 ACCRUAL_CONVERSION_RATE,
1336 PRICING_GROUP_SEQUENCE,
1337 ACCRUAL_FLAG,
1338 LIST_LINE_NO,
1339 SOURCE_SYSTEM_CODE,
1340 BENEFIT_QTY,
1341 BENEFIT_UOM_CODE,
1342 PRINT_ON_INVOICE_FLAG,
1343 EXPIRATION_DATE,
1344 REBATE_TRANSACTION_TYPE_CODE,
1345 REBATE_TRANSACTION_REFERENCE,
1346 REBATE_PAYMENT_SYSTEM_CODE,
1347 REDEEMED_DATE,
1348 REDEEMED_FLAG,
1349 MODIFIER_LEVEL_CODE,
1350 PRICE_BREAK_TYPE_CODE,
1351 SUBSTITUTION_ATTRIBUTE,
1352 PRORATION_TYPE_CODE,
1353 INCLUDE_ON_RETURNS_FLAG,
1354 CREDIT_OR_CHARGE_FLAG,
1355 ORIG_SYS_DISCOUNT_REF,
1356 CHANGE_REASON_CODE,
1357 CHANGE_REASON_TEXT,
1358 COST_ID,
1359 LIST_LINE_TYPE_CODE,
1360 UPDATE_ALLOWED,
1361 CHANGE_SEQUENCE,
1362 LIST_HEADER_ID,
1363 LIST_LINE_ID,
1364 QUOTE_SHIPMENT_ID,
1365 OPERAND_PER_PQTY,
1366 ADJUSTED_AMOUNT_PER_PQTY,
1367 OBJECT_VERSION_NUMBER
1368 FROM ASO_PRICE_ADJUSTMENTS
1369 WHERE quote_header_id = p_qte_header_id
1370 AND quote_line_id IS NOT NULL
1371 AND quote_line_id = p_qte_line_id
1372 AND modifier_line_type_code <> 'PRG';
1373
1374 l_price_adj_rec ASO_QUOTE_PUB.Price_Adj_Rec_Type;
1375 l_price_adj_tbl ASO_QUOTE_PUB.Price_Adj_Tbl_Type;
1376 BEGIN
1377 IF P_Qte_Line_Id is NULL or P_Qte_Line_Id = FND_API.G_MISS_NUM THEN
1378 FOR price_adj_rec IN c_price_adj_hdr LOOP
1379 l_price_adj_rec.PRICE_ADJUSTMENT_ID := price_adj_rec.PRICE_ADJUSTMENT_ID;
1380 l_price_adj_rec.CREATION_DATE := price_adj_rec.CREATION_DATE;
1381 l_price_adj_rec.CREATED_BY := price_adj_rec.CREATED_BY;
1382 l_price_adj_rec.LAST_UPDATE_DATE := price_adj_rec.LAST_UPDATE_DATE;
1383 l_price_adj_rec.LAST_UPDATED_BY := price_adj_rec.LAST_UPDATED_BY;
1384 l_price_adj_rec.LAST_UPDATE_LOGIN := price_adj_rec.LAST_UPDATE_LOGIN;
1385 l_price_adj_rec.REQUEST_ID := price_adj_rec.REQUEST_ID;
1386 l_price_adj_rec.PROGRAM_APPLICATION_ID := price_adj_rec.PROGRAM_APPLICATION_ID;
1387 l_price_adj_rec.PROGRAM_ID := price_adj_rec.PROGRAM_ID;
1388 l_price_adj_rec.PROGRAM_UPDATE_DATE := price_adj_rec.PROGRAM_UPDATE_DATE;
1389 l_price_adj_rec.QUOTE_HEADER_ID := price_adj_rec.QUOTE_HEADER_ID;
1390 l_price_adj_rec.QUOTE_LINE_ID := price_adj_rec.QUOTE_LINE_ID;
1391 l_price_adj_rec.MODIFIER_HEADER_ID := price_adj_rec.MODIFIER_HEADER_ID;
1392 l_price_adj_rec.MODIFIER_LINE_ID := price_adj_rec.MODIFIER_LINE_ID;
1393 l_price_adj_rec.MODIFIER_LINE_TYPE_CODE := price_adj_rec.MODIFIER_LINE_TYPE_CODE;
1394 l_price_adj_rec.MODIFIER_MECHANISM_TYPE_CODE := price_adj_rec.MODIFIER_MECHANISM_TYPE_CODE;
1395 l_price_adj_rec.MODIFIED_FROM := price_adj_rec.MODIFIED_FROM;
1396 l_price_adj_rec.MODIFIED_TO := price_adj_rec.MODIFIED_TO;
1397 l_price_adj_rec.OPERAND := price_adj_rec.OPERAND;
1398 l_price_adj_rec.ARITHMETIC_OPERATOR := price_adj_rec.ARITHMETIC_OPERATOR;
1399 l_price_adj_rec.AUTOMATIC_FLAG := price_adj_rec.AUTOMATIC_FLAG;
1400 l_price_adj_rec.UPDATE_ALLOWABLE_FLAG := price_adj_rec.UPDATE_ALLOWABLE_FLAG;
1401 l_price_adj_rec.UPDATED_FLAG := price_adj_rec.UPDATED_FLAG;
1402 l_price_adj_rec.APPLIED_FLAG := price_adj_rec.APPLIED_FLAG;
1403 l_price_adj_rec.ON_INVOICE_FLAG := price_adj_rec.ON_INVOICE_FLAG;
1404 l_price_adj_rec.PRICING_PHASE_ID := price_adj_rec.PRICING_PHASE_ID;
1405 l_price_adj_rec.QUOTE_SHIPMENT_ID := price_adj_rec.QUOTE_SHIPMENT_ID;
1406 l_price_adj_rec.ATTRIBUTE_CATEGORY := price_adj_rec.ATTRIBUTE_CATEGORY;
1407 l_price_adj_rec.ATTRIBUTE1 := price_adj_rec.ATTRIBUTE1;
1408 l_price_adj_rec.ATTRIBUTE2 := price_adj_rec.ATTRIBUTE2;
1409 l_price_adj_rec.ATTRIBUTE3 := price_adj_rec.ATTRIBUTE3;
1410 l_price_adj_rec.ATTRIBUTE4 := price_adj_rec.ATTRIBUTE4;
1411 l_price_adj_rec.ATTRIBUTE5 := price_adj_rec.ATTRIBUTE5;
1412 l_price_adj_rec.ATTRIBUTE6 := price_adj_rec.ATTRIBUTE6;
1413 l_price_adj_rec.ATTRIBUTE7 := price_adj_rec.ATTRIBUTE7;
1414 l_price_adj_rec.ATTRIBUTE8 := price_adj_rec.ATTRIBUTE8;
1415 l_price_adj_rec.ATTRIBUTE9 := price_adj_rec.ATTRIBUTE9;
1416 l_price_adj_rec.ATTRIBUTE10 := price_adj_rec.ATTRIBUTE10;
1417 l_price_adj_rec.ATTRIBUTE11 := price_adj_rec.ATTRIBUTE11;
1418 l_price_adj_rec.ATTRIBUTE12 := price_adj_rec.ATTRIBUTE12;
1419 l_price_adj_rec.ATTRIBUTE13 := price_adj_rec.ATTRIBUTE13;
1420 l_price_adj_rec.ATTRIBUTE14 := price_adj_rec.ATTRIBUTE14;
1421 l_price_adj_rec.ATTRIBUTE15 := price_adj_rec.ATTRIBUTE15;
1422 l_price_adj_rec.ATTRIBUTE16 := price_adj_rec.ATTRIBUTE16;
1423 l_price_adj_rec.ATTRIBUTE17 := price_adj_rec.ATTRIBUTE17;
1424 l_price_adj_rec.ATTRIBUTE18 := price_adj_rec.ATTRIBUTE18;
1425 l_price_adj_rec.ATTRIBUTE19 := price_adj_rec.ATTRIBUTE19;
1426 l_price_adj_rec.ATTRIBUTE20 := price_adj_rec.ATTRIBUTE20;
1427 l_price_adj_rec.TAX_CODE := price_adj_rec.TAX_CODE;
1428 l_price_adj_rec.TAX_EXEMPT_FLAG := price_adj_rec.TAX_EXEMPT_FLAG;
1429 l_price_adj_rec.TAX_EXEMPT_NUMBER := price_adj_rec.TAX_EXEMPT_NUMBER;
1430 l_price_adj_rec.TAX_EXEMPT_REASON_CODE := price_adj_rec.TAX_EXEMPT_REASON_CODE;
1431 l_price_adj_rec.PARENT_ADJUSTMENT_ID := price_adj_rec.PARENT_ADJUSTMENT_ID;
1432 l_price_adj_rec.INVOICED_FLAG := price_adj_rec.INVOICED_FLAG;
1433 l_price_adj_rec.ESTIMATED_FLAG := price_adj_rec.ESTIMATED_FLAG;
1434 l_price_adj_rec.INC_IN_SALES_PERFORMANCE := price_adj_rec.INC_IN_SALES_PERFORMANCE;
1435 l_price_adj_rec.SPLIT_ACTION_CODE := price_adj_rec.SPLIT_ACTION_CODE;
1436 l_price_adj_rec.ADJUSTED_AMOUNT := price_adj_rec.ADJUSTED_AMOUNT;
1437 l_price_adj_rec.CHARGE_TYPE_CODE := price_adj_rec.CHARGE_TYPE_CODE;
1438 l_price_adj_rec.CHARGE_SUBTYPE_CODE := price_adj_rec.CHARGE_SUBTYPE_CODE;
1439 l_price_adj_rec.RANGE_BREAK_QUANTITY := price_adj_rec.RANGE_BREAK_QUANTITY;
1440 l_price_adj_rec.ACCRUAL_CONVERSION_RATE := price_adj_rec.ACCRUAL_CONVERSION_RATE;
1441 l_price_adj_rec.PRICING_GROUP_SEQUENCE := price_adj_rec.PRICING_GROUP_SEQUENCE;
1442 l_price_adj_rec.ACCRUAL_FLAG := price_adj_rec.ACCRUAL_FLAG;
1443 l_price_adj_rec.LIST_LINE_NO := price_adj_rec.LIST_LINE_NO;
1444 l_price_adj_rec.SOURCE_SYSTEM_CODE := price_adj_rec.SOURCE_SYSTEM_CODE;
1445 l_price_adj_rec.BENEFIT_QTY := price_adj_rec.BENEFIT_QTY;
1446 l_price_adj_rec.BENEFIT_UOM_CODE := price_adj_rec.BENEFIT_UOM_CODE;
1447 l_price_adj_rec.PRINT_ON_INVOICE_FLAG := price_adj_rec.PRINT_ON_INVOICE_FLAG;
1448 l_price_adj_rec.EXPIRATION_DATE := price_adj_rec.EXPIRATION_DATE;
1449 l_price_adj_rec.REBATE_TRANSACTION_TYPE_CODE := price_adj_rec.REBATE_TRANSACTION_TYPE_CODE;
1450 l_price_adj_rec.REBATE_TRANSACTION_REFERENCE := price_adj_rec.REBATE_TRANSACTION_REFERENCE;
1451 l_price_adj_rec.REBATE_PAYMENT_SYSTEM_CODE := price_adj_rec.REBATE_PAYMENT_SYSTEM_CODE;
1452 l_price_adj_rec.REDEEMED_DATE := price_adj_rec.REDEEMED_DATE;
1453 l_price_adj_rec.REDEEMED_FLAG := price_adj_rec.REDEEMED_FLAG;
1454 l_price_adj_rec.MODIFIER_LEVEL_CODE := price_adj_rec.MODIFIER_LEVEL_CODE;
1455 l_price_adj_rec.PRICE_BREAK_TYPE_CODE := price_adj_rec.PRICE_BREAK_TYPE_CODE;
1456 l_price_adj_rec.SUBSTITUTION_ATTRIBUTE := price_adj_rec.SUBSTITUTION_ATTRIBUTE;
1457 l_price_adj_rec.PRORATION_TYPE_CODE := price_adj_rec.PRORATION_TYPE_CODE;
1458 l_price_adj_rec.INCLUDE_ON_RETURNS_FLAG := price_adj_rec.INCLUDE_ON_RETURNS_FLAG;
1459 l_price_adj_rec.CREDIT_OR_CHARGE_FLAG := price_adj_rec.CREDIT_OR_CHARGE_FLAG;
1460 l_price_adj_rec.ORIG_SYS_DISCOUNT_REF := price_adj_rec.ORIG_SYS_DISCOUNT_REF;
1461 l_price_adj_rec.CHANGE_REASON_CODE := price_adj_rec.CHANGE_REASON_CODE;
1462 l_price_adj_rec.CHANGE_REASON_TEXT := price_adj_rec.CHANGE_REASON_TEXT;
1463 l_price_adj_rec.COST_ID := price_adj_rec.COST_ID;
1464 --l_price_adj_rec.LIST_LINE_TYPE_CODE := price_adj_rec.LIST_LINE_TYPE_CODE;
1465 l_price_adj_rec.UPDATE_ALLOWED := price_adj_rec.UPDATE_ALLOWED;
1466 l_price_adj_rec.CHANGE_SEQUENCE := price_adj_rec.CHANGE_SEQUENCE;
1467 l_price_adj_rec.OBJECT_VERSION_NUMBER := price_adj_rec.OBJECT_VERSION_NUMBER;
1468 l_price_adj_rec.OPERAND_PER_PQTY := price_adj_rec.OPERAND_PER_PQTY;
1469 l_price_adj_rec.ADJUSTED_AMOUNT_PER_PQTY := price_adj_rec.ADJUSTED_AMOUNT_PER_PQTY;
1470
1471 l_price_adj_tbl(l_price_adj_tbl.COUNT+1) := l_price_adj_rec;
1472 END LOOP;
1473 ELSIF P_Qte_Line_Id is NOT NULL OR P_Qte_Line_Id <> FND_API.G_MISS_NUM THEN
1474 FOR price_adj_rec IN c_price_adj_line LOOP
1475 l_price_adj_rec.PRICE_ADJUSTMENT_ID := price_adj_rec.PRICE_ADJUSTMENT_ID;
1476 l_price_adj_rec.CREATION_DATE := price_adj_rec.CREATION_DATE;
1477 l_price_adj_rec.CREATED_BY := price_adj_rec.CREATED_BY;
1478 l_price_adj_rec.LAST_UPDATE_DATE := price_adj_rec.LAST_UPDATE_DATE;
1479 l_price_adj_rec.LAST_UPDATED_BY := price_adj_rec.LAST_UPDATED_BY;
1480 l_price_adj_rec.LAST_UPDATE_LOGIN := price_adj_rec.LAST_UPDATE_LOGIN;
1481 l_price_adj_rec.REQUEST_ID := price_adj_rec.REQUEST_ID;
1482 l_price_adj_rec.PROGRAM_APPLICATION_ID := price_adj_rec.PROGRAM_APPLICATION_ID;
1483 l_price_adj_rec.PROGRAM_ID := price_adj_rec.PROGRAM_ID;
1484 l_price_adj_rec.PROGRAM_UPDATE_DATE := price_adj_rec.PROGRAM_UPDATE_DATE;
1485 l_price_adj_rec.QUOTE_HEADER_ID := price_adj_rec.QUOTE_HEADER_ID;
1486 l_price_adj_rec.QUOTE_LINE_ID := price_adj_rec.QUOTE_LINE_ID;
1487 l_price_adj_rec.MODIFIER_HEADER_ID := price_adj_rec.MODIFIER_HEADER_ID;
1488 l_price_adj_rec.MODIFIER_LINE_ID := price_adj_rec.MODIFIER_LINE_ID;
1489 l_price_adj_rec.MODIFIER_LINE_TYPE_CODE := price_adj_rec.MODIFIER_LINE_TYPE_CODE;
1490 l_price_adj_rec.MODIFIER_MECHANISM_TYPE_CODE := price_adj_rec.MODIFIER_MECHANISM_TYPE_CODE;
1491 l_price_adj_rec.MODIFIED_FROM := price_adj_rec.MODIFIED_FROM;
1492 l_price_adj_rec.MODIFIED_TO := price_adj_rec.MODIFIED_TO;
1493 l_price_adj_rec.OPERAND := price_adj_rec.OPERAND;
1494 l_price_adj_rec.ARITHMETIC_OPERATOR := price_adj_rec.ARITHMETIC_OPERATOR;
1495 l_price_adj_rec.AUTOMATIC_FLAG := price_adj_rec.AUTOMATIC_FLAG;
1496 l_price_adj_rec.UPDATE_ALLOWABLE_FLAG := price_adj_rec.UPDATE_ALLOWABLE_FLAG;
1497 l_price_adj_rec.UPDATED_FLAG := price_adj_rec.UPDATED_FLAG;
1498 l_price_adj_rec.APPLIED_FLAG := price_adj_rec.APPLIED_FLAG;
1499 l_price_adj_rec.ON_INVOICE_FLAG := price_adj_rec.ON_INVOICE_FLAG;
1500 l_price_adj_rec.PRICING_PHASE_ID := price_adj_rec.PRICING_PHASE_ID;
1501 l_price_adj_rec.QUOTE_SHIPMENT_ID := price_adj_rec.QUOTE_SHIPMENT_ID;
1502 l_price_adj_rec.ATTRIBUTE_CATEGORY := price_adj_rec.ATTRIBUTE_CATEGORY;
1503 l_price_adj_rec.ATTRIBUTE1 := price_adj_rec.ATTRIBUTE1;
1504 l_price_adj_rec.ATTRIBUTE2 := price_adj_rec.ATTRIBUTE2;
1505 l_price_adj_rec.ATTRIBUTE3 := price_adj_rec.ATTRIBUTE3;
1506 l_price_adj_rec.ATTRIBUTE4 := price_adj_rec.ATTRIBUTE4;
1507 l_price_adj_rec.ATTRIBUTE5 := price_adj_rec.ATTRIBUTE5;
1508 l_price_adj_rec.ATTRIBUTE6 := price_adj_rec.ATTRIBUTE6;
1509 l_price_adj_rec.ATTRIBUTE7 := price_adj_rec.ATTRIBUTE7;
1510 l_price_adj_rec.ATTRIBUTE8 := price_adj_rec.ATTRIBUTE8;
1511 l_price_adj_rec.ATTRIBUTE9 := price_adj_rec.ATTRIBUTE9;
1512 l_price_adj_rec.ATTRIBUTE10 := price_adj_rec.ATTRIBUTE10;
1513 l_price_adj_rec.ATTRIBUTE11 := price_adj_rec.ATTRIBUTE11;
1514 l_price_adj_rec.ATTRIBUTE12 := price_adj_rec.ATTRIBUTE12;
1515 l_price_adj_rec.ATTRIBUTE13 := price_adj_rec.ATTRIBUTE13;
1516 l_price_adj_rec.ATTRIBUTE14 := price_adj_rec.ATTRIBUTE14;
1517 l_price_adj_rec.ATTRIBUTE15 := price_adj_rec.ATTRIBUTE15;
1518 l_price_adj_rec.ATTRIBUTE16 := price_adj_rec.ATTRIBUTE16;
1519 l_price_adj_rec.ATTRIBUTE17 := price_adj_rec.ATTRIBUTE17;
1520 l_price_adj_rec.ATTRIBUTE18 := price_adj_rec.ATTRIBUTE18;
1521 l_price_adj_rec.ATTRIBUTE19 := price_adj_rec.ATTRIBUTE19;
1522 l_price_adj_rec.ATTRIBUTE20 := price_adj_rec.ATTRIBUTE20;
1523 l_price_adj_rec.TAX_CODE := price_adj_rec.TAX_CODE;
1524 l_price_adj_rec.TAX_EXEMPT_FLAG := price_adj_rec.TAX_EXEMPT_FLAG;
1525 l_price_adj_rec.TAX_EXEMPT_NUMBER := price_adj_rec.TAX_EXEMPT_NUMBER;
1526 l_price_adj_rec.TAX_EXEMPT_REASON_CODE := price_adj_rec.TAX_EXEMPT_REASON_CODE;
1527 l_price_adj_rec.PARENT_ADJUSTMENT_ID := price_adj_rec.PARENT_ADJUSTMENT_ID;
1528 l_price_adj_rec.INVOICED_FLAG := price_adj_rec.INVOICED_FLAG;
1529 l_price_adj_rec.ESTIMATED_FLAG := price_adj_rec.ESTIMATED_FLAG;
1530 l_price_adj_rec.INC_IN_SALES_PERFORMANCE := price_adj_rec.INC_IN_SALES_PERFORMANCE;
1531 l_price_adj_rec.SPLIT_ACTION_CODE := price_adj_rec.SPLIT_ACTION_CODE;
1532 l_price_adj_rec.ADJUSTED_AMOUNT := price_adj_rec.ADJUSTED_AMOUNT;
1533 l_price_adj_rec.CHARGE_TYPE_CODE := price_adj_rec.CHARGE_TYPE_CODE;
1534 l_price_adj_rec.CHARGE_SUBTYPE_CODE := price_adj_rec.CHARGE_SUBTYPE_CODE;
1535 l_price_adj_rec.RANGE_BREAK_QUANTITY := price_adj_rec.RANGE_BREAK_QUANTITY;
1536 l_price_adj_rec.ACCRUAL_CONVERSION_RATE := price_adj_rec.ACCRUAL_CONVERSION_RATE;
1537 l_price_adj_rec.PRICING_GROUP_SEQUENCE := price_adj_rec.PRICING_GROUP_SEQUENCE;
1538 l_price_adj_rec.ACCRUAL_FLAG := price_adj_rec.ACCRUAL_FLAG;
1539 l_price_adj_rec.LIST_LINE_NO := price_adj_rec.LIST_LINE_NO;
1540 l_price_adj_rec.SOURCE_SYSTEM_CODE := price_adj_rec.SOURCE_SYSTEM_CODE;
1541 l_price_adj_rec.BENEFIT_QTY := price_adj_rec.BENEFIT_QTY;
1542 l_price_adj_rec.BENEFIT_UOM_CODE := price_adj_rec.BENEFIT_UOM_CODE;
1543 l_price_adj_rec.PRINT_ON_INVOICE_FLAG := price_adj_rec.PRINT_ON_INVOICE_FLAG;
1544 l_price_adj_rec.EXPIRATION_DATE := price_adj_rec.EXPIRATION_DATE;
1545 l_price_adj_rec.REBATE_TRANSACTION_TYPE_CODE := price_adj_rec.REBATE_TRANSACTION_TYPE_CODE;
1546 l_price_adj_rec.REBATE_TRANSACTION_REFERENCE := price_adj_rec.REBATE_TRANSACTION_REFERENCE;
1547 l_price_adj_rec.REBATE_PAYMENT_SYSTEM_CODE := price_adj_rec.REBATE_PAYMENT_SYSTEM_CODE;
1548 l_price_adj_rec.REDEEMED_DATE := price_adj_rec.REDEEMED_DATE;
1549 l_price_adj_rec.REDEEMED_FLAG := price_adj_rec.REDEEMED_FLAG;
1550 l_price_adj_rec.MODIFIER_LEVEL_CODE := price_adj_rec.MODIFIER_LEVEL_CODE;
1551 l_price_adj_rec.PRICE_BREAK_TYPE_CODE := price_adj_rec.PRICE_BREAK_TYPE_CODE;
1552 l_price_adj_rec.SUBSTITUTION_ATTRIBUTE := price_adj_rec.SUBSTITUTION_ATTRIBUTE;
1553 l_price_adj_rec.PRORATION_TYPE_CODE := price_adj_rec.PRORATION_TYPE_CODE;
1554 l_price_adj_rec.INCLUDE_ON_RETURNS_FLAG := price_adj_rec.INCLUDE_ON_RETURNS_FLAG;
1555 l_price_adj_rec.CREDIT_OR_CHARGE_FLAG := price_adj_rec.CREDIT_OR_CHARGE_FLAG;
1556 l_price_adj_rec.ORIG_SYS_DISCOUNT_REF := price_adj_rec.ORIG_SYS_DISCOUNT_REF;
1557 l_price_adj_rec.CHANGE_REASON_CODE := price_adj_rec.CHANGE_REASON_CODE;
1558 l_price_adj_rec.CHANGE_REASON_TEXT := price_adj_rec.CHANGE_REASON_TEXT;
1559 l_price_adj_rec.COST_ID := price_adj_rec.COST_ID;
1560 --l_price_adj_rec.LIST_LINE_TYPE_CODE := price_adj_rec.LIST_LINE_TYPE_CODE;
1561 l_price_adj_rec.UPDATE_ALLOWED := price_adj_rec.UPDATE_ALLOWED;
1562 l_price_adj_rec.CHANGE_SEQUENCE := price_adj_rec.CHANGE_SEQUENCE;
1563 l_price_adj_rec.OBJECT_VERSION_NUMBER := price_adj_rec.OBJECT_VERSION_NUMBER;
1564 l_price_adj_rec.OPERAND_PER_PQTY := price_adj_rec.OPERAND_PER_PQTY;
1565 l_price_adj_rec.ADJUSTED_AMOUNT_PER_PQTY := price_adj_rec.ADJUSTED_AMOUNT_PER_PQTY;
1566
1567 l_price_adj_tbl(l_price_adj_tbl.COUNT+1) := l_price_adj_rec;
1568 END LOOP;
1569
1570 END IF;
1571 RETURN l_price_adj_tbl;
1572 END Query_Price_Adj_NonPRG_Rows;
1573
1574 /************Commenting it out for performance fix*****************************************************
1575 FUNCTION Query_Price_Adj_NonPRG_Rows (
1576 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM,
1577 P_Qte_Line_Id IN NUMBER := FND_API.G_MISS_NUM
1578 ) RETURN ASO_QUOTE_PUB.Price_Adj_Tbl_Type
1579 IS
1580 CURSOR c_price_adj IS
1581 SELECT
1582 PRICE_ADJUSTMENT_ID,
1583 CREATION_DATE,
1584 CREATED_BY,
1585 LAST_UPDATE_DATE,
1586 LAST_UPDATED_BY,
1587 LAST_UPDATE_LOGIN,
1588 PROGRAM_APPLICATION_ID,
1589 PROGRAM_ID,
1590 PROGRAM_UPDATE_DATE,
1591 REQUEST_ID,
1592 QUOTE_HEADER_ID,
1593 QUOTE_LINE_ID,
1594 MODIFIER_HEADER_ID,
1595 MODIFIER_LINE_ID,
1596 MODIFIER_LINE_TYPE_CODE,
1597 MODIFIER_MECHANISM_TYPE_CODE,
1598 MODIFIED_FROM,
1599 MODIFIED_TO,
1600 OPERAND,
1601 ARITHMETIC_OPERATOR,
1602 AUTOMATIC_FLAG,
1603 UPDATE_ALLOWABLE_FLAG,
1604 UPDATED_FLAG,
1605 APPLIED_FLAG,
1606 ON_INVOICE_FLAG,
1607 PRICING_PHASE_ID,
1608 ATTRIBUTE_CATEGORY,
1609 ATTRIBUTE1,
1610 ATTRIBUTE2,
1611 ATTRIBUTE3,
1612 ATTRIBUTE4,
1613 ATTRIBUTE5,
1614 ATTRIBUTE6,
1615 ATTRIBUTE7,
1616 ATTRIBUTE8,
1617 ATTRIBUTE9,
1618 ATTRIBUTE10,
1619 ATTRIBUTE11,
1620 ATTRIBUTE12,
1621 ATTRIBUTE13,
1622 ATTRIBUTE14,
1623 ATTRIBUTE15,
1624 ATTRIBUTE16,
1625 ATTRIBUTE17,
1626 ATTRIBUTE18,
1627 ATTRIBUTE19,
1628 ATTRIBUTE20,
1629 TAX_CODE,
1630 TAX_EXEMPT_FLAG,
1631 TAX_EXEMPT_NUMBER,
1632 TAX_EXEMPT_REASON_CODE,
1633 PARENT_ADJUSTMENT_ID,
1634 INVOICED_FLAG,
1635 ESTIMATED_FLAG,
1636 INC_IN_SALES_PERFORMANCE,
1637 SPLIT_ACTION_CODE,
1638 ADJUSTED_AMOUNT,
1639 CHARGE_TYPE_CODE,
1640 CHARGE_SUBTYPE_CODE,
1641 RANGE_BREAK_QUANTITY,
1642 ACCRUAL_CONVERSION_RATE,
1643 PRICING_GROUP_SEQUENCE,
1644 ACCRUAL_FLAG,
1645 LIST_LINE_NO,
1646 SOURCE_SYSTEM_CODE,
1647 BENEFIT_QTY,
1648 BENEFIT_UOM_CODE,
1649 PRINT_ON_INVOICE_FLAG,
1650 EXPIRATION_DATE,
1651 REBATE_TRANSACTION_TYPE_CODE,
1652 REBATE_TRANSACTION_REFERENCE,
1653 REBATE_PAYMENT_SYSTEM_CODE,
1654 REDEEMED_DATE,
1655 REDEEMED_FLAG,
1656 MODIFIER_LEVEL_CODE,
1657 PRICE_BREAK_TYPE_CODE,
1658 SUBSTITUTION_ATTRIBUTE,
1659 PRORATION_TYPE_CODE,
1660 INCLUDE_ON_RETURNS_FLAG,
1661 CREDIT_OR_CHARGE_FLAG,
1662 ORIG_SYS_DISCOUNT_REF,
1663 CHANGE_REASON_CODE,
1664 CHANGE_REASON_TEXT,
1665 COST_ID,
1666 LIST_LINE_TYPE_CODE,
1667 UPDATE_ALLOWED,
1668 CHANGE_SEQUENCE,
1669 LIST_HEADER_ID,
1670 LIST_LINE_ID,
1671 QUOTE_SHIPMENT_ID,
1672 OBJECT_VERSION_NUMBER
1673 FROM ASO_PRICE_ADJUSTMENTS
1674 WHERE quote_header_id = p_qte_header_id AND
1675 (quote_line_id = p_qte_line_id OR
1676 (quote_line_id IS NULL AND p_qte_line_id IS NULL))
1677 AND modifier_line_type_code <> 'PRG';
1678
1679 l_price_adj_rec ASO_QUOTE_PUB.Price_Adj_Rec_Type;
1680 l_price_adj_tbl ASO_QUOTE_PUB.Price_Adj_Tbl_Type;
1681
1682 BEGIN
1683 FOR price_adj_rec IN c_price_adj LOOP
1684 l_price_adj_rec.PRICE_ADJUSTMENT_ID := price_adj_rec.PRICE_ADJUSTMENT_ID;
1685 l_price_adj_rec.CREATION_DATE := price_adj_rec.CREATION_DATE;
1686 l_price_adj_rec.CREATED_BY := price_adj_rec.CREATED_BY;
1687 l_price_adj_rec.LAST_UPDATE_DATE := price_adj_rec.LAST_UPDATE_DATE;
1688 l_price_adj_rec.LAST_UPDATED_BY := price_adj_rec.LAST_UPDATED_BY;
1689 l_price_adj_rec.LAST_UPDATE_LOGIN := price_adj_rec.LAST_UPDATE_LOGIN;
1690 l_price_adj_rec.REQUEST_ID := price_adj_rec.REQUEST_ID;
1691 l_price_adj_rec.PROGRAM_APPLICATION_ID := price_adj_rec.PROGRAM_APPLICATION_ID;
1692 l_price_adj_rec.PROGRAM_ID := price_adj_rec.PROGRAM_ID;
1693 l_price_adj_rec.PROGRAM_UPDATE_DATE := price_adj_rec.PROGRAM_UPDATE_DATE;
1694 l_price_adj_rec.QUOTE_HEADER_ID := price_adj_rec.QUOTE_HEADER_ID;
1695 l_price_adj_rec.QUOTE_LINE_ID := price_adj_rec.QUOTE_LINE_ID;
1696 l_price_adj_rec.MODIFIER_HEADER_ID := price_adj_rec.MODIFIER_HEADER_ID;
1697 l_price_adj_rec.MODIFIER_LINE_ID := price_adj_rec.MODIFIER_LINE_ID;
1698 l_price_adj_rec.MODIFIER_LINE_TYPE_CODE := price_adj_rec.MODIFIER_LINE_TYPE_CODE;
1699 l_price_adj_rec.MODIFIER_MECHANISM_TYPE_CODE
1700 := price_adj_rec.MODIFIER_MECHANISM_TYPE_CODE;
1701 l_price_adj_rec.MODIFIED_FROM := price_adj_rec.MODIFIED_FROM;
1702 l_price_adj_rec.MODIFIED_TO := price_adj_rec.MODIFIED_TO;
1703 l_price_adj_rec.OPERAND := price_adj_rec.OPERAND;
1704 l_price_adj_rec.ARITHMETIC_OPERATOR := price_adj_rec.ARITHMETIC_OPERATOR;
1705 l_price_adj_rec.AUTOMATIC_FLAG := price_adj_rec.AUTOMATIC_FLAG;
1706 l_price_adj_rec.UPDATE_ALLOWABLE_FLAG := price_adj_rec.UPDATE_ALLOWABLE_FLAG;
1707 l_price_adj_rec.UPDATED_FLAG := price_adj_rec.UPDATED_FLAG;
1708 l_price_adj_rec.APPLIED_FLAG := price_adj_rec.APPLIED_FLAG;
1709 l_price_adj_rec.ON_INVOICE_FLAG := price_adj_rec.ON_INVOICE_FLAG;
1710 l_price_adj_rec.PRICING_PHASE_ID := price_adj_rec.PRICING_PHASE_ID;
1711 l_price_adj_rec.QUOTE_SHIPMENT_ID := price_adj_rec.QUOTE_SHIPMENT_ID;
1712 l_price_adj_rec.ATTRIBUTE_CATEGORY := price_adj_rec.ATTRIBUTE_CATEGORY;
1713 l_price_adj_rec.ATTRIBUTE1 := price_adj_rec.ATTRIBUTE1;
1714 l_price_adj_rec.ATTRIBUTE2 := price_adj_rec.ATTRIBUTE2;
1715 l_price_adj_rec.ATTRIBUTE3 := price_adj_rec.ATTRIBUTE3;
1716 l_price_adj_rec.ATTRIBUTE4 := price_adj_rec.ATTRIBUTE4;
1717 l_price_adj_rec.ATTRIBUTE5 := price_adj_rec.ATTRIBUTE5;
1718 l_price_adj_rec.ATTRIBUTE6 := price_adj_rec.ATTRIBUTE6;
1719 l_price_adj_rec.ATTRIBUTE7 := price_adj_rec.ATTRIBUTE7;
1720 l_price_adj_rec.ATTRIBUTE8 := price_adj_rec.ATTRIBUTE8;
1721 l_price_adj_rec.ATTRIBUTE9 := price_adj_rec.ATTRIBUTE9;
1722 l_price_adj_rec.ATTRIBUTE10 := price_adj_rec.ATTRIBUTE10;
1723 l_price_adj_rec.ATTRIBUTE11 := price_adj_rec.ATTRIBUTE11;
1724 l_price_adj_rec.ATTRIBUTE12 := price_adj_rec.ATTRIBUTE12;
1725 l_price_adj_rec.ATTRIBUTE13 := price_adj_rec.ATTRIBUTE13;
1726 l_price_adj_rec.ATTRIBUTE14 := price_adj_rec.ATTRIBUTE14;
1727 l_price_adj_rec.ATTRIBUTE15 := price_adj_rec.ATTRIBUTE15;
1728 l_price_adj_rec.ATTRIBUTE16 := price_adj_rec.ATTRIBUTE16;
1729 l_price_adj_rec.ATTRIBUTE17 := price_adj_rec.ATTRIBUTE17;
1730 l_price_adj_rec.ATTRIBUTE18 := price_adj_rec.ATTRIBUTE18;
1731 l_price_adj_rec.ATTRIBUTE19 := price_adj_rec.ATTRIBUTE19;
1732 l_price_adj_rec.ATTRIBUTE20 := price_adj_rec.ATTRIBUTE20;
1733 l_price_adj_rec.TAX_CODE := price_adj_rec.TAX_CODE;
1734 l_price_adj_rec.TAX_EXEMPT_FLAG := price_adj_rec.TAX_EXEMPT_FLAG;
1735 l_price_adj_rec.TAX_EXEMPT_NUMBER := price_adj_rec.TAX_EXEMPT_NUMBER;
1736 l_price_adj_rec.TAX_EXEMPT_REASON_CODE := price_adj_rec.TAX_EXEMPT_REASON_CODE;
1737 l_price_adj_rec.PARENT_ADJUSTMENT_ID := price_adj_rec.PARENT_ADJUSTMENT_ID;
1738 l_price_adj_rec.INVOICED_FLAG := price_adj_rec.INVOICED_FLAG;
1739 l_price_adj_rec.ESTIMATED_FLAG := price_adj_rec.ESTIMATED_FLAG;
1740 l_price_adj_rec.INC_IN_SALES_PERFORMANCE := price_adj_rec.INC_IN_SALES_PERFORMANCE;
1741 l_price_adj_rec.SPLIT_ACTION_CODE := price_adj_rec.SPLIT_ACTION_CODE;
1742 l_price_adj_rec.ADJUSTED_AMOUNT := price_adj_rec.ADJUSTED_AMOUNT;
1743 l_price_adj_rec.CHARGE_TYPE_CODE := price_adj_rec.CHARGE_TYPE_CODE;
1744 l_price_adj_rec.CHARGE_SUBTYPE_CODE := price_adj_rec.CHARGE_SUBTYPE_CODE;
1745 l_price_adj_rec.RANGE_BREAK_QUANTITY := price_adj_rec.RANGE_BREAK_QUANTITY;
1746 l_price_adj_rec.ACCRUAL_CONVERSION_RATE := price_adj_rec.ACCRUAL_CONVERSION_RATE;
1747 l_price_adj_rec.PRICING_GROUP_SEQUENCE := price_adj_rec.PRICING_GROUP_SEQUENCE;
1748 l_price_adj_rec.ACCRUAL_FLAG := price_adj_rec.ACCRUAL_FLAG;
1749 l_price_adj_rec.LIST_LINE_NO := price_adj_rec.LIST_LINE_NO;
1750 l_price_adj_rec.SOURCE_SYSTEM_CODE := price_adj_rec.SOURCE_SYSTEM_CODE;
1751 l_price_adj_rec.BENEFIT_QTY := price_adj_rec.BENEFIT_QTY;
1752 l_price_adj_rec.BENEFIT_UOM_CODE := price_adj_rec.BENEFIT_UOM_CODE;
1753 l_price_adj_rec.PRINT_ON_INVOICE_FLAG := price_adj_rec.PRINT_ON_INVOICE_FLAG;
1754 l_price_adj_rec.EXPIRATION_DATE := price_adj_rec.EXPIRATION_DATE;
1755 l_price_adj_rec.REBATE_TRANSACTION_TYPE_CODE := price_adj_rec.REBATE_TRANSACTION_TYPE_CODE;
1756 l_price_adj_rec.REBATE_TRANSACTION_REFERENCE := price_adj_rec.REBATE_TRANSACTION_REFERENCE;
1757 l_price_adj_rec.REBATE_PAYMENT_SYSTEM_CODE := price_adj_rec.REBATE_PAYMENT_SYSTEM_CODE;
1758 l_price_adj_rec.REDEEMED_DATE := price_adj_rec.REDEEMED_DATE;
1759 l_price_adj_rec.REDEEMED_FLAG := price_adj_rec.REDEEMED_FLAG;
1760 l_price_adj_rec.MODIFIER_LEVEL_CODE := price_adj_rec.MODIFIER_LEVEL_CODE;
1761 l_price_adj_rec.PRICE_BREAK_TYPE_CODE := price_adj_rec.PRICE_BREAK_TYPE_CODE;
1762 l_price_adj_rec.SUBSTITUTION_ATTRIBUTE := price_adj_rec.SUBSTITUTION_ATTRIBUTE;
1763 l_price_adj_rec.PRORATION_TYPE_CODE := price_adj_rec.PRORATION_TYPE_CODE;
1764 l_price_adj_rec.INCLUDE_ON_RETURNS_FLAG := price_adj_rec.INCLUDE_ON_RETURNS_FLAG;
1765 l_price_adj_rec.CREDIT_OR_CHARGE_FLAG := price_adj_rec.CREDIT_OR_CHARGE_FLAG;
1766 l_price_adj_rec.ORIG_SYS_DISCOUNT_REF := price_adj_rec.ORIG_SYS_DISCOUNT_REF;
1767 l_price_adj_rec.CHANGE_REASON_CODE := price_adj_rec.CHANGE_REASON_CODE;
1768 l_price_adj_rec.CHANGE_REASON_TEXT := price_adj_rec.CHANGE_REASON_TEXT;
1769 l_price_adj_rec.COST_ID := price_adj_rec.COST_ID;
1770 l_price_adj_rec.UPDATE_ALLOWED := price_adj_rec.UPDATE_ALLOWED;
1771 l_price_adj_rec.CHANGE_SEQUENCE := price_adj_rec.CHANGE_SEQUENCE;
1772 l_price_adj_rec.OBJECT_VERSION_NUMBER := price_adj_rec.OBJECT_VERSION_NUMBER;
1773 l_price_adj_tbl(l_price_adj_tbl.COUNT+1) := l_price_adj_rec;
1774 END LOOP;
1775 RETURN l_price_adj_tbl;
1776 END Query_Price_Adj_NonPRG_Rows;
1777 ************************************************************************************************************/
1778
1779
1780 FUNCTION Query_Price_Adj_Attr_Rows (
1781 p_price_adj_tbl IN ASO_QUOTE_PUB.Price_Adj_Tbl_Type
1782 ) RETURN ASO_QUOTE_PUB.Price_Adj_Attr_Tbl_Type
1783 IS
1784 CURSOR c_price_adj_attr (c_price_adj_id NUMBER) IS
1785 SELECT
1786 PRICE_ADJ_ATTRIB_ID,
1787 CREATION_DATE,
1788 CREATED_BY,
1789 LAST_UPDATE_DATE,
1790 LAST_UPDATED_BY,
1791 LAST_UPDATE_LOGIN,
1792 PROGRAM_APPLICATION_ID,
1793 PROGRAM_ID,
1794 PROGRAM_UPDATE_DATE,
1795 REQUEST_ID,
1796 PRICE_ADJUSTMENT_ID,
1797 PRICING_CONTEXT,
1798 PRICING_ATTRIBUTE,
1799 PRICING_ATTR_VALUE_FROM,
1800 PRICING_ATTR_VALUE_TO,
1801 COMPARISON_OPERATOR,
1802 FLEX_TITLE,
1803 OBJECT_VERSION_NUMBER
1804 FROM ASO_PRICE_ADJ_ATTRIBS
1805 WHERE PRICE_ADJUSTMENT_ID = c_price_adj_id;
1806 l_Price_Adj_Attr_rec ASO_QUOTE_PUB.Price_Adj_Attr_rec_Type;
1807 l_Price_Adj_Attr_Tbl ASO_QUOTE_PUB.Price_Adj_Attr_Tbl_Type;
1808 BEGIN
1809 FOR i IN 1..P_price_adj_tbl.count LOOP
1810 FOR price_adj_attr_rec IN c_price_adj_attr(P_price_adj_tbl(i).PRICE_ADJUSTMENT_ID) LOOP
1811 l_price_adj_attr_rec.PRICE_ADJ_ATTRIB_ID :=
1812 price_adj_attr_rec.PRICE_ADJ_ATTRIB_ID;
1813 l_price_adj_attr_rec.price_adj_index := i;
1814 l_price_adj_attr_rec.CREATION_DATE := price_adj_attr_rec.CREATION_DATE;
1815 l_price_adj_attr_rec.CREATED_BY := price_adj_attr_rec.CREATED_BY;
1816 l_price_adj_attr_rec.LAST_UPDATE_DATE := price_adj_attr_rec.LAST_UPDATE_DATE;
1817 l_price_adj_attr_rec.LAST_UPDATED_BY := price_adj_attr_rec.LAST_UPDATED_BY;
1818 l_price_adj_attr_rec.LAST_UPDATE_LOGIN := price_adj_attr_rec.LAST_UPDATE_LOGIN;
1819 l_price_adj_attr_rec.REQUEST_ID := price_adj_attr_rec.REQUEST_ID;
1820 l_price_adj_attr_rec.PROGRAM_APPLICATION_ID := price_adj_attr_rec.PROGRAM_APPLICATION_ID;
1821 l_price_adj_attr_rec.PROGRAM_ID := price_adj_attr_rec.PROGRAM_ID;
1822 l_price_adj_attr_rec.PROGRAM_UPDATE_DATE := price_adj_attr_rec.PROGRAM_UPDATE_DATE;
1823 l_price_adj_attr_rec.PRICE_ADJUSTMENT_ID := price_adj_attr_rec.PRICE_ADJUSTMENT_ID;
1824 l_price_adj_attr_rec.PRICING_CONTEXT := price_adj_attr_rec.PRICING_CONTEXT;
1825 l_price_adj_attr_rec.PRICING_ATTRIBUTE := price_adj_attr_rec.PRICING_ATTRIBUTE;
1826 l_price_adj_attr_rec.PRICING_ATTR_VALUE_FROM := price_adj_attr_rec.PRICING_ATTR_VALUE_FROM;
1827 l_price_adj_attr_rec.PRICING_ATTR_VALUE_TO := price_adj_attr_rec.PRICING_ATTR_VALUE_TO;
1828 l_price_adj_attr_rec.COMPARISON_OPERATOR := price_adj_attr_rec.COMPARISON_OPERATOR;
1829 l_price_adj_attr_rec.FLEX_TITLE := price_adj_attr_rec.FLEX_TITLE;
1830 l_price_adj_attr_rec.OBJECT_VERSION_NUMBER := price_adj_attr_rec.OBJECT_VERSION_NUMBER;
1831
1832 l_price_adj_attr_tbl(l_price_adj_attr_tbl.COUNT+1) := l_price_adj_attr_rec;
1833 END LOOP;
1834 END LOOP;
1835 RETURN l_price_adj_attr_tbl;
1836 END Query_Price_Adj_Attr_Rows;
1837
1838 FUNCTION Query_Payment_Rows (
1839 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM,
1840 P_Qte_Line_Id IN NUMBER := FND_API.G_MISS_NUM
1841 ) RETURN ASO_QUOTE_PUB.Payment_Tbl_Type
1842 IS
1843 CURSOR c_payment IS
1844 SELECT
1845 PAYMENT_ID,
1846 CREATION_DATE,
1847 CREATED_BY,
1848 LAST_UPDATE_DATE,
1849 LAST_UPDATED_BY,
1850 LAST_UPDATE_LOGIN,
1851 REQUEST_ID,
1852 PROGRAM_APPLICATION_ID,
1853 PROGRAM_ID,
1854 PROGRAM_UPDATE_DATE,
1855 QUOTE_HEADER_ID,
1856 QUOTE_LINE_ID,
1857 PAYMENT_TYPE_CODE,
1858 PAYMENT_REF_NUMBER,
1859 PAYMENT_OPTION,
1860 PAYMENT_TERM_ID,
1861 CREDIT_CARD_CODE,
1862 CREDIT_CARD_HOLDER_NAME,
1863 CREDIT_CARD_EXPIRATION_DATE,
1864 CREDIT_CARD_APPROVAL_CODE,
1865 CREDIT_CARD_APPROVAL_DATE,
1866 PAYMENT_AMOUNT,
1867 QUOTE_SHIPMENT_ID,
1868 ATTRIBUTE_CATEGORY,
1869 ATTRIBUTE1,
1870 ATTRIBUTE2,
1871 ATTRIBUTE3,
1872 ATTRIBUTE4,
1873 ATTRIBUTE5,
1874 ATTRIBUTE6,
1875 ATTRIBUTE7,
1876 ATTRIBUTE8,
1877 ATTRIBUTE9,
1878 ATTRIBUTE10,
1879 ATTRIBUTE11,
1880 ATTRIBUTE12,
1881 ATTRIBUTE13,
1882 ATTRIBUTE14,
1883 ATTRIBUTE15,
1884 ATTRIBUTE16,
1885 ATTRIBUTE17,
1886 ATTRIBUTE18,
1887 ATTRIBUTE19,
1888 ATTRIBUTE20,
1889 CUST_PO_NUMBER,
1890 CUST_PO_LINE_NUMBER,
1891 OBJECT_VERSION_NUMBER,
1892 TRXN_EXTENSION_ID,
1893 PAYMENT_TERM_ID_FROM
1894 FROM ASO_PAYMENTS
1895 WHERE quote_header_id = p_qte_header_id AND
1896 (quote_line_id = p_qte_line_id OR
1897 (quote_line_id IS NULL AND p_qte_line_id IS NULL));
1898 l_payment_rec ASO_QUOTE_PUB.Payment_Rec_Type;
1899 l_payment_tbl ASO_QUOTE_PUB.Payment_Tbl_Type;
1900 BEGIN
1901 FOR payment_rec IN c_payment LOOP
1902 l_payment_rec.PAYMENT_ID := payment_rec.PAYMENT_ID;
1903 l_payment_rec.CREATION_DATE := payment_rec.CREATION_DATE;
1904 l_payment_rec.CREATED_BY := payment_rec.CREATED_BY;
1905 l_payment_rec.LAST_UPDATE_DATE := payment_rec.LAST_UPDATE_DATE;
1906 l_payment_rec.LAST_UPDATED_BY := payment_rec.LAST_UPDATED_BY;
1907 l_payment_rec.LAST_UPDATE_LOGIN := payment_rec.LAST_UPDATE_LOGIN;
1908 l_payment_rec.REQUEST_ID := payment_rec.REQUEST_ID;
1909 l_payment_rec.PROGRAM_APPLICATION_ID := payment_rec.PROGRAM_APPLICATION_ID;
1910 l_payment_rec.PROGRAM_ID := payment_rec.PROGRAM_ID;
1911 l_payment_rec.PROGRAM_UPDATE_DATE := payment_rec.PROGRAM_UPDATE_DATE;
1912 l_payment_rec.QUOTE_HEADER_ID := payment_rec.QUOTE_HEADER_ID;
1913 l_payment_rec.QUOTE_LINE_ID := payment_rec.QUOTE_LINE_ID;
1914 l_payment_rec.PAYMENT_TYPE_CODE := payment_rec.PAYMENT_TYPE_CODE;
1915 -- l_payment_rec.PAYMENT_AMOUNT := payment_rec.PAYMENT_AMOUNT;
1916 l_payment_rec.PAYMENT_REF_NUMBER := payment_rec.PAYMENT_REF_NUMBER;
1917 l_payment_rec.PAYMENT_OPTION := payment_rec.PAYMENT_OPTION;
1918 l_payment_rec.PAYMENT_TERM_ID := payment_rec.PAYMENT_TERM_ID;
1919 l_payment_rec.CREDIT_CARD_CODE := payment_rec.CREDIT_CARD_CODE;
1920 l_payment_rec.CREDIT_CARD_HOLDER_NAME := payment_rec.CREDIT_CARD_HOLDER_NAME;
1921 l_payment_rec.CREDIT_CARD_EXPIRATION_DATE :=
1922 payment_rec.CREDIT_CARD_EXPIRATION_DATE;
1923 l_payment_rec.CREDIT_CARD_APPROVAL_CODE :=
1924 payment_rec.CREDIT_CARD_APPROVAL_CODE;
1925 l_payment_rec.CREDIT_CARD_APPROVAL_DATE :=
1926 payment_rec.CREDIT_CARD_APPROVAL_DATE;
1927 l_payment_rec.PAYMENT_AMOUNT := payment_rec.PAYMENT_AMOUNT;
1928 l_payment_rec.QUOTE_SHIPMENT_ID := payment_rec.QUOTE_SHIPMENT_ID;
1929 l_payment_rec.ATTRIBUTE_CATEGORY := payment_rec.ATTRIBUTE_CATEGORY;
1930 l_payment_rec.ATTRIBUTE1 := payment_rec.ATTRIBUTE1;
1931 l_payment_rec.ATTRIBUTE2 := payment_rec.ATTRIBUTE2;
1932 l_payment_rec.ATTRIBUTE3 := payment_rec.ATTRIBUTE3;
1933 l_payment_rec.ATTRIBUTE4 := payment_rec.ATTRIBUTE4;
1934 l_payment_rec.ATTRIBUTE5 := payment_rec.ATTRIBUTE5;
1935 l_payment_rec.ATTRIBUTE6 := payment_rec.ATTRIBUTE6;
1936 l_payment_rec.ATTRIBUTE7 := payment_rec.ATTRIBUTE7;
1937 l_payment_rec.ATTRIBUTE8 := payment_rec.ATTRIBUTE8;
1938 l_payment_rec.ATTRIBUTE9 := payment_rec.ATTRIBUTE9;
1939 l_payment_rec.ATTRIBUTE10 := payment_rec.ATTRIBUTE10;
1940 l_payment_rec.ATTRIBUTE11 := payment_rec.ATTRIBUTE11;
1941 l_payment_rec.ATTRIBUTE12 := payment_rec.ATTRIBUTE12;
1942 l_payment_rec.ATTRIBUTE13 := payment_rec.ATTRIBUTE13;
1943 l_payment_rec.ATTRIBUTE14 := payment_rec.ATTRIBUTE14;
1944 l_payment_rec.ATTRIBUTE15 := payment_rec.ATTRIBUTE15;
1945 l_payment_rec.ATTRIBUTE16 := payment_rec.ATTRIBUTE16;
1946 l_payment_rec.ATTRIBUTE17 := payment_rec.ATTRIBUTE17;
1947 l_payment_rec.ATTRIBUTE18 := payment_rec.ATTRIBUTE18;
1948 l_payment_rec.ATTRIBUTE19 := payment_rec.ATTRIBUTE19;
1949 l_payment_rec.ATTRIBUTE20 := payment_rec.ATTRIBUTE20;
1950 l_payment_rec.CUST_PO_NUMBER := payment_rec.CUST_PO_NUMBER;
1951 l_payment_rec.CUST_PO_LINE_NUMBER := payment_rec.CUST_PO_LINE_NUMBER; --Line Payments Change
1952 l_payment_rec.OBJECT_VERSION_NUMBER := payment_rec.OBJECT_VERSION_NUMBER;
1953 l_payment_rec.TRXN_EXTENSION_ID := payment_rec.TRXN_EXTENSION_ID;
1954 l_payment_rec.PAYMENT_TERM_ID_FROM := payment_rec.PAYMENT_TERM_ID_FROM;
1955 l_payment_tbl(l_payment_tbl.COUNT+1) := l_payment_rec;
1956 END LOOP;
1957 RETURN l_payment_tbl;
1958 END Query_Payment_Rows;
1959
1960 --Added with TAX_RATE_ID column added by Anoop Rajan on 30/08/2005 as part of eTAX
1961
1962 FUNCTION Query_Tax_Detail_Rows (
1963 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM,
1964 P_Qte_Line_Id IN NUMBER := FND_API.G_MISS_NUM,
1965 P_Shipment_Tbl IN ASO_QUOTE_PUB.Shipment_Tbl_Type
1966 ) RETURN ASO_QUOTE_PUB.Tax_Detail_Tbl_Type
1967 IS
1968 CURSOR c_tax1 IS
1969 SELECT
1970 TAX_DETAIL_ID,
1971 CREATION_DATE,
1972 CREATED_BY,
1973 LAST_UPDATE_DATE,
1974 LAST_UPDATED_BY,
1975 LAST_UPDATE_LOGIN,
1976 REQUEST_ID,
1977 PROGRAM_APPLICATION_ID,
1978 PROGRAM_ID,
1979 PROGRAM_UPDATE_DATE,
1980 QUOTE_HEADER_ID,
1981 QUOTE_LINE_ID,
1982 QUOTE_SHIPMENT_ID,
1983 ORIG_TAX_CODE,
1984 TAX_CODE,
1985 TAX_RATE,
1986 TAX_DATE,
1987 TAX_AMOUNT,
1988 TAX_EXEMPT_FLAG,
1989 TAX_EXEMPT_NUMBER,
1990 TAX_EXEMPT_REASON_CODE,
1991 ATTRIBUTE_CATEGORY,
1992 ATTRIBUTE1,
1993 ATTRIBUTE2,
1994 ATTRIBUTE3,
1995 ATTRIBUTE4,
1996 ATTRIBUTE5,
1997 ATTRIBUTE6,
1998 ATTRIBUTE7,
1999 ATTRIBUTE8,
2000 ATTRIBUTE9,
2001 ATTRIBUTE10,
2002 ATTRIBUTE11,
2003 ATTRIBUTE12,
2004 ATTRIBUTE13,
2005 ATTRIBUTE14,
2006 ATTRIBUTE15,
2007 ATTRIBUTE16,
2008 ATTRIBUTE17,
2009 ATTRIBUTE18,
2010 ATTRIBUTE19,
2011 ATTRIBUTE20,
2012 TAX_INCLUSIVE_FLAG,
2013 OBJECT_VERSION_NUMBER,
2014 TAX_RATE_ID
2015 FROM ASO_TAX_DETAILS
2016 WHERE quote_header_id = p_qte_header_id
2017 AND quote_line_id IS NULL ;
2018
2019 CURSOR c_tax2(c_shipment_id NUMBER) IS
2020 SELECT
2021 TAX_DETAIL_ID,
2022 CREATION_DATE,
2023 CREATED_BY,
2024 LAST_UPDATE_DATE,
2025 LAST_UPDATED_BY,
2026 LAST_UPDATE_LOGIN,
2027 REQUEST_ID,
2028 PROGRAM_APPLICATION_ID,
2029 PROGRAM_ID,
2030 PROGRAM_UPDATE_DATE,
2031 QUOTE_HEADER_ID,
2032 QUOTE_LINE_ID,
2033 QUOTE_SHIPMENT_ID,
2034 ORIG_TAX_CODE,
2035 TAX_CODE,
2036 TAX_RATE,
2037 TAX_DATE,
2038 TAX_AMOUNT,
2039 TAX_EXEMPT_FLAG,
2040 TAX_EXEMPT_NUMBER,
2041 TAX_EXEMPT_REASON_CODE,
2042 ATTRIBUTE_CATEGORY,
2043 ATTRIBUTE1,
2044 ATTRIBUTE2,
2045 ATTRIBUTE3,
2046 ATTRIBUTE4,
2047 ATTRIBUTE5,
2048 ATTRIBUTE6,
2049 ATTRIBUTE7,
2050 ATTRIBUTE8,
2051 ATTRIBUTE9,
2052 ATTRIBUTE10,
2053 ATTRIBUTE11,
2054 ATTRIBUTE12,
2055 ATTRIBUTE13,
2056 ATTRIBUTE14,
2057 ATTRIBUTE15,
2058 ATTRIBUTE16,
2059 ATTRIBUTE17,
2060 ATTRIBUTE18,
2061 ATTRIBUTE19,
2062 ATTRIBUTE20,
2063 TAX_INCLUSIVE_FLAG,
2064 OBJECT_VERSION_NUMBER,
2065 TAX_RATE_ID
2066 FROM ASO_TAX_DETAILS
2067 WHERE quote_shipment_id = c_shipment_id
2068 and quote_header_id = p_qte_header_id
2069 and quote_line_id IS NOT NULL
2070 AND quote_line_id = p_qte_line_id;
2071
2072 l_tax_detail_rec ASO_QUOTE_PUB.Tax_Detail_Rec_Type;
2073 l_tax_detail_tbl ASO_QUOTE_PUB.Tax_Detail_Tbl_Type;
2074 BEGIN
2075 IF P_Qte_Line_Id is NULL or P_Qte_Line_Id = FND_API.G_MISS_NUM THEN
2076
2077 FOR tax_rec IN c_tax1 LOOP
2078 l_tax_detail_rec.TAX_DETAIL_ID := tax_rec.TAX_DETAIL_ID;
2079 l_tax_detail_rec.CREATION_DATE := tax_rec.CREATION_DATE;
2080 l_tax_detail_rec.CREATED_BY := tax_rec.CREATED_BY;
2081 l_tax_detail_rec.LAST_UPDATE_DATE := tax_rec.LAST_UPDATE_DATE;
2082 l_tax_detail_rec.LAST_UPDATED_BY := tax_rec.LAST_UPDATED_BY;
2083 l_tax_detail_rec.LAST_UPDATE_LOGIN := tax_rec.LAST_UPDATE_LOGIN;
2084 l_tax_detail_rec.REQUEST_ID := tax_rec.REQUEST_ID;
2085 l_tax_detail_rec.PROGRAM_APPLICATION_ID := tax_rec.PROGRAM_APPLICATION_ID;
2086 l_tax_detail_rec.PROGRAM_ID := tax_rec.PROGRAM_ID;
2087 l_tax_detail_rec.PROGRAM_UPDATE_DATE := tax_rec.PROGRAM_UPDATE_DATE;
2088 l_tax_detail_rec.QUOTE_HEADER_ID := tax_rec.QUOTE_HEADER_ID;
2089 l_tax_detail_rec.QUOTE_LINE_ID := tax_rec.QUOTE_LINE_ID;
2090 l_tax_detail_rec.QUOTE_SHIPMENT_ID := tax_rec.QUOTE_SHIPMENT_ID;
2091 l_tax_detail_rec.ORIG_TAX_CODE := tax_rec.ORIG_TAX_CODE;
2092 l_tax_detail_rec.TAX_CODE := tax_rec.TAX_CODE;
2093 l_tax_detail_rec.TAX_RATE := tax_rec.TAX_RATE;
2094 l_tax_detail_rec.TAX_DATE := tax_rec.TAX_DATE;
2095 l_tax_detail_rec.TAX_AMOUNT := tax_rec.TAX_AMOUNT;
2096 l_tax_detail_rec.TAX_EXEMPT_FLAG := tax_rec.TAX_EXEMPT_FLAG;
2097 l_tax_detail_rec.TAX_EXEMPT_NUMBER := tax_rec.TAX_EXEMPT_NUMBER;
2098 l_tax_detail_rec.TAX_EXEMPT_REASON_CODE := tax_rec.TAX_EXEMPT_REASON_CODE;
2099 l_tax_detail_rec.ATTRIBUTE_CATEGORY := tax_rec.ATTRIBUTE_CATEGORY;
2100 l_tax_detail_rec.ATTRIBUTE1 := tax_rec.ATTRIBUTE1;
2101 l_tax_detail_rec.ATTRIBUTE2 := tax_rec.ATTRIBUTE2;
2102 l_tax_detail_rec.ATTRIBUTE3 := tax_rec.ATTRIBUTE3;
2103 l_tax_detail_rec.ATTRIBUTE4 := tax_rec.ATTRIBUTE4;
2104 l_tax_detail_rec.ATTRIBUTE5 := tax_rec.ATTRIBUTE5;
2105 l_tax_detail_rec.ATTRIBUTE6 := tax_rec.ATTRIBUTE6;
2106 l_tax_detail_rec.ATTRIBUTE7 := tax_rec.ATTRIBUTE7;
2107 l_tax_detail_rec.ATTRIBUTE8 := tax_rec.ATTRIBUTE8;
2108 l_tax_detail_rec.ATTRIBUTE9 := tax_rec.ATTRIBUTE9;
2109 l_tax_detail_rec.ATTRIBUTE10 := tax_rec.ATTRIBUTE10;
2110 l_tax_detail_rec.ATTRIBUTE11 := tax_rec.ATTRIBUTE11;
2111 l_tax_detail_rec.ATTRIBUTE12 := tax_rec.ATTRIBUTE12;
2112 l_tax_detail_rec.ATTRIBUTE13 := tax_rec.ATTRIBUTE13;
2113 l_tax_detail_rec.ATTRIBUTE14 := tax_rec.ATTRIBUTE14;
2114 l_tax_detail_rec.ATTRIBUTE15 := tax_rec.ATTRIBUTE15;
2115 l_tax_detail_rec.ATTRIBUTE16 := tax_rec.ATTRIBUTE16;
2116 l_tax_detail_rec.ATTRIBUTE17 := tax_rec.ATTRIBUTE17;
2117 l_tax_detail_rec.ATTRIBUTE18 := tax_rec.ATTRIBUTE18;
2118 l_tax_detail_rec.ATTRIBUTE19 := tax_rec.ATTRIBUTE19;
2119 l_tax_detail_rec.ATTRIBUTE20 := tax_rec.ATTRIBUTE20;
2120 l_tax_detail_rec.TAX_INCLUSIVE_FLAG := tax_rec.TAX_INCLUSIVE_FLAG;
2121 l_tax_detail_rec.OBJECT_VERSION_NUMBER := tax_rec.OBJECT_VERSION_NUMBER;
2122 l_tax_detail_rec.TAX_RATE_ID := tax_rec.TAX_RATE_ID;
2123 l_tax_detail_tbl(l_tax_detail_tbl.COUNT+1) := l_tax_detail_rec;
2124 END LOOP;
2125 ELSIF P_Qte_Line_Id is NOT NULL OR P_Qte_Line_Id <> FND_API.G_MISS_NUM THEN
2126 FOR i IN 1..P_shipment_tbl.count LOOP
2127 FOR tax_rec IN c_tax2(p_shipment_tbl(i).shipment_id) LOOP
2128 l_tax_detail_rec.TAX_DETAIL_ID := tax_rec.TAX_DETAIL_ID;
2129 l_tax_detail_rec.shipment_index := i;
2130 l_tax_detail_rec.CREATION_DATE := tax_rec.CREATION_DATE;
2131 l_tax_detail_rec.CREATED_BY := tax_rec.CREATED_BY;
2132 l_tax_detail_rec.LAST_UPDATE_DATE := tax_rec.LAST_UPDATE_DATE;
2133 l_tax_detail_rec.LAST_UPDATED_BY := tax_rec.LAST_UPDATED_BY;
2134 l_tax_detail_rec.LAST_UPDATE_LOGIN := tax_rec.LAST_UPDATE_LOGIN;
2135 l_tax_detail_rec.REQUEST_ID := tax_rec.REQUEST_ID;
2136 l_tax_detail_rec.PROGRAM_APPLICATION_ID := tax_rec.PROGRAM_APPLICATION_ID;
2137 l_tax_detail_rec.PROGRAM_ID := tax_rec.PROGRAM_ID;
2138 l_tax_detail_rec.PROGRAM_UPDATE_DATE := tax_rec.PROGRAM_UPDATE_DATE;
2139 l_tax_detail_rec.QUOTE_HEADER_ID := tax_rec.QUOTE_HEADER_ID;
2140 l_tax_detail_rec.QUOTE_LINE_ID := tax_rec.QUOTE_LINE_ID;
2141 l_tax_detail_rec.QUOTE_SHIPMENT_ID := tax_rec.QUOTE_SHIPMENT_ID;
2142 l_tax_detail_rec.ORIG_TAX_CODE := tax_rec.ORIG_TAX_CODE;
2143 l_tax_detail_rec.TAX_CODE := tax_rec.TAX_CODE;
2144 l_tax_detail_rec.TAX_RATE := tax_rec.TAX_RATE;
2145 l_tax_detail_rec.TAX_DATE := tax_rec.TAX_DATE;
2146 l_tax_detail_rec.TAX_AMOUNT := tax_rec.TAX_AMOUNT;
2147 l_tax_detail_rec.TAX_EXEMPT_FLAG := tax_rec.TAX_EXEMPT_FLAG;
2148 l_tax_detail_rec.TAX_EXEMPT_NUMBER := tax_rec.TAX_EXEMPT_NUMBER;
2149 l_tax_detail_rec.TAX_EXEMPT_REASON_CODE := tax_rec.TAX_EXEMPT_REASON_CODE;
2150 l_tax_detail_rec.ATTRIBUTE_CATEGORY := tax_rec.ATTRIBUTE_CATEGORY;
2151 l_tax_detail_rec.ATTRIBUTE1 := tax_rec.ATTRIBUTE1;
2152 l_tax_detail_rec.ATTRIBUTE2 := tax_rec.ATTRIBUTE2;
2153 l_tax_detail_rec.ATTRIBUTE3 := tax_rec.ATTRIBUTE3;
2154 l_tax_detail_rec.ATTRIBUTE4 := tax_rec.ATTRIBUTE4;
2155 l_tax_detail_rec.ATTRIBUTE5 := tax_rec.ATTRIBUTE5;
2156 l_tax_detail_rec.ATTRIBUTE6 := tax_rec.ATTRIBUTE6;
2157 l_tax_detail_rec.ATTRIBUTE7 := tax_rec.ATTRIBUTE7;
2158 l_tax_detail_rec.ATTRIBUTE8 := tax_rec.ATTRIBUTE8;
2159 l_tax_detail_rec.ATTRIBUTE9 := tax_rec.ATTRIBUTE9;
2160 l_tax_detail_rec.ATTRIBUTE10 := tax_rec.ATTRIBUTE10;
2161 l_tax_detail_rec.ATTRIBUTE11 := tax_rec.ATTRIBUTE11;
2162 l_tax_detail_rec.ATTRIBUTE12 := tax_rec.ATTRIBUTE12;
2163 l_tax_detail_rec.ATTRIBUTE13 := tax_rec.ATTRIBUTE13;
2164 l_tax_detail_rec.ATTRIBUTE14 := tax_rec.ATTRIBUTE14;
2165 l_tax_detail_rec.ATTRIBUTE15 := tax_rec.ATTRIBUTE15;
2166 l_tax_detail_rec.ATTRIBUTE16 := tax_rec.ATTRIBUTE16;
2167 l_tax_detail_rec.ATTRIBUTE17 := tax_rec.ATTRIBUTE17;
2168 l_tax_detail_rec.ATTRIBUTE18 := tax_rec.ATTRIBUTE18;
2169 l_tax_detail_rec.ATTRIBUTE19 := tax_rec.ATTRIBUTE19;
2170 l_tax_detail_rec.ATTRIBUTE20 := tax_rec.ATTRIBUTE20;
2171 l_tax_detail_rec.TAX_INCLUSIVE_FLAG := tax_rec.TAX_INCLUSIVE_FLAG;
2172 l_tax_detail_rec.OBJECT_VERSION_NUMBER := tax_rec.OBJECT_VERSION_NUMBER;
2173 l_tax_detail_rec.TAX_RATE_ID := tax_rec.TAX_RATE_ID;
2174 l_tax_detail_tbl(l_tax_detail_tbl.COUNT+1) := l_tax_detail_rec;
2175 END LOOP;
2176 END LOOP;
2177 END IF;
2178 RETURN l_tax_detail_tbl;
2179 END Query_Tax_Detail_Rows;
2180
2181 FUNCTION Query_shipment_Row (
2182 P_shipment_Id IN NUMBER
2183 ) RETURN ASO_QUOTE_PUB.shipment_rec_Type
2184 IS
2185 l_shipment_rec ASO_QUOTE_PUB.shipment_rec_Type;
2186 BEGIN
2187 Select
2188 SHIPMENT_ID,
2189 CREATION_DATE,
2190 CREATED_BY,
2191 LAST_UPDATE_DATE,
2192 LAST_UPDATED_BY,
2193 LAST_UPDATE_LOGIN,
2194 REQUEST_ID,
2195 PROGRAM_APPLICATION_ID,
2196 PROGRAM_ID,
2197 PROGRAM_UPDATE_DATE,
2198 QUOTE_HEADER_ID,
2199 QUOTE_LINE_ID,
2200 PROMISE_DATE,
2201 REQUEST_DATE,
2202 SCHEDULE_SHIP_DATE,
2203 SHIP_TO_PARTY_SITE_ID,
2204 SHIP_TO_PARTY_ID,
2205 SHIP_TO_CUST_ACCOUNT_ID,
2206 SHIP_PARTIAL_FLAG,
2207 SHIP_SET_ID,
2208 SHIP_METHOD_CODE,
2209 FREIGHT_TERMS_CODE,
2210 FREIGHT_CARRIER_CODE,
2211 FOB_CODE,
2212 SHIPPING_INSTRUCTIONS,
2213 PACKING_INSTRUCTIONS,
2214 QUANTITY,
2215 RESERVED_QUANTITY,
2216 RESERVATION_ID,
2217 ORDER_LINE_ID,
2218 SHIP_QUOTE_PRICE,
2219 ATTRIBUTE_CATEGORY,
2220 ATTRIBUTE1,
2221 ATTRIBUTE2,
2222 ATTRIBUTE3,
2223 ATTRIBUTE4,
2224 ATTRIBUTE5,
2225 ATTRIBUTE6,
2226 ATTRIBUTE7,
2227 ATTRIBUTE8,
2228 ATTRIBUTE9,
2229 ATTRIBUTE10,
2230 ATTRIBUTE11,
2231 ATTRIBUTE12,
2232 ATTRIBUTE13,
2233 ATTRIBUTE14,
2234 ATTRIBUTE15,
2235 ATTRIBUTE16,
2236 ATTRIBUTE17,
2237 ATTRIBUTE18,
2238 ATTRIBUTE19,
2239 ATTRIBUTE20,
2240 SHIPMENT_PRIORITY_CODE,
2241 SHIP_TO_CUST_PARTY_ID,
2242 REQUEST_DATE_TYPE,
2243 DEMAND_CLASS_CODE,
2244 OBJECT_VERSION_NUMBER,
2245 SHIP_METHOD_CODE_FROM,
2246 FREIGHT_TERMS_CODE_FROM
2247 INTO
2248 l_shipment_rec.SHIPMENT_ID,
2249 l_shipment_rec.CREATION_DATE,
2250 l_shipment_rec.CREATED_BY,
2251 l_shipment_rec.LAST_UPDATE_DATE,
2252 l_shipment_rec.LAST_UPDATED_BY,
2253 l_shipment_rec.LAST_UPDATE_LOGIN,
2254 l_shipment_rec.REQUEST_ID,
2255 l_shipment_rec.PROGRAM_APPLICATION_ID,
2256 l_shipment_rec.PROGRAM_ID,
2257 l_shipment_rec.PROGRAM_UPDATE_DATE,
2258 l_shipment_rec.QUOTE_HEADER_ID,
2259 l_shipment_rec.QUOTE_LINE_ID,
2260 l_shipment_rec.PROMISE_DATE,
2261 l_shipment_rec.REQUEST_DATE,
2262 l_shipment_rec.SCHEDULE_SHIP_DATE,
2263 l_shipment_rec.SHIP_TO_PARTY_SITE_ID,
2264 l_shipment_rec.SHIP_TO_PARTY_ID,
2265 l_shipment_rec.SHIP_TO_CUST_ACCOUNT_ID,
2266 l_shipment_rec.SHIP_PARTIAL_FLAG,
2267 l_shipment_rec.SHIP_SET_ID,
2268 l_shipment_rec.SHIP_METHOD_CODE,
2269 l_shipment_rec.FREIGHT_TERMS_CODE,
2270 l_shipment_rec.FREIGHT_CARRIER_CODE,
2271 l_shipment_rec.FOB_CODE,
2272 l_shipment_rec.SHIPPING_INSTRUCTIONS,
2273 l_shipment_rec.PACKING_INSTRUCTIONS,
2274 l_shipment_rec.QUANTITY,
2275 l_shipment_rec.RESERVED_QUANTITY,
2276 l_shipment_rec.RESERVATION_ID,
2277 l_shipment_rec.ORDER_LINE_ID,
2278 l_shipment_rec.SHIP_QUOTE_PRICE,
2279 l_shipment_rec.ATTRIBUTE_CATEGORY,
2280 l_shipment_rec.ATTRIBUTE1,
2281 l_shipment_rec.ATTRIBUTE2,
2282 l_shipment_rec.ATTRIBUTE3,
2283 l_shipment_rec.ATTRIBUTE4,
2284 l_shipment_rec.ATTRIBUTE5,
2285 l_shipment_rec.ATTRIBUTE6,
2286 l_shipment_rec.ATTRIBUTE7,
2287 l_shipment_rec.ATTRIBUTE8,
2288 l_shipment_rec.ATTRIBUTE9,
2289 l_shipment_rec.ATTRIBUTE10,
2290 l_shipment_rec.ATTRIBUTE11,
2291 l_shipment_rec.ATTRIBUTE12,
2292 l_shipment_rec.ATTRIBUTE13,
2293 l_shipment_rec.ATTRIBUTE14,
2294 l_shipment_rec.ATTRIBUTE15,
2295 l_shipment_rec.ATTRIBUTE16,
2296 l_shipment_rec.ATTRIBUTE17,
2297 l_shipment_rec.ATTRIBUTE18,
2298 l_shipment_rec.ATTRIBUTE19,
2299 l_shipment_rec.ATTRIBUTE20,
2300 l_shipment_rec.SHIPMENT_PRIORITY_CODE,
2301 l_shipment_rec.SHIP_TO_CUST_PARTY_ID,
2302 l_shipment_rec.REQUEST_DATE_TYPE,
2303 l_shipment_rec.DEMAND_CLASS_CODE,
2304 l_shipment_rec.OBJECT_VERSION_NUMBER,
2305 l_shipment_rec.SHIP_METHOD_CODE_FROM,
2306 l_shipment_rec.FREIGHT_TERMS_CODE_FROM
2307 FROM ASO_SHIPMENTS
2308 WHERE shipment_id = p_shipment_id;
2309 RETURN l_shipment_rec;
2310 EXCEPTION
2311 WHEN NO_DATA_FOUND THEN
2312 RAISE NO_DATA_FOUND;
2313 WHEN OTHERS THEN
2314 IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2315 FND_MESSAGE.Set_Name('ASO', 'ASO_API_ERROR_IN_QUERY');
2316 FND_MSG_PUB.ADD;
2317 END IF;
2318 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2319 END Query_Shipment_Row;
2320
2321 FUNCTION Query_Shipment_Rows (
2322 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM,
2323 P_Qte_Line_Id IN NUMBER := FND_API.G_MISS_NUM
2324 ) RETURN ASO_QUOTE_PUB.Shipment_Tbl_Type
2325 IS
2326 CURSOR c_shipment_hdr IS
2327 SELECT
2328 SHIPMENT_ID,
2329 CREATION_DATE,
2330 CREATED_BY,
2331 LAST_UPDATE_DATE,
2332 LAST_UPDATED_BY,
2333 LAST_UPDATE_LOGIN,
2334 REQUEST_ID,
2335 PROGRAM_APPLICATION_ID,
2336 PROGRAM_ID,
2337 PROGRAM_UPDATE_DATE,
2338 QUOTE_HEADER_ID,
2339 QUOTE_LINE_ID,
2340 PROMISE_DATE,
2341 REQUEST_DATE,
2342 SCHEDULE_SHIP_DATE,
2343 SHIP_TO_PARTY_SITE_ID,
2344 SHIP_TO_PARTY_ID,
2345 SHIP_TO_CUST_ACCOUNT_ID,
2346 SHIP_PARTIAL_FLAG,
2347 SHIP_SET_ID,
2348 SHIP_METHOD_CODE,
2349 FREIGHT_TERMS_CODE,
2350 FREIGHT_CARRIER_CODE,
2351 FOB_CODE,
2352 SHIPPING_INSTRUCTIONS,
2353 PACKING_INSTRUCTIONS,
2354 QUANTITY,
2355 RESERVED_QUANTITY,
2356 RESERVATION_ID,
2357 ORDER_LINE_ID,
2358 ATTRIBUTE_CATEGORY,
2359 ATTRIBUTE1,
2360 ATTRIBUTE2,
2361 ATTRIBUTE3,
2362 ATTRIBUTE4,
2363 ATTRIBUTE5,
2364 ATTRIBUTE6,
2365 ATTRIBUTE7,
2366 ATTRIBUTE8,
2367 ATTRIBUTE9,
2368 ATTRIBUTE10,
2369 ATTRIBUTE11,
2370 ATTRIBUTE12,
2371 ATTRIBUTE13,
2372 ATTRIBUTE14,
2373 ATTRIBUTE15,
2374 ATTRIBUTE16,
2375 ATTRIBUTE17,
2376 ATTRIBUTE18,
2377 ATTRIBUTE19,
2378 ATTRIBUTE20,
2379 SHIPMENT_PRIORITY_CODE,
2380 SHIP_QUOTE_PRICE,
2381 SHIP_FROM_ORG_ID,
2382 SHIP_TO_CUST_PARTY_ID,
2383 REQUEST_DATE_TYPE,
2384 DEMAND_CLASS_CODE,
2385 OBJECT_VERSION_NUMBER,
2386 SHIP_METHOD_CODE_FROM,
2387 FREIGHT_TERMS_CODE_FROM
2388 FROM ASO_SHIPMENTS
2389 WHERE quote_header_id = p_qte_header_id
2390 AND quote_line_id IS NULL;
2391
2392 CURSOR c_shipment_line IS
2393 SELECT
2394 SHIPMENT_ID,
2395 CREATION_DATE,
2396 CREATED_BY,
2397 LAST_UPDATE_DATE,
2398 LAST_UPDATED_BY,
2399 LAST_UPDATE_LOGIN,
2400 REQUEST_ID,
2401 PROGRAM_APPLICATION_ID,
2402 PROGRAM_ID,
2403 PROGRAM_UPDATE_DATE,
2404 QUOTE_HEADER_ID,
2405 QUOTE_LINE_ID,
2406 PROMISE_DATE,
2407 REQUEST_DATE,
2408 SCHEDULE_SHIP_DATE,
2409 SHIP_TO_PARTY_SITE_ID,
2410 SHIP_TO_PARTY_ID,
2411 SHIP_TO_CUST_ACCOUNT_ID,
2412 SHIP_PARTIAL_FLAG,
2413 SHIP_SET_ID,
2414 SHIP_METHOD_CODE,
2415 FREIGHT_TERMS_CODE,
2416 FREIGHT_CARRIER_CODE,
2417 FOB_CODE,
2418 SHIPPING_INSTRUCTIONS,
2419 PACKING_INSTRUCTIONS,
2420 QUANTITY,
2421 RESERVED_QUANTITY,
2422 RESERVATION_ID,
2423 ORDER_LINE_ID,
2424 ATTRIBUTE_CATEGORY,
2425 ATTRIBUTE1,
2426 ATTRIBUTE2,
2427 ATTRIBUTE3,
2428 ATTRIBUTE4,
2429 ATTRIBUTE5,
2430 ATTRIBUTE6,
2431 ATTRIBUTE7,
2432 ATTRIBUTE8,
2433 ATTRIBUTE9,
2434 ATTRIBUTE10,
2435 ATTRIBUTE11,
2436 ATTRIBUTE12,
2437 ATTRIBUTE13,
2438 ATTRIBUTE14,
2439 ATTRIBUTE15,
2440 ATTRIBUTE16,
2441 ATTRIBUTE17,
2442 ATTRIBUTE18,
2443 ATTRIBUTE19,
2444 ATTRIBUTE20,
2445 SHIPMENT_PRIORITY_CODE,
2446 SHIP_QUOTE_PRICE,
2447 SHIP_FROM_ORG_ID,
2448 SHIP_TO_CUST_PARTY_ID,
2449 REQUEST_DATE_TYPE,
2450 DEMAND_CLASS_CODE,
2451 OBJECT_VERSION_NUMBER,
2452 SHIP_METHOD_CODE_FROM,
2453 FREIGHT_TERMS_CODE_FROM
2454
2455 FROM ASO_SHIPMENTS
2456 WHERE quote_header_id = p_qte_header_id
2457 AND quote_line_id IS NOT NULL
2458 AND quote_line_id = p_qte_line_id;
2459
2460 l_shipment_rec ASO_QUOTE_PUB.Shipment_Rec_Type;
2461 l_shipment_tbl ASO_QUOTE_PUB.Shipment_Tbl_Type;
2462 BEGIN
2463 IF P_Qte_Line_Id is NULL or P_Qte_Line_Id = FND_API.G_MISS_NUM THEN
2464 FOR shipment_rec IN c_shipment_hdr LOOP
2465 l_shipment_rec.SHIPMENT_ID := shipment_rec.SHIPMENT_ID;
2466 l_shipment_rec.CREATION_DATE := shipment_rec.CREATION_DATE;
2467 l_shipment_rec.CREATED_BY := shipment_rec.CREATED_BY;
2468 l_shipment_rec.LAST_UPDATE_DATE := shipment_rec.LAST_UPDATE_DATE;
2469 l_shipment_rec.LAST_UPDATED_BY := shipment_rec.LAST_UPDATED_BY;
2470 l_shipment_rec.LAST_UPDATE_LOGIN := shipment_rec.LAST_UPDATE_LOGIN;
2471 l_shipment_rec.REQUEST_ID := shipment_rec.REQUEST_ID;
2472 l_shipment_rec.PROGRAM_APPLICATION_ID := shipment_rec.PROGRAM_APPLICATION_ID;
2473 l_shipment_rec.PROGRAM_ID := shipment_rec.PROGRAM_ID;
2474 l_shipment_rec.PROGRAM_UPDATE_DATE := shipment_rec.PROGRAM_UPDATE_DATE;
2475 l_shipment_rec.QUOTE_HEADER_ID := shipment_rec.QUOTE_HEADER_ID;
2476 l_shipment_rec.QUOTE_LINE_ID := shipment_rec.QUOTE_LINE_ID;
2477 l_shipment_rec.PROMISE_DATE := shipment_rec.PROMISE_DATE;
2478 l_shipment_rec.REQUEST_DATE := shipment_rec.REQUEST_DATE;
2479 l_shipment_rec.SCHEDULE_SHIP_DATE := shipment_rec.SCHEDULE_SHIP_DATE;
2480 l_shipment_rec.SHIP_TO_PARTY_SITE_ID := shipment_rec.SHIP_TO_PARTY_SITE_ID;
2481 l_shipment_rec.SHIP_TO_PARTY_ID := shipment_rec.SHIP_TO_PARTY_ID;
2482 l_shipment_rec.SHIP_TO_CUST_ACCOUNT_ID := shipment_rec.SHIP_TO_CUST_ACCOUNT_ID;
2483 l_shipment_rec.SHIP_PARTIAL_FLAG := shipment_rec.SHIP_PARTIAL_FLAG;
2484 l_shipment_rec.SHIP_SET_ID := shipment_rec.SHIP_SET_ID;
2485 l_shipment_rec.SHIP_METHOD_CODE := shipment_rec.SHIP_METHOD_CODE;
2486 l_shipment_rec.FREIGHT_TERMS_CODE := shipment_rec.FREIGHT_TERMS_CODE;
2487 l_shipment_rec.FREIGHT_CARRIER_CODE := shipment_rec.FREIGHT_CARRIER_CODE;
2488 l_shipment_rec.FOB_CODE := shipment_rec.FOB_CODE;
2489 l_shipment_rec.SHIPPING_INSTRUCTIONS := shipment_rec.SHIPPING_INSTRUCTIONS;
2490 l_shipment_rec.PACKING_INSTRUCTIONS := shipment_rec.PACKING_INSTRUCTIONS;
2491 l_shipment_rec.QUANTITY := shipment_rec.QUANTITY;
2492 l_shipment_rec.RESERVED_QUANTITY := shipment_rec.RESERVED_QUANTITY;
2493 l_shipment_rec.RESERVATION_ID := shipment_rec.RESERVATION_ID;
2494 l_shipment_rec.ORDER_LINE_ID := shipment_rec.ORDER_LINE_ID;
2495 l_shipment_rec.ATTRIBUTE_CATEGORY := shipment_rec.ATTRIBUTE_CATEGORY;
2496 l_shipment_rec.ATTRIBUTE1 := shipment_rec.ATTRIBUTE1;
2497 l_shipment_rec.ATTRIBUTE2 := shipment_rec.ATTRIBUTE2;
2498 l_shipment_rec.ATTRIBUTE3 := shipment_rec.ATTRIBUTE3;
2499 l_shipment_rec.ATTRIBUTE4 := shipment_rec.ATTRIBUTE4;
2500 l_shipment_rec.ATTRIBUTE5 := shipment_rec.ATTRIBUTE5;
2501 l_shipment_rec.ATTRIBUTE6 := shipment_rec.ATTRIBUTE6;
2502 l_shipment_rec.ATTRIBUTE7 := shipment_rec.ATTRIBUTE7;
2503 l_shipment_rec.ATTRIBUTE8 := shipment_rec.ATTRIBUTE8;
2504 l_shipment_rec.ATTRIBUTE9 := shipment_rec.ATTRIBUTE9;
2505 l_shipment_rec.ATTRIBUTE10 := shipment_rec.ATTRIBUTE10;
2506 l_shipment_rec.ATTRIBUTE11 := shipment_rec.ATTRIBUTE11;
2507 l_shipment_rec.ATTRIBUTE12 := shipment_rec.ATTRIBUTE12;
2508 l_shipment_rec.ATTRIBUTE13 := shipment_rec.ATTRIBUTE13;
2509 l_shipment_rec.ATTRIBUTE14 := shipment_rec.ATTRIBUTE14;
2510 l_shipment_rec.ATTRIBUTE15 := shipment_rec.ATTRIBUTE15;
2511 l_shipment_rec.ATTRIBUTE16 := shipment_rec.ATTRIBUTE16;
2512 l_shipment_rec.ATTRIBUTE17 := shipment_rec.ATTRIBUTE17;
2513 l_shipment_rec.ATTRIBUTE18 := shipment_rec.ATTRIBUTE18;
2514 l_shipment_rec.ATTRIBUTE19 := shipment_rec.ATTRIBUTE19;
2515 l_shipment_rec.ATTRIBUTE20 := shipment_rec.ATTRIBUTE20;
2516 l_shipment_rec.SHIPMENT_PRIORITY_CODE := shipment_rec.SHIPMENT_PRIORITY_CODE;
2517 l_shipment_rec.SHIP_QUOTE_PRICE := shipment_rec.SHIP_QUOTE_PRICE;
2518 l_shipment_rec.SHIP_FROM_ORG_ID := shipment_rec.SHIP_FROM_ORG_ID;
2519 l_shipment_rec.SHIP_TO_CUST_PARTY_ID := shipment_rec.SHIP_TO_CUST_PARTY_ID;
2520 l_shipment_rec.REQUEST_DATE_TYPE := shipment_rec.REQUEST_DATE_TYPE;
2521 l_shipment_rec.DEMAND_CLASS_CODE := shipment_rec.DEMAND_CLASS_CODE;
2522 l_shipment_rec.OBJECT_VERSION_NUMBER := shipment_rec.OBJECT_VERSION_NUMBER;
2523 l_shipment_rec.SHIP_METHOD_CODE_FROM := shipment_rec.SHIP_METHOD_CODE_FROM;
2524 l_shipment_rec.FREIGHT_TERMS_CODE_FROM := shipment_rec.FREIGHT_TERMS_CODE_FROM;
2525 l_shipment_tbl(l_shipment_tbl.COUNT+1) := l_shipment_rec;
2526 END LOOP;
2527 ELSIF (P_Qte_Line_Id is NOT NULL and P_Qte_Line_Id <> FND_API.G_MISS_NUM) THEN
2528 FOR shipment_rec IN c_shipment_line LOOP
2529 l_shipment_rec.SHIPMENT_ID := shipment_rec.SHIPMENT_ID;
2530 l_shipment_rec.CREATION_DATE := shipment_rec.CREATION_DATE;
2531 l_shipment_rec.CREATED_BY := shipment_rec.CREATED_BY;
2532 l_shipment_rec.LAST_UPDATE_DATE := shipment_rec.LAST_UPDATE_DATE;
2533 l_shipment_rec.LAST_UPDATED_BY := shipment_rec.LAST_UPDATED_BY;
2534 l_shipment_rec.LAST_UPDATE_LOGIN := shipment_rec.LAST_UPDATE_LOGIN;
2535 l_shipment_rec.REQUEST_ID := shipment_rec.REQUEST_ID;
2536 l_shipment_rec.PROGRAM_APPLICATION_ID := shipment_rec.PROGRAM_APPLICATION_ID;
2537 l_shipment_rec.PROGRAM_ID := shipment_rec.PROGRAM_ID;
2538 l_shipment_rec.PROGRAM_UPDATE_DATE := shipment_rec.PROGRAM_UPDATE_DATE;
2539 l_shipment_rec.QUOTE_HEADER_ID := shipment_rec.QUOTE_HEADER_ID;
2540 l_shipment_rec.QUOTE_LINE_ID := shipment_rec.QUOTE_LINE_ID;
2541 l_shipment_rec.PROMISE_DATE := shipment_rec.PROMISE_DATE;
2542 l_shipment_rec.REQUEST_DATE := shipment_rec.REQUEST_DATE;
2543 l_shipment_rec.SCHEDULE_SHIP_DATE := shipment_rec.SCHEDULE_SHIP_DATE;
2544 l_shipment_rec.SHIP_TO_PARTY_SITE_ID := shipment_rec.SHIP_TO_PARTY_SITE_ID;
2545 l_shipment_rec.SHIP_TO_PARTY_ID := shipment_rec.SHIP_TO_PARTY_ID;
2546 l_shipment_rec.SHIP_TO_CUST_ACCOUNT_ID := shipment_rec.SHIP_TO_CUST_ACCOUNT_ID;
2547 l_shipment_rec.SHIP_PARTIAL_FLAG := shipment_rec.SHIP_PARTIAL_FLAG;
2548 l_shipment_rec.SHIP_SET_ID := shipment_rec.SHIP_SET_ID;
2549 l_shipment_rec.SHIP_METHOD_CODE := shipment_rec.SHIP_METHOD_CODE;
2550 l_shipment_rec.FREIGHT_TERMS_CODE := shipment_rec.FREIGHT_TERMS_CODE;
2551 l_shipment_rec.FREIGHT_CARRIER_CODE := shipment_rec.FREIGHT_CARRIER_CODE;
2552 l_shipment_rec.FOB_CODE := shipment_rec.FOB_CODE;
2553 l_shipment_rec.SHIPPING_INSTRUCTIONS := shipment_rec.SHIPPING_INSTRUCTIONS;
2554 l_shipment_rec.PACKING_INSTRUCTIONS := shipment_rec.PACKING_INSTRUCTIONS;
2555 l_shipment_rec.QUANTITY := shipment_rec.QUANTITY;
2556 l_shipment_rec.RESERVED_QUANTITY := shipment_rec.RESERVED_QUANTITY;
2557 l_shipment_rec.RESERVATION_ID := shipment_rec.RESERVATION_ID;
2558 l_shipment_rec.ORDER_LINE_ID := shipment_rec.ORDER_LINE_ID;
2559 l_shipment_rec.ATTRIBUTE_CATEGORY := shipment_rec.ATTRIBUTE_CATEGORY;
2560 l_shipment_rec.ATTRIBUTE1 := shipment_rec.ATTRIBUTE1;
2561 l_shipment_rec.ATTRIBUTE2 := shipment_rec.ATTRIBUTE2;
2562 l_shipment_rec.ATTRIBUTE3 := shipment_rec.ATTRIBUTE3;
2563 l_shipment_rec.ATTRIBUTE4 := shipment_rec.ATTRIBUTE4;
2564 l_shipment_rec.ATTRIBUTE5 := shipment_rec.ATTRIBUTE5;
2565 l_shipment_rec.ATTRIBUTE6 := shipment_rec.ATTRIBUTE6;
2566 l_shipment_rec.ATTRIBUTE7 := shipment_rec.ATTRIBUTE7;
2567 l_shipment_rec.ATTRIBUTE8 := shipment_rec.ATTRIBUTE8;
2568 l_shipment_rec.ATTRIBUTE9 := shipment_rec.ATTRIBUTE9;
2569 l_shipment_rec.ATTRIBUTE10 := shipment_rec.ATTRIBUTE10;
2570 l_shipment_rec.ATTRIBUTE11 := shipment_rec.ATTRIBUTE11;
2571 l_shipment_rec.ATTRIBUTE12 := shipment_rec.ATTRIBUTE12;
2572 l_shipment_rec.ATTRIBUTE13 := shipment_rec.ATTRIBUTE13;
2573 l_shipment_rec.ATTRIBUTE14 := shipment_rec.ATTRIBUTE14;
2574 l_shipment_rec.ATTRIBUTE15 := shipment_rec.ATTRIBUTE15;
2575 l_shipment_rec.ATTRIBUTE16 := shipment_rec.ATTRIBUTE16;
2576 l_shipment_rec.ATTRIBUTE17 := shipment_rec.ATTRIBUTE17;
2577 l_shipment_rec.ATTRIBUTE18 := shipment_rec.ATTRIBUTE18;
2578 l_shipment_rec.ATTRIBUTE19 := shipment_rec.ATTRIBUTE19;
2579 l_shipment_rec.ATTRIBUTE20 := shipment_rec.ATTRIBUTE20;
2580 l_shipment_rec.SHIPMENT_PRIORITY_CODE := shipment_rec.SHIPMENT_PRIORITY_CODE;
2581 l_shipment_rec.SHIP_QUOTE_PRICE := shipment_rec.SHIP_QUOTE_PRICE;
2582 l_shipment_rec.SHIP_FROM_ORG_ID := shipment_rec.SHIP_FROM_ORG_ID;
2583 l_shipment_rec.SHIP_TO_CUST_PARTY_ID := shipment_rec.SHIP_TO_CUST_PARTY_ID;
2584 l_shipment_rec.REQUEST_DATE_TYPE := shipment_rec.REQUEST_DATE_TYPE;
2585 l_shipment_rec.DEMAND_CLASS_CODE := shipment_rec.DEMAND_CLASS_CODE;
2586 l_shipment_rec.OBJECT_VERSION_NUMBER := shipment_rec.OBJECT_VERSION_NUMBER;
2587 l_shipment_rec.SHIP_METHOD_CODE_FROM := shipment_rec.SHIP_METHOD_CODE_FROM;
2588 l_shipment_rec.FREIGHT_TERMS_CODE_FROM := shipment_rec.FREIGHT_TERMS_CODE_FROM;
2589 l_shipment_tbl(l_shipment_tbl.COUNT+1) := l_shipment_rec;
2590 END LOOP;
2591 END IF;
2592
2593 RETURN l_shipment_tbl;
2594 END Query_Shipment_Rows;
2595
2596 FUNCTION Query_Line_Shipment_Row_atp (
2597 P_Qte_Header_Id IN NUMBER,
2598 P_Qte_Line_Id IN NUMBER
2599 ) RETURN ASO_QUOTE_PUB.Shipment_Rec_Type
2600 IS
2601 CURSOR c_shipment IS
2602 SELECT
2603 SHIPMENT_ID,
2604 CREATION_DATE,
2605 CREATED_BY,
2606 LAST_UPDATE_DATE,
2607 LAST_UPDATED_BY,
2608 LAST_UPDATE_LOGIN,
2609 REQUEST_ID,
2610 PROGRAM_APPLICATION_ID,
2611 PROGRAM_ID,
2612 PROGRAM_UPDATE_DATE,
2613 QUOTE_HEADER_ID,
2614 QUOTE_LINE_ID,
2615 PROMISE_DATE,
2616 REQUEST_DATE,
2617 SCHEDULE_SHIP_DATE,
2618 SHIP_TO_PARTY_SITE_ID,
2619 SHIP_TO_PARTY_ID,
2620 SHIP_TO_CUST_ACCOUNT_ID,
2621 SHIP_PARTIAL_FLAG,
2622 SHIP_SET_ID,
2623 SHIP_METHOD_CODE,
2624 FREIGHT_TERMS_CODE,
2625 FREIGHT_CARRIER_CODE,
2626 FOB_CODE,
2627 SHIPPING_INSTRUCTIONS,
2628 PACKING_INSTRUCTIONS,
2629 QUANTITY,
2630 RESERVED_QUANTITY,
2631 RESERVATION_ID,
2632 ORDER_LINE_ID,
2633 ATTRIBUTE_CATEGORY,
2634 ATTRIBUTE1,
2635 ATTRIBUTE2,
2636 ATTRIBUTE3,
2637 ATTRIBUTE4,
2638 ATTRIBUTE5,
2639 ATTRIBUTE6,
2640 ATTRIBUTE7,
2641 ATTRIBUTE8,
2642 ATTRIBUTE9,
2643 ATTRIBUTE10,
2644 ATTRIBUTE11,
2645 ATTRIBUTE12,
2646 ATTRIBUTE13,
2647 ATTRIBUTE14,
2648 ATTRIBUTE15,
2649 ATTRIBUTE16,
2650 ATTRIBUTE17,
2651 ATTRIBUTE18,
2652 ATTRIBUTE19,
2653 ATTRIBUTE20,
2654 SHIPMENT_PRIORITY_CODE,
2655 SHIP_QUOTE_PRICE,
2656 SHIP_FROM_ORG_ID,
2657 SHIP_TO_CUST_PARTY_ID,
2658 REQUEST_DATE_TYPE,
2659 DEMAND_CLASS_CODE,
2660 OBJECT_VERSION_NUMBER,
2661 SHIP_METHOD_CODE_FROM,
2662 FREIGHT_TERMS_CODE_FROM
2663
2664 FROM ASO_SHIPMENTS
2665 WHERE quote_header_id = p_qte_header_id
2666 AND quote_line_id = p_qte_line_id;
2667
2668 l_shipment_rec ASO_QUOTE_PUB.Shipment_Rec_Type;
2669 BEGIN
2670
2671 FOR shipment_rec IN c_shipment LOOP
2672
2673 l_shipment_rec.SHIPMENT_ID := shipment_rec.SHIPMENT_ID;
2674 l_shipment_rec.CREATION_DATE := shipment_rec.CREATION_DATE;
2675 l_shipment_rec.CREATED_BY := shipment_rec.CREATED_BY;
2676 l_shipment_rec.LAST_UPDATE_DATE := shipment_rec.LAST_UPDATE_DATE;
2677 l_shipment_rec.LAST_UPDATED_BY := shipment_rec.LAST_UPDATED_BY;
2678 l_shipment_rec.LAST_UPDATE_LOGIN := shipment_rec.LAST_UPDATE_LOGIN;
2679 l_shipment_rec.REQUEST_ID := shipment_rec.REQUEST_ID;
2680 l_shipment_rec.PROGRAM_APPLICATION_ID := shipment_rec.PROGRAM_APPLICATION_ID;
2681 l_shipment_rec.PROGRAM_ID := shipment_rec.PROGRAM_ID;
2682 l_shipment_rec.PROGRAM_UPDATE_DATE := shipment_rec.PROGRAM_UPDATE_DATE;
2683 l_shipment_rec.QUOTE_HEADER_ID := shipment_rec.QUOTE_HEADER_ID;
2684 l_shipment_rec.QUOTE_LINE_ID := shipment_rec.QUOTE_LINE_ID;
2685 l_shipment_rec.PROMISE_DATE := shipment_rec.PROMISE_DATE;
2686 l_shipment_rec.REQUEST_DATE := shipment_rec.REQUEST_DATE;
2687 l_shipment_rec.SCHEDULE_SHIP_DATE := shipment_rec.SCHEDULE_SHIP_DATE;
2688 l_shipment_rec.SHIP_TO_PARTY_SITE_ID := shipment_rec.SHIP_TO_PARTY_SITE_ID;
2689 l_shipment_rec.SHIP_TO_PARTY_ID := shipment_rec.SHIP_TO_PARTY_ID;
2690 l_shipment_rec.SHIP_TO_CUST_ACCOUNT_ID := shipment_rec.SHIP_TO_CUST_ACCOUNT_ID;
2691 l_shipment_rec.SHIP_PARTIAL_FLAG := shipment_rec.SHIP_PARTIAL_FLAG;
2692 l_shipment_rec.SHIP_SET_ID := shipment_rec.SHIP_SET_ID;
2693 l_shipment_rec.SHIP_METHOD_CODE := shipment_rec.SHIP_METHOD_CODE;
2694 l_shipment_rec.FREIGHT_TERMS_CODE := shipment_rec.FREIGHT_TERMS_CODE;
2695 l_shipment_rec.FREIGHT_CARRIER_CODE := shipment_rec.FREIGHT_CARRIER_CODE;
2696 l_shipment_rec.FOB_CODE := shipment_rec.FOB_CODE;
2697 l_shipment_rec.SHIPPING_INSTRUCTIONS := shipment_rec.SHIPPING_INSTRUCTIONS;
2698 l_shipment_rec.PACKING_INSTRUCTIONS := shipment_rec.PACKING_INSTRUCTIONS;
2699 l_shipment_rec.QUANTITY := shipment_rec.QUANTITY;
2700 l_shipment_rec.RESERVED_QUANTITY := shipment_rec.RESERVED_QUANTITY;
2701 l_shipment_rec.RESERVATION_ID := shipment_rec.RESERVATION_ID;
2702 l_shipment_rec.ORDER_LINE_ID := shipment_rec.ORDER_LINE_ID;
2703 l_shipment_rec.ATTRIBUTE_CATEGORY := shipment_rec.ATTRIBUTE_CATEGORY;
2704 l_shipment_rec.ATTRIBUTE1 := shipment_rec.ATTRIBUTE1;
2705 l_shipment_rec.ATTRIBUTE2 := shipment_rec.ATTRIBUTE2;
2706 l_shipment_rec.ATTRIBUTE3 := shipment_rec.ATTRIBUTE3;
2707 l_shipment_rec.ATTRIBUTE4 := shipment_rec.ATTRIBUTE4;
2708 l_shipment_rec.ATTRIBUTE5 := shipment_rec.ATTRIBUTE5;
2709 l_shipment_rec.ATTRIBUTE6 := shipment_rec.ATTRIBUTE6;
2710 l_shipment_rec.ATTRIBUTE7 := shipment_rec.ATTRIBUTE7;
2711 l_shipment_rec.ATTRIBUTE8 := shipment_rec.ATTRIBUTE8;
2712 l_shipment_rec.ATTRIBUTE9 := shipment_rec.ATTRIBUTE9;
2713 l_shipment_rec.ATTRIBUTE10 := shipment_rec.ATTRIBUTE10;
2714 l_shipment_rec.ATTRIBUTE11 := shipment_rec.ATTRIBUTE11;
2715 l_shipment_rec.ATTRIBUTE12 := shipment_rec.ATTRIBUTE12;
2716 l_shipment_rec.ATTRIBUTE13 := shipment_rec.ATTRIBUTE13;
2717 l_shipment_rec.ATTRIBUTE14 := shipment_rec.ATTRIBUTE14;
2718 l_shipment_rec.ATTRIBUTE15 := shipment_rec.ATTRIBUTE15;
2719 l_shipment_rec.ATTRIBUTE16 := shipment_rec.ATTRIBUTE16;
2720 l_shipment_rec.ATTRIBUTE17 := shipment_rec.ATTRIBUTE17;
2721 l_shipment_rec.ATTRIBUTE18 := shipment_rec.ATTRIBUTE18;
2722 l_shipment_rec.ATTRIBUTE19 := shipment_rec.ATTRIBUTE19;
2723 l_shipment_rec.ATTRIBUTE20 := shipment_rec.ATTRIBUTE20;
2724 l_shipment_rec.SHIPMENT_PRIORITY_CODE := shipment_rec.SHIPMENT_PRIORITY_CODE;
2725 l_shipment_rec.SHIP_QUOTE_PRICE := shipment_rec.SHIP_QUOTE_PRICE;
2726 l_shipment_rec.SHIP_FROM_ORG_ID := shipment_rec.SHIP_FROM_ORG_ID;
2727 l_shipment_rec.SHIP_TO_CUST_PARTY_ID := shipment_rec.SHIP_TO_CUST_PARTY_ID;
2728 l_shipment_rec.REQUEST_DATE_TYPE := shipment_rec.REQUEST_DATE_TYPE;
2729 l_shipment_rec.DEMAND_CLASS_CODE := shipment_rec.DEMAND_CLASS_CODE;
2730 l_shipment_rec.OBJECT_VERSION_NUMBER := shipment_rec.OBJECT_VERSION_NUMBER;
2731 l_shipment_rec.SHIP_METHOD_CODE_FROM := shipment_rec.SHIP_METHOD_CODE_FROM;
2732 l_shipment_rec.FREIGHT_TERMS_CODE_FROM := shipment_rec.FREIGHT_TERMS_CODE_FROM;
2733 END LOOP;
2734
2735 RETURN l_shipment_rec;
2736
2737 END Query_Line_Shipment_Row_atp;
2738
2739 FUNCTION Query_Freight_Charge_Rows (
2740 P_Shipment_Tbl IN ASO_QUOTE_PUB.Shipment_Tbl_Type
2741 ) RETURN ASO_QUOTE_PUB.Freight_Charge_Tbl_Type
2742 IS
2743 CURSOR c_freight_charge (c_shipment_id NUMBER) IS
2744 SELECT
2745 FREIGHT_CHARGE_ID,
2746 CREATION_DATE,
2747 CREATED_BY,
2748 LAST_UPDATE_DATE,
2749 LAST_UPDATED_BY,
2750 LAST_UPDATE_LOGIN,
2751 REQUEST_ID,
2752 PROGRAM_APPLICATION_ID,
2753 PROGRAM_ID,
2754 PROGRAM_UPDATE_DATE,
2755 QUOTE_SHIPMENT_ID,
2756 FREIGHT_CHARGE_TYPE_ID,
2757 CHARGE_AMOUNT,
2758 ATTRIBUTE_CATEGORY,
2759 ATTRIBUTE1,
2760 ATTRIBUTE2,
2761 ATTRIBUTE3,
2762 ATTRIBUTE4,
2763 ATTRIBUTE5,
2764 ATTRIBUTE6,
2765 ATTRIBUTE7,
2766 ATTRIBUTE8,
2767 ATTRIBUTE9,
2768 ATTRIBUTE10,
2769 ATTRIBUTE11,
2770 ATTRIBUTE12,
2771 ATTRIBUTE13,
2772 ATTRIBUTE14,
2773 ATTRIBUTE15
2774 FROM ASO_FREIGHT_CHARGES
2775 WHERE quote_shipment_id = c_shipment_id;
2776 l_freight_charge_rec ASO_QUOTE_PUB.Freight_Charge_Rec_Type;
2777 l_freight_charge_tbl ASO_QUOTE_PUB.Freight_Charge_Tbl_Type;
2778 BEGIN
2779 FOR i IN 1..P_shipment_tbl.count LOOP
2780 FOR freight_charge_rec IN c_freight_charge(P_shipment_tbl(i).shipment_id) LOOP
2781 l_freight_charge_rec.FREIGHT_CHARGE_ID :=
2782 freight_charge_rec.FREIGHT_CHARGE_ID;
2783 l_freight_charge_rec.shipment_index := i;
2784 l_freight_charge_rec.CREATION_DATE := freight_charge_rec.CREATION_DATE;
2785 l_freight_charge_rec.CREATED_BY := freight_charge_rec.CREATED_BY;
2786 l_freight_charge_rec.LAST_UPDATE_DATE := freight_charge_rec.LAST_UPDATE_DATE;
2787 l_freight_charge_rec.LAST_UPDATED_BY := freight_charge_rec.LAST_UPDATED_BY;
2788 l_freight_charge_rec.LAST_UPDATE_LOGIN := freight_charge_rec.LAST_UPDATE_LOGIN;
2789 l_freight_charge_rec.REQUEST_ID := freight_charge_rec.REQUEST_ID;
2790 l_freight_charge_rec.PROGRAM_APPLICATION_ID := freight_charge_rec.PROGRAM_APPLICATION_ID;
2791 l_freight_charge_rec.PROGRAM_ID := freight_charge_rec.PROGRAM_ID;
2792 l_freight_charge_rec.PROGRAM_UPDATE_DATE := freight_charge_rec.PROGRAM_UPDATE_DATE;
2793 l_freight_charge_rec.QUOTE_SHIPMENT_ID :=
2794 freight_charge_rec.QUOTE_SHIPMENT_ID;
2795
2796 l_freight_charge_rec.CHARGE_AMOUNT := freight_charge_rec.CHARGE_AMOUNT;
2797 l_freight_charge_rec.FREIGHT_CHARGE_TYPE_ID :=
2798 freight_charge_rec.FREIGHT_CHARGE_TYPE_ID;
2799 l_freight_charge_rec.ATTRIBUTE1 := freight_charge_rec.ATTRIBUTE1;
2800 l_freight_charge_rec.ATTRIBUTE2 := freight_charge_rec.ATTRIBUTE2;
2801 l_freight_charge_rec.ATTRIBUTE3 := freight_charge_rec.ATTRIBUTE3;
2802 l_freight_charge_rec.ATTRIBUTE4 := freight_charge_rec.ATTRIBUTE4;
2803 l_freight_charge_rec.ATTRIBUTE5 := freight_charge_rec.ATTRIBUTE5;
2804 l_freight_charge_rec.ATTRIBUTE6 := freight_charge_rec.ATTRIBUTE6;
2805 l_freight_charge_rec.ATTRIBUTE7 := freight_charge_rec.ATTRIBUTE7;
2806 l_freight_charge_rec.ATTRIBUTE8 := freight_charge_rec.ATTRIBUTE8;
2807 l_freight_charge_rec.ATTRIBUTE9 := freight_charge_rec.ATTRIBUTE9;
2808 l_freight_charge_rec.ATTRIBUTE10 := freight_charge_rec.ATTRIBUTE10;
2809 l_freight_charge_rec.ATTRIBUTE11 := freight_charge_rec.ATTRIBUTE11;
2810 l_freight_charge_rec.ATTRIBUTE12 := freight_charge_rec.ATTRIBUTE12;
2811 l_freight_charge_rec.ATTRIBUTE13 := freight_charge_rec.ATTRIBUTE13;
2812 l_freight_charge_rec.ATTRIBUTE14 := freight_charge_rec.ATTRIBUTE14;
2813 l_freight_charge_rec.ATTRIBUTE15 := freight_charge_rec.ATTRIBUTE15;
2814 l_freight_charge_tbl(l_freight_charge_tbl.COUNT+1) := l_freight_charge_rec;
2815 END LOOP;
2816 END LOOP;
2817 RETURN l_freight_charge_tbl;
2818 END Query_Freight_Charge_Rows;
2819
2820 FUNCTION Query_Sales_Credit_Row (
2821 P_Sales_Credit_Id IN NUMBER
2822 ) RETURN ASO_QUOTE_PUB.Sales_Credit_rec_Type
2823 IS
2824 l_sales_credit_rec ASO_QUOTE_PUB.Sales_Credit_rec_Type;
2825 l_sales_credit_tbl ASO_QUOTE_PUB.Sales_Credit_tbl_Type;
2826
2827 CURSOR C1 IS
2828 SELECT
2829 CREATION_DATE,
2830 CREATED_BY,
2831 LAST_UPDATED_BY,
2832 LAST_UPDATE_DATE,
2833 LAST_UPDATE_LOGIN,
2834 REQUEST_ID,
2835 PROGRAM_APPLICATION_ID,
2836 PROGRAM_ID,
2837 PROGRAM_UPDATE_DATE,
2838 SALES_CREDIT_ID,
2839 QUOTE_HEADER_ID,
2840 QUOTE_LINE_ID,
2841 PERCENT,
2842 RESOURCE_ID,
2843 RESOURCE_GROUP_ID,
2844 EMPLOYEE_PERSON_ID,
2845 SALES_CREDIT_TYPE_ID,
2846 ATTRIBUTE_CATEGORY_CODE,
2847 ATTRIBUTE1,
2848 ATTRIBUTE2,
2849 ATTRIBUTE3,
2850 ATTRIBUTE4,
2851 ATTRIBUTE5,
2852 ATTRIBUTE6,
2853 ATTRIBUTE7,
2854 ATTRIBUTE8,
2855 ATTRIBUTE9,
2856 ATTRIBUTE10,
2857 ATTRIBUTE11,
2858 ATTRIBUTE12,
2859 ATTRIBUTE13,
2860 ATTRIBUTE14,
2861 ATTRIBUTE15,
2862 ATTRIBUTE16,
2863 ATTRIBUTE17,
2864 ATTRIBUTE18,
2865 ATTRIBUTE19,
2866 ATTRIBUTE20,
2867 OBJECT_VERSION_NUMBER,
2868 SYSTEM_ASSIGNED_FLAG,
2869 CREDIT_RULE_ID
2870 FROM ASO_SALES_CREDITS
2871 WHERE SALES_CREDIT_ID = P_Sales_Credit_Id;
2872 BEGIN
2873 FOR sales_rec IN c1 LOOP
2874 --dbms_output.put_line('Inside Sales');
2875 l_sales_credit_rec.CREATION_DATE := sales_rec.CREATION_DATE;
2876 l_sales_credit_rec.CREATED_BY := sales_rec.CREATED_BY;
2877 l_sales_credit_rec.LAST_UPDATED_BY := sales_rec.LAST_UPDATED_BY;
2878 l_sales_credit_rec.LAST_UPDATE_DATE := sales_rec.LAST_UPDATE_DATE;
2879 l_sales_credit_rec.LAST_UPDATE_LOGIN := sales_rec.LAST_UPDATE_LOGIN;
2880 l_sales_credit_rec.REQUEST_ID := sales_rec.REQUEST_ID;
2881 l_sales_credit_rec.PROGRAM_APPLICATION_ID := sales_rec.PROGRAM_APPLICATION_ID;
2882 l_sales_credit_rec.PROGRAM_ID := sales_rec.PROGRAM_ID;
2883 l_sales_credit_rec.PROGRAM_UPDATE_DATE := sales_rec.PROGRAM_UPDATE_DATE;
2884 l_sales_credit_rec.SALES_CREDIT_ID := sales_rec.SALES_CREDIT_ID;
2885 l_sales_credit_rec.QUOTE_HEADER_ID := sales_rec.QUOTE_HEADER_ID;
2886 l_sales_credit_rec.QUOTE_LINE_ID := sales_rec.QUOTE_LINE_ID;
2887 l_sales_credit_rec.PERCENT := sales_rec.PERCENT;
2888 l_sales_credit_rec.RESOURCE_ID := sales_rec.RESOURCE_ID;
2889 l_sales_credit_rec.RESOURCE_GROUP_ID := sales_rec.RESOURCE_GROUP_ID;
2890 l_sales_credit_rec.EMPLOYEE_PERSON_ID := sales_rec.EMPLOYEE_PERSON_ID;
2891 l_sales_credit_rec.SALES_CREDIT_TYPE_ID := sales_rec.SALES_CREDIT_TYPE_ID;
2892 l_sales_credit_rec.ATTRIBUTE_CATEGORY_CODE := sales_rec.ATTRIBUTE_CATEGORY_CODE;
2893 l_sales_credit_rec.ATTRIBUTE1 := sales_rec.ATTRIBUTE1;
2894 l_sales_credit_rec.ATTRIBUTE2 := sales_rec.ATTRIBUTE2;
2895 l_sales_credit_rec.ATTRIBUTE3 := sales_rec.ATTRIBUTE3;
2896 l_sales_credit_rec.ATTRIBUTE4 := sales_rec.ATTRIBUTE4;
2897 l_sales_credit_rec.ATTRIBUTE5 := sales_rec.ATTRIBUTE5;
2898 l_sales_credit_rec.ATTRIBUTE6 := sales_rec.ATTRIBUTE6;
2899 l_sales_credit_rec.ATTRIBUTE7 := sales_rec.ATTRIBUTE7;
2900 l_sales_credit_rec.ATTRIBUTE8 := sales_rec.ATTRIBUTE8;
2901 l_sales_credit_rec.ATTRIBUTE9 := sales_rec.ATTRIBUTE9;
2902 l_sales_credit_rec.ATTRIBUTE10 := sales_rec.ATTRIBUTE10;
2903 l_sales_credit_rec.ATTRIBUTE11 := sales_rec.ATTRIBUTE11;
2904 l_sales_credit_rec.ATTRIBUTE12 := sales_rec.ATTRIBUTE12;
2905 l_sales_credit_rec.ATTRIBUTE13 := sales_rec.ATTRIBUTE13;
2906 l_sales_credit_rec.ATTRIBUTE14 := sales_rec.ATTRIBUTE14;
2907 l_sales_credit_rec.ATTRIBUTE15 := sales_rec.ATTRIBUTE15;
2908 l_sales_credit_rec.ATTRIBUTE16 := sales_rec.ATTRIBUTE16;
2909 l_sales_credit_rec.ATTRIBUTE17 := sales_rec.ATTRIBUTE17;
2910 l_sales_credit_rec.ATTRIBUTE18 := sales_rec.ATTRIBUTE18;
2911 l_sales_credit_rec.ATTRIBUTE19 := sales_rec.ATTRIBUTE19;
2912 l_sales_credit_rec.ATTRIBUTE20 := sales_rec.ATTRIBUTE20;
2913 l_sales_credit_rec.SYSTEM_ASSIGNED_FLAG := sales_rec.SYSTEM_ASSIGNED_FLAG;
2914 l_sales_credit_rec.CREDIT_RULE_ID := sales_rec.CREDIT_RULE_ID;
2915 l_sales_credit_rec.OBJECT_VERSION_NUMBER := sales_rec.OBJECT_VERSION_NUMBER;
2916 END LOOP;
2917 RETURN l_sales_credit_rec;
2918 END Query_Sales_Credit_Row;
2919
2920 FUNCTION Query_Sales_Credit_Row (
2921 P_qte_header_Id IN NUMBER,
2922 p_qte_line_id IN NUMBER
2923 ) RETURN ASO_QUOTE_PUB.Sales_Credit_tbl_Type
2924 IS
2925 l_sales_credit_rec ASO_QUOTE_PUB.Sales_Credit_rec_Type;
2926 l_sales_credit_tbl ASO_QUOTE_PUB.Sales_Credit_tbl_Type;
2927
2928 CURSOR C1 IS
2929 SELECT
2930 CREATION_DATE,
2931 CREATED_BY,
2932 LAST_UPDATED_BY,
2933 LAST_UPDATE_DATE,
2934 LAST_UPDATE_LOGIN,
2935 REQUEST_ID,
2936 PROGRAM_APPLICATION_ID,
2937 PROGRAM_ID,
2938 PROGRAM_UPDATE_DATE,
2939 SALES_CREDIT_ID,
2940 QUOTE_HEADER_ID,
2941 QUOTE_LINE_ID,
2942 PERCENT,
2943 RESOURCE_ID,
2944 RESOURCE_GROUP_ID,
2945 EMPLOYEE_PERSON_ID,
2946 SALES_CREDIT_TYPE_ID,
2947 ATTRIBUTE_CATEGORY_CODE,
2948 ATTRIBUTE1,
2949 ATTRIBUTE2,
2950 ATTRIBUTE3,
2951 ATTRIBUTE4,
2952 ATTRIBUTE5,
2953 ATTRIBUTE6,
2954 ATTRIBUTE7,
2955 ATTRIBUTE8,
2956 ATTRIBUTE9,
2957 ATTRIBUTE10,
2958 ATTRIBUTE11,
2959 ATTRIBUTE12,
2960 ATTRIBUTE13,
2961 ATTRIBUTE14,
2962 ATTRIBUTE15,
2963 ATTRIBUTE16,
2964 ATTRIBUTE17,
2965 ATTRIBUTE18,
2966 ATTRIBUTE19,
2967 ATTRIBUTE20,
2968 OBJECT_VERSION_NUMBER,
2969 SYSTEM_ASSIGNED_FLAG,
2970 CREDIT_RULE_ID
2971 FROM ASO_SALES_CREDITS
2972 WHERE quote_header_id = p_qte_header_id AND
2973 ((quote_line_id = p_qte_line_id) OR (quote_line_id IS NULL AND p_qte_line_id IS NULL));
2974 BEGIN
2975 FOR sales_rec IN c1 LOOP
2976 --dbms_output.put_line('Inside Sales');
2977 l_sales_credit_rec.CREATION_DATE := sales_rec.CREATION_DATE;
2978 l_sales_credit_rec.CREATED_BY := sales_rec.CREATED_BY;
2979 l_sales_credit_rec.LAST_UPDATED_BY := sales_rec.LAST_UPDATED_BY;
2980 l_sales_credit_rec.LAST_UPDATE_DATE := sales_rec.LAST_UPDATE_DATE;
2981 l_sales_credit_rec.LAST_UPDATE_LOGIN := sales_rec.LAST_UPDATE_LOGIN;
2982 l_sales_credit_rec.REQUEST_ID := sales_rec.REQUEST_ID;
2983 l_sales_credit_rec.PROGRAM_APPLICATION_ID := sales_rec.PROGRAM_APPLICATION_ID;
2984 l_sales_credit_rec.PROGRAM_ID := sales_rec.PROGRAM_ID;
2985 l_sales_credit_rec.PROGRAM_UPDATE_DATE := sales_rec.PROGRAM_UPDATE_DATE;
2986 l_sales_credit_rec.SALES_CREDIT_ID := sales_rec.SALES_CREDIT_ID;
2987 l_sales_credit_rec.QUOTE_HEADER_ID := sales_rec.QUOTE_HEADER_ID;
2988 l_sales_credit_rec.QUOTE_LINE_ID := sales_rec.QUOTE_LINE_ID;
2989 l_sales_credit_rec.PERCENT := sales_rec.PERCENT;
2990 l_sales_credit_rec.RESOURCE_ID := sales_rec.RESOURCE_ID;
2991 l_sales_credit_rec.RESOURCE_GROUP_ID := sales_rec.RESOURCE_GROUP_ID;
2992 l_sales_credit_rec.EMPLOYEE_PERSON_ID := sales_rec.EMPLOYEE_PERSON_ID;
2993 l_sales_credit_rec.SALES_CREDIT_TYPE_ID := sales_rec.SALES_CREDIT_TYPE_ID;
2994 l_sales_credit_rec.ATTRIBUTE_CATEGORY_CODE := sales_rec.ATTRIBUTE_CATEGORY_CODE;
2995 l_sales_credit_rec.ATTRIBUTE1 := sales_rec.ATTRIBUTE1;
2996 l_sales_credit_rec.ATTRIBUTE2 := sales_rec.ATTRIBUTE2;
2997 l_sales_credit_rec.ATTRIBUTE3 := sales_rec.ATTRIBUTE3;
2998 l_sales_credit_rec.ATTRIBUTE4 := sales_rec.ATTRIBUTE4;
2999 l_sales_credit_rec.ATTRIBUTE5 := sales_rec.ATTRIBUTE5;
3000 l_sales_credit_rec.ATTRIBUTE6 := sales_rec.ATTRIBUTE6;
3001 l_sales_credit_rec.ATTRIBUTE7 := sales_rec.ATTRIBUTE7;
3002 l_sales_credit_rec.ATTRIBUTE8 := sales_rec.ATTRIBUTE8;
3003 l_sales_credit_rec.ATTRIBUTE9 := sales_rec.ATTRIBUTE9;
3004 l_sales_credit_rec.ATTRIBUTE10 := sales_rec.ATTRIBUTE10;
3005 l_sales_credit_rec.ATTRIBUTE11 := sales_rec.ATTRIBUTE11;
3006 l_sales_credit_rec.ATTRIBUTE12 := sales_rec.ATTRIBUTE12;
3007 l_sales_credit_rec.ATTRIBUTE13 := sales_rec.ATTRIBUTE13;
3008 l_sales_credit_rec.ATTRIBUTE14 := sales_rec.ATTRIBUTE14;
3009 l_sales_credit_rec.ATTRIBUTE15 := sales_rec.ATTRIBUTE15;
3010 l_sales_credit_rec.ATTRIBUTE16 := sales_rec.ATTRIBUTE16;
3011 l_sales_credit_rec.ATTRIBUTE17 := sales_rec.ATTRIBUTE17;
3012 l_sales_credit_rec.ATTRIBUTE18 := sales_rec.ATTRIBUTE18;
3013 l_sales_credit_rec.ATTRIBUTE19 := sales_rec.ATTRIBUTE19;
3014 l_sales_credit_rec.ATTRIBUTE20 := sales_rec.ATTRIBUTE20;
3015 l_sales_credit_rec.SYSTEM_ASSIGNED_FLAG := sales_rec.SYSTEM_ASSIGNED_FLAG;
3016 l_sales_credit_rec.CREDIT_RULE_ID := sales_rec.CREDIT_RULE_ID;
3017
3018 l_sales_credit_rec.OBJECT_VERSION_NUMBER := sales_rec.OBJECT_VERSION_NUMBER;
3019 l_sales_credit_tbl(l_sales_credit_tbl.COUNT+1) := l_sales_credit_rec;
3020 END LOOP;
3021 RETURN l_sales_credit_tbl;
3022 END Query_Sales_Credit_Row;
3023
3024
3025 FUNCTION Query_Quote_Party_Row (
3026 P_Quote_Party_Id IN NUMBER
3027 ) RETURN ASO_QUOTE_PUB.QUOTE_PARTY_rec_Type
3028 IS
3029 l_quote_party_rec ASO_QUOTE_PUB.QUOTE_PARTY_rec_Type;
3030 l_quote_party_tbl ASO_QUOTE_PUB.QUOTE_PARTY_tbl_Type;
3031
3032 CURSOR C1 is
3033 SELECT QUOTE_PARTY_ID,
3034 CREATION_DATE,
3035 CREATED_BY,
3036 LAST_UPDATE_DATE,
3037 LAST_UPDATE_LOGIN,
3038 LAST_UPDATED_BY,
3039 REQUEST_ID,
3040 PROGRAM_APPLICATION_ID,
3041 PROGRAM_ID,
3042 PROGRAM_UPDATE_DATE,
3043 QUOTE_HEADER_ID,
3044 QUOTE_LINE_ID,
3045 QUOTE_SHIPMENT_ID,
3046 PARTY_TYPE,
3047 PARTY_ID,
3048 PARTY_OBJECT_TYPE,
3049 PARTY_OBJECT_ID,
3050 ATTRIBUTE_CATEGORY,
3051 ATTRIBUTE1,
3052 ATTRIBUTE2,
3053 ATTRIBUTE3,
3054 ATTRIBUTE4,
3055 ATTRIBUTE5,
3056 ATTRIBUTE6,
3057 ATTRIBUTE7,
3058 ATTRIBUTE8,
3059 ATTRIBUTE9,
3060 ATTRIBUTE10,
3061 ATTRIBUTE11,
3062 ATTRIBUTE12,
3063 ATTRIBUTE13,
3064 ATTRIBUTE14,
3065 ATTRIBUTE15
3066 FROM ASO_QUOTE_PARTIES WHERE
3067 QUOTE_PARTY_ID= P_Quote_Party_Id;
3068
3069 BEGIN
3070 FOR qpt_rec in C1 LOOP
3071 l_quote_party_rec.QUOTE_PARTY_ID := qpt_rec.QUOTE_PARTY_ID;
3072 l_quote_party_rec.CREATION_DATE := qpt_rec.CREATION_DATE;
3073 l_quote_party_rec.CREATED_BY := qpt_rec.CREATED_BY;
3074 l_quote_party_rec.LAST_UPDATE_DATE := qpt_rec.LAST_UPDATE_DATE;
3075 l_quote_party_rec.LAST_UPDATE_LOGIN := qpt_rec.LAST_UPDATE_LOGIN;
3076 l_quote_party_rec.LAST_UPDATED_BY := qpt_rec.LAST_UPDATED_BY;
3077 l_quote_party_rec.REQUEST_ID := qpt_rec.REQUEST_ID;
3078 l_quote_party_rec.PROGRAM_APPLICATION_ID := qpt_rec.PROGRAM_APPLICATION_ID;
3079 l_quote_party_rec.PROGRAM_ID := qpt_rec.PROGRAM_ID;
3080 l_quote_party_rec.PROGRAM_UPDATE_DATE := qpt_rec.PROGRAM_UPDATE_DATE;
3081 l_quote_party_rec.QUOTE_HEADER_ID := qpt_rec.QUOTE_HEADER_ID;
3082 l_quote_party_rec.QUOTE_LINE_ID := qpt_rec.QUOTE_LINE_ID;
3083 l_quote_party_rec.QUOTE_SHIPMENT_ID := qpt_rec.QUOTE_SHIPMENT_ID;
3084 l_quote_party_rec.PARTY_TYPE := qpt_rec.PARTY_TYPE;
3085 l_quote_party_rec.PARTY_ID := qpt_rec.PARTY_ID;
3086 l_quote_party_rec.PARTY_OBJECT_TYPE := qpt_rec.PARTY_OBJECT_TYPE;
3087 l_quote_party_rec.PARTY_OBJECT_ID := qpt_rec.PARTY_OBJECT_ID;
3088 l_quote_party_rec.ATTRIBUTE_CATEGORY := qpt_rec.ATTRIBUTE_CATEGORY;
3089 l_quote_party_rec.ATTRIBUTE1 := qpt_rec.ATTRIBUTE1;
3090 l_quote_party_rec.ATTRIBUTE2 := qpt_rec.ATTRIBUTE2;
3091 l_quote_party_rec.ATTRIBUTE3 := qpt_rec.ATTRIBUTE3;
3092 l_quote_party_rec.ATTRIBUTE4 := qpt_rec.ATTRIBUTE4;
3093 l_quote_party_rec.ATTRIBUTE5 := qpt_rec.ATTRIBUTE5;
3094 l_quote_party_rec.ATTRIBUTE6 := qpt_rec.ATTRIBUTE6;
3095 l_quote_party_rec.ATTRIBUTE7 := qpt_rec.ATTRIBUTE7;
3096 l_quote_party_rec.ATTRIBUTE8 := qpt_rec.ATTRIBUTE8;
3097 l_quote_party_rec.ATTRIBUTE9 := qpt_rec.ATTRIBUTE9;
3098 l_quote_party_rec.ATTRIBUTE10 := qpt_rec.ATTRIBUTE10;
3099 l_quote_party_rec.ATTRIBUTE11 := qpt_rec.ATTRIBUTE11;
3100 l_quote_party_rec.ATTRIBUTE12 := qpt_rec.ATTRIBUTE12;
3101 l_quote_party_rec.ATTRIBUTE13 := qpt_rec.ATTRIBUTE13;
3102 l_quote_party_rec.ATTRIBUTE14 := qpt_rec.ATTRIBUTE14;
3103 l_quote_party_rec.ATTRIBUTE15 := qpt_rec.ATTRIBUTE15;
3104 END LOOP;
3105 RETURN l_quote_party_rec;
3106
3107 END Query_Quote_Party_Row;
3108
3109
3110 FUNCTION Query_Quote_Party_Row (
3111 P_Qte_header_Id IN NUMBER,
3112 P_Qte_line_Id IN NUMBER
3113 ) RETURN ASO_QUOTE_PUB.QUOTE_PARTY_tbl_Type
3114 IS
3115 l_quote_party_rec ASO_QUOTE_PUB.QUOTE_PARTY_rec_Type;
3116 l_quote_party_tbl ASO_QUOTE_PUB.QUOTE_PARTY_tbl_Type;
3117
3118 CURSOR C1 is
3119 SELECT QUOTE_PARTY_ID,
3120 CREATION_DATE,
3121 CREATED_BY,
3122 LAST_UPDATE_DATE,
3123 LAST_UPDATE_LOGIN,
3124 LAST_UPDATED_BY,
3125 REQUEST_ID,
3126 PROGRAM_APPLICATION_ID,
3127 PROGRAM_ID,
3128 PROGRAM_UPDATE_DATE,
3129 QUOTE_HEADER_ID,
3130 QUOTE_LINE_ID,
3131 QUOTE_SHIPMENT_ID,
3132 PARTY_TYPE,
3133 PARTY_ID,
3134 PARTY_OBJECT_TYPE,
3135 PARTY_OBJECT_ID,
3136 ATTRIBUTE_CATEGORY,
3137 ATTRIBUTE1,
3138 ATTRIBUTE2,
3139 ATTRIBUTE3,
3140 ATTRIBUTE4,
3141 ATTRIBUTE5,
3142 ATTRIBUTE6,
3143 ATTRIBUTE7,
3144 ATTRIBUTE8,
3145 ATTRIBUTE9,
3146 ATTRIBUTE10,
3147 ATTRIBUTE11,
3148 ATTRIBUTE12,
3149 ATTRIBUTE13,
3150 ATTRIBUTE14,
3151 ATTRIBUTE15
3152 FROM ASO_QUOTE_PARTIES WHERE quote_header_id = p_qte_header_id AND
3153 ((quote_line_id = p_qte_line_id) OR (quote_line_id IS NULL AND p_qte_line_id IS NULL));
3154
3155 BEGIN
3156 FOR qpt_rec in C1 LOOP
3157 l_quote_party_rec.QUOTE_PARTY_ID := qpt_rec.QUOTE_PARTY_ID;
3158 l_quote_party_rec.CREATION_DATE := qpt_rec.CREATION_DATE;
3159 l_quote_party_rec.CREATED_BY := qpt_rec.CREATED_BY;
3160 l_quote_party_rec.LAST_UPDATE_DATE := qpt_rec.LAST_UPDATE_DATE;
3161 l_quote_party_rec.LAST_UPDATE_LOGIN := qpt_rec.LAST_UPDATE_LOGIN;
3162 l_quote_party_rec.LAST_UPDATED_BY := qpt_rec.LAST_UPDATED_BY;
3163 l_quote_party_rec.REQUEST_ID := qpt_rec.REQUEST_ID;
3164 l_quote_party_rec.PROGRAM_APPLICATION_ID := qpt_rec.PROGRAM_APPLICATION_ID;
3165 l_quote_party_rec.PROGRAM_ID := qpt_rec.PROGRAM_ID;
3166 l_quote_party_rec.PROGRAM_UPDATE_DATE := qpt_rec.PROGRAM_UPDATE_DATE;
3167 l_quote_party_rec.QUOTE_HEADER_ID := qpt_rec.QUOTE_HEADER_ID;
3168 l_quote_party_rec.QUOTE_LINE_ID := qpt_rec.QUOTE_LINE_ID;
3169 l_quote_party_rec.QUOTE_SHIPMENT_ID := qpt_rec.QUOTE_SHIPMENT_ID;
3170 l_quote_party_rec.PARTY_TYPE := qpt_rec.PARTY_TYPE;
3171 l_quote_party_rec.PARTY_ID := qpt_rec.PARTY_ID;
3172 l_quote_party_rec.PARTY_OBJECT_TYPE := qpt_rec.PARTY_OBJECT_TYPE;
3173 l_quote_party_rec.PARTY_OBJECT_ID := qpt_rec.PARTY_OBJECT_ID;
3174 l_quote_party_rec.ATTRIBUTE_CATEGORY := qpt_rec.ATTRIBUTE_CATEGORY;
3175 l_quote_party_rec.ATTRIBUTE1 := qpt_rec.ATTRIBUTE1;
3176 l_quote_party_rec.ATTRIBUTE2 := qpt_rec.ATTRIBUTE2;
3177 l_quote_party_rec.ATTRIBUTE3 := qpt_rec.ATTRIBUTE3;
3178 l_quote_party_rec.ATTRIBUTE4 := qpt_rec.ATTRIBUTE4;
3179 l_quote_party_rec.ATTRIBUTE5 := qpt_rec.ATTRIBUTE5;
3180 l_quote_party_rec.ATTRIBUTE6 := qpt_rec.ATTRIBUTE6;
3181 l_quote_party_rec.ATTRIBUTE7 := qpt_rec.ATTRIBUTE7;
3182 l_quote_party_rec.ATTRIBUTE8 := qpt_rec.ATTRIBUTE8;
3183 l_quote_party_rec.ATTRIBUTE9 := qpt_rec.ATTRIBUTE9;
3184 l_quote_party_rec.ATTRIBUTE10 := qpt_rec.ATTRIBUTE10;
3185 l_quote_party_rec.ATTRIBUTE11 := qpt_rec.ATTRIBUTE11;
3186 l_quote_party_rec.ATTRIBUTE12 := qpt_rec.ATTRIBUTE12;
3187 l_quote_party_rec.ATTRIBUTE13 := qpt_rec.ATTRIBUTE13;
3188 l_quote_party_rec.ATTRIBUTE14 := qpt_rec.ATTRIBUTE14;
3189 l_quote_party_rec.ATTRIBUTE15 := qpt_rec.ATTRIBUTE15;
3190 l_quote_party_tbl(l_quote_party_tbl.COUNT+1) := l_quote_party_rec;
3191 END LOOP;
3192 RETURN l_quote_party_tbl;
3193
3194 END Query_Quote_Party_Row;
3195
3196
3197
3198
3199 FUNCTION Query_Qte_Line_Row (
3200 P_Qte_Line_Id IN NUMBER
3201 ) RETURN ASO_QUOTE_PUB.qte_line_rec_Type
3202 IS
3203 l_qte_line_rec ASO_QUOTE_PUB.qte_line_rec_Type;
3204 BEGIN
3205 Select
3206 QUOTE_LINE_ID,
3207 CREATION_DATE,
3208 CREATED_BY,
3209 LAST_UPDATE_DATE,
3210 LAST_UPDATED_BY,
3211 LAST_UPDATE_LOGIN,
3212 REQUEST_ID,
3213 PROGRAM_APPLICATION_ID,
3214 PROGRAM_ID,
3215 PROGRAM_UPDATE_DATE,
3216 QUOTE_HEADER_ID,
3217 ORG_ID,
3218 LINE_CATEGORY_CODE,
3219 ITEM_TYPE_CODE,
3220 LINE_NUMBER,
3221 START_DATE_ACTIVE,
3222 END_DATE_ACTIVE,
3223 ORDER_LINE_TYPE_ID,
3224 INVOICE_TO_PARTY_SITE_ID,
3225 INVOICE_TO_PARTY_ID,
3226 INVOICE_TO_CUST_ACCOUNT_ID,
3227 ORGANIZATION_ID,
3228 INVENTORY_ITEM_ID,
3229 QUANTITY,
3230 UOM_CODE,
3231 MARKETING_SOURCE_CODE_ID,
3232 PRICE_LIST_ID,
3233 PRICE_LIST_LINE_ID,
3234 CURRENCY_CODE,
3235 LINE_LIST_PRICE,
3236 LINE_ADJUSTED_AMOUNT,
3237 LINE_ADJUSTED_PERCENT,
3238 LINE_QUOTE_PRICE,
3239 RELATED_ITEM_ID,
3240 ITEM_RELATIONSHIP_TYPE,
3241 ACCOUNTING_RULE_ID,
3242 INVOICING_RULE_ID,
3243 SPLIT_SHIPMENT_FLAG,
3244 BACKORDER_FLAG,
3245 MINISITE_ID,
3246 SECTION_ID,
3247 ATTRIBUTE_CATEGORY,
3248 ATTRIBUTE1,
3249 ATTRIBUTE2,
3250 ATTRIBUTE3,
3251 ATTRIBUTE4,
3252 ATTRIBUTE5,
3253 ATTRIBUTE6,
3254 ATTRIBUTE7,
3255 ATTRIBUTE8,
3256 ATTRIBUTE9,
3257 ATTRIBUTE10,
3258 ATTRIBUTE11,
3259 ATTRIBUTE12,
3260 ATTRIBUTE13,
3261 ATTRIBUTE14,
3262 ATTRIBUTE15,
3263 ATTRIBUTE16,
3264 ATTRIBUTE17,
3265 ATTRIBUTE18,
3266 ATTRIBUTE19,
3267 ATTRIBUTE20,
3268 PRICED_PRICE_LIST_ID,
3269 AGREEMENT_ID,
3270 COMMITMENT_ID,
3271 DISPLAY_ARITHMETIC_OPERATOR,
3272 SERVICE_ITEM_FLAG,
3273 SERVICEABLE_PRODUCT_FLAG,
3274 INVOICE_TO_CUST_PARTY_ID,
3275 SELLING_PRICE_CHANGE,
3276 RECALCULATE_FLAG,
3277 PRICING_LINE_TYPE_INDICATOR,
3278 END_CUSTOMER_PARTY_ID,
3279 END_CUSTOMER_PARTY_SITE_ID,
3280 END_CUSTOMER_CUST_ACCOUNT_ID,
3281 END_CUSTOMER_CUST_PARTY_ID,
3282 SHIP_MODEL_COMPLETE_FLAG,
3283 CHARGE_PERIODICITY_CODE,
3284 OBJECT_VERSION_NUMBER,
3285 PRICING_QUANTITY_UOM,
3286 PRICING_QUANTITY,
3287 CONFIG_MODEL_TYPE
3288 /*,
3289 -- ER 12879412
3290 PRODUCT_FISC_CLASSIFICATION,
3291 TRX_BUSINESS_CATEGORY*/
3292 INTO
3293 l_qte_line_rec.QUOTE_LINE_ID,
3294 l_qte_line_rec.CREATION_DATE,
3295 l_qte_line_rec.CREATED_BY,
3296 l_qte_line_rec.LAST_UPDATE_DATE,
3297 l_qte_line_rec.LAST_UPDATED_BY,
3298 l_qte_line_rec.LAST_UPDATE_LOGIN,
3299 l_qte_line_rec.REQUEST_ID,
3300 l_qte_line_rec.PROGRAM_APPLICATION_ID,
3301 l_qte_line_rec.PROGRAM_ID,
3302 l_qte_line_rec.PROGRAM_UPDATE_DATE,
3303 l_qte_line_rec.QUOTE_HEADER_ID,
3304 l_qte_line_rec.ORG_ID,
3305 l_qte_line_rec.LINE_CATEGORY_CODE,
3306 l_qte_line_rec.ITEM_TYPE_CODE,
3307 l_qte_line_rec.LINE_NUMBER,
3308 l_qte_line_rec.START_DATE_ACTIVE,
3309 l_qte_line_rec.END_DATE_ACTIVE,
3310 l_qte_line_rec.ORDER_LINE_TYPE_ID,
3311 l_qte_line_rec.INVOICE_TO_PARTY_SITE_ID,
3312 l_qte_line_rec.INVOICE_TO_PARTY_ID,
3313 l_qte_line_rec.INVOICE_TO_CUST_ACCOUNT_ID,
3314 l_qte_line_rec.ORGANIZATION_ID,
3315 l_qte_line_rec.INVENTORY_ITEM_ID,
3316 l_qte_line_rec.QUANTITY,
3317 l_qte_line_rec.UOM_CODE,
3318 l_qte_line_rec.MARKETING_SOURCE_CODE_ID,
3319 l_qte_line_rec.PRICE_LIST_ID,
3320 l_qte_line_rec.PRICE_LIST_LINE_ID,
3321 l_qte_line_rec.CURRENCY_CODE,
3322 l_qte_line_rec.LINE_LIST_PRICE,
3323 l_qte_line_rec.LINE_ADJUSTED_AMOUNT,
3324 l_qte_line_rec.LINE_ADJUSTED_PERCENT,
3325 l_qte_line_rec.LINE_QUOTE_PRICE,
3326 l_qte_line_rec.RELATED_ITEM_ID,
3327 l_qte_line_rec.ITEM_RELATIONSHIP_TYPE,
3328 l_qte_line_rec.ACCOUNTING_RULE_ID,
3329 l_qte_line_rec.INVOICING_RULE_ID,
3330 l_qte_line_rec.SPLIT_SHIPMENT_FLAG,
3331 l_qte_line_rec.BACKORDER_FLAG,
3332 l_qte_line_rec.MINISITE_ID,
3333 l_qte_line_rec.SECTION_ID,
3334 l_qte_line_rec.ATTRIBUTE_CATEGORY,
3335 l_qte_line_rec.ATTRIBUTE1,
3336 l_qte_line_rec.ATTRIBUTE2,
3337 l_qte_line_rec.ATTRIBUTE3,
3338 l_qte_line_rec.ATTRIBUTE4,
3339 l_qte_line_rec.ATTRIBUTE5,
3340 l_qte_line_rec.ATTRIBUTE6,
3341 l_qte_line_rec.ATTRIBUTE7,
3342 l_qte_line_rec.ATTRIBUTE8,
3343 l_qte_line_rec.ATTRIBUTE9,
3344 l_qte_line_rec.ATTRIBUTE10,
3345 l_qte_line_rec.ATTRIBUTE11,
3346 l_qte_line_rec.ATTRIBUTE12,
3347 l_qte_line_rec.ATTRIBUTE13,
3348 l_qte_line_rec.ATTRIBUTE14,
3349 l_qte_line_rec.ATTRIBUTE15,
3350 l_qte_line_rec.ATTRIBUTE16,
3351 l_qte_line_rec.ATTRIBUTE17,
3352 l_qte_line_rec.ATTRIBUTE18,
3353 l_qte_line_rec.ATTRIBUTE19,
3354 l_qte_line_rec.ATTRIBUTE20,
3355 l_qte_line_rec.PRICED_PRICE_LIST_ID,
3356 l_qte_line_rec.AGREEMENT_ID,
3357 l_qte_line_rec.COMMITMENT_ID,
3358 l_qte_line_rec.DISPLAY_ARITHMETIC_OPERATOR,
3359 l_qte_line_rec.service_item_flag,
3360 l_qte_line_rec.serviceable_product_flag,
3361 l_qte_line_rec.INVOICE_TO_CUST_PARTY_ID,
3362 l_qte_line_rec.SELLING_PRICE_CHANGE,
3363 l_qte_line_rec.RECALCULATE_FLAG,
3364 l_qte_line_rec.PRICING_LINE_TYPE_INDICATOR,
3365 l_qte_line_rec.END_CUSTOMER_PARTY_ID,
3366 l_qte_line_rec.END_CUSTOMER_PARTY_SITE_ID,
3367 l_qte_line_rec.END_CUSTOMER_CUST_ACCOUNT_ID,
3368 l_qte_line_rec.END_CUSTOMER_CUST_PARTY_ID,
3369 l_qte_line_rec.SHIP_MODEL_COMPLETE_FLAG,
3370 l_qte_line_rec.CHARGE_PERIODICITY_CODE,
3371 l_qte_line_rec.OBJECT_VERSION_NUMBER,
3372 l_qte_line_rec.PRICING_QUANTITY_UOM,
3373 l_qte_line_rec.PRICING_QUANTITY,
3374 l_qte_line_rec.CONFIG_MODEL_TYPE
3375 /*,
3376 -- ER 12879412
3377 l_qte_line_rec.PRODUCT_FISC_CLASSIFICATION,
3378 l_qte_line_rec.TRX_BUSINESS_CATEGORY*/
3379
3380 FROM ASO_QUOTE_LINES_ALL
3381 WHERE quote_line_id = p_qte_line_id;
3382 RETURN l_qte_line_rec;
3383 EXCEPTION
3384 WHEN NO_DATA_FOUND THEN
3385 RAISE NO_DATA_FOUND;
3386 WHEN OTHERS THEN
3387 IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3388 FND_MESSAGE.Set_Name('ASO', 'ASO_API_ERROR_IN_QUERY');
3389 FND_MSG_PUB.ADD;
3390 END IF;
3391 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3392 END Query_Qte_Line_Row;
3393
3394
3395 FUNCTION Query_Qte_Line_Rows (
3396 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM
3397 ) RETURN ASO_QUOTE_PUB.Qte_Line_Tbl_Type
3398 IS
3399 CURSOR c_Qte_Line IS
3400 SELECT
3401 QUOTE_LINE_ID,
3402 CREATION_DATE,
3403 CREATED_BY,
3404 LAST_UPDATE_DATE,
3405 LAST_UPDATED_BY,
3406 LAST_UPDATE_LOGIN,
3407 REQUEST_ID,
3408 PROGRAM_APPLICATION_ID,
3409 PROGRAM_ID,
3410 PROGRAM_UPDATE_DATE,
3411 QUOTE_HEADER_ID,
3412 ORG_ID,
3413 LINE_CATEGORY_CODE,
3414 ITEM_TYPE_CODE,
3415 LINE_NUMBER,
3416 START_DATE_ACTIVE,
3417 END_DATE_ACTIVE,
3418 ORDER_LINE_TYPE_ID,
3419 INVOICE_TO_PARTY_SITE_ID,
3420 INVOICE_TO_PARTY_ID,
3421 INVOICE_TO_CUST_ACCOUNT_ID,
3422 ORGANIZATION_ID,
3423 INVENTORY_ITEM_ID,
3424 QUANTITY,
3425 UOM_CODE,
3426 MARKETING_SOURCE_CODE_ID,
3427 PRICE_LIST_ID,
3428 PRICE_LIST_LINE_ID,
3429 CURRENCY_CODE,
3430 LINE_LIST_PRICE,
3431 LINE_ADJUSTED_AMOUNT,
3432 LINE_ADJUSTED_PERCENT,
3433 LINE_QUOTE_PRICE,
3434 RELATED_ITEM_ID,
3435 ITEM_RELATIONSHIP_TYPE,
3436 ACCOUNTING_RULE_ID,
3437 INVOICING_RULE_ID,
3438 SPLIT_SHIPMENT_FLAG,
3439 BACKORDER_FLAG,
3440 MINISITE_ID,
3441 SECTION_ID,
3442 ATTRIBUTE_CATEGORY,
3443 ATTRIBUTE1,
3444 ATTRIBUTE2,
3445 ATTRIBUTE3,
3446 ATTRIBUTE4,
3447 ATTRIBUTE5,
3448 ATTRIBUTE6,
3449 ATTRIBUTE7,
3450 ATTRIBUTE8,
3451 ATTRIBUTE9,
3452 ATTRIBUTE10,
3453 ATTRIBUTE11,
3454 ATTRIBUTE12,
3455 ATTRIBUTE13,
3456 ATTRIBUTE14,
3457 ATTRIBUTE15,
3458 ATTRIBUTE16,
3459 ATTRIBUTE17,
3460 ATTRIBUTE18,
3461 ATTRIBUTE19,
3462 ATTRIBUTE20,
3463 PRICED_PRICE_LIST_ID,
3464 AGREEMENT_ID,
3465 COMMITMENT_ID,
3466 DISPLAY_ARITHMETIC_OPERATOR,
3467 SERVICE_ITEM_FLAG,
3468 SERVICEABLE_PRODUCT_FLAG,
3469 INVOICE_TO_CUST_PARTY_ID,
3470 SELLING_PRICE_CHANGE,
3471 RECALCULATE_FLAG,
3472 PRICING_LINE_TYPE_INDICATOR,
3473 END_CUSTOMER_PARTY_ID,
3474 END_CUSTOMER_PARTY_SITE_ID,
3475 END_CUSTOMER_CUST_ACCOUNT_ID,
3476 END_CUSTOMER_CUST_PARTY_ID,
3477 CHARGE_PERIODICITY_CODE ,
3478 SHIP_MODEL_COMPLETE_FLAG ,
3479 OBJECT_VERSION_NUMBER,
3480 PRICING_QUANTITY_UOM,
3481 PRICING_QUANTITY,
3482 CONFIG_MODEL_TYPE
3483 /*,
3484 -- ER 12879412
3485 PRODUCT_FISC_CLASSIFICATION,
3486 TRX_BUSINESS_CATEGORY
3487 */
3488
3489 FROM ASO_Quote_Lines_All
3490 WHERE quote_header_id = p_qte_header_id
3491 ORDER BY Line_Number;
3492 l_Qte_Line_rec ASO_QUOTE_PUB.Qte_Line_Rec_Type;
3493 l_Qte_Line_tbl ASO_QUOTE_PUB.Qte_Line_Tbl_Type;
3494 BEGIN
3495 FOR Line_rec IN c_Qte_Line LOOP
3496 l_qte_line_rec.QUOTE_LINE_ID := line_rec.QUOTE_LINE_ID;
3497 l_qte_line_rec.CREATION_DATE := line_rec.CREATION_DATE;
3498 l_qte_line_rec.CREATED_BY := line_rec.CREATED_BY;
3499 l_qte_line_rec.LAST_UPDATE_DATE := line_rec.LAST_UPDATE_DATE;
3500 l_qte_line_rec.LAST_UPDATED_BY := line_rec.LAST_UPDATED_BY;
3501 l_qte_line_rec.LAST_UPDATE_LOGIN := line_rec.LAST_UPDATE_LOGIN;
3502 l_qte_line_rec.REQUEST_ID := line_rec.REQUEST_ID;
3503 l_qte_line_rec.PROGRAM_APPLICATION_ID := line_rec.PROGRAM_APPLICATION_ID;
3504 l_qte_line_rec.PROGRAM_ID := line_rec.PROGRAM_ID;
3505 l_qte_line_rec.PROGRAM_UPDATE_DATE := line_rec.PROGRAM_UPDATE_DATE;
3506 l_qte_line_rec.quote_header_id := line_rec.quote_header_id;
3507 l_qte_line_rec.ORG_ID := line_rec.ORG_ID;
3508 l_qte_line_rec.LINE_CATEGORY_CODE := line_rec.LINE_CATEGORY_CODE;
3509 l_qte_line_rec.ITEM_TYPE_CODE := line_rec.ITEM_TYPE_CODE;
3510 l_qte_line_rec.LINE_NUMBER := line_rec.LINE_NUMBER;
3511 l_qte_line_rec.START_DATE_ACTIVE := line_rec.START_DATE_ACTIVE;
3512 l_qte_line_rec.END_DATE_ACTIVE := line_rec.END_DATE_ACTIVE;
3513 l_qte_line_rec.ORDER_LINE_TYPE_ID := line_rec.ORDER_LINE_TYPE_ID;
3514 l_qte_line_rec.INVOICE_TO_PARTY_SITE_ID := line_rec.INVOICE_TO_PARTY_SITE_ID;
3515 l_qte_line_rec.INVOICE_TO_PARTY_ID := line_rec.INVOICE_TO_PARTY_ID;
3516 l_qte_line_rec.INVOICE_TO_CUST_ACCOUNT_ID := line_rec.INVOICE_TO_CUST_ACCOUNT_ID;
3517 l_qte_line_rec.ORGANIZATION_ID := line_rec.ORGANIZATION_ID;
3518 l_qte_line_rec.INVENTORY_ITEM_ID := line_rec.INVENTORY_ITEM_ID;
3519 l_qte_line_rec.QUANTITY := line_rec.QUANTITY;
3520 l_qte_line_rec.UOM_CODE := line_rec.UOM_CODE;
3521 l_qte_line_rec.MARKETING_SOURCE_CODE_ID := line_rec.MARKETING_SOURCE_CODE_ID;
3522 l_qte_line_rec.PRICE_LIST_ID := line_rec.PRICE_LIST_ID;
3523 l_qte_line_rec.PRICE_LIST_LINE_ID := line_rec.PRICE_LIST_LINE_ID;
3524 l_qte_line_rec.CURRENCY_CODE := line_rec.CURRENCY_CODE;
3525 l_qte_line_rec.LINE_LIST_PRICE := line_rec.LINE_LIST_PRICE;
3526 l_qte_line_rec.LINE_ADJUSTED_AMOUNT := line_rec.LINE_ADJUSTED_AMOUNT;
3527 l_qte_line_rec.LINE_ADJUSTED_PERCENT := line_rec.LINE_ADJUSTED_PERCENT;
3528 l_qte_line_rec.LINE_QUOTE_PRICE := line_rec.LINE_QUOTE_PRICE;
3529 l_qte_line_rec.RELATED_ITEM_ID := line_rec.RELATED_ITEM_ID;
3530 l_qte_line_rec.ITEM_RELATIONSHIP_TYPE := line_rec.ITEM_RELATIONSHIP_TYPE;
3531 l_qte_line_rec.ACCOUNTING_RULE_ID := line_rec.ACCOUNTING_RULE_ID;
3532 l_qte_line_rec.INVOICING_RULE_ID := line_rec.INVOICING_RULE_ID;
3533 l_qte_line_rec.SPLIT_SHIPMENT_FLAG := line_rec.SPLIT_SHIPMENT_FLAG;
3534 l_qte_line_rec.BACKORDER_FLAG := line_rec.BACKORDER_FLAG;
3535 l_qte_line_rec.MINISITE_ID := line_rec.MINISITE_ID;
3536 l_qte_line_rec.SECTION_ID := line_rec.SECTION_ID;
3537 l_qte_line_rec.ATTRIBUTE_CATEGORY := line_rec.ATTRIBUTE_CATEGORY;
3538 l_qte_line_rec.ATTRIBUTE1 := line_rec.ATTRIBUTE1;
3539 l_qte_line_rec.ATTRIBUTE2 := line_rec.ATTRIBUTE2;
3540 l_qte_line_rec.ATTRIBUTE3 := line_rec.ATTRIBUTE3;
3541 l_qte_line_rec.ATTRIBUTE4 := line_rec.ATTRIBUTE4;
3542 l_qte_line_rec.ATTRIBUTE5 := line_rec.ATTRIBUTE5;
3543 l_qte_line_rec.ATTRIBUTE6 := line_rec.ATTRIBUTE6;
3544 l_qte_line_rec.ATTRIBUTE7 := line_rec.ATTRIBUTE7;
3545 l_qte_line_rec.ATTRIBUTE8 := line_rec.ATTRIBUTE8;
3546 l_qte_line_rec.ATTRIBUTE9 := line_rec.ATTRIBUTE9;
3547 l_qte_line_rec.ATTRIBUTE10 := line_rec.ATTRIBUTE10;
3548 l_qte_line_rec.ATTRIBUTE11 := line_rec.ATTRIBUTE11;
3549 l_qte_line_rec.ATTRIBUTE12 := line_rec.ATTRIBUTE12;
3550 l_qte_line_rec.ATTRIBUTE13 := line_rec.ATTRIBUTE13;
3551 l_qte_line_rec.ATTRIBUTE14 := line_rec.ATTRIBUTE14;
3552 l_qte_line_rec.ATTRIBUTE15 := line_rec.ATTRIBUTE15;
3553 l_qte_line_rec.ATTRIBUTE16 := line_rec.ATTRIBUTE16;
3554 l_qte_line_rec.ATTRIBUTE17 := line_rec.ATTRIBUTE17;
3555 l_qte_line_rec.ATTRIBUTE18 := line_rec.ATTRIBUTE18;
3556 l_qte_line_rec.ATTRIBUTE19 := line_rec.ATTRIBUTE19;
3557 l_qte_line_rec.ATTRIBUTE20 := line_rec.ATTRIBUTE20;
3558 l_qte_line_rec.PRICED_PRICE_LIST_ID := line_rec.PRICED_PRICE_LIST_ID;
3559 l_qte_line_rec.AGREEMENT_ID := line_rec.AGREEMENT_ID;
3560 l_qte_line_rec.COMMITMENT_ID := line_rec.COMMITMENT_ID;
3561 l_qte_line_rec.DISPLAY_ARITHMETIC_OPERATOR := line_rec.DISPLAY_ARITHMETIC_OPERATOR;
3562 l_qte_line_rec.service_item_flag := line_rec.service_item_flag;
3563 l_qte_line_rec.serviceable_product_flag := line_rec.serviceable_product_flag;
3564 l_qte_line_rec.INVOICE_TO_CUST_PARTY_ID := line_rec.INVOICE_TO_CUST_PARTY_ID;
3565 l_qte_line_rec.SELLING_PRICE_CHANGE := line_rec.SELLING_PRICE_CHANGE;
3566 l_qte_line_rec.RECALCULATE_FLAG := line_rec.RECALCULATE_FLAG;
3567 l_qte_line_rec.PRICING_LINE_TYPE_INDICATOR := line_rec.PRICING_LINE_TYPE_INDICATOR;
3568 l_qte_line_rec.END_CUSTOMER_PARTY_ID := line_rec.END_CUSTOMER_PARTY_ID;
3569 l_qte_line_rec.END_CUSTOMER_PARTY_SITE_ID := line_rec.END_CUSTOMER_PARTY_SITE_ID;
3570 l_qte_line_rec.END_CUSTOMER_CUST_ACCOUNT_ID := line_rec.END_CUSTOMER_CUST_ACCOUNT_ID;
3571 l_qte_line_rec.END_CUSTOMER_CUST_PARTY_ID := line_rec.END_CUSTOMER_CUST_PARTY_ID;
3572 l_qte_line_rec.CHARGE_PERIODICITY_CODE := line_rec.CHARGE_PERIODICITY_CODE; -- Recurring charges Change
3573 l_qte_line_rec.SHIP_MODEL_COMPLETE_FLAG := line_rec.SHIP_MODEL_COMPLETE_FLAG;
3574 l_qte_line_rec.OBJECT_VERSION_NUMBER := line_rec.OBJECT_VERSION_NUMBER;
3575 l_qte_line_rec.PRICING_QUANTITY_UOM := line_rec.PRICING_QUANTITY_UOM;
3576 l_qte_line_rec.PRICING_QUANTITY := line_rec.PRICING_QUANTITY;
3577 l_qte_line_rec.CONFIG_MODEL_TYPE := line_rec.CONFIG_MODEL_TYPE;
3578 -- ER 12879412
3579 /* l_qte_line_rec.PRODUCT_FISC_CLASSIFICATION := line_rec.PRODUCT_FISC_CLASSIFICATION;
3580 l_qte_line_rec.TRX_BUSINESS_CATEGORY := line_rec.TRX_BUSINESS_CATEGORY;*/
3581
3582 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
3583 END LOOP;
3584 RETURN l_Qte_Line_tbl;
3585 END Query_Qte_Line_Rows;
3586
3587
3588 FUNCTION Query_Qte_Line_Rows_Submit (
3589 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM
3590 ) RETURN ASO_QUOTE_PUB.Qte_Line_Tbl_Type
3591 IS
3592 CURSOR c_Qte_Line IS
3593 SELECT
3594 QUOTE_LINE_ID,
3595 CREATION_DATE,
3596 CREATED_BY,
3597 LAST_UPDATE_DATE,
3598 LAST_UPDATED_BY,
3599 LAST_UPDATE_LOGIN,
3600 REQUEST_ID,
3601 PROGRAM_APPLICATION_ID,
3602 PROGRAM_ID,
3603 PROGRAM_UPDATE_DATE,
3604 QUOTE_HEADER_ID,
3605 ORG_ID,
3606 LINE_CATEGORY_CODE,
3607 ITEM_TYPE_CODE,
3608 UI_LINE_NUMBER,
3609 START_DATE_ACTIVE,
3610 END_DATE_ACTIVE,
3611 ORDER_LINE_TYPE_ID,
3612 INVOICE_TO_PARTY_SITE_ID,
3613 INVOICE_TO_PARTY_ID,
3614 INVOICE_TO_CUST_ACCOUNT_ID,
3615 ORGANIZATION_ID,
3616 INVENTORY_ITEM_ID,
3617 QUANTITY,
3618 UOM_CODE,
3619 MARKETING_SOURCE_CODE_ID,
3620 PRICE_LIST_ID,
3621 PRICE_LIST_LINE_ID,
3622 CURRENCY_CODE,
3623 LINE_LIST_PRICE,
3624 LINE_ADJUSTED_AMOUNT,
3625 LINE_ADJUSTED_PERCENT,
3626 LINE_QUOTE_PRICE,
3627 RELATED_ITEM_ID,
3628 ITEM_RELATIONSHIP_TYPE,
3629 ACCOUNTING_RULE_ID,
3630 INVOICING_RULE_ID,
3631 SPLIT_SHIPMENT_FLAG,
3632 BACKORDER_FLAG,
3633 MINISITE_ID,
3634 SECTION_ID,
3635 ATTRIBUTE_CATEGORY,
3636 ATTRIBUTE1,
3637 ATTRIBUTE2,
3638 ATTRIBUTE3,
3639 ATTRIBUTE4,
3640 ATTRIBUTE5,
3641 ATTRIBUTE6,
3642 ATTRIBUTE7,
3643 ATTRIBUTE8,
3644 ATTRIBUTE9,
3645 ATTRIBUTE10,
3646 ATTRIBUTE11,
3647 ATTRIBUTE12,
3648 ATTRIBUTE13,
3649 ATTRIBUTE14,
3650 ATTRIBUTE15,
3651 ATTRIBUTE16,
3652 ATTRIBUTE17,
3653 ATTRIBUTE18,
3654 ATTRIBUTE19,
3655 ATTRIBUTE20,
3656 PRICED_PRICE_LIST_ID,
3657 AGREEMENT_ID,
3658 COMMITMENT_ID,
3659 DISPLAY_ARITHMETIC_OPERATOR,
3660 SERVICE_ITEM_FLAG,
3661 SERVICEABLE_PRODUCT_FLAG,
3662 INVOICE_TO_CUST_PARTY_ID,
3663 SELLING_PRICE_CHANGE,
3664 RECALCULATE_FLAG,
3665 PRICING_LINE_TYPE_INDICATOR,
3666 END_CUSTOMER_PARTY_ID,
3667 END_CUSTOMER_PARTY_SITE_ID,
3668 END_CUSTOMER_CUST_ACCOUNT_ID,
3669 END_CUSTOMER_CUST_PARTY_ID,
3670 CHARGE_PERIODICITY_CODE,
3671 SHIP_MODEL_COMPLETE_FLAG ,
3672 OBJECT_VERSION_NUMBER
3673 /*,
3674 --CONFIG_MODEL_TYPE
3675 -- ER 12879412
3676 PRODUCT_FISC_CLASSIFICATION,
3677 TRX_BUSINESS_CATEGORY
3678 */
3679 FROM ASO_Pvt_Quote_Lines_Bali_V
3680 WHERE quote_header_id = p_qte_header_id;
3681
3682 l_Qte_Line_rec ASO_QUOTE_PUB.Qte_Line_Rec_Type;
3683 l_Qte_Line_tbl ASO_QUOTE_PUB.Qte_Line_Tbl_Type;
3684 BEGIN
3685 FOR Line_rec IN c_Qte_Line LOOP
3686 l_qte_line_rec.QUOTE_LINE_ID := line_rec.QUOTE_LINE_ID;
3687 l_qte_line_rec.CREATION_DATE := line_rec.CREATION_DATE;
3688 l_qte_line_rec.CREATED_BY := line_rec.CREATED_BY;
3689 l_qte_line_rec.LAST_UPDATE_DATE := line_rec.LAST_UPDATE_DATE;
3690 l_qte_line_rec.LAST_UPDATED_BY := line_rec.LAST_UPDATED_BY;
3691 l_qte_line_rec.LAST_UPDATE_LOGIN := line_rec.LAST_UPDATE_LOGIN;
3692 l_qte_line_rec.REQUEST_ID := line_rec.REQUEST_ID;
3693 l_qte_line_rec.PROGRAM_APPLICATION_ID := line_rec.PROGRAM_APPLICATION_ID;
3694 l_qte_line_rec.PROGRAM_ID := line_rec.PROGRAM_ID;
3695 l_qte_line_rec.PROGRAM_UPDATE_DATE := line_rec.PROGRAM_UPDATE_DATE;
3696 l_qte_line_rec.quote_header_id := line_rec.quote_header_id;
3697 l_qte_line_rec.ORG_ID := line_rec.ORG_ID;
3698 l_qte_line_rec.LINE_CATEGORY_CODE := line_rec.LINE_CATEGORY_CODE;
3699 l_qte_line_rec.ITEM_TYPE_CODE := line_rec.ITEM_TYPE_CODE;
3700 l_qte_line_rec.UI_LINE_NUMBER := line_rec.UI_LINE_NUMBER;
3701 l_qte_line_rec.START_DATE_ACTIVE := line_rec.START_DATE_ACTIVE;
3702 l_qte_line_rec.END_DATE_ACTIVE := line_rec.END_DATE_ACTIVE;
3703 l_qte_line_rec.ORDER_LINE_TYPE_ID := line_rec.ORDER_LINE_TYPE_ID;
3704 l_qte_line_rec.INVOICE_TO_PARTY_SITE_ID := line_rec.INVOICE_TO_PARTY_SITE_ID;
3705 l_qte_line_rec.INVOICE_TO_PARTY_ID := line_rec.INVOICE_TO_PARTY_ID;
3706 l_qte_line_rec.INVOICE_TO_CUST_ACCOUNT_ID := line_rec.INVOICE_TO_CUST_ACCOUNT_ID;
3707 l_qte_line_rec.ORGANIZATION_ID := line_rec.ORGANIZATION_ID;
3708 l_qte_line_rec.INVENTORY_ITEM_ID := line_rec.INVENTORY_ITEM_ID;
3709 l_qte_line_rec.QUANTITY := line_rec.QUANTITY;
3710 l_qte_line_rec.UOM_CODE := line_rec.UOM_CODE;
3711 l_qte_line_rec.MARKETING_SOURCE_CODE_ID := line_rec.MARKETING_SOURCE_CODE_ID;
3712 l_qte_line_rec.PRICE_LIST_ID := line_rec.PRICE_LIST_ID;
3713 l_qte_line_rec.PRICE_LIST_LINE_ID := line_rec.PRICE_LIST_LINE_ID;
3714 l_qte_line_rec.CURRENCY_CODE := line_rec.CURRENCY_CODE;
3715 l_qte_line_rec.LINE_LIST_PRICE := line_rec.LINE_LIST_PRICE;
3716 l_qte_line_rec.LINE_ADJUSTED_AMOUNT := line_rec.LINE_ADJUSTED_AMOUNT;
3717 l_qte_line_rec.LINE_ADJUSTED_PERCENT := line_rec.LINE_ADJUSTED_PERCENT;
3718 l_qte_line_rec.LINE_QUOTE_PRICE := line_rec.LINE_QUOTE_PRICE;
3719 l_qte_line_rec.RELATED_ITEM_ID := line_rec.RELATED_ITEM_ID;
3720 l_qte_line_rec.ITEM_RELATIONSHIP_TYPE := line_rec.ITEM_RELATIONSHIP_TYPE;
3721 l_qte_line_rec.ACCOUNTING_RULE_ID := line_rec.ACCOUNTING_RULE_ID;
3722 l_qte_line_rec.INVOICING_RULE_ID := line_rec.INVOICING_RULE_ID;
3723 l_qte_line_rec.SPLIT_SHIPMENT_FLAG := line_rec.SPLIT_SHIPMENT_FLAG;
3724 l_qte_line_rec.BACKORDER_FLAG := line_rec.BACKORDER_FLAG;
3725 l_qte_line_rec.MINISITE_ID := line_rec.MINISITE_ID;
3726 l_qte_line_rec.SECTION_ID := line_rec.SECTION_ID;
3727 l_qte_line_rec.ATTRIBUTE_CATEGORY := line_rec.ATTRIBUTE_CATEGORY;
3728 l_qte_line_rec.ATTRIBUTE1 := line_rec.ATTRIBUTE1;
3729 l_qte_line_rec.ATTRIBUTE2 := line_rec.ATTRIBUTE2;
3730 l_qte_line_rec.ATTRIBUTE3 := line_rec.ATTRIBUTE3;
3731 l_qte_line_rec.ATTRIBUTE4 := line_rec.ATTRIBUTE4;
3732 l_qte_line_rec.ATTRIBUTE5 := line_rec.ATTRIBUTE5;
3733 l_qte_line_rec.ATTRIBUTE6 := line_rec.ATTRIBUTE6;
3734 l_qte_line_rec.ATTRIBUTE7 := line_rec.ATTRIBUTE7;
3735 l_qte_line_rec.ATTRIBUTE8 := line_rec.ATTRIBUTE8;
3736 l_qte_line_rec.ATTRIBUTE9 := line_rec.ATTRIBUTE9;
3737 l_qte_line_rec.ATTRIBUTE10 := line_rec.ATTRIBUTE10;
3738 l_qte_line_rec.ATTRIBUTE11 := line_rec.ATTRIBUTE11;
3739 l_qte_line_rec.ATTRIBUTE12 := line_rec.ATTRIBUTE12;
3740 l_qte_line_rec.ATTRIBUTE13 := line_rec.ATTRIBUTE13;
3741 l_qte_line_rec.ATTRIBUTE14 := line_rec.ATTRIBUTE14;
3742 l_qte_line_rec.ATTRIBUTE15 := line_rec.ATTRIBUTE15;
3743 l_qte_line_rec.ATTRIBUTE16 := line_rec.ATTRIBUTE16;
3744 l_qte_line_rec.ATTRIBUTE17 := line_rec.ATTRIBUTE17;
3745 l_qte_line_rec.ATTRIBUTE18 := line_rec.ATTRIBUTE18;
3746 l_qte_line_rec.ATTRIBUTE19 := line_rec.ATTRIBUTE19;
3747 l_qte_line_rec.ATTRIBUTE20 := line_rec.ATTRIBUTE20;
3748 l_qte_line_rec.PRICED_PRICE_LIST_ID := line_rec.PRICED_PRICE_LIST_ID;
3749 l_qte_line_rec.AGREEMENT_ID := line_rec.AGREEMENT_ID;
3750 l_qte_line_rec.COMMITMENT_ID := line_rec.COMMITMENT_ID;
3751 l_qte_line_rec.DISPLAY_ARITHMETIC_OPERATOR := line_rec.DISPLAY_ARITHMETIC_OPERATOR;
3752 l_qte_line_rec.service_item_flag := line_rec.service_item_flag;
3753 l_qte_line_rec.serviceable_product_flag := line_rec.serviceable_product_flag;
3754 l_qte_line_rec.INVOICE_TO_CUST_PARTY_ID := line_rec.INVOICE_TO_CUST_PARTY_ID;
3755 l_qte_line_rec.SELLING_PRICE_CHANGE := line_rec.SELLING_PRICE_CHANGE;
3756 l_qte_line_rec.RECALCULATE_FLAG := line_rec.RECALCULATE_FLAG;
3757 l_qte_line_rec.PRICING_LINE_TYPE_INDICATOR := line_rec.PRICING_LINE_TYPE_INDICATOR;
3758 l_qte_line_rec.END_CUSTOMER_PARTY_ID := line_rec.END_CUSTOMER_PARTY_ID;
3759 l_qte_line_rec.END_CUSTOMER_PARTY_SITE_ID := line_rec.END_CUSTOMER_PARTY_SITE_ID;
3760 l_qte_line_rec.END_CUSTOMER_CUST_ACCOUNT_ID := line_rec.END_CUSTOMER_CUST_ACCOUNT_ID;
3761 l_qte_line_rec.END_CUSTOMER_CUST_PARTY_ID := line_rec.END_CUSTOMER_CUST_PARTY_ID;
3762 l_qte_line_rec.CHARGE_PERIODICITY_CODE := line_rec.CHARGE_PERIODICITY_CODE;
3763 l_qte_line_rec.SHIP_MODEL_COMPLETE_FLAG := line_rec.SHIP_MODEL_COMPLETE_FLAG;
3764 l_qte_line_rec.OBJECT_VERSION_NUMBER := line_rec.OBJECT_VERSION_NUMBER;
3765 --l_qte_line_rec.CONFIG_MODEL_TYPE := line_rec.CONFIG_MODEL_TYPE;
3766 -- ER 12879412
3767 /* l_qte_line_rec.PRODUCT_FISC_CLASSIFICATION := line_rec.PRODUCT_FISC_CLASSIFICATION;
3768 l_qte_line_rec.TRX_BUSINESS_CATEGORY := line_rec.TRX_BUSINESS_CATEGORY;*/
3769 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
3770 END LOOP;
3771 RETURN l_Qte_Line_tbl;
3772 END Query_Qte_Line_Rows_Submit;
3773
3774
3775 FUNCTION Query_Qte_Line_Rows_Sort (
3776 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM
3777 ) RETURN ASO_QUOTE_PUB.Qte_Line_Tbl_Type
3778 IS
3779 CURSOR c_Qte_Line IS
3780 SELECT
3781 QUOTE_LINE_ID,
3782 CREATION_DATE,
3783 CREATED_BY,
3784 LAST_UPDATE_DATE,
3785 LAST_UPDATED_BY,
3786 LAST_UPDATE_LOGIN,
3787 REQUEST_ID,
3788 PROGRAM_APPLICATION_ID,
3789 PROGRAM_ID,
3790 PROGRAM_UPDATE_DATE,
3791 QUOTE_HEADER_ID,
3792 ORG_ID,
3793 LINE_CATEGORY_CODE,
3794 ITEM_TYPE_CODE,
3795 LINE_NUMBER,
3796 START_DATE_ACTIVE,
3797 END_DATE_ACTIVE,
3798 ORDER_LINE_TYPE_ID,
3799 INVOICE_TO_PARTY_SITE_ID,
3800 INVOICE_TO_PARTY_ID,
3801 INVOICE_TO_CUST_ACCOUNT_ID,
3802 ORGANIZATION_ID,
3803 INVENTORY_ITEM_ID,
3804 QUANTITY,
3805 UOM_CODE,
3806 MARKETING_SOURCE_CODE_ID,
3807 PRICE_LIST_ID,
3808 PRICE_LIST_LINE_ID,
3809 CURRENCY_CODE,
3810 LINE_LIST_PRICE,
3811 LINE_ADJUSTED_AMOUNT,
3812 LINE_ADJUSTED_PERCENT,
3813 LINE_QUOTE_PRICE,
3814 RELATED_ITEM_ID,
3815 ITEM_RELATIONSHIP_TYPE,
3816 ACCOUNTING_RULE_ID,
3817 INVOICING_RULE_ID,
3818 SPLIT_SHIPMENT_FLAG,
3819 BACKORDER_FLAG,
3820 MINISITE_ID,
3821 SECTION_ID,
3822 ATTRIBUTE_CATEGORY,
3823 ATTRIBUTE1,
3824 ATTRIBUTE2,
3825 ATTRIBUTE3,
3826 ATTRIBUTE4,
3827 ATTRIBUTE5,
3828 ATTRIBUTE6,
3829 ATTRIBUTE7,
3830 ATTRIBUTE8,
3831 ATTRIBUTE9,
3832 ATTRIBUTE10,
3833 ATTRIBUTE11,
3834 ATTRIBUTE12,
3835 ATTRIBUTE13,
3836 ATTRIBUTE14,
3837 ATTRIBUTE15,
3838 --ATTRIBUTE16,
3839 -- ATTRIBUTE17,
3840 -- ATTRIBUTE18,
3841 -- ATTRIBUTE19,
3842 -- ATTRIBUTE20,
3843 PRICED_PRICE_LIST_ID,
3844 AGREEMENT_ID,
3845 COMMITMENT_ID,
3846 DISPLAY_ARITHMETIC_OPERATOR,
3847 SERVICE_ITEM_FLAG,
3848 SERVICEABLE_PRODUCT_FLAG,
3849 --SELLING_PRICE_CHANGE,
3850 --RECALCULATE_FLAG
3851 PRICING_LINE_TYPE_INDICATOR,
3852 END_CUSTOMER_PARTY_ID,
3853 END_CUSTOMER_PARTY_SITE_ID,
3854 END_CUSTOMER_CUST_ACCOUNT_ID,
3855 END_CUSTOMER_CUST_PARTY_ID,
3856 --CHARGE_PERIODICITY_CODE,
3857 --SHIP_MODEL_COMPLETE_FLAG,
3858 OBJECT_VERSION_NUMBER
3859 /*,
3860 --CONFIG_MODEL_TYPE
3861 -- ER 12879412
3862 PRODUCT_FISC_CLASSIFICATION,
3863 TRX_BUSINESS_CATEGORY*/
3864 FROM aso_pvt_quote_lines_sort_v
3865 WHERE quote_header_id = p_qte_header_id;
3866
3867 l_Qte_Line_rec ASO_QUOTE_PUB.Qte_Line_Rec_Type;
3868 l_Qte_Line_tbl ASO_QUOTE_PUB.Qte_Line_Tbl_Type;
3869
3870 BEGIN
3871 FOR Line_rec IN c_Qte_Line LOOP
3872 l_qte_line_rec.QUOTE_LINE_ID := line_rec.QUOTE_LINE_ID;
3873 l_qte_line_rec.CREATION_DATE := line_rec.CREATION_DATE;
3874 l_qte_line_rec.CREATED_BY := line_rec.CREATED_BY;
3875 l_qte_line_rec.LAST_UPDATE_DATE := line_rec.LAST_UPDATE_DATE;
3876 l_qte_line_rec.LAST_UPDATED_BY := line_rec.LAST_UPDATED_BY;
3877 l_qte_line_rec.LAST_UPDATE_LOGIN := line_rec.LAST_UPDATE_LOGIN;
3878 l_qte_line_rec.REQUEST_ID := line_rec.REQUEST_ID;
3879 l_qte_line_rec.PROGRAM_APPLICATION_ID := line_rec.PROGRAM_APPLICATION_ID;
3880 l_qte_line_rec.PROGRAM_ID := line_rec.PROGRAM_ID;
3881 l_qte_line_rec.PROGRAM_UPDATE_DATE := line_rec.PROGRAM_UPDATE_DATE;
3882 l_qte_line_rec.quote_header_id := line_rec.quote_header_id;
3883 l_qte_line_rec.ORG_ID := line_rec.ORG_ID;
3884 l_qte_line_rec.LINE_CATEGORY_CODE := line_rec.LINE_CATEGORY_CODE;
3885 l_qte_line_rec.ITEM_TYPE_CODE := line_rec.ITEM_TYPE_CODE;
3886 l_qte_line_rec.LINE_NUMBER := line_rec.LINE_NUMBER;
3887 l_qte_line_rec.START_DATE_ACTIVE := line_rec.START_DATE_ACTIVE;
3888 l_qte_line_rec.END_DATE_ACTIVE := line_rec.END_DATE_ACTIVE;
3889 l_qte_line_rec.ORDER_LINE_TYPE_ID := line_rec.ORDER_LINE_TYPE_ID;
3890 l_qte_line_rec.INVOICE_TO_PARTY_SITE_ID := line_rec.INVOICE_TO_PARTY_SITE_ID;
3891 l_qte_line_rec.INVOICE_TO_PARTY_ID := line_rec.INVOICE_TO_PARTY_ID;
3892 l_qte_line_rec.INVOICE_TO_CUST_ACCOUNT_ID := line_rec.INVOICE_TO_CUST_ACCOUNT_ID;
3893 l_qte_line_rec.ORGANIZATION_ID := line_rec.ORGANIZATION_ID;
3894 l_qte_line_rec.INVENTORY_ITEM_ID := line_rec.INVENTORY_ITEM_ID;
3895 l_qte_line_rec.QUANTITY := line_rec.QUANTITY;
3896 l_qte_line_rec.UOM_CODE := line_rec.UOM_CODE;
3897 l_qte_line_rec.MARKETING_SOURCE_CODE_ID := line_rec.MARKETING_SOURCE_CODE_ID;
3898 l_qte_line_rec.PRICE_LIST_ID := line_rec.PRICE_LIST_ID;
3899 l_qte_line_rec.PRICE_LIST_LINE_ID := line_rec.PRICE_LIST_LINE_ID;
3900 l_qte_line_rec.CURRENCY_CODE := line_rec.CURRENCY_CODE;
3901 l_qte_line_rec.LINE_LIST_PRICE := line_rec.LINE_LIST_PRICE;
3902 l_qte_line_rec.LINE_ADJUSTED_AMOUNT := line_rec.LINE_ADJUSTED_AMOUNT;
3903 l_qte_line_rec.LINE_ADJUSTED_PERCENT := line_rec.LINE_ADJUSTED_PERCENT;
3904 l_qte_line_rec.LINE_QUOTE_PRICE := line_rec.LINE_QUOTE_PRICE;
3905 l_qte_line_rec.RELATED_ITEM_ID := line_rec.RELATED_ITEM_ID;
3906 l_qte_line_rec.ITEM_RELATIONSHIP_TYPE := line_rec.ITEM_RELATIONSHIP_TYPE;
3907 l_qte_line_rec.ACCOUNTING_RULE_ID := line_rec.ACCOUNTING_RULE_ID;
3908 l_qte_line_rec.INVOICING_RULE_ID := line_rec.INVOICING_RULE_ID;
3909 l_qte_line_rec.SPLIT_SHIPMENT_FLAG := line_rec.SPLIT_SHIPMENT_FLAG;
3910 l_qte_line_rec.BACKORDER_FLAG := line_rec.BACKORDER_FLAG;
3911 l_qte_line_rec.MINISITE_ID := line_rec.MINISITE_ID;
3912 l_qte_line_rec.SECTION_ID := line_rec.SECTION_ID;
3913 l_qte_line_rec.ATTRIBUTE_CATEGORY := line_rec.ATTRIBUTE_CATEGORY;
3914 l_qte_line_rec.ATTRIBUTE1 := line_rec.ATTRIBUTE1;
3915 l_qte_line_rec.ATTRIBUTE2 := line_rec.ATTRIBUTE2;
3916 l_qte_line_rec.ATTRIBUTE3 := line_rec.ATTRIBUTE3;
3917 l_qte_line_rec.ATTRIBUTE4 := line_rec.ATTRIBUTE4;
3918 l_qte_line_rec.ATTRIBUTE5 := line_rec.ATTRIBUTE5;
3919 l_qte_line_rec.ATTRIBUTE6 := line_rec.ATTRIBUTE6;
3920 l_qte_line_rec.ATTRIBUTE7 := line_rec.ATTRIBUTE7;
3921 l_qte_line_rec.ATTRIBUTE8 := line_rec.ATTRIBUTE8;
3922 l_qte_line_rec.ATTRIBUTE9 := line_rec.ATTRIBUTE9;
3923 l_qte_line_rec.ATTRIBUTE10 := line_rec.ATTRIBUTE10;
3924 l_qte_line_rec.ATTRIBUTE11 := line_rec.ATTRIBUTE11;
3925 l_qte_line_rec.ATTRIBUTE12 := line_rec.ATTRIBUTE12;
3926 l_qte_line_rec.ATTRIBUTE13 := line_rec.ATTRIBUTE13;
3927 l_qte_line_rec.ATTRIBUTE14 := line_rec.ATTRIBUTE14;
3928 l_qte_line_rec.ATTRIBUTE15 := line_rec.ATTRIBUTE15;
3929 /*l_qte_line_rec.ATTRIBUTE16 := line_rec.ATTRIBUTE16;
3930 l_qte_line_rec.ATTRIBUTE17 := line_rec.ATTRIBUTE17;
3931 l_qte_line_rec.ATTRIBUTE18 := line_rec.ATTRIBUTE18;
3932 l_qte_line_rec.ATTRIBUTE19 := line_rec.ATTRIBUTE19;
3933 l_qte_line_rec.ATTRIBUTE20 := line_rec.ATTRIBUTE20;*/
3934 l_qte_line_rec.PRICED_PRICE_LIST_ID := line_rec.PRICED_PRICE_LIST_ID;
3935 l_qte_line_rec.AGREEMENT_ID := line_rec.AGREEMENT_ID;
3936 l_qte_line_rec.COMMITMENT_ID := line_rec.COMMITMENT_ID;
3937 l_qte_line_rec.DISPLAY_ARITHMETIC_OPERATOR := line_rec.DISPLAY_ARITHMETIC_OPERATOR;
3938 l_qte_line_rec.service_item_flag := line_rec.service_item_flag;
3939 l_qte_line_rec.serviceable_product_flag := line_rec.serviceable_product_flag;
3940 --l_qte_line_rec.selling_price_change := line_rec.selling_price_change;
3941 --l_qte_line_rec.recalculate_flag := line_rec.recalculate_flag;
3942 l_qte_line_rec.pricing_line_type_indicator := line_rec.pricing_line_type_indicator;
3943 l_qte_line_rec.END_CUSTOMER_PARTY_ID := line_rec.END_CUSTOMER_PARTY_ID;
3944 l_qte_line_rec.END_CUSTOMER_PARTY_SITE_ID := line_rec.END_CUSTOMER_PARTY_SITE_ID;
3945 l_qte_line_rec.END_CUSTOMER_CUST_ACCOUNT_ID := line_rec.END_CUSTOMER_CUST_ACCOUNT_ID;
3946 l_qte_line_rec.END_CUSTOMER_CUST_PARTY_ID := line_rec.END_CUSTOMER_CUST_PARTY_ID;
3947 -- l_qte_line_rec.CHARGE_PERIODICITY_CODE := line_rec.CHARGE_PERIODICITY_CODE;
3948
3949 --l_qte_line_rec.SHIP_MODEL_COMPLETE_FLAG := line_rec.SHIP_MODEL_COMPLETE_FLAG;
3950 l_qte_line_rec.OBJECT_VERSION_NUMBER := line_rec.OBJECT_VERSION_NUMBER;
3951 --l_qte_line_rec.CONFIG_MODEL_TYPE := line_rec.CONFIG_MODEL_TYPE;
3952 -- ER 12879412
3953 /* l_qte_line_rec.PRODUCT_FISC_CLASSIFICATION := line_rec.PRODUCT_FISC_CLASSIFICATION;
3954 l_qte_line_rec.TRX_BUSINESS_CATEGORY := line_rec.TRX_BUSINESS_CATEGORY;*/
3955 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
3956
3957 END LOOP;
3958
3959 RETURN l_Qte_Line_tbl;
3960
3961 END Query_Qte_Line_Rows_Sort;
3962
3963 FUNCTION Query_Qte_Line_Rows_atp (
3964 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM
3965 ) RETURN ASO_QUOTE_PUB.Qte_Line_Tbl_Type
3966 IS
3967 CURSOR c_Qte_Line IS
3968 SELECT
3969 QUOTE_LINE_ID,
3970 CREATION_DATE,
3971 CREATED_BY,
3972 LAST_UPDATE_DATE,
3973 LAST_UPDATED_BY,
3974 LAST_UPDATE_LOGIN,
3975 REQUEST_ID,
3976 PROGRAM_APPLICATION_ID,
3977 PROGRAM_ID,
3978 PROGRAM_UPDATE_DATE,
3979 QUOTE_HEADER_ID,
3980 ORG_ID,
3981 LINE_CATEGORY_CODE,
3982 ITEM_TYPE_CODE,
3983 LINE_NUMBER,
3984 START_DATE_ACTIVE,
3985 END_DATE_ACTIVE,
3986 ORDER_LINE_TYPE_ID,
3987 INVOICE_TO_PARTY_SITE_ID,
3988 INVOICE_TO_PARTY_ID,
3989 INVOICE_TO_CUST_ACCOUNT_ID,
3990 ORGANIZATION_ID,
3991 INVENTORY_ITEM_ID,
3992 QUANTITY,
3993 UOM_CODE,
3994 MARKETING_SOURCE_CODE_ID,
3995 PRICE_LIST_ID,
3996 PRICE_LIST_LINE_ID,
3997 CURRENCY_CODE,
3998 LINE_LIST_PRICE,
3999 LINE_ADJUSTED_AMOUNT,
4000 LINE_ADJUSTED_PERCENT,
4001 LINE_QUOTE_PRICE,
4002 RELATED_ITEM_ID,
4003 ITEM_RELATIONSHIP_TYPE,
4004 ACCOUNTING_RULE_ID,
4005 INVOICING_RULE_ID,
4006 SPLIT_SHIPMENT_FLAG,
4007 BACKORDER_FLAG,
4008 MINISITE_ID,
4009 SECTION_ID,
4010 ATTRIBUTE_CATEGORY,
4011 ATTRIBUTE1,
4012 ATTRIBUTE2,
4013 ATTRIBUTE3,
4014 ATTRIBUTE4,
4015 ATTRIBUTE5,
4016 ATTRIBUTE6,
4017 ATTRIBUTE7,
4018 ATTRIBUTE8,
4019 ATTRIBUTE9,
4020 ATTRIBUTE10,
4021 ATTRIBUTE11,
4022 ATTRIBUTE12,
4023 ATTRIBUTE13,
4024 ATTRIBUTE14,
4025 ATTRIBUTE15,/*
4026 ATTRIBUTE16,
4027 ATTRIBUTE17,
4028 ATTRIBUTE18,
4029 ATTRIBUTE19,
4030 ATTRIBUTE20,*/
4031 PRICED_PRICE_LIST_ID,
4032 AGREEMENT_ID,
4033 COMMITMENT_ID,
4034 DISPLAY_ARITHMETIC_OPERATOR,
4035 SERVICE_ITEM_FLAG,
4036 SERVICEABLE_PRODUCT_FLAG,
4037 INVOICE_TO_CUST_PARTY_ID,
4038 SELLING_PRICE_CHANGE,
4039 RECALCULATE_FLAG,
4040 PRICING_LINE_TYPE_INDICATOR,
4041 END_CUSTOMER_PARTY_ID,
4042 END_CUSTOMER_PARTY_SITE_ID,
4043 END_CUSTOMER_CUST_ACCOUNT_ID,
4044 END_CUSTOMER_CUST_PARTY_ID,
4045 CHARGE_PERIODICITY_CODE ,
4046 SHIP_MODEL_COMPLETE_FLAG ,
4047 OBJECT_VERSION_NUMBER,
4048 UI_LINE_NUMBER
4049 /*,
4050 -- ER 12879412
4051 PRODUCT_FISC_CLASSIFICATION,
4052 TRX_BUSINESS_CATEGORY*/
4053 --CONFIG_MODEL_TYPE
4054 FROM ASO_PVT_QUOTE_LINES_BALI_V
4055 WHERE quote_header_id = p_qte_header_id;
4056 l_Qte_Line_rec ASO_QUOTE_PUB.Qte_Line_Rec_Type;
4057 l_Qte_Line_tbl ASO_QUOTE_PUB.Qte_Line_Tbl_Type;
4058 BEGIN
4059 FOR Line_rec IN c_Qte_Line LOOP
4060 l_qte_line_rec.QUOTE_LINE_ID := line_rec.QUOTE_LINE_ID;
4061 l_qte_line_rec.CREATION_DATE := line_rec.CREATION_DATE;
4062 l_qte_line_rec.CREATED_BY := line_rec.CREATED_BY;
4063 l_qte_line_rec.LAST_UPDATE_DATE := line_rec.LAST_UPDATE_DATE;
4064 l_qte_line_rec.LAST_UPDATED_BY := line_rec.LAST_UPDATED_BY;
4065 l_qte_line_rec.LAST_UPDATE_LOGIN := line_rec.LAST_UPDATE_LOGIN;
4066 l_qte_line_rec.REQUEST_ID := line_rec.REQUEST_ID;
4067 l_qte_line_rec.PROGRAM_APPLICATION_ID := line_rec.PROGRAM_APPLICATION_ID;
4068 l_qte_line_rec.PROGRAM_ID := line_rec.PROGRAM_ID;
4069 l_qte_line_rec.PROGRAM_UPDATE_DATE := line_rec.PROGRAM_UPDATE_DATE;
4070 l_qte_line_rec.quote_header_id := line_rec.quote_header_id;
4071 l_qte_line_rec.ORG_ID := line_rec.ORG_ID;
4072 l_qte_line_rec.LINE_CATEGORY_CODE := line_rec.LINE_CATEGORY_CODE;
4073 l_qte_line_rec.ITEM_TYPE_CODE := line_rec.ITEM_TYPE_CODE;
4074 l_qte_line_rec.LINE_NUMBER := line_rec.LINE_NUMBER;
4075 l_qte_line_rec.START_DATE_ACTIVE := line_rec.START_DATE_ACTIVE;
4076 l_qte_line_rec.END_DATE_ACTIVE := line_rec.END_DATE_ACTIVE;
4077 l_qte_line_rec.ORDER_LINE_TYPE_ID := line_rec.ORDER_LINE_TYPE_ID;
4078 l_qte_line_rec.INVOICE_TO_PARTY_SITE_ID := line_rec.INVOICE_TO_PARTY_SITE_ID;
4079 l_qte_line_rec.INVOICE_TO_PARTY_ID := line_rec.INVOICE_TO_PARTY_ID;
4080 l_qte_line_rec.INVOICE_TO_CUST_ACCOUNT_ID := line_rec.INVOICE_TO_CUST_ACCOUNT_ID;
4081 l_qte_line_rec.ORGANIZATION_ID := line_rec.ORGANIZATION_ID;
4082 l_qte_line_rec.INVENTORY_ITEM_ID := line_rec.INVENTORY_ITEM_ID;
4083 l_qte_line_rec.QUANTITY := line_rec.QUANTITY;
4084 l_qte_line_rec.UOM_CODE := line_rec.UOM_CODE;
4085 l_qte_line_rec.MARKETING_SOURCE_CODE_ID := line_rec.MARKETING_SOURCE_CODE_ID;
4086 l_qte_line_rec.PRICE_LIST_ID := line_rec.PRICE_LIST_ID;
4087 l_qte_line_rec.PRICE_LIST_LINE_ID := line_rec.PRICE_LIST_LINE_ID;
4088 l_qte_line_rec.CURRENCY_CODE := line_rec.CURRENCY_CODE;
4089 l_qte_line_rec.LINE_LIST_PRICE := line_rec.LINE_LIST_PRICE;
4090 l_qte_line_rec.LINE_ADJUSTED_AMOUNT := line_rec.LINE_ADJUSTED_AMOUNT;
4091 l_qte_line_rec.LINE_ADJUSTED_PERCENT := line_rec.LINE_ADJUSTED_PERCENT;
4092 l_qte_line_rec.LINE_QUOTE_PRICE := line_rec.LINE_QUOTE_PRICE;
4093 l_qte_line_rec.RELATED_ITEM_ID := line_rec.RELATED_ITEM_ID;
4094 l_qte_line_rec.ITEM_RELATIONSHIP_TYPE := line_rec.ITEM_RELATIONSHIP_TYPE;
4095 l_qte_line_rec.ACCOUNTING_RULE_ID := line_rec.ACCOUNTING_RULE_ID;
4096 l_qte_line_rec.INVOICING_RULE_ID := line_rec.INVOICING_RULE_ID;
4097 l_qte_line_rec.SPLIT_SHIPMENT_FLAG := line_rec.SPLIT_SHIPMENT_FLAG;
4098 l_qte_line_rec.BACKORDER_FLAG := line_rec.BACKORDER_FLAG;
4099 l_qte_line_rec.MINISITE_ID := line_rec.MINISITE_ID;
4100 l_qte_line_rec.SECTION_ID := line_rec.SECTION_ID;
4101 l_qte_line_rec.ATTRIBUTE_CATEGORY := line_rec.ATTRIBUTE_CATEGORY;
4102 l_qte_line_rec.ATTRIBUTE1 := line_rec.ATTRIBUTE1;
4103 l_qte_line_rec.ATTRIBUTE2 := line_rec.ATTRIBUTE2;
4104 l_qte_line_rec.ATTRIBUTE3 := line_rec.ATTRIBUTE3;
4105 l_qte_line_rec.ATTRIBUTE4 := line_rec.ATTRIBUTE4;
4106 l_qte_line_rec.ATTRIBUTE5 := line_rec.ATTRIBUTE5;
4107 l_qte_line_rec.ATTRIBUTE6 := line_rec.ATTRIBUTE6;
4108 l_qte_line_rec.ATTRIBUTE7 := line_rec.ATTRIBUTE7;
4109 l_qte_line_rec.ATTRIBUTE8 := line_rec.ATTRIBUTE8;
4110 l_qte_line_rec.ATTRIBUTE9 := line_rec.ATTRIBUTE9;
4111 l_qte_line_rec.ATTRIBUTE10 := line_rec.ATTRIBUTE10;
4112 l_qte_line_rec.ATTRIBUTE11 := line_rec.ATTRIBUTE11;
4113 l_qte_line_rec.ATTRIBUTE12 := line_rec.ATTRIBUTE12;
4114 l_qte_line_rec.ATTRIBUTE13 := line_rec.ATTRIBUTE13;
4115 l_qte_line_rec.ATTRIBUTE14 := line_rec.ATTRIBUTE14;
4116 l_qte_line_rec.ATTRIBUTE15 := line_rec.ATTRIBUTE15;
4117 /*l_qte_line_rec.ATTRIBUTE16 := line_rec.ATTRIBUTE16;
4118 l_qte_line_rec.ATTRIBUTE17 := line_rec.ATTRIBUTE17;
4119 l_qte_line_rec.ATTRIBUTE18 := line_rec.ATTRIBUTE18;
4120 l_qte_line_rec.ATTRIBUTE19 := line_rec.ATTRIBUTE19;
4121 l_qte_line_rec.ATTRIBUTE20 := line_rec.ATTRIBUTE20;*/
4122 l_qte_line_rec.PRICED_PRICE_LIST_ID := line_rec.PRICED_PRICE_LIST_ID;
4123 l_qte_line_rec.AGREEMENT_ID := line_rec.AGREEMENT_ID;
4124 l_qte_line_rec.COMMITMENT_ID := line_rec.COMMITMENT_ID;
4125 l_qte_line_rec.DISPLAY_ARITHMETIC_OPERATOR := line_rec.DISPLAY_ARITHMETIC_OPERATOR;
4126 l_qte_line_rec.service_item_flag := line_rec.service_item_flag;
4127 l_qte_line_rec.serviceable_product_flag := line_rec.serviceable_product_flag;
4128 l_qte_line_rec.INVOICE_TO_CUST_PARTY_ID := line_rec.INVOICE_TO_CUST_PARTY_ID;
4129 l_qte_line_rec.SELLING_PRICE_CHANGE := line_rec.SELLING_PRICE_CHANGE;
4130 l_qte_line_rec.RECALCULATE_FLAG := line_rec.RECALCULATE_FLAG;
4131 l_qte_line_rec.PRICING_LINE_TYPE_INDICATOR := line_rec.PRICING_LINE_TYPE_INDICATOR;
4132 l_qte_line_rec.END_CUSTOMER_PARTY_ID := line_rec.END_CUSTOMER_PARTY_ID;
4133 l_qte_line_rec.END_CUSTOMER_PARTY_SITE_ID := line_rec.END_CUSTOMER_PARTY_SITE_ID;
4134 l_qte_line_rec.END_CUSTOMER_CUST_ACCOUNT_ID := line_rec.END_CUSTOMER_CUST_ACCOUNT_ID;
4135 l_qte_line_rec.END_CUSTOMER_CUST_PARTY_ID := line_rec.END_CUSTOMER_CUST_PARTY_ID;
4136 l_qte_line_rec.CHARGE_PERIODICITY_CODE := line_rec.CHARGE_PERIODICITY_CODE; -- Recurring charges Change
4137 l_qte_line_rec.SHIP_MODEL_COMPLETE_FLAG := line_rec.SHIP_MODEL_COMPLETE_FLAG;
4138 l_qte_line_rec.OBJECT_VERSION_NUMBER := line_rec.OBJECT_VERSION_NUMBER;
4139 l_qte_line_rec.ui_line_number := line_rec.ui_line_number;
4140 -- ER 12879412
4141 /* l_qte_line_rec.PRODUCT_FISC_CLASSIFICATION := line_rec.PRODUCT_FISC_CLASSIFICATION;
4142 l_qte_line_rec.TRX_BUSINESS_CATEGORY := line_rec.TRX_BUSINESS_CATEGORY;*/
4143
4144 --l_qte_line_rec.CONFIG_MODEL_TYPE := line_rec.CONFIG_MODEL_TYPE;
4145 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
4146 END LOOP;
4147 RETURN l_Qte_Line_tbl;
4148 END Query_Qte_Line_Rows_atp;
4149
4150
4151 -- New Function for Pricing Starts Here...................................
4152
4153
4154 FUNCTION Query_Pricing_Line_Rows (
4155 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM,
4156 P_change_line_flag IN VARCHAR2 := FND_API.G_FALSE
4157 ) RETURN ASO_QUOTE_PUB.Qte_Line_Tbl_Type
4158 IS
4159 CURSOR c_Qte_Line IS
4160 SELECT
4161 QUOTE_LINE_ID,
4162 CREATION_DATE,
4163 CREATED_BY,
4164 LAST_UPDATE_DATE,
4165 LAST_UPDATED_BY,
4166 LAST_UPDATE_LOGIN,
4167 REQUEST_ID,
4168 PROGRAM_APPLICATION_ID,
4169 PROGRAM_ID,
4170 PROGRAM_UPDATE_DATE,
4171 QUOTE_HEADER_ID,
4172 ORG_ID,
4173 LINE_CATEGORY_CODE,
4174 ITEM_TYPE_CODE,
4175 LINE_NUMBER,
4176 START_DATE_ACTIVE,
4177 END_DATE_ACTIVE,
4178 ORDER_LINE_TYPE_ID,
4179 INVOICE_TO_PARTY_SITE_ID,
4180 INVOICE_TO_PARTY_ID,
4181 INVOICE_TO_CUST_ACCOUNT_ID,
4182 ORGANIZATION_ID,
4183 INVENTORY_ITEM_ID,
4184 QUANTITY,
4185 UOM_CODE,
4186 MARKETING_SOURCE_CODE_ID,
4187 PRICE_LIST_ID,
4188 PRICE_LIST_LINE_ID,
4189 CURRENCY_CODE,
4190 LINE_LIST_PRICE,
4191 LINE_ADJUSTED_AMOUNT,
4192 LINE_ADJUSTED_PERCENT,
4193 LINE_QUOTE_PRICE,
4194 RELATED_ITEM_ID,
4195 ITEM_RELATIONSHIP_TYPE,
4196 ACCOUNTING_RULE_ID,
4197 INVOICING_RULE_ID,
4198 SPLIT_SHIPMENT_FLAG,
4199 BACKORDER_FLAG,
4200 MINISITE_ID,
4201 SECTION_ID,
4202 INVOICE_TO_CUST_PARTY_ID,
4203 RECALCULATE_FLAG,
4204 SELLING_PRICE_CHANGE,
4205 SERVICE_ITEM_FLAG,
4206 ATTRIBUTE_CATEGORY,
4207 ATTRIBUTE1,
4208 ATTRIBUTE2,
4209 ATTRIBUTE3,
4210 ATTRIBUTE4,
4211 ATTRIBUTE5,
4212 ATTRIBUTE6,
4213 ATTRIBUTE7,
4214 ATTRIBUTE8,
4215 ATTRIBUTE9,
4216 ATTRIBUTE10,
4217 ATTRIBUTE11,
4218 ATTRIBUTE12,
4219 ATTRIBUTE13,
4220 ATTRIBUTE14,
4221 ATTRIBUTE15,
4222 ATTRIBUTE16,
4223 ATTRIBUTE17,
4224 ATTRIBUTE18,
4225 ATTRIBUTE19,
4226 ATTRIBUTE20,
4227 PRICED_PRICE_LIST_ID,
4228 AGREEMENT_ID,
4229 COMMITMENT_ID,
4230 DISPLAY_ARITHMETIC_OPERATOR,
4231 PRICING_LINE_TYPE_INDICATOR,
4232 END_CUSTOMER_PARTY_ID,
4233 END_CUSTOMER_PARTY_SITE_ID,
4234 END_CUSTOMER_CUST_ACCOUNT_ID,
4235 END_CUSTOMER_CUST_PARTY_ID,
4236 SHIP_MODEL_COMPLETE_FLAG,
4237 CHARGE_PERIODICITY_CODE,
4238 PRICING_QUANTITY_UOM,
4239 PRICING_QUANTITY,
4240 OBJECT_VERSION_NUMBER
4241 /*,
4242 -- ER 12879412
4243 PRODUCT_FISC_CLASSIFICATION,
4244 TRX_BUSINESS_CATEGORY
4245 */
4246 FROM ASO_Quote_Lines_All
4247 WHERE quote_header_id = p_qte_header_id
4248 ORDER BY Line_Number;
4249
4250 CURSOR c_Qte_Line_SVC_ref(p_qte_line_id IN NUMBER) IS
4251 SELECT service_ref_type_code , service_ref_line_id
4252 FROM ASO_QUOTE_LINE_DETAILS
4253 WHERE quote_line_id = p_qte_line_id;
4254
4255 CURSOR c_order_line (p_order_line_id IN NUMBER) IS
4256 SELECT line_id, inventory_item_id, pricing_quantity, pricing_quantity_uom,
4257 unit_list_price, price_list_id, charge_periodicity_code
4258 FROM OE_ORDER_LINES_ALL
4259 WHERE line_id = p_order_line_id;
4260
4261 /* Cursors used for the customer_products*/
4262
4263 /*CURSOR c_get_cust_acct_id IS
4264 SELECT cust_account_id
4265 FROM ASO_QUOTE_HEADERS_ALL
4266 WHERE quote_header_id = p_qte_header_id;
4267 */
4268 CURSOR c_get_orig_order_line_id(p_instance_id IN NUMBER, p_cust_account_id NUMBER) IS
4269 SELECT original_order_line_id
4270 FROM csi_instance_accts_rg_v
4271 WHERE customer_product_id = p_instance_id
4272 AND account_id = p_cust_account_id;
4273
4274 /*** Start: BugNo 8647883: R12.1.2 Service reference SUN ER ***/
4275 CURSOR c_get_cust_acct_id IS
4276 select decode(nvl(fnd_profile.value('ASO_FILTER_SERVICE_RF_END_CUST'),'N'),'Y',nvl(END_CUSTOMER_CUST_ACCOUNT_ID,cust_account_id),cust_account_id) cust_account_id
4277 from ASO_QUOTE_HEADERS_ALL
4278 WHERE quote_header_id = p_qte_header_id;
4279
4280 CURSOR c_get_cust_acct_id_ln(p_qte_line_id number) IS
4281 select decode(nvl(fnd_profile.value('ASO_FILTER_SERVICE_RF_END_CUST'),'N'),'Y',END_CUSTOMER_CUST_ACCOUNT_ID)
4282 from ASO_QUOTE_LINES_ALL
4283 WHERE quote_line_id = p_qte_line_id;
4284
4285 cursor c_get_price_list(p_qte_hdr_id number) is
4286 select price_list_id
4287 from aso_quote_headers_all
4288 where quote_header_id = p_qte_hdr_id;
4289
4290
4291 l_cust_account_id number;
4292 /*** End: BugNo 8647883: R12.1.2 Service reference SUN ER ***/
4293
4294 /******* Start SUN Changes ER: 3802859 *******/
4295
4296 l_order_found BOOLEAN := FALSE;
4297
4298 -- changed cursor for bug 12839557
4299 CURSOR c_csi_line_details(p_instance_id IN NUMBER, p_cust_account_id NUMBER) IS
4300 SELECT si.concatenated_segments product, si.inventory_item_id, cii.quantity, cii.unit_of_measure
4301 FROM mtl_system_items_kfv si, csi_item_instances cii
4302 WHERE NVL(cii.active_end_date, (SYSDATE + 1)) > SYSDATE
4303 AND cii.inventory_item_id = si.inventory_item_id
4304 AND si.organization_id = cii.inv_master_organization_id
4305 AND cii.instance_id =p_instance_id;
4306
4307 /* SELECT distinct a.product,b.inventory_item_id,a.quantity,a.unit_of_measure_code
4308 FROM csi_instance_accts_rg_v a ,mtl_system_items_vl b
4309 where a.product = b.concatenated_segments
4310 AND a.customer_product_id = p_instance_id;
4311 --AND a.account_id = p_cust_account_id;
4312 */
4313 l_prod varchar2(1000);
4314 l_item_id number;
4315 l_qty number;
4316 l_uom varchar2(30);
4317
4318 /******* Start SUN Changes ER: 3802859 *******/
4319
4320
4321 l_service_item_flag MTL_SYSTEM_ITEMS_VL.SERVICE_ITEM_FLAG%TYPE;
4322 l_ref_type_code ASO_QUOTE_LINE_DETAILS.SERVICE_REF_TYPE_CODE%TYPE;
4323 l_service_ref_line_id ASO_QUOTE_LINE_DETAILS.SERVICE_REF_LINE_ID%TYPE;
4324
4325 l_Qte_Line_rec ASO_QUOTE_PUB.Qte_Line_Rec_Type;
4326 l_Qte_Line_tbl ASO_QUOTE_PUB.Qte_Line_Tbl_Type;
4327 l_service_ref_line_id_tbl Index_Link_Tbl_Type;
4328 l_order_ref_line_id_tbl Index_Link_Tbl_Type;
4329
4330 BEGIN
4331
4332 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4333 aso_debug_pub.add('ASO_UTL_PVT: Start Query Pricing Line Rows p_qte_header_id: '||p_qte_header_id,1,'Y');
4334 END IF;
4335
4336 FOR c_qte_line_rec IN c_Qte_Line LOOP
4337 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4338 aso_debug_pub.add('ASO_UTL_PVT: Inside c_qte_line_rec with c_qte_line_rec.quote_line_id: '
4339 ||c_qte_line_rec.quote_line_id,1,'Y');
4340 aso_debug_pub.add('ASO_UTL_PVT: Inside c_qte_line_rec with c_qte_line_rec.service_item_flag: '
4341 ||c_qte_line_rec.service_item_flag,1,'Y');
4342 END IF;
4343
4344 IF NVL(c_qte_line_rec.service_item_flag,'N') = 'Y' THEN
4345 OPEN c_qte_line_SVC_ref(c_qte_line_rec.quote_line_id);
4346 FETCH c_qte_line_SVC_ref INTO l_ref_type_code, l_service_ref_line_id;
4347 CLOSE c_qte_line_SVC_ref;
4348 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4349 aso_debug_pub.add('ASO_UTL_PVT: Parent Service Line collection ... ',1,'Y');
4350 END IF;
4351
4352 IF l_ref_type_code = 'ORDER' THEN
4353 IF l_order_ref_line_id_tbl.exists(l_service_ref_line_id) THEN
4354 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4355 aso_debug_pub.add('ASO_UTL_PVT: Parent Order Line has already been added to l_qte_line_tbl.',1,'Y');
4356 END IF;
4357 ELSE
4358 FOR c_order_line_rec IN c_order_line(l_service_ref_line_id) LOOP
4359 l_order_ref_line_id_tbl(l_service_ref_line_id) := l_service_ref_line_id;
4360 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4361 aso_debug_pub.add('ASO_UTL_PVT: Parent Order Line has not yet been added to l_qte_line_tbl.', 1, 'N');
4362 aso_debug_pub.add('ASO_UTL_PVT: l_service_ref_line_id_tbl('||l_service_ref_line_id||').:'
4363 ||NVL(to_char(l_order_ref_line_id_tbl(l_service_ref_line_id)),'null'),1,'Y');
4364 END IF;
4365 l_qte_line_rec.QUOTE_LINE_ID := c_order_line_rec.LINE_ID;
4366 l_qte_line_rec.INVENTORY_ITEM_ID := c_order_line_rec.INVENTORY_ITEM_ID;
4367 l_qte_line_rec.QUANTITY := c_order_line_rec.PRICING_QUANTITY;
4368 l_qte_line_rec.UOM_CODE := c_order_line_rec.PRICING_QUANTITY_UOM;
4369 l_qte_line_rec.PRICE_LIST_ID := c_order_line_rec.PRICE_LIST_ID;
4370 l_qte_line_rec.LINE_LIST_PRICE := c_order_line_rec.UNIT_LIST_PRICE;
4371 l_qte_line_rec.LINE_CATEGORY_CODE := 'SERVICE_REF_ORDER_LINE';
4372 l_qte_line_rec.CHARGE_PERIODICITY_CODE := c_order_line_rec.CHARGE_PERIODICITY_CODE;
4373
4374 l_qte_line_rec.PRICING_QUANTITY := c_order_line_rec.PRICING_QUANTITY;
4375 l_qte_line_rec.PRICING_QUANTITY_UOM := c_order_line_rec.PRICING_QUANTITY_UOM;
4376 l_qte_line_rec.IS_LINE_CHANGED_FLAG := 'Y';
4377 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4378 aso_debug_pub.add('ASO_UTL_PVT:P_change_line_flag:'||P_change_line_flag,1,'Y');
4379 END IF;
4380 If P_change_line_flag = FND_API.G_FALSE Then
4381 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
4382 else
4383 l_Qte_Line_tbl(l_qte_line_rec.QUOTE_LINE_ID) := l_Qte_Line_rec;
4384 end if;
4385 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4386 aso_debug_pub.add('Order Line Count'|| l_Qte_line_tbl.COUNT, 1, 'N');
4387 END IF;
4388
4389 END LOOP;
4390 END IF;--l_order_ref_line_id_tbl.exists(l_service_ref_line_id)
4391 ELSIF l_ref_type_code = 'CUSTOMER_PRODUCT' THEN
4392 IF l_service_ref_line_id_tbl.exists(l_service_ref_line_id) THEN
4393 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4394 aso_debug_pub.add('ASO_UTL_PVT: Parent Instance Line has already been added to l_qte_line_tbl.',1,'Y');
4395 END IF;
4396 ELSE
4397 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4398 aso_debug_pub.add('ASO_UTL_PVT: Before customer install processing:',1,'Y');
4399 END IF;
4400 /*** Start: BugNo 8647883: R12.1.2 Service reference SUN ER ***/
4401 --FOR c_get_cust_acct_id_rec IN c_get_cust_acct_id LOOP
4402 open c_get_cust_acct_id_ln(c_qte_line_rec.quote_line_id);
4403 fetch c_get_cust_acct_id_ln into l_cust_account_id;
4404 if (c_get_cust_acct_id_ln%NOTFOUND) or (l_cust_account_id is null) THEN
4405 open c_get_cust_acct_id;
4406 fetch c_get_cust_acct_id into l_cust_account_id;
4407 if c_get_cust_acct_id%NOTFOUND THEN
4408 l_cust_account_id:=NULL;
4409 end if;
4410 close c_get_cust_acct_id;
4411 end if;
4412 close c_get_cust_acct_id_ln;
4413 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4414 aso_debug_pub.add('ASO_UTL_PVT: l_cust_account_id:'||l_cust_account_id,1,'Y');
4415
4416 END IF;
4417 /*** End: BugNo 8647883: R12.1.2 Service reference SUN ER ***/
4418 l_service_ref_line_id_tbl(l_service_ref_line_id) := l_service_ref_line_id;
4419
4420 For c_get_orig_order_line_id_rec IN c_get_orig_order_line_id(l_service_ref_line_id,l_cust_account_id) LOOP
4421
4422 l_order_found := FALSE; -- fix for bug Bug 9724104
4423
4424 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4425 aso_debug_pub.add('ASO_UTL_PVT: Parent Instance Line has not yet been added to l_qte_line_tbl.', 1, 'N');
4426 aso_debug_pub.add('ASO_UTL_PVT: l_service_ref_line_id_tbl('||l_service_ref_line_id||').:'
4427 ||NVL(to_char(l_service_ref_line_id_tbl(l_service_ref_line_id)),'null'),1,'Y');
4428 END IF;
4429
4430 FOR c_order_line_rec IN c_order_line(c_get_orig_order_line_id_rec.original_order_line_id) LOOP
4431 l_order_found := TRUE;
4432 l_qte_line_rec.QUOTE_LINE_ID := l_service_ref_line_id;
4433 l_qte_line_rec.INVENTORY_ITEM_ID := c_order_line_rec.INVENTORY_ITEM_ID;
4434 l_qte_line_rec.QUANTITY := c_order_line_rec.PRICING_QUANTITY;
4435 l_qte_line_rec.UOM_CODE := c_order_line_rec.PRICING_QUANTITY_UOM;
4436 l_qte_line_rec.PRICE_LIST_ID := c_order_line_rec.PRICE_LIST_ID;
4437 l_qte_line_rec.LINE_LIST_PRICE := c_order_line_rec.UNIT_LIST_PRICE;
4438 l_qte_line_rec.LINE_CATEGORY_CODE := 'SERVICE_REF_CUSTOMER_LINE';
4439 l_qte_line_rec.CHARGE_PERIODICITY_CODE := c_order_line_rec.CHARGE_PERIODICITY_CODE;
4440
4441 l_qte_line_rec.PRICING_QUANTITY := c_order_line_rec.PRICING_QUANTITY;
4442 l_qte_line_rec.PRICING_QUANTITY_UOM := c_order_line_rec.PRICING_QUANTITY_UOM;
4443 l_qte_line_rec.IS_LINE_CHANGED_FLAG := 'Y';
4444 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4445 aso_debug_pub.add('ASO_UTL_PVT:P_change_line_flag:'||P_change_line_flag,1,'Y');
4446 END IF;
4447 If P_change_line_flag = FND_API.G_FALSE Then
4448 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
4449 else
4450 l_Qte_Line_tbl(l_qte_line_rec.QUOTE_LINE_ID) := l_Qte_Line_rec;
4451 end if;
4452 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4453 aso_debug_pub.add('Instance Line Count '|| l_Qte_line_tbl.COUNT, 1, 'N');
4454 END IF;
4455
4456 END LOOP;
4457
4458
4459
4460
4461 /****** Start SUN Changes ER:3802859 *******/
4462
4463 IF l_order_found = FALSE THEN -- this means no order line was found then
4464
4465 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4466 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** Inside new condition', 1, 'N');
4467 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_service_ref_line_id: '|| l_service_ref_line_id, 1, 'N');
4468 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_cust_account_id: '|| l_cust_account_id, 1, 'N');
4469 END IF;
4470
4471 open c_csi_line_details(l_service_ref_line_id,l_cust_account_id);
4472 fetch c_csi_line_details into l_prod,l_item_id,l_qty,l_uom;
4473
4474 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4475 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** After fetching the csi line details', 1, 'N');
4476 END IF;
4477
4478 l_qte_line_rec.QUOTE_LINE_ID := l_service_ref_line_id;
4479 l_qte_line_rec.INVENTORY_ITEM_ID := l_item_id;
4480 l_qte_line_rec.QUANTITY := l_qty;
4481 l_qte_line_rec.UOM_CODE := l_uom;
4482
4483 -- get the price list from the header
4484 open c_get_price_list(p_qte_header_id);
4485 fetch c_get_price_list INTO l_qte_line_rec.PRICE_LIST_ID;
4486 CLOSE c_get_price_list;
4487
4488 l_qte_line_rec.LINE_LIST_PRICE := 0;
4489 l_qte_line_rec.LINE_CATEGORY_CODE := 'SERVICE_REF_CUSTOMER_LINE';
4490
4491 --l_qte_line_rec.CHARGE_PERIODICITY_CODE := c_order_line_rec.CHARGE_PERIODICITY_CODE;
4492
4493 l_qte_line_rec.PRICING_QUANTITY := l_qty;
4494 l_qte_line_rec.PRICING_QUANTITY_UOM := l_UOM;
4495 l_qte_line_rec.IS_LINE_CHANGED_FLAG := 'Y';
4496 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4497 aso_debug_pub.add('ASO_UTL_PVT:P_change_line_flag:'||P_change_line_flag,1,'Y');
4498 END IF;
4499 If P_change_line_flag = FND_API.G_FALSE Then
4500 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
4501 else
4502 l_Qte_Line_tbl(l_qte_line_rec.QUOTE_LINE_ID) := l_Qte_Line_rec;
4503 end if;
4504 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4505 aso_debug_pub.add('Instance Line Count '|| l_Qte_line_tbl.COUNT, 1, 'N');
4506 END IF;
4507
4508 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4509 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_service_ref_line_id: '|| l_service_ref_line_id, 1, 'N');
4510 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_item_id: '|| l_item_id, 1, 'N');
4511 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_qty: '|| l_qty, 1, 'N');
4512 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_uom: '|| l_uom, 1, 'N');
4513 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_qte_line_rec.PRICE_LIST_ID: '||l_qte_line_rec.PRICE_LIST_ID, 1, 'N');
4514 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** Instance Line Count: '|| NVL(l_Qte_line_tbl.COUNT,0), 1, 'N');
4515 END IF;
4516
4517 close c_csi_line_details;
4518 END IF;
4519
4520 /******* End SUN Changes ER:3802859 *******/
4521 END LOOP;
4522 --END LOOP;
4523
4524 END IF;--l_service_ref_line_id_tbl.exists(l_service_ref_line_id)
4525 /*** Start: BugNo 8647883: R12.1.2 Service reference SUN ER ***/
4526 ELSIF l_ref_type_code = 'PRODUCT_CATALOG' THEN
4527 IF l_service_ref_line_id_tbl.exists(l_service_ref_line_id) THEN
4528 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4529 aso_debug_pub.add('ASO_UTL_PVT: Parent Instance Line has already been added to l_qte_line_tbl.',1,'Y');
4530 END IF;
4531 ELSE
4532 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4533 aso_debug_pub.add('ASO_UTL_PVT: **** ER: II****** Before product catalog processing:',1,'Y');
4534 END IF;
4535
4536
4537 l_service_ref_line_id_tbl(l_service_ref_line_id) := l_service_ref_line_id;
4538 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4539 aso_debug_pub.add('ASO_UTL_PVT: **** **** ER: II****** ****** Inside new condition', 1, 'N');
4540 aso_debug_pub.add('ASO_UTL_PVT: **** **** ER: II****** ****** l_service_ref_line_id: '|| l_service_ref_line_id, 1, 'N');
4541
4542 END IF;
4543
4544 l_qte_line_rec.QUOTE_LINE_ID := l_service_ref_line_id; --c_qte_line_rec.QUOTE_LINE_ID;
4545 l_qte_line_rec.INVENTORY_ITEM_ID := l_service_ref_line_id;
4546 l_qte_line_rec.QUANTITY := c_qte_line_rec.pricing_QUANTITY;
4547 l_qte_line_rec.UOM_CODE := c_qte_line_rec.PRICING_QUANTITY_UOM;
4548 -- get the price list from the header
4549 open c_get_price_list(p_qte_header_id);
4550 fetch c_get_price_list INTO l_qte_line_rec.PRICE_LIST_ID;
4551 CLOSE c_get_price_list;
4552
4553 l_qte_line_rec.LINE_LIST_PRICE := 0;
4554 l_qte_line_rec.LINE_CATEGORY_CODE := 'SERVICE_REF_CUSTOMER_LINE';
4555 l_qte_line_rec.PRICING_QUANTITY := c_qte_line_rec.PRICING_QUANTITY;
4556 l_qte_line_rec.PRICING_QUANTITY_UOM := c_qte_line_rec.PRICING_QUANTITY_UOM;
4557 l_qte_line_rec.IS_LINE_CHANGED_FLAG := 'Y';
4558
4559 If P_change_line_flag = FND_API.G_FALSE Then
4560 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
4561 else
4562 l_Qte_Line_tbl(l_qte_line_rec.QUOTE_LINE_ID) := l_Qte_Line_rec;
4563 end if;
4564 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4565 aso_debug_pub.add('Instance Line Count '|| l_Qte_line_tbl.COUNT, 1, 'N');
4566 END IF;
4567
4568
4569
4570 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4571 aso_debug_pub.add('ASO_UTL_PVT: **** ER: II****** l_service_ref_line_id: '|| l_service_ref_line_id, 1, 'N');
4572 aso_debug_pub.add('ASO_UTL_PVT: **** ER:II ****** l_item_id: '|| l_qte_line_rec.INVENTORY_ITEM_ID , 1, 'N');
4573 aso_debug_pub.add('ASO_UTL_PVT: **** ER:II ****** l_qty: '|| l_qte_line_rec.QUANTITY , 1, 'N');
4574 aso_debug_pub.add('ASO_UTL_PVT: **** ER:II ****** l_uom: '|| l_qte_line_rec.UOM_CODE, 1, 'N');
4575 aso_debug_pub.add('ASO_UTL_PVT: **** ER:II ****** l_qte_line_rec.PRICE_LIST_ID: '||l_qte_line_rec.PRICE_LIST_ID, 1, 'N');
4576 aso_debug_pub.add('ASO_UTL_PVT: **** ER:II ****** Instance Line Count: '|| NVL(l_Qte_line_tbl.COUNT,0), 1, 'N');
4577 END IF;
4578 END IF;--l_service_ref_line_id_tbl.exists(l_service_ref_line_id)
4579
4580 END IF;--elsif l_ref_type_code = 'PRODUCT_CATALOG'
4581
4582 --END IF;--elsif l_ref_type_code = 'CUSTOMER_PRODUCT'
4583 /*** End: BugNo 8647883: R12.1.2 Service reference SUN ER ***/
4584 END IF; /* Service Item Flag Check */
4585
4586 l_qte_line_rec.QUOTE_LINE_ID := c_qte_line_rec.QUOTE_LINE_ID;
4587 l_qte_line_rec.CREATION_DATE := c_qte_line_rec.CREATION_DATE;
4588 l_qte_line_rec.CREATED_BY := c_qte_line_rec.CREATED_BY;
4589 l_qte_line_rec.LAST_UPDATE_DATE := c_qte_line_rec.LAST_UPDATE_DATE;
4590 l_qte_line_rec.LAST_UPDATED_BY := c_qte_line_rec.LAST_UPDATED_BY;
4591 l_qte_line_rec.LAST_UPDATE_LOGIN := c_qte_line_rec.LAST_UPDATE_LOGIN;
4592 l_qte_line_rec.REQUEST_ID := c_qte_line_rec.REQUEST_ID;
4593 l_qte_line_rec.PROGRAM_APPLICATION_ID := c_qte_line_rec.PROGRAM_APPLICATION_ID;
4594 l_qte_line_rec.PROGRAM_ID := c_qte_line_rec.PROGRAM_ID;
4595 l_qte_line_rec.PROGRAM_UPDATE_DATE := c_qte_line_rec.PROGRAM_UPDATE_DATE;
4596 l_qte_line_rec.quote_header_id := c_qte_line_rec.quote_header_id;
4597 l_qte_line_rec.ORG_ID := c_qte_line_rec.ORG_ID;
4598 l_qte_line_rec.LINE_CATEGORY_CODE := c_qte_line_rec.LINE_CATEGORY_CODE;
4599 l_qte_line_rec.ITEM_TYPE_CODE := c_qte_line_rec.ITEM_TYPE_CODE;
4600 l_qte_line_rec.LINE_NUMBER := c_qte_line_rec.LINE_NUMBER;
4601 l_qte_line_rec.START_DATE_ACTIVE := c_qte_line_rec.START_DATE_ACTIVE;
4602 l_qte_line_rec.END_DATE_ACTIVE := c_qte_line_rec.END_DATE_ACTIVE;
4603 l_qte_line_rec.ORDER_LINE_TYPE_ID := c_qte_line_rec.ORDER_LINE_TYPE_ID;
4604 l_qte_line_rec.INVOICE_TO_PARTY_SITE_ID := c_qte_line_rec.INVOICE_TO_PARTY_SITE_ID;
4605 l_qte_line_rec.INVOICE_TO_PARTY_ID := c_qte_line_rec.INVOICE_TO_PARTY_ID;
4606 l_qte_line_rec.INVOICE_TO_CUST_ACCOUNT_ID := c_qte_line_rec.INVOICE_TO_CUST_ACCOUNT_ID;
4607 l_qte_line_rec.ORGANIZATION_ID := c_qte_line_rec.ORGANIZATION_ID;
4608 l_qte_line_rec.INVENTORY_ITEM_ID := c_qte_line_rec.INVENTORY_ITEM_ID;
4609 l_qte_line_rec.QUANTITY := c_qte_line_rec.QUANTITY;
4610 l_qte_line_rec.UOM_CODE := c_qte_line_rec.UOM_CODE;
4611 l_qte_line_rec.MARKETING_SOURCE_CODE_ID := c_qte_line_rec.MARKETING_SOURCE_CODE_ID;
4612 l_qte_line_rec.PRICE_LIST_ID := c_qte_line_rec.PRICE_LIST_ID;
4613 l_qte_line_rec.PRICE_LIST_LINE_ID := c_qte_line_rec.PRICE_LIST_LINE_ID;
4614 l_qte_line_rec.CURRENCY_CODE := c_qte_line_rec.CURRENCY_CODE;
4615 l_qte_line_rec.LINE_LIST_PRICE := c_qte_line_rec.LINE_LIST_PRICE;
4616 l_qte_line_rec.LINE_ADJUSTED_AMOUNT := c_qte_line_rec.LINE_ADJUSTED_AMOUNT;
4617 l_qte_line_rec.LINE_ADJUSTED_PERCENT := c_qte_line_rec.LINE_ADJUSTED_PERCENT;
4618 l_qte_line_rec.LINE_QUOTE_PRICE := c_qte_line_rec.LINE_QUOTE_PRICE;
4619 l_qte_line_rec.RELATED_ITEM_ID := c_qte_line_rec.RELATED_ITEM_ID;
4620 l_qte_line_rec.ITEM_RELATIONSHIP_TYPE := c_qte_line_rec.ITEM_RELATIONSHIP_TYPE;
4621 l_qte_line_rec.ACCOUNTING_RULE_ID := c_qte_line_rec.ACCOUNTING_RULE_ID;
4622 l_qte_line_rec.INVOICING_RULE_ID := c_qte_line_rec.INVOICING_RULE_ID;
4623 l_qte_line_rec.SPLIT_SHIPMENT_FLAG := c_qte_line_rec.SPLIT_SHIPMENT_FLAG;
4624 l_qte_line_rec.BACKORDER_FLAG := c_qte_line_rec.BACKORDER_FLAG;
4625 l_qte_line_rec.MINISITE_ID := c_qte_line_rec.MINISITE_ID;
4626 l_qte_line_rec.SECTION_ID := c_qte_line_rec.SECTION_ID;
4627 l_qte_line_rec.INVOICE_TO_CUST_PARTY_ID:= c_qte_line_rec.INVOICE_TO_CUST_PARTY_ID;
4628 l_qte_line_rec.RECALCULATE_FLAG := c_qte_line_rec.RECALCULATE_FLAG;
4629 l_qte_line_rec.SELLING_PRICE_CHANGE := c_qte_line_rec.SELLING_PRICE_CHANGE;
4630 l_qte_line_rec.service_item_flag := c_qte_line_rec.service_item_flag;
4631 l_qte_line_rec.ATTRIBUTE_CATEGORY := c_qte_line_rec.ATTRIBUTE_CATEGORY;
4632 l_qte_line_rec.ATTRIBUTE1 := c_qte_line_rec.ATTRIBUTE1;
4633 l_qte_line_rec.ATTRIBUTE2 := c_qte_line_rec.ATTRIBUTE2;
4634 l_qte_line_rec.ATTRIBUTE3 := c_qte_line_rec.ATTRIBUTE3;
4635 l_qte_line_rec.ATTRIBUTE4 := c_qte_line_rec.ATTRIBUTE4;
4636 l_qte_line_rec.ATTRIBUTE5 := c_qte_line_rec.ATTRIBUTE5;
4637 l_qte_line_rec.ATTRIBUTE6 := c_qte_line_rec.ATTRIBUTE6;
4638 l_qte_line_rec.ATTRIBUTE7 := c_qte_line_rec.ATTRIBUTE7;
4639 l_qte_line_rec.ATTRIBUTE8 := c_qte_line_rec.ATTRIBUTE8;
4640 l_qte_line_rec.ATTRIBUTE9 := c_qte_line_rec.ATTRIBUTE9;
4641 l_qte_line_rec.ATTRIBUTE10 := c_qte_line_rec.ATTRIBUTE10;
4642 l_qte_line_rec.ATTRIBUTE11 := c_qte_line_rec.ATTRIBUTE11;
4643 l_qte_line_rec.ATTRIBUTE12 := c_qte_line_rec.ATTRIBUTE12;
4644 l_qte_line_rec.ATTRIBUTE13 := c_qte_line_rec.ATTRIBUTE13;
4645 l_qte_line_rec.ATTRIBUTE14 := c_qte_line_rec.ATTRIBUTE14;
4646 l_qte_line_rec.ATTRIBUTE15 := c_qte_line_rec.ATTRIBUTE15;
4647 l_qte_line_rec.ATTRIBUTE16 := c_qte_line_rec.ATTRIBUTE16;
4648 l_qte_line_rec.ATTRIBUTE17 := c_qte_line_rec.ATTRIBUTE17;
4649 l_qte_line_rec.ATTRIBUTE18 := c_qte_line_rec.ATTRIBUTE18;
4650 l_qte_line_rec.ATTRIBUTE19 := c_qte_line_rec.ATTRIBUTE19;
4651 l_qte_line_rec.ATTRIBUTE20 := c_qte_line_rec.ATTRIBUTE20;
4652 l_qte_line_rec.PRICED_PRICE_LIST_ID := c_qte_line_rec.PRICED_PRICE_LIST_ID;
4653 l_qte_line_rec.AGREEMENT_ID := c_qte_line_rec.AGREEMENT_ID;
4654 l_qte_line_rec.COMMITMENT_ID := c_qte_line_rec.COMMITMENT_ID;
4655 l_qte_line_rec.DISPLAY_ARITHMETIC_OPERATOR := c_qte_line_rec.DISPLAY_ARITHMETIC_OPERATOR;
4656 l_qte_line_rec.PRICING_LINE_TYPE_INDICATOR := c_qte_line_rec.PRICING_LINE_TYPE_INDICATOR;
4657 l_qte_line_rec.END_CUSTOMER_PARTY_ID := c_qte_line_rec.END_CUSTOMER_PARTY_ID;
4658 l_qte_line_rec.END_CUSTOMER_PARTY_SITE_ID := c_qte_line_rec.END_CUSTOMER_PARTY_SITE_ID;
4659 l_qte_line_rec.END_CUSTOMER_CUST_ACCOUNT_ID := c_qte_line_rec.END_CUSTOMER_CUST_ACCOUNT_ID;
4660 l_qte_line_rec.END_CUSTOMER_CUST_PARTY_ID := c_qte_line_rec.END_CUSTOMER_CUST_PARTY_ID;
4661 l_qte_line_rec.SHIP_MODEL_COMPLETE_FLAG := c_qte_line_rec.SHIP_MODEL_COMPLETE_FLAG;
4662 l_qte_line_rec.CHARGE_PERIODICITY_CODE := c_qte_line_rec.CHARGE_PERIODICITY_CODE;
4663 l_qte_line_rec.PRICING_QUANTITY_UOM := c_qte_line_rec.PRICING_QUANTITY_UOM;
4664 l_qte_line_rec.PRICING_QUANTITY := c_qte_line_rec.PRICING_QUANTITY;
4665 l_qte_line_rec.OBJECT_VERSION_NUMBER := c_qte_line_rec.OBJECT_VERSION_NUMBER;
4666 -- ER 12879412
4667 /* l_qte_line_rec.PRODUCT_FISC_CLASSIFICATION := c_qte_line_rec.PRODUCT_FISC_CLASSIFICATION;
4668 l_qte_line_rec.TRX_BUSINESS_CATEGORY := c_qte_line_rec.TRX_BUSINESS_CATEGORY;*/
4669
4670 l_qte_line_rec.IS_LINE_CHANGED_FLAG := 'Y';
4671 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4672 aso_debug_pub.add('ASO_UTL_PVT:P_change_line_flag:'||P_change_line_flag,1,'Y');
4673 END IF;
4674 If P_change_line_flag = FND_API.G_FALSE Then
4675 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
4676 else
4677 l_Qte_Line_tbl(l_qte_line_rec.QUOTE_LINE_ID) := l_Qte_Line_rec;
4678 end if;
4679
4680 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4681 aso_debug_pub.add('Quote Line Count'|| l_Qte_line_tbl.COUNT, 1, 'N');
4682 END IF;
4683 END LOOP;
4684 RETURN l_Qte_Line_tbl;
4685
4686 END Query_Pricing_Line_Rows;
4687
4688 -- New Function for Pricing Ends Here...................................
4689
4690 -- New Function for Pricing Line Row Starts Here...................................
4691
4692
4693 FUNCTION Query_Pricing_Line_Row (
4694 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM,
4695 P_Qte_Line_Id IN NUMBER := FND_API.G_MISS_NUM
4696 ) RETURN ASO_QUOTE_PUB.Qte_Line_Tbl_Type
4697 IS
4698 CURSOR c_Qte_Line IS
4699 SELECT
4700 QUOTE_LINE_ID,
4701 CREATION_DATE,
4702 CREATED_BY,
4703 LAST_UPDATE_DATE,
4704 LAST_UPDATED_BY,
4705 LAST_UPDATE_LOGIN,
4706 REQUEST_ID,
4707 PROGRAM_APPLICATION_ID,
4708 PROGRAM_ID,
4709 PROGRAM_UPDATE_DATE,
4710 QUOTE_HEADER_ID,
4711 ORG_ID,
4712 LINE_CATEGORY_CODE,
4713 ITEM_TYPE_CODE,
4714 LINE_NUMBER,
4715 START_DATE_ACTIVE,
4716 END_DATE_ACTIVE,
4717 ORDER_LINE_TYPE_ID,
4718 INVOICE_TO_PARTY_SITE_ID,
4719 INVOICE_TO_PARTY_ID,
4720 INVOICE_TO_CUST_ACCOUNT_ID,
4721 ORGANIZATION_ID,
4722 INVENTORY_ITEM_ID,
4723 QUANTITY,
4724 UOM_CODE,
4725 MARKETING_SOURCE_CODE_ID,
4726 PRICE_LIST_ID,
4727 PRICE_LIST_LINE_ID,
4728 CURRENCY_CODE,
4729 LINE_LIST_PRICE,
4730 LINE_ADJUSTED_AMOUNT,
4731 LINE_ADJUSTED_PERCENT,
4732 LINE_QUOTE_PRICE,
4733 RELATED_ITEM_ID,
4734 ITEM_RELATIONSHIP_TYPE,
4735 ACCOUNTING_RULE_ID,
4736 INVOICING_RULE_ID,
4737 SPLIT_SHIPMENT_FLAG,
4738 BACKORDER_FLAG,
4739 MINISITE_ID,
4740 SECTION_ID,
4741 INVOICE_TO_CUST_PARTY_ID,
4742 RECALCULATE_FLAG,
4743 SELLING_PRICE_CHANGE,
4744 SERVICE_ITEM_FLAG,
4745 ATTRIBUTE_CATEGORY,
4746 ATTRIBUTE1,
4747 ATTRIBUTE2,
4748 ATTRIBUTE3,
4749 ATTRIBUTE4,
4750 ATTRIBUTE5,
4751 ATTRIBUTE6,
4752 ATTRIBUTE7,
4753 ATTRIBUTE8,
4754 ATTRIBUTE9,
4755 ATTRIBUTE10,
4756 ATTRIBUTE11,
4757 ATTRIBUTE12,
4758 ATTRIBUTE13,
4759 ATTRIBUTE14,
4760 ATTRIBUTE15,
4761 ATTRIBUTE16,
4762 ATTRIBUTE17,
4763 ATTRIBUTE18,
4764 ATTRIBUTE19,
4765 ATTRIBUTE20,
4766 PRICED_PRICE_LIST_ID,
4767 AGREEMENT_ID,
4768 COMMITMENT_ID,
4769 DISPLAY_ARITHMETIC_OPERATOR,
4770 PRICING_LINE_TYPE_INDICATOR,
4771 END_CUSTOMER_PARTY_ID,
4772 END_CUSTOMER_PARTY_SITE_ID,
4773 END_CUSTOMER_CUST_ACCOUNT_ID,
4774 END_CUSTOMER_CUST_PARTY_ID,
4775 SHIP_MODEL_COMPLETE_FLAG,
4776 CHARGE_PERIODICITY_CODE,
4777 PRICING_QUANTITY_UOM,
4778 PRICING_QUANTITY,
4779 OBJECT_VERSION_NUMBER
4780 /*,
4781 -- ER 12879412
4782 PRODUCT_FISC_CLASSIFICATION,
4783 TRX_BUSINESS_CATEGORY
4784 */
4785 FROM ASO_Quote_Lines_All
4786 WHERE quote_header_id = p_qte_header_id
4787 AND quote_line_id = p_qte_line_id
4788 ORDER BY Line_Number;
4789
4790 /* 2633507 - hyang: use mtl_system_items_b instead of vl */
4791
4792 CURSOR c_Qte_Line_SVC_chk (p_inventory_item_id IN NUMBER,
4793 p_organization_id IN NUMBER) IS
4794 SELECT mtl.service_item_flag
4795 FROM MTL_SYSTEM_ITEMS_B mtl
4796 WHERE mtl.inventory_item_id = p_inventory_item_id
4797 AND mtl.organization_id = p_organization_id;
4798
4799 CURSOR c_Qte_Line_SVC_ref(p_qte_line_id IN NUMBER) IS
4800 SELECT service_ref_type_code , service_ref_line_id
4801 FROM ASO_QUOTE_LINE_DETAILS
4802 WHERE quote_line_id = p_qte_line_id;
4803
4804 CURSOR c_order_line (p_order_line_id IN NUMBER) IS
4805 SELECT line_id, inventory_item_id, pricing_quantity, pricing_quantity_uom,
4806 unit_list_price, price_list_id, charge_periodicity_code
4807 FROM OE_ORDER_LINES_ALL
4808 WHERE line_id = p_order_line_id;
4809
4810 /* Cursors used for the customer_products*/
4811
4812 /*** Start: BugNo 8647883: R12.1.2 Service reference SUN ER ***/
4813 CURSOR c_get_cust_acct_id IS
4814 select decode(nvl(fnd_profile.value('ASO_FILTER_SERVICE_RF_END_CUST'),'N'),'Y',nvl(END_CUSTOMER_CUST_ACCOUNT_ID,cust_account_id),cust_account_id) cust_account_id
4815 from ASO_QUOTE_HEADERS_ALL
4816 WHERE quote_header_id = p_qte_header_id;
4817
4818 CURSOR c_get_cust_acct_id_ln(p_qte_line_id number) IS
4819 select decode(nvl(fnd_profile.value('ASO_FILTER_SERVICE_RF_END_CUST'),'N'),'Y',END_CUSTOMER_CUST_ACCOUNT_ID)
4820 from ASO_QUOTE_LINES_ALL
4821 WHERE quote_line_id = p_qte_line_id;
4822
4823 cursor c_get_price_list(p_qte_hdr_id number) is
4824 select price_list_id
4825 from aso_quote_headers_all
4826 where quote_header_id = p_qte_hdr_id;
4827
4828
4829 l_cust_account_id number;
4830
4831 /* CURSOR c_get_cust_acct_id IS
4832 SELECT cust_account_id
4833 FROM ASO_QUOTE_HEADERS_ALL
4834 WHERE quote_header_id = p_qte_header_id;*/
4835
4836 /*** End: BugNo 8647883: R12.1.2 Service reference SUN ER ***/
4837
4838 CURSOR c_get_orig_order_line_id(p_instance_id IN NUMBER, p_cust_account_id NUMBER) IS
4839 SELECT original_order_line_id
4840 FROM csi_instance_accts_rg_v
4841 WHERE customer_product_id = p_instance_id
4842 AND account_id = p_cust_account_id;
4843
4844 /******* Start SUN Changes ER: 3802859 *******/
4845
4846 l_order_found BOOLEAN := FALSE;
4847
4848 CURSOR c_csi_line_details(p_instance_id IN NUMBER, p_cust_account_id NUMBER) IS
4849 SELECT si.concatenated_segments product, si.inventory_item_id, cii.quantity, cii.unit_of_measure
4850 FROM mtl_system_items_kfv si, csi_item_instances cii
4851 WHERE NVL(cii.active_end_date, (SYSDATE + 1)) > SYSDATE
4852 AND cii.inventory_item_id = si.inventory_item_id
4853 AND si.organization_id = cii.inv_master_organization_id
4854 AND cii.instance_id =p_instance_id;
4855
4856 l_prod varchar2(1000);
4857 l_item_id number;
4858 l_qty number;
4859 l_uom varchar2(30);
4860
4861 /******* End SUN Changes ER: 3802859 *******/
4862
4863 /* Start bug 13482837 for current quote service reference */
4864
4865 cursor c_curr_quote_line_details(p_Quote_line_id number) is
4866 select inventory_item_id,quantity,line_list_price,PRICING_QUANTITY_UOM,PRICING_QUANTITY
4867 from aso_quote_lines_all
4868 where quote_line_id=p_quote_line_id;
4869
4870 /* End bug 13482837 for current quote service reference */
4871
4872 l_service_item_flag MTL_SYSTEM_ITEMS_VL.SERVICE_ITEM_FLAG%TYPE;
4873 l_ref_type_code ASO_QUOTE_LINE_DETAILS.SERVICE_REF_TYPE_CODE%TYPE;
4874 l_service_ref_line_id ASO_QUOTE_LINE_DETAILS.SERVICE_REF_LINE_ID%TYPE;
4875
4876 l_Qte_Line_rec ASO_QUOTE_PUB.Qte_Line_Rec_Type;
4877 l_Qte_Line_tbl ASO_QUOTE_PUB.Qte_Line_Tbl_Type;
4878 l_service_ref_line_id_tbl Index_Link_Tbl_Type;
4879 l_order_ref_line_id_tbl Index_Link_Tbl_Type;
4880 BEGIN
4881 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4882 aso_debug_pub.add('ASO_UTL_PVT: Start Query Pricing Line Row p_qte_header_id: '||p_qte_header_id,1,'Y');
4883 aso_debug_pub.add('ASO_UTL_PVT: Start Query Pricing Line Row P_Qte_Line_Id: '||P_Qte_Line_Id,1,'Y');
4884 END IF;
4885
4886 FOR c_qte_line_rec IN c_Qte_Line LOOP
4887 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4888 aso_debug_pub.add('ASO_UTL_PVT: Inside c_qte_line_rec with c_qte_line_rec.quote_line_id: '
4889 ||c_qte_line_rec.quote_line_id,1,'Y');
4890 aso_debug_pub.add('ASO_UTL_PVT: Inside c_qte_line_rec with c_qte_line_rec.service_item_flag: '
4891 ||c_qte_line_rec.service_item_flag,1,'Y');
4892 END IF;
4893
4894 IF NVL(c_qte_line_rec.service_item_flag,'N') = 'Y' THEN
4895 OPEN c_qte_line_SVC_ref(c_qte_line_rec.quote_line_id);
4896 FETCH c_qte_line_SVC_ref INTO l_ref_type_code, l_service_ref_line_id;
4897 CLOSE c_qte_line_SVC_ref;
4898
4899 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4900 aso_debug_pub.add('ASO_UTL_PVT: Parent Service Line collection ... ',1,'Y');
4901 END IF;
4902 IF l_ref_type_code = 'ORDER' THEN
4903 IF l_order_ref_line_id_tbl.exists(l_service_ref_line_id) THEN
4904 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4905 aso_debug_pub.add('ASO_UTL_PVT: Parent Order Line has already been added to l_qte_line_tbl.',1,'Y');
4906 END IF;
4907 ELSE
4908 FOR c_order_line_rec IN c_order_line(l_service_ref_line_id) LOOP
4909 l_order_ref_line_id_tbl(l_service_ref_line_id) := l_service_ref_line_id;
4910 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4911 aso_debug_pub.add('ASO_UTL_PVT: Parent Order Line has not yet been added to l_qte_line_tbl.', 1, 'N');
4912 aso_debug_pub.add('ASO_UTL_PVT: l_order_ref_line_id_tbl('||l_service_ref_line_id||').:'
4913 ||NVL(to_char(l_order_ref_line_id_tbl(l_service_ref_line_id)),'null'),1,'Y');
4914 END IF;
4915 l_qte_line_rec.QUOTE_LINE_ID := c_order_line_rec.LINE_ID;
4916 l_qte_line_rec.INVENTORY_ITEM_ID := c_order_line_rec.INVENTORY_ITEM_ID;
4917 l_qte_line_rec.QUANTITY := c_order_line_rec.PRICING_QUANTITY;
4918 l_qte_line_rec.UOM_CODE := c_order_line_rec.PRICING_QUANTITY_UOM;
4919 l_qte_line_rec.PRICE_LIST_ID := c_order_line_rec.PRICE_LIST_ID;
4920 l_qte_line_rec.LINE_LIST_PRICE := c_order_line_rec.UNIT_LIST_PRICE;
4921 l_qte_line_rec.LINE_CATEGORY_CODE := 'SERVICE_REF_ORDER_LINE';
4922 l_qte_line_rec.CHARGE_PERIODICITY_CODE := c_order_line_rec.CHARGE_PERIODICITY_CODE;
4923
4924 l_qte_line_rec.PRICING_QUANTITY := c_order_line_rec.PRICING_QUANTITY;
4925 l_qte_line_rec.PRICING_QUANTITY_UOM := c_order_line_rec.PRICING_QUANTITY_UOM;
4926 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
4927 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4928 aso_debug_pub.add('Order Line Count'|| l_Qte_line_tbl.COUNT, 1, 'N');
4929 END IF;
4930 END LOOP;
4931 END IF;--l_service_ref_line_id_tbl.exists(l_service_ref_line_id)
4932
4933 ELSIF l_ref_type_code = 'CUSTOMER_PRODUCT' THEN
4934
4935 IF l_service_ref_line_id_tbl.exists(l_service_ref_line_id) THEN
4936 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4937 aso_debug_pub.add('ASO_UTL_PVT: Parent Instance Line already added to l_qte_line_tbl.',1,'Y');
4938 END IF;
4939 ELSE
4940 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4941 aso_debug_pub.add('ASO_UTL_PVT: Before customer install processing:',1,'Y');
4942 END IF;
4943 /*** Start: BugNo 8647883: R12.1.2 Service reference SUN ER ***/
4944 --FOR c_get_cust_acct_id_rec IN c_get_cust_acct_id LOOP
4945 open c_get_cust_acct_id_ln(c_qte_line_rec.quote_line_id);
4946 fetch c_get_cust_acct_id_ln into l_cust_account_id;
4947 if (c_get_cust_acct_id_ln%NOTFOUND) or (l_cust_account_id is null) THEN
4948 open c_get_cust_acct_id;
4949 fetch c_get_cust_acct_id into l_cust_account_id;
4950 if c_get_cust_acct_id%NOTFOUND THEN
4951 l_cust_account_id := NULL;
4952 end if;
4953 close c_get_cust_acct_id;
4954 end if;
4955 close c_get_cust_acct_id_ln;
4956 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4957 aso_debug_pub.add('ASO_UTL_PVT: l_cust_account_id:'||l_cust_account_id,1,'Y');
4958
4959 END IF;
4960 /*** End: BugNo 8647883: R12.1.2 Service reference SUN ER ***/
4961
4962
4963 l_service_ref_line_id_tbl(l_service_ref_line_id) := l_service_ref_line_id;
4964 For c_get_orig_order_line_id_rec IN c_get_orig_order_line_id(l_service_ref_line_id,l_cust_account_id) LOOP
4965 l_order_found := FALSE;
4966 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4967 aso_debug_pub.add('ASO_UTL_PVT: Parent Instance Line not added to l_qte_line_tbl', 1, 'N');
4968 aso_debug_pub.add('ASO_UTL_PVT: l_service_ref_line_id_tbl('||l_service_ref_line_id||').:'
4969 ||NVL(to_char(l_service_ref_line_id_tbl(l_service_ref_line_id)),'null'),1,'Y');
4970 END IF;
4971 FOR c_order_line_rec IN c_order_line(c_get_orig_order_line_id_rec.original_order_line_id) LOOP
4972 l_order_found := TRUE;
4973 l_qte_line_rec.QUOTE_LINE_ID := l_service_ref_line_id;
4974 l_qte_line_rec.INVENTORY_ITEM_ID := c_order_line_rec.INVENTORY_ITEM_ID;
4975 l_qte_line_rec.QUANTITY := c_order_line_rec.PRICING_QUANTITY;
4976 l_qte_line_rec.UOM_CODE := c_order_line_rec.PRICING_QUANTITY_UOM;
4977 l_qte_line_rec.PRICE_LIST_ID := c_order_line_rec.PRICE_LIST_ID;
4978 l_qte_line_rec.LINE_LIST_PRICE := c_order_line_rec.UNIT_LIST_PRICE;
4979 l_qte_line_rec.LINE_CATEGORY_CODE := 'SERVICE_REF_CUSTOMER_LINE';
4980 l_qte_line_rec.CHARGE_PERIODICITY_CODE := c_order_line_rec.CHARGE_PERIODICITY_CODE;
4981
4982 l_qte_line_rec.PRICING_QUANTITY := c_order_line_rec.PRICING_QUANTITY;
4983 l_qte_line_rec.PRICING_QUANTITY_UOM := c_order_line_rec.PRICING_QUANTITY_UOM;
4984 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
4985 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4986 aso_debug_pub.add('Instance Line Count '|| l_Qte_line_tbl.COUNT, 1, 'N');
4987 END IF;
4988 END LOOP;
4989
4990 /****** Start SUN Changes ER:3802859 *******/
4991
4992 IF l_order_found = FALSE THEN -- this means no order line was found then
4993
4994 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
4995 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** Inside new condition', 1, 'N');
4996 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_service_ref_line_id: '|| l_service_ref_line_id, 1, 'N');
4997 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_cust_account_id: '|| l_cust_account_id, 1, 'N');
4998 END IF;
4999
5000 open c_csi_line_details(l_service_ref_line_id,l_cust_account_id);
5001 fetch c_csi_line_details into l_prod,l_item_id,l_qty,l_uom;
5002
5003 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5004 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** After fetching the csi line details', 1, 'N');
5005 END IF;
5006
5007 l_qte_line_rec.QUOTE_LINE_ID := l_service_ref_line_id;
5008 l_qte_line_rec.INVENTORY_ITEM_ID := l_item_id;
5009 l_qte_line_rec.QUANTITY := l_qty;
5010 l_qte_line_rec.UOM_CODE := l_uom;
5011
5012 -- get the price list from the header
5013 open c_get_price_list(p_qte_header_id);
5014 fetch c_get_price_list INTO l_qte_line_rec.PRICE_LIST_ID;
5015 CLOSE c_get_price_list;
5016
5017 l_qte_line_rec.LINE_LIST_PRICE := 0;
5018 l_qte_line_rec.LINE_CATEGORY_CODE := 'SERVICE_REF_CUSTOMER_LINE';
5019
5020 --l_qte_line_rec.CHARGE_PERIODICITY_CODE := c_order_line_rec.CHARGE_PERIODICITY_CODE;
5021
5022 l_qte_line_rec.PRICING_QUANTITY := l_qty;
5023 l_qte_line_rec.PRICING_QUANTITY_UOM := l_UOM;
5024 l_qte_line_rec.IS_LINE_CHANGED_FLAG := 'Y';
5025 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
5026 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5027 aso_debug_pub.add('Instance Line Count '|| l_Qte_line_tbl.COUNT, 1, 'N');
5028 END IF;
5029
5030 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5031 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_service_ref_line_id: '|| l_service_ref_line_id, 1, 'N');
5032 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_item_id: '|| l_item_id, 1, 'N');
5033 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_qty: '|| l_qty, 1, 'N');
5034 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_uom: '|| l_uom, 1, 'N');
5035 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** l_qte_line_rec.PRICE_LIST_ID: '||l_qte_line_rec.PRICE_LIST_ID, 1, 'N');
5036 aso_debug_pub.add('ASO_UTL_PVT: **** ER:3802859 ****** Instance Line Count: '|| NVL(l_Qte_line_tbl.COUNT,0), 1, 'N');
5037 END IF;
5038
5039 close c_csi_line_details;
5040 END IF;
5041 /******* End SUN Changes ER:3802859 *******/
5042 End LOOP;
5043 --End LOOP;
5044 END IF;--l_service_ref_line_id_tbl.exists(l_service_ref_line_id)
5045 /*** Start: BugNo 8647883: R12.1.2 Service reference SUN ER ***/
5046 ELSIF l_ref_type_code = 'PRODUCT_CATALOG' THEN
5047 IF l_service_ref_line_id_tbl.exists(l_service_ref_line_id) THEN
5048 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5049 aso_debug_pub.add('ASO_UTL_PVT: Parent Instance Line has already been added to l_qte_line_tbl.',1,'Y');
5050 END IF;
5051 ELSE
5052 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5053 aso_debug_pub.add('ASO_UTL_PVT: **** ER: II****** Before product catalog processing:',1,'Y');
5054 END IF;
5055
5056
5057 l_service_ref_line_id_tbl(l_service_ref_line_id) := l_service_ref_line_id;
5058 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5059 aso_debug_pub.add('ASO_UTL_PVT: **** **** ER: II****** ****** Inside new condition', 1, 'N');
5060 aso_debug_pub.add('ASO_UTL_PVT: **** **** ER: II****** ****** l_service_ref_line_id: '|| l_service_ref_line_id, 1, 'N');
5061
5062 END IF;
5063
5064 l_qte_line_rec.QUOTE_LINE_ID := l_service_ref_line_id; --c_qte_line_rec.QUOTE_LINE_ID;
5065 l_qte_line_rec.INVENTORY_ITEM_ID := l_service_ref_line_id;
5066 l_qte_line_rec.QUANTITY := c_qte_line_rec.pricing_QUANTITY;
5067 l_qte_line_rec.UOM_CODE := c_qte_line_rec.PRICING_QUANTITY_UOM;
5068 -- get the price list from the header
5069 open c_get_price_list(p_qte_header_id);
5070 fetch c_get_price_list INTO l_qte_line_rec.PRICE_LIST_ID;
5071 CLOSE c_get_price_list;
5072
5073 l_qte_line_rec.LINE_LIST_PRICE := 0;
5074 l_qte_line_rec.LINE_CATEGORY_CODE := 'SERVICE_REF_CUSTOMER_LINE';
5075 l_qte_line_rec.PRICING_QUANTITY := c_qte_line_rec.PRICING_QUANTITY;
5076 l_qte_line_rec.PRICING_QUANTITY_UOM := c_qte_line_rec.PRICING_QUANTITY_UOM;
5077
5078 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
5079 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5080 aso_debug_pub.add('Instance Line Count '|| l_Qte_line_tbl.COUNT, 1, 'N');
5081 END IF;
5082
5083 END IF;--l_service_ref_line_id_tbl.exists(l_service_ref_line_id)
5084
5085 ELSIF l_ref_type_code = 'QUOTE' THEN -- bug 13482837
5086 IF l_service_ref_line_id_tbl.exists(l_service_ref_line_id) THEN
5087 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5088 aso_debug_pub.add('ASO_UTL_PVT: Parent Instance Line has already been added to l_qte_line_tbl.',1,'Y');
5089 END IF;
5090 ELSE
5091 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5092 aso_debug_pub.add('ASO_UTL_PVT: **** ER: II****** Before current quote processing:',1,'Y');
5093 END IF;
5094
5095
5096 l_service_ref_line_id_tbl(l_service_ref_line_id) := l_service_ref_line_id;
5097 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5098 aso_debug_pub.add('ASO_UTL_PVT: **** **** ER: II****** ****** Inside new condition', 1, 'N');
5099 aso_debug_pub.add('ASO_UTL_PVT: **** **** ER: II****** ****** l_service_ref_line_id: '|| l_service_ref_line_id, 1, 'N');
5100
5101 END IF;
5102
5103 l_qte_line_rec.QUOTE_LINE_ID := l_service_ref_line_id;
5104 for c_quote_line1 in c_curr_quote_line_details(l_service_ref_line_id) loop
5105
5106 l_qte_line_rec.INVENTORY_ITEM_ID := c_quote_line1.inventory_item_id;
5107 l_qte_line_rec.QUANTITY := c_quote_line1.pricing_QUANTITY;
5108 l_qte_line_rec.UOM_CODE := c_quote_line1.PRICING_QUANTITY_UOM;
5109 -- get the price list from the header
5110 open c_get_price_list(p_qte_header_id);
5111 fetch c_get_price_list INTO l_qte_line_rec.PRICE_LIST_ID;
5112 CLOSE c_get_price_list;
5113
5114 l_qte_line_rec.LINE_LIST_PRICE := c_quote_line1.line_list_price;
5115 l_qte_line_rec.LINE_CATEGORY_CODE := 'SERVICE_REF_CUSTOMER_LINE';
5116 l_qte_line_rec.PRICING_QUANTITY := c_quote_line1.PRICING_QUANTITY;
5117 l_qte_line_rec.PRICING_QUANTITY_UOM := c_quote_line1.PRICING_QUANTITY_UOM;
5118 end loop;
5119
5120 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
5121 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5122 aso_debug_pub.add('Instance Line Count '|| l_Qte_line_tbl.COUNT, 1, 'N');
5123 END IF;
5124 END IF;--l_service_ref_line_id_tbl.exists(l_service_ref_line_id)
5125
5126 END IF;--elsif l_ref_type_code = 'PRODUCT_CATALOG'
5127
5128 END IF; /* Service Item Flag Check */
5129
5130 l_qte_line_rec.QUOTE_LINE_ID := c_qte_line_rec.QUOTE_LINE_ID;
5131 l_qte_line_rec.CREATION_DATE := c_qte_line_rec.CREATION_DATE;
5132 l_qte_line_rec.CREATED_BY := c_qte_line_rec.CREATED_BY;
5133 l_qte_line_rec.LAST_UPDATE_DATE := c_qte_line_rec.LAST_UPDATE_DATE;
5134 l_qte_line_rec.LAST_UPDATED_BY := c_qte_line_rec.LAST_UPDATED_BY;
5135 l_qte_line_rec.LAST_UPDATE_LOGIN := c_qte_line_rec.LAST_UPDATE_LOGIN;
5136 l_qte_line_rec.REQUEST_ID := c_qte_line_rec.REQUEST_ID;
5137 l_qte_line_rec.PROGRAM_APPLICATION_ID := c_qte_line_rec.PROGRAM_APPLICATION_ID;
5138 l_qte_line_rec.PROGRAM_ID := c_qte_line_rec.PROGRAM_ID;
5139 l_qte_line_rec.PROGRAM_UPDATE_DATE := c_qte_line_rec.PROGRAM_UPDATE_DATE;
5140 l_qte_line_rec.quote_header_id := c_qte_line_rec.quote_header_id;
5141 l_qte_line_rec.ORG_ID := c_qte_line_rec.ORG_ID;
5142 l_qte_line_rec.LINE_CATEGORY_CODE := c_qte_line_rec.LINE_CATEGORY_CODE;
5143 l_qte_line_rec.ITEM_TYPE_CODE := c_qte_line_rec.ITEM_TYPE_CODE;
5144 l_qte_line_rec.LINE_NUMBER := c_qte_line_rec.LINE_NUMBER;
5145 l_qte_line_rec.START_DATE_ACTIVE := c_qte_line_rec.START_DATE_ACTIVE;
5146 l_qte_line_rec.END_DATE_ACTIVE := c_qte_line_rec.END_DATE_ACTIVE;
5147 l_qte_line_rec.ORDER_LINE_TYPE_ID := c_qte_line_rec.ORDER_LINE_TYPE_ID;
5148 l_qte_line_rec.INVOICE_TO_PARTY_SITE_ID := c_qte_line_rec.INVOICE_TO_PARTY_SITE_ID;
5149 l_qte_line_rec.INVOICE_TO_PARTY_ID := c_qte_line_rec.INVOICE_TO_PARTY_ID;
5150 l_qte_line_rec.INVOICE_TO_CUST_ACCOUNT_ID := c_qte_line_rec.INVOICE_TO_CUST_ACCOUNT_ID;
5151 l_qte_line_rec.ORGANIZATION_ID := c_qte_line_rec.ORGANIZATION_ID;
5152 l_qte_line_rec.INVENTORY_ITEM_ID := c_qte_line_rec.INVENTORY_ITEM_ID;
5153 l_qte_line_rec.QUANTITY := c_qte_line_rec.QUANTITY;
5154 l_qte_line_rec.UOM_CODE := c_qte_line_rec.UOM_CODE;
5155 l_qte_line_rec.MARKETING_SOURCE_CODE_ID := c_qte_line_rec.MARKETING_SOURCE_CODE_ID;
5156 l_qte_line_rec.PRICE_LIST_ID := c_qte_line_rec.PRICE_LIST_ID;
5157 l_qte_line_rec.PRICE_LIST_LINE_ID := c_qte_line_rec.PRICE_LIST_LINE_ID;
5158 l_qte_line_rec.CURRENCY_CODE := c_qte_line_rec.CURRENCY_CODE;
5159 l_qte_line_rec.LINE_LIST_PRICE := c_qte_line_rec.LINE_LIST_PRICE;
5160 l_qte_line_rec.LINE_ADJUSTED_AMOUNT := c_qte_line_rec.LINE_ADJUSTED_AMOUNT;
5161 l_qte_line_rec.LINE_ADJUSTED_PERCENT := c_qte_line_rec.LINE_ADJUSTED_PERCENT;
5162 l_qte_line_rec.LINE_QUOTE_PRICE := c_qte_line_rec.LINE_QUOTE_PRICE;
5163 l_qte_line_rec.RELATED_ITEM_ID := c_qte_line_rec.RELATED_ITEM_ID;
5164 l_qte_line_rec.ITEM_RELATIONSHIP_TYPE := c_qte_line_rec.ITEM_RELATIONSHIP_TYPE;
5165 l_qte_line_rec.ACCOUNTING_RULE_ID := c_qte_line_rec.ACCOUNTING_RULE_ID;
5166 l_qte_line_rec.INVOICING_RULE_ID := c_qte_line_rec.INVOICING_RULE_ID;
5167 l_qte_line_rec.SPLIT_SHIPMENT_FLAG := c_qte_line_rec.SPLIT_SHIPMENT_FLAG;
5168 l_qte_line_rec.BACKORDER_FLAG := c_qte_line_rec.BACKORDER_FLAG;
5169 l_qte_line_rec.MINISITE_ID := c_qte_line_rec.MINISITE_ID;
5170 l_qte_line_rec.SECTION_ID := c_qte_line_rec.SECTION_ID;
5171 l_qte_line_rec.INVOICE_TO_CUST_PARTY_ID:= c_qte_line_rec.INVOICE_TO_CUST_PARTY_ID;
5172 l_qte_line_rec.RECALCULATE_FLAG := c_qte_line_rec.RECALCULATE_FLAG;
5173 l_qte_line_rec.SELLING_PRICE_CHANGE := c_qte_line_rec.SELLING_PRICE_CHANGE;
5174 l_qte_line_rec.service_item_flag := c_qte_line_rec.service_item_flag;
5175 l_qte_line_rec.ATTRIBUTE_CATEGORY := c_qte_line_rec.ATTRIBUTE_CATEGORY;
5176 l_qte_line_rec.ATTRIBUTE1 := c_qte_line_rec.ATTRIBUTE1;
5177 l_qte_line_rec.ATTRIBUTE2 := c_qte_line_rec.ATTRIBUTE2;
5178 l_qte_line_rec.ATTRIBUTE3 := c_qte_line_rec.ATTRIBUTE3;
5179 l_qte_line_rec.ATTRIBUTE4 := c_qte_line_rec.ATTRIBUTE4;
5180 l_qte_line_rec.ATTRIBUTE5 := c_qte_line_rec.ATTRIBUTE5;
5181 l_qte_line_rec.ATTRIBUTE6 := c_qte_line_rec.ATTRIBUTE6;
5182 l_qte_line_rec.ATTRIBUTE7 := c_qte_line_rec.ATTRIBUTE7;
5183 l_qte_line_rec.ATTRIBUTE8 := c_qte_line_rec.ATTRIBUTE8;
5184 l_qte_line_rec.ATTRIBUTE9 := c_qte_line_rec.ATTRIBUTE9;
5185 l_qte_line_rec.ATTRIBUTE10 := c_qte_line_rec.ATTRIBUTE10;
5186 l_qte_line_rec.ATTRIBUTE11 := c_qte_line_rec.ATTRIBUTE11;
5187 l_qte_line_rec.ATTRIBUTE12 := c_qte_line_rec.ATTRIBUTE12;
5188 l_qte_line_rec.ATTRIBUTE13 := c_qte_line_rec.ATTRIBUTE13;
5189 l_qte_line_rec.ATTRIBUTE14 := c_qte_line_rec.ATTRIBUTE14;
5190 l_qte_line_rec.ATTRIBUTE15 := c_qte_line_rec.ATTRIBUTE15;
5191 l_qte_line_rec.ATTRIBUTE16 := c_qte_line_rec.ATTRIBUTE16;
5192 l_qte_line_rec.ATTRIBUTE17 := c_qte_line_rec.ATTRIBUTE17;
5193 l_qte_line_rec.ATTRIBUTE18 := c_qte_line_rec.ATTRIBUTE18;
5194 l_qte_line_rec.ATTRIBUTE19 := c_qte_line_rec.ATTRIBUTE19;
5195 l_qte_line_rec.ATTRIBUTE20 := c_qte_line_rec.ATTRIBUTE20;
5196 l_qte_line_rec.PRICED_PRICE_LIST_ID := c_qte_line_rec.PRICED_PRICE_LIST_ID;
5197 l_qte_line_rec.AGREEMENT_ID := c_qte_line_rec.AGREEMENT_ID;
5198 l_qte_line_rec.COMMITMENT_ID := c_qte_line_rec.COMMITMENT_ID;
5199 l_qte_line_rec.DISPLAY_ARITHMETIC_OPERATOR := c_qte_line_rec.DISPLAY_ARITHMETIC_OPERATOR;
5200 l_qte_line_rec.PRICING_LINE_TYPE_INDICATOR := c_qte_line_rec.PRICING_LINE_TYPE_INDICATOR;
5201 l_qte_line_rec.END_CUSTOMER_PARTY_ID := c_qte_line_rec.END_CUSTOMER_PARTY_ID;
5202 l_qte_line_rec.END_CUSTOMER_PARTY_SITE_ID := c_qte_line_rec.END_CUSTOMER_PARTY_SITE_ID;
5203 l_qte_line_rec.END_CUSTOMER_CUST_ACCOUNT_ID := c_qte_line_rec.END_CUSTOMER_CUST_ACCOUNT_ID;
5204 l_qte_line_rec.END_CUSTOMER_CUST_PARTY_ID := c_qte_line_rec.END_CUSTOMER_CUST_PARTY_ID;
5205 l_qte_line_rec.SHIP_MODEL_COMPLETE_FLAG := c_qte_line_rec.SHIP_MODEL_COMPLETE_FLAG;
5206 l_qte_line_rec.CHARGE_PERIODICITY_CODE := c_qte_line_rec.CHARGE_PERIODICITY_CODE;
5207 l_qte_line_rec.PRICING_QUANTITY_UOM := c_qte_line_rec.PRICING_QUANTITY_UOM;
5208 l_qte_line_rec.PRICING_QUANTITY := c_qte_line_rec.PRICING_QUANTITY;
5209 l_qte_line_rec.OBJECT_VERSION_NUMBER := c_qte_line_rec.OBJECT_VERSION_NUMBER;
5210 -- ER 12879412
5211 /* l_qte_line_rec.PRODUCT_FISC_CLASSIFICATION := c_qte_line_rec.PRODUCT_FISC_CLASSIFICATION;
5212 l_qte_line_rec.TRX_BUSINESS_CATEGORY := c_qte_line_rec.TRX_BUSINESS_CATEGORY;*/
5213
5214 l_Qte_Line_tbl(l_Qte_Line_tbl.COUNT+1) := l_Qte_Line_rec;
5215 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5216 aso_debug_pub.add('Quote Line Count'|| l_Qte_line_tbl.COUNT, 1, 'N');
5217 END IF;
5218 END LOOP;
5219
5220 RETURN l_Qte_Line_tbl;
5221 END Query_Pricing_Line_Row;
5222
5223 -- New Function for Pricing Row Ends Here...................................
5224
5225
5226 FUNCTION Query_Line_Dtl_Rows (
5227 P_Qte_Line_Id IN NUMBER := FND_API.G_MISS_NUM
5228 ) RETURN ASO_QUOTE_PUB.Qte_Line_Dtl_Tbl_Type
5229 IS
5230 CURSOR c_Line_Dtl IS
5231 SELECT
5232 QUOTE_LINE_DETAIL_ID,
5233 CREATION_DATE,
5234 CREATED_BY,
5235 LAST_UPDATE_DATE,
5236 LAST_UPDATED_BY,
5237 LAST_UPDATE_LOGIN,
5238 REQUEST_ID,
5239 PROGRAM_APPLICATION_ID,
5240 PROGRAM_ID,
5241 PROGRAM_UPDATE_DATE,
5242 QUOTE_LINE_ID,
5243 CONFIG_HEADER_ID,
5244 CONFIG_REVISION_NUM,
5245 CONFIG_ITEM_ID,
5246 COMPLETE_CONFIGURATION_FLAG,
5247 VALID_CONFIGURATION_FLAG,
5248 COMPONENT_CODE,
5249 SERVICE_COTERMINATE_FLAG,
5250 SERVICE_DURATION,
5251 SERVICE_PERIOD,
5252 SERVICE_UNIT_SELLING_PERCENT,
5253 SERVICE_UNIT_LIST_PERCENT,
5254 SERVICE_NUMBER,
5255 UNIT_PERCENT_BASE_PRICE,
5256 ATTRIBUTE_CATEGORY,
5257 ATTRIBUTE1,
5258 ATTRIBUTE2,
5259 ATTRIBUTE3,
5260 ATTRIBUTE4,
5261 ATTRIBUTE5,
5262 ATTRIBUTE6,
5263 ATTRIBUTE7,
5264 ATTRIBUTE8,
5265 ATTRIBUTE9,
5266 ATTRIBUTE10,
5267 ATTRIBUTE11,
5268 ATTRIBUTE12,
5269 ATTRIBUTE13,
5270 ATTRIBUTE14,
5271 ATTRIBUTE15,
5272 ATTRIBUTE16,
5273 ATTRIBUTE17,
5274 ATTRIBUTE18,
5275 ATTRIBUTE19,
5276 ATTRIBUTE20,
5277 SERVICE_REF_TYPE_CODE,
5278 SERVICE_REF_ORDER_NUMBER,
5279 SERVICE_REF_LINE_NUMBER,
5280 SERVICE_REF_LINE_ID,
5281 SERVICE_REF_SYSTEM_ID,
5282 SERVICE_REF_OPTION_NUMB,
5283 SERVICE_REF_SHIPMENT_NUMB,
5284 RETURN_REF_TYPE,
5285 RETURN_REF_HEADER_ID,
5286 RETURN_REF_LINE_ID,
5287 RETURN_REASON_CODE,
5288 RETURN_ATTRIBUTE1,
5289 RETURN_ATTRIBUTE2,
5290 RETURN_ATTRIBUTE3,
5291 RETURN_ATTRIBUTE4,
5292 RETURN_ATTRIBUTE5,
5293 RETURN_ATTRIBUTE6,
5294 RETURN_ATTRIBUTE7,
5295 RETURN_ATTRIBUTE8,
5296 RETURN_ATTRIBUTE9,
5297 RETURN_ATTRIBUTE10,
5298 RETURN_ATTRIBUTE11,
5299 RETURN_ATTRIBUTE12,
5300 RETURN_ATTRIBUTE13,
5301 RETURN_ATTRIBUTE14,
5302 RETURN_ATTRIBUTE15,
5303 REF_TYPE_CODE,
5304 REF_LINE_ID,
5305 INSTANCE_ID,
5306 BOM_SORT_ORDER,
5307 TOP_MODEL_LINE_ID,
5308 ATO_LINE_ID,
5309 COMPONENT_SEQUENCE_ID,
5310 OBJECT_VERSION_NUMBER,
5311 CONFIG_DELTA,
5312 CONFIG_INSTANCE_NAME
5313 FROM ASO_Quote_Line_Details
5314 WHERE quote_line_id = p_qte_line_id;
5315 l_Line_Dtl_rec ASO_QUOTE_PUB.Qte_Line_Dtl_Rec_Type;
5316 l_Line_Dtl_tbl ASO_QUOTE_PUB.Qte_Line_Dtl_Tbl_Type;
5317 BEGIN
5318 FOR Line_Dtl_rec IN c_Line_Dtl LOOP
5319 l_line_dtl_rec.QUOTE_LINE_DETAIL_ID := line_dtl_rec.QUOTE_LINE_DETAIL_ID;
5320 l_line_dtl_rec.QUOTE_LINE_ID := line_dtl_rec.QUOTE_LINE_ID;
5321 l_line_dtl_rec.CREATION_DATE := line_dtl_rec.CREATION_DATE;
5322 l_line_dtl_rec.CREATED_BY := line_dtl_rec.CREATED_BY;
5323 l_line_dtl_rec.LAST_UPDATE_DATE := line_dtl_rec.LAST_UPDATE_DATE;
5324 l_line_dtl_rec.LAST_UPDATED_BY := line_dtl_rec.LAST_UPDATED_BY;
5325 l_line_dtl_rec.LAST_UPDATE_LOGIN := line_dtl_rec.LAST_UPDATE_LOGIN;
5326 l_line_dtl_rec.REQUEST_ID := line_dtl_rec.REQUEST_ID;
5327 l_line_dtl_rec.PROGRAM_APPLICATION_ID := line_dtl_rec.PROGRAM_APPLICATION_ID;
5328 l_line_dtl_rec.PROGRAM_ID := line_dtl_rec.PROGRAM_ID;
5329 l_line_dtl_rec.PROGRAM_UPDATE_DATE := line_dtl_rec.PROGRAM_UPDATE_DATE;
5330 l_line_dtl_rec.CONFIG_HEADER_ID := line_dtl_rec.CONFIG_HEADER_ID;
5331 l_line_dtl_rec.COMPLETE_CONFIGURATION_FLAG :=
5332 line_dtl_rec.COMPLETE_CONFIGURATION_FLAG;
5333 l_line_dtl_rec.CONFIG_REVISION_NUM := line_dtl_rec.CONFIG_REVISION_NUM;
5334 l_line_dtl_rec.VALID_CONFIGURATION_FLAG :=
5335 line_dtl_rec.VALID_CONFIGURATION_FLAG;
5336 l_line_dtl_rec.COMPONENT_CODE := line_dtl_rec.COMPONENT_CODE;
5337 l_line_dtl_rec.SERVICE_COTERMINATE_FLAG :=
5338 line_dtl_rec.SERVICE_COTERMINATE_FLAG;
5339 l_line_dtl_rec.SERVICE_DURATION := line_dtl_rec.SERVICE_DURATION;
5340 l_line_dtl_rec.SERVICE_UNIT_SELLING_PERCENT :=
5341 line_dtl_rec.SERVICE_UNIT_SELLING_PERCENT;
5342 l_line_dtl_rec.SERVICE_UNIT_LIST_PERCENT :=
5343 line_dtl_rec.SERVICE_UNIT_LIST_PERCENT;
5344 l_line_dtl_rec.SERVICE_NUMBER := line_dtl_rec.SERVICE_NUMBER;
5345 l_line_dtl_rec.UNIT_PERCENT_BASE_PRICE := line_dtl_rec.UNIT_PERCENT_BASE_PRICE;
5346 l_line_dtl_rec.SERVICE_PERIOD := line_dtl_rec.SERVICE_PERIOD;
5347 l_line_dtl_rec.ATTRIBUTE_CATEGORY := line_dtl_rec.ATTRIBUTE_CATEGORY;
5348 l_line_dtl_rec.ATTRIBUTE1 := line_dtl_rec.ATTRIBUTE1;
5349 l_line_dtl_rec.ATTRIBUTE2 := line_dtl_rec.ATTRIBUTE2;
5350 l_line_dtl_rec.ATTRIBUTE3 := line_dtl_rec.ATTRIBUTE3;
5351 l_line_dtl_rec.ATTRIBUTE4 := line_dtl_rec.ATTRIBUTE4;
5352 l_line_dtl_rec.ATTRIBUTE5 := line_dtl_rec.ATTRIBUTE5;
5353 l_line_dtl_rec.ATTRIBUTE6 := line_dtl_rec.ATTRIBUTE6;
5354 l_line_dtl_rec.ATTRIBUTE7 := line_dtl_rec.ATTRIBUTE7;
5355 l_line_dtl_rec.ATTRIBUTE8 := line_dtl_rec.ATTRIBUTE8;
5356 l_line_dtl_rec.ATTRIBUTE9 := line_dtl_rec.ATTRIBUTE9;
5357 l_line_dtl_rec.ATTRIBUTE10 := line_dtl_rec.ATTRIBUTE10;
5358 l_line_dtl_rec.ATTRIBUTE11 := line_dtl_rec.ATTRIBUTE11;
5359 l_line_dtl_rec.ATTRIBUTE12 := line_dtl_rec.ATTRIBUTE12;
5360 l_line_dtl_rec.ATTRIBUTE13 := line_dtl_rec.ATTRIBUTE13;
5361 l_line_dtl_rec.ATTRIBUTE14 := line_dtl_rec.ATTRIBUTE14;
5362 l_line_dtl_rec.ATTRIBUTE15 := line_dtl_rec.ATTRIBUTE15;
5363 l_line_dtl_rec.ATTRIBUTE16 := line_dtl_rec.ATTRIBUTE16;
5364 l_line_dtl_rec.ATTRIBUTE17 := line_dtl_rec.ATTRIBUTE17;
5365 l_line_dtl_rec.ATTRIBUTE18 := line_dtl_rec.ATTRIBUTE18;
5366 l_line_dtl_rec.ATTRIBUTE19 := line_dtl_rec.ATTRIBUTE19;
5367 l_line_dtl_rec.ATTRIBUTE20 := line_dtl_rec.ATTRIBUTE20;
5368 l_line_dtl_rec.SERVICE_REF_TYPE_CODE := line_dtl_rec.SERVICE_REF_TYPE_CODE;
5369 l_line_dtl_rec.SERVICE_REF_ORDER_NUMBER := line_dtl_rec.SERVICE_REF_ORDER_NUMBER;
5370 l_line_dtl_rec.SERVICE_REF_LINE_NUMBER := line_dtl_rec.SERVICE_REF_LINE_NUMBER;
5371 l_line_dtl_rec.SERVICE_REF_LINE_ID := line_dtl_rec.SERVICE_REF_LINE_ID;
5372 l_line_dtl_rec.SERVICE_REF_SYSTEM_ID := line_dtl_rec.SERVICE_REF_SYSTEM_ID;
5373 l_line_dtl_rec.SERVICE_REF_OPTION_NUMB := line_dtl_rec.SERVICE_REF_OPTION_NUMB;
5374 l_line_dtl_rec.SERVICE_REF_SHIPMENT_NUMB := line_dtl_rec.SERVICE_REF_SHIPMENT_NUMB;
5375 l_line_dtl_rec.RETURN_REF_TYPE := line_dtl_rec.RETURN_REF_TYPE;
5376 l_line_dtl_rec.RETURN_REF_HEADER_ID := line_dtl_rec.RETURN_REF_HEADER_ID;
5377 l_line_dtl_rec.RETURN_REF_LINE_ID := line_dtl_rec.RETURN_REF_LINE_ID;
5378 l_line_dtl_rec.RETURN_REASON_CODE := line_dtl_rec.RETURN_REASON_CODE;
5379 l_line_dtl_rec.RETURN_ATTRIBUTE1 := line_dtl_rec.RETURN_ATTRIBUTE1;
5380 l_line_dtl_rec.RETURN_ATTRIBUTE2 := line_dtl_rec.RETURN_ATTRIBUTE2;
5381 l_line_dtl_rec.RETURN_ATTRIBUTE3 := line_dtl_rec.RETURN_ATTRIBUTE3;
5382 l_line_dtl_rec.RETURN_ATTRIBUTE4 := line_dtl_rec.RETURN_ATTRIBUTE4;
5383 l_line_dtl_rec.RETURN_ATTRIBUTE5 := line_dtl_rec.RETURN_ATTRIBUTE5;
5384 l_line_dtl_rec.RETURN_ATTRIBUTE6 := line_dtl_rec.RETURN_ATTRIBUTE6;
5385 l_line_dtl_rec.RETURN_ATTRIBUTE7 := line_dtl_rec.RETURN_ATTRIBUTE7;
5386 l_line_dtl_rec.RETURN_ATTRIBUTE8 := line_dtl_rec.RETURN_ATTRIBUTE8;
5387 l_line_dtl_rec.RETURN_ATTRIBUTE9 := line_dtl_rec.RETURN_ATTRIBUTE9;
5388 l_line_dtl_rec.RETURN_ATTRIBUTE10 := line_dtl_rec.RETURN_ATTRIBUTE10;
5389 l_line_dtl_rec.RETURN_ATTRIBUTE11 := line_dtl_rec.RETURN_ATTRIBUTE11;
5390 l_line_dtl_rec.RETURN_ATTRIBUTE12 := line_dtl_rec.RETURN_ATTRIBUTE12;
5391 l_line_dtl_rec.RETURN_ATTRIBUTE13 := line_dtl_rec.RETURN_ATTRIBUTE13;
5392 l_line_dtl_rec.RETURN_ATTRIBUTE14 := line_dtl_rec.RETURN_ATTRIBUTE14;
5393 l_line_dtl_rec.RETURN_ATTRIBUTE15 := line_dtl_rec.RETURN_ATTRIBUTE15;
5394 l_line_dtl_rec.CONFIG_ITEM_ID := line_dtl_rec.CONFIG_ITEM_ID;
5395 l_line_dtl_rec.REF_TYPE_CODE := line_dtl_rec.REF_TYPE_CODE;
5396 l_line_dtl_rec.REF_LINE_ID := line_dtl_rec.REF_LINE_ID;
5397 l_line_dtl_rec.INSTANCE_ID := line_dtl_rec.INSTANCE_ID;
5398 l_line_dtl_rec.BOM_SORT_ORDER := line_dtl_rec.BOM_SORT_ORDER;
5399 l_line_dtl_rec.TOP_MODEL_LINE_ID := line_dtl_rec.TOP_MODEL_LINE_ID;
5400 l_line_dtl_rec.ATO_LINE_ID := line_dtl_rec.ATO_LINE_ID;
5401 l_line_dtl_rec.COMPONENT_SEQUENCE_ID := line_dtl_rec.COMPONENT_SEQUENCE_ID;
5402 l_line_dtl_rec.OBJECT_VERSION_NUMBER := line_dtl_rec.OBJECT_VERSION_NUMBER;
5403 l_line_dtl_rec.CONFIG_DELTA := line_dtl_rec.CONFIG_DELTA;
5404 l_line_dtl_rec.CONFIG_INSTANCE_NAME := line_dtl_rec.CONFIG_INSTANCE_NAME;
5405
5406 l_line_dtl_tbl(l_Line_dtl_tbl.COUNT+1) := l_Line_dtl_rec;
5407 END LOOP;
5408 RETURN l_line_dtl_tbl;
5409 END Query_Line_Dtl_Rows;
5410
5411
5412 FUNCTION Query_Line_Attribs_header_Rows(
5413 P_Qte_header_Id IN NUMBER := FND_API.G_MISS_NUM
5414 ) RETURN ASO_QUOTE_PUB.Line_Attribs_Ext_Tbl_Type
5415 IS
5416 CURSOR c_Line_Attr_Ext IS
5417 SELECT
5418 LINE_ATTRIBUTE_ID,
5419 CREATION_DATE,
5420 CREATED_BY,
5421 LAST_UPDATE_DATE,
5422 LAST_UPDATED_BY,
5423 LAST_UPDATE_LOGIN,
5424 REQUEST_ID,
5425 PROGRAM_APPLICATION_ID,
5426 PROGRAM_ID,
5427 PROGRAM_UPDATE_DATE,
5428 APPLICATION_ID,
5429 QUOTE_LINE_ID,
5430 ATTRIBUTE_TYPE_CODE,
5431 NAME,
5432 VALUE,
5433 VALUE_TYPE,
5434 STATUS,
5435 START_DATE_ACTIVE,
5436 END_DATE_ACTIVE,
5437 QUOTE_HEADER_ID,
5438 QUOTE_SHIPMENT_ID
5439 FROM ASO_QUOTE_LINE_ATTRIBS_EXT
5440 WHERE quote_header_id = p_qte_header_id AND
5441 quote_line_id is null;
5442 l_Line_Attr_Ext_Rec ASO_QUOTE_PUB.Line_Attribs_Ext_Rec_Type;
5443 l_Line_Attr_Ext_Tbl ASO_QUOTE_PUB.Line_Attribs_Ext_Tbl_Type;
5444 BEGIN
5445 FOR Line_Attr_Ext_rec IN c_Line_Attr_Ext LOOP
5446 l_line_attr_ext_rec.LINE_ATTRIBUTE_ID := line_attr_ext_rec.LINE_ATTRIBUTE_ID;
5447 l_line_attr_ext_rec.QUOTE_LINE_ID := line_attr_ext_rec.QUOTE_LINE_ID;
5448 l_line_attr_ext_rec.CREATION_DATE := line_attr_ext_rec.CREATION_DATE;
5449 l_line_attr_ext_rec.CREATED_BY := line_attr_ext_rec.CREATED_BY;
5450 l_line_attr_ext_rec.LAST_UPDATE_DATE := line_attr_ext_rec.LAST_UPDATE_DATE;
5451 l_line_attr_ext_rec.LAST_UPDATED_BY := line_attr_ext_rec.LAST_UPDATED_BY;
5452 l_line_attr_ext_rec.LAST_UPDATE_LOGIN := line_attr_ext_rec.LAST_UPDATE_LOGIN;
5453 l_line_attr_ext_rec.REQUEST_ID := line_attr_ext_rec.REQUEST_ID;
5454 l_line_attr_ext_rec.PROGRAM_APPLICATION_ID := line_attr_ext_rec.PROGRAM_APPLICATION_ID;
5455 l_line_attr_ext_rec.PROGRAM_ID := line_attr_ext_rec.PROGRAM_ID;
5456 l_line_attr_ext_rec.PROGRAM_UPDATE_DATE := line_attr_ext_rec.PROGRAM_UPDATE_DATE;
5457 l_line_attr_ext_rec.ATTRIBUTE_TYPE_CODE := line_attr_ext_rec.ATTRIBUTE_TYPE_CODE;
5458 l_line_attr_ext_rec.NAME := line_attr_ext_rec.NAME;
5459 l_line_attr_ext_rec.VALUE := line_attr_ext_rec.VALUE;
5460 l_line_attr_ext_rec.START_DATE_ACTIVE := line_attr_ext_rec.START_DATE_ACTIVE;
5461 l_line_attr_ext_rec.END_DATE_ACTIVE := line_attr_ext_rec.END_DATE_ACTIVE;
5462 l_line_attr_ext_rec.QUOTE_HEADER_ID := line_attr_ext_rec.QUOTE_HEADER_ID;
5463 l_line_attr_ext_rec.QUOTE_SHIPMENT_ID := line_attr_ext_rec.QUOTE_SHIPMENT_ID;
5464 l_line_attr_ext_rec.APPLICATION_ID := line_attr_ext_rec.APPLICATION_ID;
5465 l_line_attr_ext_rec.STATUS := line_attr_ext_rec.STATUS;
5466 l_line_attr_ext_rec.VALUE_TYPE := line_attr_ext_rec.VALUE_TYPE;
5467 l_line_attr_ext_tbl(l_line_attr_ext_tbl.COUNT+1) := l_line_attr_ext_rec;
5468 END LOOP;
5469 RETURN l_line_attr_ext_tbl;
5470 END Query_Line_Attribs_header_Rows;
5471
5472
5473 FUNCTION Query_Line_Attribs_Ext_Rows(
5474 P_Qte_Line_Id IN NUMBER := FND_API.G_MISS_NUM
5475 ) RETURN ASO_QUOTE_PUB.Line_Attribs_Ext_Tbl_Type
5476 IS
5477 CURSOR c_Line_Attr_Ext IS
5478 SELECT
5479 LINE_ATTRIBUTE_ID,
5480 CREATION_DATE,
5481 CREATED_BY,
5482 LAST_UPDATE_DATE,
5483 LAST_UPDATED_BY,
5484 LAST_UPDATE_LOGIN,
5485 REQUEST_ID,
5486 PROGRAM_APPLICATION_ID,
5487 PROGRAM_ID,
5488 PROGRAM_UPDATE_DATE,
5489 APPLICATION_ID,
5490 QUOTE_LINE_ID,
5491 ATTRIBUTE_TYPE_CODE,
5492 NAME,
5493 VALUE,
5494 VALUE_TYPE,
5495 STATUS,
5496 START_DATE_ACTIVE,
5497 END_DATE_ACTIVE,
5498 QUOTE_HEADER_ID,
5499 QUOTE_SHIPMENT_ID
5500 FROM ASO_QUOTE_LINE_ATTRIBS_EXT
5501 WHERE quote_line_id = p_qte_line_id;
5502 l_Line_Attr_Ext_Rec ASO_QUOTE_PUB.Line_Attribs_Ext_Rec_Type;
5503 l_Line_Attr_Ext_Tbl ASO_QUOTE_PUB.Line_Attribs_Ext_Tbl_Type;
5504 BEGIN
5505 FOR Line_Attr_Ext_rec IN c_Line_Attr_Ext LOOP
5506 l_line_attr_ext_rec.LINE_ATTRIBUTE_ID := line_attr_ext_rec.LINE_ATTRIBUTE_ID;
5507 l_line_attr_ext_rec.QUOTE_LINE_ID := line_attr_ext_rec.QUOTE_LINE_ID;
5508 l_line_attr_ext_rec.CREATION_DATE := line_attr_ext_rec.CREATION_DATE;
5509 l_line_attr_ext_rec.CREATED_BY := line_attr_ext_rec.CREATED_BY;
5510 l_line_attr_ext_rec.LAST_UPDATE_DATE := line_attr_ext_rec.LAST_UPDATE_DATE;
5511 l_line_attr_ext_rec.LAST_UPDATED_BY := line_attr_ext_rec.LAST_UPDATED_BY;
5512 l_line_attr_ext_rec.LAST_UPDATE_LOGIN := line_attr_ext_rec.LAST_UPDATE_LOGIN;
5513 l_line_attr_ext_rec.REQUEST_ID := line_attr_ext_rec.REQUEST_ID;
5514 l_line_attr_ext_rec.PROGRAM_APPLICATION_ID := line_attr_ext_rec.PROGRAM_APPLICATION_ID;
5515 l_line_attr_ext_rec.PROGRAM_ID := line_attr_ext_rec.PROGRAM_ID;
5516 l_line_attr_ext_rec.PROGRAM_UPDATE_DATE := line_attr_ext_rec.PROGRAM_UPDATE_DATE;
5517 l_line_attr_ext_rec.ATTRIBUTE_TYPE_CODE := line_attr_ext_rec.ATTRIBUTE_TYPE_CODE;
5518 l_line_attr_ext_rec.NAME := line_attr_ext_rec.NAME;
5519 l_line_attr_ext_rec.VALUE := line_attr_ext_rec.VALUE;
5520 l_line_attr_ext_rec.START_DATE_ACTIVE := line_attr_ext_rec.START_DATE_ACTIVE;
5521 l_line_attr_ext_rec.END_DATE_ACTIVE := line_attr_ext_rec.END_DATE_ACTIVE;
5522 l_line_attr_ext_rec.QUOTE_HEADER_ID := line_attr_ext_rec.QUOTE_HEADER_ID;
5523 l_line_attr_ext_rec.QUOTE_SHIPMENT_ID := line_attr_ext_rec.QUOTE_SHIPMENT_ID;
5524 l_line_attr_ext_rec.APPLICATION_ID := line_attr_ext_rec.APPLICATION_ID;
5525 l_line_attr_ext_rec.STATUS := line_attr_ext_rec.STATUS;
5526 l_line_attr_ext_rec.VALUE_TYPE := line_attr_ext_rec.VALUE_TYPE;
5527 l_line_attr_ext_tbl(l_line_attr_ext_tbl.COUNT+1) := l_line_attr_ext_rec;
5528 END LOOP;
5529 RETURN l_line_attr_ext_tbl;
5530 END Query_Line_Attribs_Ext_Rows;
5531
5532
5533 FUNCTION Query_Price_Attr_Rows (
5534 P_Qte_Header_Id IN NUMBER := FND_API.G_MISS_NUM,
5535 P_Qte_Line_Id IN NUMBER := FND_API.G_MISS_NUM
5536 ) RETURN ASO_QUOTE_PUB.Price_Attributes_Tbl_Type
5537 IS
5538 CURSOR c_price_attr IS
5539 SELECT
5540 PRICE_ATTRIBUTE_ID,
5541 CREATION_DATE,
5542 CREATED_BY,
5543 LAST_UPDATE_DATE,
5544 LAST_UPDATED_BY,
5545 LAST_UPDATE_LOGIN,
5546 PROGRAM_APPLICATION_ID,
5547 PROGRAM_ID,
5548 PROGRAM_UPDATE_DATE,
5549 REQUEST_ID,
5550 QUOTE_HEADER_ID,
5551 QUOTE_LINE_ID,
5552 FLEX_TITLE,
5553 PRICING_CONTEXT,
5554 PRICING_ATTRIBUTE1,
5555 PRICING_ATTRIBUTE2,
5556 PRICING_ATTRIBUTE3,
5557 PRICING_ATTRIBUTE4,
5558 PRICING_ATTRIBUTE5,
5559 PRICING_ATTRIBUTE6,
5560 PRICING_ATTRIBUTE7,
5561 PRICING_ATTRIBUTE8,
5562 PRICING_ATTRIBUTE9,
5563 PRICING_ATTRIBUTE10,
5564 PRICING_ATTRIBUTE11,
5565 PRICING_ATTRIBUTE12,
5566 PRICING_ATTRIBUTE13,
5567 PRICING_ATTRIBUTE14,
5568 PRICING_ATTRIBUTE15,
5569 PRICING_ATTRIBUTE16,
5570 PRICING_ATTRIBUTE17,
5571 PRICING_ATTRIBUTE18,
5572 PRICING_ATTRIBUTE19,
5573 PRICING_ATTRIBUTE20,
5574 PRICING_ATTRIBUTE21,
5575 PRICING_ATTRIBUTE22,
5576 PRICING_ATTRIBUTE23,
5577 PRICING_ATTRIBUTE24,
5578 PRICING_ATTRIBUTE25,
5579 PRICING_ATTRIBUTE26,
5580 PRICING_ATTRIBUTE27,
5581 PRICING_ATTRIBUTE28,
5582 PRICING_ATTRIBUTE29,
5583 PRICING_ATTRIBUTE30,
5584 PRICING_ATTRIBUTE31,
5585 PRICING_ATTRIBUTE32,
5586 PRICING_ATTRIBUTE33,
5587 PRICING_ATTRIBUTE34,
5588 PRICING_ATTRIBUTE35,
5589 PRICING_ATTRIBUTE36,
5590 PRICING_ATTRIBUTE37,
5591 PRICING_ATTRIBUTE38,
5592 PRICING_ATTRIBUTE39,
5593 PRICING_ATTRIBUTE40,
5594 PRICING_ATTRIBUTE41,
5595 PRICING_ATTRIBUTE42,
5596 PRICING_ATTRIBUTE43,
5597 PRICING_ATTRIBUTE44,
5598 PRICING_ATTRIBUTE45,
5599 PRICING_ATTRIBUTE46,
5600 PRICING_ATTRIBUTE47,
5601 PRICING_ATTRIBUTE48,
5602 PRICING_ATTRIBUTE49,
5603 PRICING_ATTRIBUTE50,
5604 PRICING_ATTRIBUTE51,
5605 PRICING_ATTRIBUTE52,
5606 PRICING_ATTRIBUTE53,
5607 PRICING_ATTRIBUTE54,
5608 PRICING_ATTRIBUTE55,
5609 PRICING_ATTRIBUTE56,
5610 PRICING_ATTRIBUTE57,
5611 PRICING_ATTRIBUTE58,
5612 PRICING_ATTRIBUTE59,
5613 PRICING_ATTRIBUTE60,
5614 PRICING_ATTRIBUTE61,
5615 PRICING_ATTRIBUTE62,
5616 PRICING_ATTRIBUTE63,
5617 PRICING_ATTRIBUTE64,
5618 PRICING_ATTRIBUTE65,
5619 PRICING_ATTRIBUTE66,
5620 PRICING_ATTRIBUTE67,
5621 PRICING_ATTRIBUTE68,
5622 PRICING_ATTRIBUTE69,
5623 PRICING_ATTRIBUTE70,
5624 PRICING_ATTRIBUTE71,
5625 PRICING_ATTRIBUTE72,
5626 PRICING_ATTRIBUTE73,
5627 PRICING_ATTRIBUTE74,
5628 PRICING_ATTRIBUTE75,
5629 PRICING_ATTRIBUTE76,
5630 PRICING_ATTRIBUTE77,
5631 PRICING_ATTRIBUTE78,
5632 PRICING_ATTRIBUTE79,
5633 PRICING_ATTRIBUTE80,
5634 PRICING_ATTRIBUTE81,
5635 PRICING_ATTRIBUTE82,
5636 PRICING_ATTRIBUTE83,
5637 PRICING_ATTRIBUTE84,
5638 PRICING_ATTRIBUTE85,
5639 PRICING_ATTRIBUTE86,
5640 PRICING_ATTRIBUTE87,
5641 PRICING_ATTRIBUTE88,
5642 PRICING_ATTRIBUTE89,
5643 PRICING_ATTRIBUTE90,
5644 PRICING_ATTRIBUTE91,
5645 PRICING_ATTRIBUTE92,
5646 PRICING_ATTRIBUTE93,
5647 PRICING_ATTRIBUTE94,
5648 PRICING_ATTRIBUTE95,
5649 PRICING_ATTRIBUTE96,
5650 PRICING_ATTRIBUTE97,
5651 PRICING_ATTRIBUTE98,
5652 PRICING_ATTRIBUTE99,
5653 PRICING_ATTRIBUTE100,
5654 CONTEXT,
5655 ATTRIBUTE1,
5656 ATTRIBUTE2,
5657 ATTRIBUTE3,
5658 ATTRIBUTE4,
5659 ATTRIBUTE5,
5660 ATTRIBUTE6,
5661 ATTRIBUTE7,
5662 ATTRIBUTE8,
5663 ATTRIBUTE9,
5664 ATTRIBUTE10,
5665 ATTRIBUTE11,
5666 ATTRIBUTE12,
5667 ATTRIBUTE13,
5668 ATTRIBUTE14,
5669 ATTRIBUTE15,
5670 ATTRIBUTE16,
5671 ATTRIBUTE17,
5672 ATTRIBUTE18,
5673 ATTRIBUTE19,
5674 ATTRIBUTE20,
5675 OBJECT_VERSION_NUMBER
5676 FROM ASO_PRICE_ATTRIBUTES
5677 WHERE quote_header_id = p_qte_header_id AND
5678 (quote_line_id = p_qte_line_id OR
5679 (quote_line_id IS NULL AND p_qte_line_id IS NULL));
5680 l_price_attr_rec ASO_QUOTE_PUB.Price_Attributes_Rec_Type;
5681 l_price_attr_tbl ASO_QUOTE_PUB.Price_Attributes_Tbl_Type;
5682 BEGIN
5683 FOR price_attr_rec IN c_price_attr LOOP
5684 l_price_attr_rec.PRICE_ATTRIBUTE_ID := price_attr_rec.PRICE_ATTRIBUTE_ID;
5685 l_price_attr_rec.CREATION_DATE := price_attr_rec.CREATION_DATE;
5686 l_price_attr_rec.CREATED_BY := price_attr_rec.CREATED_BY;
5687 l_price_attr_rec.LAST_UPDATE_DATE := price_attr_rec.LAST_UPDATE_DATE;
5688 l_price_attr_rec.LAST_UPDATED_BY := price_attr_rec.LAST_UPDATED_BY;
5689 l_price_attr_rec.LAST_UPDATE_LOGIN := price_attr_rec.LAST_UPDATE_LOGIN;
5690 l_price_attr_rec.REQUEST_ID := price_attr_rec.REQUEST_ID;
5691 l_price_attr_rec.PROGRAM_APPLICATION_ID := price_attr_rec.PROGRAM_APPLICATION_ID;
5692 l_price_attr_rec.PROGRAM_ID := price_attr_rec.PROGRAM_ID;
5693 l_price_attr_rec.PROGRAM_UPDATE_DATE := price_attr_rec.PROGRAM_UPDATE_DATE;
5694 l_price_attr_rec.QUOTE_HEADER_ID := price_attr_rec.QUOTE_HEADER_ID;
5695 l_price_attr_rec.QUOTE_LINE_ID := price_attr_rec.QUOTE_LINE_ID;
5696 l_price_attr_rec.FLEX_TITLE := price_attr_rec.FLEX_TITLE;
5697 l_price_attr_rec.PRICING_CONTEXT := price_attr_rec.PRICING_CONTEXT;
5698 l_price_attr_rec.PRICING_ATTRIBUTE1 := price_attr_rec.PRICING_ATTRIBUTE1;
5699 l_price_attr_rec.PRICING_ATTRIBUTE2 := price_attr_rec.PRICING_ATTRIBUTE2;
5700 l_price_attr_rec.PRICING_ATTRIBUTE3 := price_attr_rec.PRICING_ATTRIBUTE3;
5701 l_price_attr_rec.PRICING_ATTRIBUTE4 := price_attr_rec.PRICING_ATTRIBUTE4;
5702 l_price_attr_rec.PRICING_ATTRIBUTE5 := price_attr_rec.PRICING_ATTRIBUTE5;
5703 l_price_attr_rec.PRICING_ATTRIBUTE6 := price_attr_rec.PRICING_ATTRIBUTE6;
5704 l_price_attr_rec.PRICING_ATTRIBUTE7 := price_attr_rec.PRICING_ATTRIBUTE7;
5705 l_price_attr_rec.PRICING_ATTRIBUTE8 := price_attr_rec.PRICING_ATTRIBUTE8;
5706 l_price_attr_rec.PRICING_ATTRIBUTE9 := price_attr_rec.PRICING_ATTRIBUTE9;
5707 l_price_attr_rec.PRICING_ATTRIBUTE10 := price_attr_rec.PRICING_ATTRIBUTE10;
5708 l_price_attr_rec.PRICING_ATTRIBUTE11 := price_attr_rec.PRICING_ATTRIBUTE11;
5709 l_price_attr_rec.PRICING_ATTRIBUTE12 := price_attr_rec.PRICING_ATTRIBUTE12;
5710 l_price_attr_rec.PRICING_ATTRIBUTE13 := price_attr_rec.PRICING_ATTRIBUTE13;
5711 l_price_attr_rec.PRICING_ATTRIBUTE14 := price_attr_rec.PRICING_ATTRIBUTE14;
5712 l_price_attr_rec.PRICING_ATTRIBUTE15 := price_attr_rec.PRICING_ATTRIBUTE15;
5713 l_price_attr_rec.PRICING_ATTRIBUTE16 := price_attr_rec.PRICING_ATTRIBUTE16;
5714 l_price_attr_rec.PRICING_ATTRIBUTE17 := price_attr_rec.PRICING_ATTRIBUTE17;
5715 l_price_attr_rec.PRICING_ATTRIBUTE18 := price_attr_rec.PRICING_ATTRIBUTE18;
5716 l_price_attr_rec.PRICING_ATTRIBUTE19 := price_attr_rec.PRICING_ATTRIBUTE19;
5717 l_price_attr_rec.PRICING_ATTRIBUTE20 := price_attr_rec.PRICING_ATTRIBUTE20;
5718 l_price_attr_rec.PRICING_ATTRIBUTE21 := price_attr_rec.PRICING_ATTRIBUTE21;
5719 l_price_attr_rec.PRICING_ATTRIBUTE22 := price_attr_rec.PRICING_ATTRIBUTE22;
5720 l_price_attr_rec.PRICING_ATTRIBUTE23 := price_attr_rec.PRICING_ATTRIBUTE23;
5721 l_price_attr_rec.PRICING_ATTRIBUTE24 := price_attr_rec.PRICING_ATTRIBUTE24;
5722 l_price_attr_rec.PRICING_ATTRIBUTE25 := price_attr_rec.PRICING_ATTRIBUTE25;
5723 l_price_attr_rec.PRICING_ATTRIBUTE26 := price_attr_rec.PRICING_ATTRIBUTE26;
5724 l_price_attr_rec.PRICING_ATTRIBUTE27 := price_attr_rec.PRICING_ATTRIBUTE27;
5725 l_price_attr_rec.PRICING_ATTRIBUTE28 := price_attr_rec.PRICING_ATTRIBUTE28;
5726 l_price_attr_rec.PRICING_ATTRIBUTE29 := price_attr_rec.PRICING_ATTRIBUTE29;
5727 l_price_attr_rec.PRICING_ATTRIBUTE30 := price_attr_rec.PRICING_ATTRIBUTE30;
5728 l_price_attr_rec.PRICING_ATTRIBUTE31 := price_attr_rec.PRICING_ATTRIBUTE31;
5729 l_price_attr_rec.PRICING_ATTRIBUTE32 := price_attr_rec.PRICING_ATTRIBUTE32;
5730 l_price_attr_rec.PRICING_ATTRIBUTE33 := price_attr_rec.PRICING_ATTRIBUTE33;
5731 l_price_attr_rec.PRICING_ATTRIBUTE34 := price_attr_rec.PRICING_ATTRIBUTE34;
5732 l_price_attr_rec.PRICING_ATTRIBUTE35 := price_attr_rec.PRICING_ATTRIBUTE35;
5733 l_price_attr_rec.PRICING_ATTRIBUTE36 := price_attr_rec.PRICING_ATTRIBUTE36;
5734 l_price_attr_rec.PRICING_ATTRIBUTE37 := price_attr_rec.PRICING_ATTRIBUTE37;
5735 l_price_attr_rec.PRICING_ATTRIBUTE38 := price_attr_rec.PRICING_ATTRIBUTE38;
5736 l_price_attr_rec.PRICING_ATTRIBUTE39 := price_attr_rec.PRICING_ATTRIBUTE39;
5737 l_price_attr_rec.PRICING_ATTRIBUTE40 := price_attr_rec.PRICING_ATTRIBUTE40;
5738 l_price_attr_rec.PRICING_ATTRIBUTE41 := price_attr_rec.PRICING_ATTRIBUTE41;
5739 l_price_attr_rec.PRICING_ATTRIBUTE42 := price_attr_rec.PRICING_ATTRIBUTE42;
5740 l_price_attr_rec.PRICING_ATTRIBUTE43 := price_attr_rec.PRICING_ATTRIBUTE43;
5741 l_price_attr_rec.PRICING_ATTRIBUTE44 := price_attr_rec.PRICING_ATTRIBUTE44;
5742 l_price_attr_rec.PRICING_ATTRIBUTE45 := price_attr_rec.PRICING_ATTRIBUTE45;
5743 l_price_attr_rec.PRICING_ATTRIBUTE46 := price_attr_rec.PRICING_ATTRIBUTE46;
5744 l_price_attr_rec.PRICING_ATTRIBUTE47 := price_attr_rec.PRICING_ATTRIBUTE47;
5745 l_price_attr_rec.PRICING_ATTRIBUTE48 := price_attr_rec.PRICING_ATTRIBUTE48;
5746 l_price_attr_rec.PRICING_ATTRIBUTE49 := price_attr_rec.PRICING_ATTRIBUTE49;
5747 l_price_attr_rec.PRICING_ATTRIBUTE50 := price_attr_rec.PRICING_ATTRIBUTE50;
5748 l_price_attr_rec.PRICING_ATTRIBUTE51 := price_attr_rec.PRICING_ATTRIBUTE51;
5749 l_price_attr_rec.PRICING_ATTRIBUTE52 := price_attr_rec.PRICING_ATTRIBUTE52;
5750 l_price_attr_rec.PRICING_ATTRIBUTE53 := price_attr_rec.PRICING_ATTRIBUTE53;
5751 l_price_attr_rec.PRICING_ATTRIBUTE54 := price_attr_rec.PRICING_ATTRIBUTE54;
5752 l_price_attr_rec.PRICING_ATTRIBUTE55 := price_attr_rec.PRICING_ATTRIBUTE55;
5753 l_price_attr_rec.PRICING_ATTRIBUTE56 := price_attr_rec.PRICING_ATTRIBUTE56;
5754 l_price_attr_rec.PRICING_ATTRIBUTE57 := price_attr_rec.PRICING_ATTRIBUTE57;
5755 l_price_attr_rec.PRICING_ATTRIBUTE58 := price_attr_rec.PRICING_ATTRIBUTE58;
5756 l_price_attr_rec.PRICING_ATTRIBUTE59 := price_attr_rec.PRICING_ATTRIBUTE59;
5757 l_price_attr_rec.PRICING_ATTRIBUTE60 := price_attr_rec.PRICING_ATTRIBUTE60;
5758 l_price_attr_rec.PRICING_ATTRIBUTE61 := price_attr_rec.PRICING_ATTRIBUTE61;
5759 l_price_attr_rec.PRICING_ATTRIBUTE62 := price_attr_rec.PRICING_ATTRIBUTE62;
5760 l_price_attr_rec.PRICING_ATTRIBUTE63 := price_attr_rec.PRICING_ATTRIBUTE63;
5761 l_price_attr_rec.PRICING_ATTRIBUTE64 := price_attr_rec.PRICING_ATTRIBUTE64;
5762 l_price_attr_rec.PRICING_ATTRIBUTE65 := price_attr_rec.PRICING_ATTRIBUTE65;
5763 l_price_attr_rec.PRICING_ATTRIBUTE66 := price_attr_rec.PRICING_ATTRIBUTE66;
5764 l_price_attr_rec.PRICING_ATTRIBUTE67 := price_attr_rec.PRICING_ATTRIBUTE67;
5765 l_price_attr_rec.PRICING_ATTRIBUTE68 := price_attr_rec.PRICING_ATTRIBUTE68;
5766 l_price_attr_rec.PRICING_ATTRIBUTE69 := price_attr_rec.PRICING_ATTRIBUTE69;
5767 l_price_attr_rec.PRICING_ATTRIBUTE70 := price_attr_rec.PRICING_ATTRIBUTE70;
5768 l_price_attr_rec.PRICING_ATTRIBUTE71 := price_attr_rec.PRICING_ATTRIBUTE71;
5769 l_price_attr_rec.PRICING_ATTRIBUTE72 := price_attr_rec.PRICING_ATTRIBUTE72;
5770 l_price_attr_rec.PRICING_ATTRIBUTE73 := price_attr_rec.PRICING_ATTRIBUTE73;
5771 l_price_attr_rec.PRICING_ATTRIBUTE74 := price_attr_rec.PRICING_ATTRIBUTE74;
5772 l_price_attr_rec.PRICING_ATTRIBUTE75 := price_attr_rec.PRICING_ATTRIBUTE75;
5773 l_price_attr_rec.PRICING_ATTRIBUTE76 := price_attr_rec.PRICING_ATTRIBUTE76;
5774 l_price_attr_rec.PRICING_ATTRIBUTE77 := price_attr_rec.PRICING_ATTRIBUTE77;
5775 l_price_attr_rec.PRICING_ATTRIBUTE78 := price_attr_rec.PRICING_ATTRIBUTE78;
5776 l_price_attr_rec.PRICING_ATTRIBUTE79 := price_attr_rec.PRICING_ATTRIBUTE79;
5777 l_price_attr_rec.PRICING_ATTRIBUTE80 := price_attr_rec.PRICING_ATTRIBUTE80;
5778 l_price_attr_rec.PRICING_ATTRIBUTE81 := price_attr_rec.PRICING_ATTRIBUTE81;
5779 l_price_attr_rec.PRICING_ATTRIBUTE82 := price_attr_rec.PRICING_ATTRIBUTE82;
5780 l_price_attr_rec.PRICING_ATTRIBUTE83 := price_attr_rec.PRICING_ATTRIBUTE83;
5781 l_price_attr_rec.PRICING_ATTRIBUTE84 := price_attr_rec.PRICING_ATTRIBUTE84;
5782 l_price_attr_rec.PRICING_ATTRIBUTE85 := price_attr_rec.PRICING_ATTRIBUTE85;
5783 l_price_attr_rec.PRICING_ATTRIBUTE86 := price_attr_rec.PRICING_ATTRIBUTE86;
5784 l_price_attr_rec.PRICING_ATTRIBUTE87 := price_attr_rec.PRICING_ATTRIBUTE87;
5785 l_price_attr_rec.PRICING_ATTRIBUTE88 := price_attr_rec.PRICING_ATTRIBUTE88;
5786 l_price_attr_rec.PRICING_ATTRIBUTE89 := price_attr_rec.PRICING_ATTRIBUTE89;
5787 l_price_attr_rec.PRICING_ATTRIBUTE90 := price_attr_rec.PRICING_ATTRIBUTE90;
5788 l_price_attr_rec.PRICING_ATTRIBUTE91 := price_attr_rec.PRICING_ATTRIBUTE91;
5789 l_price_attr_rec.PRICING_ATTRIBUTE92 := price_attr_rec.PRICING_ATTRIBUTE92;
5790 l_price_attr_rec.PRICING_ATTRIBUTE93 := price_attr_rec.PRICING_ATTRIBUTE93;
5791 l_price_attr_rec.PRICING_ATTRIBUTE94 := price_attr_rec.PRICING_ATTRIBUTE94;
5792 l_price_attr_rec.PRICING_ATTRIBUTE95 := price_attr_rec.PRICING_ATTRIBUTE95;
5793 l_price_attr_rec.PRICING_ATTRIBUTE96 := price_attr_rec.PRICING_ATTRIBUTE96;
5794 l_price_attr_rec.PRICING_ATTRIBUTE97 := price_attr_rec.PRICING_ATTRIBUTE97;
5795 l_price_attr_rec.PRICING_ATTRIBUTE98 := price_attr_rec.PRICING_ATTRIBUTE98;
5796 l_price_attr_rec.PRICING_ATTRIBUTE99 := price_attr_rec.PRICING_ATTRIBUTE99;
5797 l_price_attr_rec.PRICING_ATTRIBUTE100 := price_attr_rec.PRICING_ATTRIBUTE100;
5798 l_price_attr_rec.CONTEXT := price_attr_rec.CONTEXT;
5799 l_price_attr_rec.ATTRIBUTE1 := price_attr_rec.ATTRIBUTE1;
5800 l_price_attr_rec.ATTRIBUTE2 := price_attr_rec.ATTRIBUTE2;
5801 l_price_attr_rec.ATTRIBUTE3 := price_attr_rec.ATTRIBUTE3;
5802 l_price_attr_rec.ATTRIBUTE4 := price_attr_rec.ATTRIBUTE4;
5803 l_price_attr_rec.ATTRIBUTE5 := price_attr_rec.ATTRIBUTE5;
5804 l_price_attr_rec.ATTRIBUTE6 := price_attr_rec.ATTRIBUTE6;
5805 l_price_attr_rec.ATTRIBUTE7 := price_attr_rec.ATTRIBUTE7;
5806 l_price_attr_rec.ATTRIBUTE8 := price_attr_rec.ATTRIBUTE8;
5807 l_price_attr_rec.ATTRIBUTE9 := price_attr_rec.ATTRIBUTE9;
5808 l_price_attr_rec.ATTRIBUTE10 := price_attr_rec.ATTRIBUTE10;
5809 l_price_attr_rec.ATTRIBUTE11 := price_attr_rec.ATTRIBUTE11;
5810 l_price_attr_rec.ATTRIBUTE12 := price_attr_rec.ATTRIBUTE12;
5811 l_price_attr_rec.ATTRIBUTE13 := price_attr_rec.ATTRIBUTE13;
5812 l_price_attr_rec.ATTRIBUTE14 := price_attr_rec.ATTRIBUTE14;
5813 l_price_attr_rec.ATTRIBUTE15 := price_attr_rec.ATTRIBUTE15;
5814 l_price_attr_rec.ATTRIBUTE16 := price_attr_rec.ATTRIBUTE16;
5815 l_price_attr_rec.ATTRIBUTE17 := price_attr_rec.ATTRIBUTE17;
5816 l_price_attr_rec.ATTRIBUTE18 := price_attr_rec.ATTRIBUTE18;
5817 l_price_attr_rec.ATTRIBUTE19 := price_attr_rec.ATTRIBUTE19;
5818 l_price_attr_rec.ATTRIBUTE20 := price_attr_rec.ATTRIBUTE20;
5819 l_price_attr_rec.OBJECT_VERSION_NUMBER := price_attr_rec.OBJECT_VERSION_NUMBER;
5820 l_price_attr_tbl(l_price_attr_tbl.COUNT+1) := l_price_attr_rec;
5821 END LOOP;
5822 RETURN l_price_attr_tbl;
5823 END Query_Price_Attr_Rows;
5824
5825 FUNCTION Query_Price_Adj_Rltship_Rows (
5826 P_Price_Adjustment_Id IN NUMBER := FND_API.G_MISS_NUM
5827 ) RETURN ASO_QUOTE_PUB.Price_Adj_Rltship_Tbl_Type
5828 IS
5829 CURSOR C_Price_Adj_Rltd IS
5830 SELECT
5831 ADJ_RELATIONSHIP_ID
5832 ,CREATION_DATE
5833 ,CREATED_BY
5834 ,LAST_UPDATE_DATE
5835 ,LAST_UPDATED_BY
5836 ,LAST_UPDATE_LOGIN
5837 ,PROGRAM_APPLICATION_ID
5838 ,PROGRAM_ID
5839 ,PROGRAM_UPDATE_DATE
5840 ,REQUEST_ID
5841 ,QUOTE_LINE_ID
5842 ,PRICE_ADJUSTMENT_ID
5843 ,RLTD_PRICE_ADJ_ID
5844 ,QUOTE_SHIPMENT_ID
5845 ,SECURITY_GROUP_ID
5846 ,OBJECT_VERSION_NUMBER
5847 FROM aso_price_adj_relationships
5848 WHERE price_adjustment_id = P_Price_Adjustment_Id;
5849
5850 l_price_adj_rltd_rec ASO_QUOTE_PUB.Price_Adj_Rltship_Rec_Type;
5851 l_price_adj_rltd_tbl ASO_QUOTE_PUB.Price_Adj_Rltship_Tbl_Type;
5852
5853 BEGIN
5854 FOR C_Price_Adj_Rltd_Rec IN C_Price_Adj_Rltd LOOP
5855 l_price_adj_rltd_rec.ADJ_RELATIONSHIP_ID := C_Price_Adj_Rltd_Rec.ADJ_RELATIONSHIP_ID;
5856 l_price_adj_rltd_rec.CREATION_DATE := C_Price_Adj_Rltd_Rec.CREATION_DATE;
5857 l_price_adj_rltd_rec.CREATED_BY := C_Price_Adj_Rltd_Rec.CREATED_BY;
5858 l_price_adj_rltd_rec.LAST_UPDATE_DATE := C_Price_Adj_Rltd_Rec.LAST_UPDATE_DATE;
5859 l_price_adj_rltd_rec.LAST_UPDATED_BY := C_Price_Adj_Rltd_Rec.LAST_UPDATED_BY;
5860 l_price_adj_rltd_rec.LAST_UPDATE_LOGIN := C_Price_Adj_Rltd_Rec.LAST_UPDATE_LOGIN;
5861 l_price_adj_rltd_rec.PROGRAM_APPLICATION_ID := C_Price_Adj_Rltd_Rec.PROGRAM_APPLICATION_ID;
5862 l_price_adj_rltd_rec.PROGRAM_ID := C_Price_Adj_Rltd_Rec.PROGRAM_ID;
5863 l_price_adj_rltd_rec.PROGRAM_UPDATE_DATE := C_Price_Adj_Rltd_Rec.PROGRAM_UPDATE_DATE;
5864 l_price_adj_rltd_rec.REQUEST_ID := C_Price_Adj_Rltd_Rec.REQUEST_ID;
5865 l_price_adj_rltd_rec.QUOTE_LINE_ID := C_Price_Adj_Rltd_Rec.QUOTE_LINE_ID;
5866 l_price_adj_rltd_rec.PRICE_ADJUSTMENT_ID := C_Price_Adj_Rltd_Rec.PRICE_ADJUSTMENT_ID;
5867 l_price_adj_rltd_rec.RLTD_PRICE_ADJ_ID := C_Price_Adj_Rltd_Rec.RLTD_PRICE_ADJ_ID;
5868 l_price_adj_rltd_rec.QUOTE_SHIPMENT_ID := C_Price_Adj_Rltd_Rec.QUOTE_SHIPMENT_ID;
5869 l_price_adj_rltd_tbl(l_price_adj_rltd_tbl.COUNT+1) := l_price_adj_rltd_rec;
5870 END LOOP;
5871 RETURN l_price_adj_rltd_tbl;
5872 END Query_Price_Adj_Rltship_Rows;
5873
5874
5875 FUNCTION Query_Price_Adj_Rltn_Rows (
5876 P_Quote_Line_Id IN NUMBER := FND_API.G_MISS_NUM
5877 ) RETURN ASO_QUOTE_PUB.Price_Adj_Rltship_Tbl_Type
5878 IS
5879 CURSOR C_Price_Adj_Rltd IS
5880 SELECT
5881 ADJ_RELATIONSHIP_ID
5882 ,CREATION_DATE
5883 ,CREATED_BY
5884 ,LAST_UPDATE_DATE
5885 ,LAST_UPDATED_BY
5886 ,LAST_UPDATE_LOGIN
5887 ,PROGRAM_APPLICATION_ID
5888 ,PROGRAM_ID
5889 ,PROGRAM_UPDATE_DATE
5890 ,REQUEST_ID
5891 ,QUOTE_LINE_ID
5892 ,PRICE_ADJUSTMENT_ID
5893 ,RLTD_PRICE_ADJ_ID
5894 ,QUOTE_SHIPMENT_ID
5895 ,SECURITY_GROUP_ID
5896 ,OBJECT_VERSION_NUMBER
5897 FROM aso_price_adj_relationships
5898 WHERE quote_line_id = P_Quote_Line_Id;
5899
5900 l_price_adj_rltd_rec ASO_QUOTE_PUB.Price_Adj_Rltship_Rec_Type;
5901 l_price_adj_rltd_tbl ASO_QUOTE_PUB.Price_Adj_Rltship_Tbl_Type;
5902
5903 BEGIN
5904 FOR C_Price_Adj_Rltd_Rec IN C_Price_Adj_Rltd LOOP
5905 l_price_adj_rltd_rec.ADJ_RELATIONSHIP_ID := C_Price_Adj_Rltd_Rec.ADJ_RELATIONSHIP_ID;
5906 l_price_adj_rltd_rec.CREATION_DATE := C_Price_Adj_Rltd_Rec.CREATION_DATE;
5907 l_price_adj_rltd_rec.CREATED_BY := C_Price_Adj_Rltd_Rec.CREATED_BY;
5908 l_price_adj_rltd_rec.LAST_UPDATE_DATE := C_Price_Adj_Rltd_Rec.LAST_UPDATE_DATE;
5909 l_price_adj_rltd_rec.LAST_UPDATED_BY := C_Price_Adj_Rltd_Rec.LAST_UPDATED_BY;
5910 l_price_adj_rltd_rec.LAST_UPDATE_LOGIN := C_Price_Adj_Rltd_Rec.LAST_UPDATE_LOGIN;
5911 l_price_adj_rltd_rec.PROGRAM_APPLICATION_ID := C_Price_Adj_Rltd_Rec.PROGRAM_APPLICATION_ID;
5912 l_price_adj_rltd_rec.PROGRAM_ID := C_Price_Adj_Rltd_Rec.PROGRAM_ID;
5913 l_price_adj_rltd_rec.PROGRAM_UPDATE_DATE := C_Price_Adj_Rltd_Rec.PROGRAM_UPDATE_DATE;
5914 l_price_adj_rltd_rec.REQUEST_ID := C_Price_Adj_Rltd_Rec.REQUEST_ID;
5915 l_price_adj_rltd_rec.QUOTE_LINE_ID := C_Price_Adj_Rltd_Rec.QUOTE_LINE_ID;
5916 l_price_adj_rltd_rec.PRICE_ADJUSTMENT_ID := C_Price_Adj_Rltd_Rec.PRICE_ADJUSTMENT_ID;
5917 l_price_adj_rltd_rec.RLTD_PRICE_ADJ_ID := C_Price_Adj_Rltd_Rec.RLTD_PRICE_ADJ_ID;
5918 l_price_adj_rltd_rec.QUOTE_SHIPMENT_ID := C_Price_Adj_Rltd_Rec.QUOTE_SHIPMENT_ID;
5919 l_price_adj_rltd_tbl(l_price_adj_rltd_tbl.COUNT+1) := l_price_adj_rltd_rec;
5920 END LOOP;
5921 RETURN l_price_adj_rltd_tbl;
5922 END Query_Price_Adj_Rltn_Rows;
5923
5924
5925
5926
5927 FUNCTION Get_Profile_Obsolete_Status (
5928 p_profile_name IN VARCHAR2,
5929 p_application_id IN NUMBER
5930 ) RETURN VARCHAR2
5931 IS
5932
5933 cursor c_end_date is
5934 select end_date_active
5935 from fnd_profile_options
5936 where profile_option_name = p_profile_name
5937 and application_id = p_application_id
5938 and trunc(start_date_active) <= trunc(sysdate)
5939 and trunc(nvl(end_date_active, sysdate)) >= trunc(sysdate);
5940
5941 l_end_date_active date;
5942
5943 begin
5944 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5945 aso_debug_pub.add('ASO_UTL_PVT: Get_Profile_Obsolete_Status: p_profile_name: '||p_profile_name,1,'Y');
5946 aso_debug_pub.add('ASO_UTL_PVT: Get_Profile_Obsolete_Status: p_application_id: '||p_application_id,1,'Y');
5947 END IF;
5948
5949 open c_end_date;
5950 fetch c_end_date into l_end_date_active;
5951
5952 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5953 aso_debug_pub.add('ASO_UTL_PVT: Get_Profile_Obsolete_Status: l_end_date_active: '||l_end_date_active,1,'Y');
5954 END IF;
5955
5956 if c_end_date%found then
5957
5958 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5959 aso_debug_pub.add('ASO_UTL_PVT: Get_Profile_Obsolete_Status: Inside c_end_date%found cond',1,'Y');
5960 END IF;
5961
5962 close c_end_date;
5963 return 'F';
5964 else
5965
5966 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
5967 aso_debug_pub.add('ASO_UTL_PVT: Get_Profile_Obsolete_Status: Inside else c_end_date%found cond',1,'Y');
5968 END IF;
5969
5970 close c_end_date;
5971 return 'T';
5972 end if;
5973
5974 end Get_Profile_Obsolete_Status;
5975
5976
5977 FUNCTION GET_Control_Rec RETURN ASO_QUOTE_PUB.Control_Rec_TYPE
5978 IS
5979 TMP_REC ASO_QUOTE_PUB.Control_REC_TYPE;
5980 BEGIN
5981 RETURN TMP_REC;
5982 END GET_Control_Rec;
5983
5984 FUNCTION GET_Qte_Header_Rec RETURN ASO_QUOTE_PUB.Qte_Header_Rec_TYPE
5985 IS
5986 TMP_REC ASO_QUOTE_PUB.Qte_Header_REC_TYPE;
5987 BEGIN
5988 RETURN TMP_REC;
5989 END GET_Qte_Header_Rec;
5990
5991 FUNCTION GET_Qte_Sort_Rec RETURN ASO_QUOTE_PUB.Qte_Sort_Rec_TYPE
5992 IS
5993 TMP_REC ASO_QUOTE_PUB.Qte_Sort_REC_TYPE;
5994 BEGIN
5995 RETURN TMP_REC;
5996 END GET_Qte_Sort_Rec;
5997
5998 FUNCTION GET_Qte_Line_Rec RETURN ASO_QUOTE_PUB.Qte_Line_Rec_TYPE
5999 IS
6000 TMP_REC ASO_QUOTE_PUB.Qte_Line_REC_TYPE;
6001 BEGIN
6002 RETURN TMP_REC;
6003 END GET_Qte_Line_Rec;
6004
6005 FUNCTION GET_Qte_Line_sort_Rec RETURN ASO_QUOTE_PUB.Qte_Line_sort_Rec_TYPE
6006 IS
6007 TMP_REC ASO_QUOTE_PUB.Qte_Line_sort_REC_TYPE;
6008 BEGIN
6009 RETURN TMP_REC;
6010 END GET_Qte_Line_sort_Rec;
6011
6012 FUNCTION GET_Qte_Line_Dtl_Rec RETURN ASO_QUOTE_PUB.Qte_Line_Dtl_Rec_TYPE
6013 IS
6014 TMP_REC ASO_QUOTE_PUB.Qte_Line_Dtl_REC_TYPE;
6015 BEGIN
6016 RETURN TMP_REC;
6017 END GET_Qte_Line_Dtl_Rec;
6018
6019 FUNCTION GET_Price_Attributes_Rec
6020 RETURN ASO_QUOTE_PUB.Price_Attributes_Rec_TYPE
6021 IS
6022 TMP_REC ASO_QUOTE_PUB.Price_Attributes_REC_TYPE;
6023 BEGIN
6024 RETURN TMP_REC;
6025 END GET_Price_Attributes_Rec;
6026
6027 FUNCTION GET_Price_Adj_Rec RETURN ASO_QUOTE_PUB.Price_Adj_Rec_TYPE
6028 IS
6029 TMP_REC ASO_QUOTE_PUB.Price_Adj_REC_TYPE;
6030 BEGIN
6031 RETURN TMP_REC;
6032 END GET_Price_Adj_Rec;
6033
6034 FUNCTION GET_PRICE_ADJ_ATTR_Rec
6035 RETURN ASO_QUOTE_PUB.PRICE_ADJ_ATTR_Rec_TYPE
6036 IS
6037 TMP_REC ASO_QUOTE_PUB.PRICE_ADJ_ATTR_REC_TYPE;
6038 BEGIN
6039 RETURN TMP_REC;
6040 END GET_PRICE_ADJ_ATTR_Rec;
6041
6042
6043 FUNCTION GET_Price_Adj_Rltship_Rec
6044 RETURN ASO_QUOTE_PUB.Price_Adj_Rltship_Rec_TYPE
6045 IS
6046 TMP_REC ASO_QUOTE_PUB.Price_Adj_Rltship_REC_TYPE;
6047 BEGIN
6048 RETURN TMP_REC;
6049 END GET_Price_Adj_Rltship_Rec;
6050
6051 FUNCTION GET_Sales_Credit_Rec
6052 RETURN ASO_QUOTE_PUB.Sales_Credit_Rec_TYPE
6053 IS
6054 TMP_REC ASO_QUOTE_PUB.Sales_Credit_REC_TYPE;
6055 BEGIN
6056 RETURN TMP_REC;
6057 END GET_Sales_Credit_Rec;
6058
6059 FUNCTION GET_Payment_Rec RETURN ASO_QUOTE_PUB.Payment_Rec_TYPE
6060 IS
6061 TMP_REC ASO_QUOTE_PUB.Payment_REC_TYPE;
6062 BEGIN
6063 RETURN TMP_REC;
6064 END GET_Payment_Rec;
6065
6066 FUNCTION GET_Shipment_Rec RETURN ASO_QUOTE_PUB.Shipment_Rec_TYPE
6067 IS
6068 TMP_REC ASO_QUOTE_PUB.Shipment_REC_TYPE;
6069 BEGIN
6070 RETURN TMP_REC;
6071 END GET_Shipment_Rec;
6072
6073
6074 FUNCTION GET_Freight_Charge_Rec
6075 RETURN ASO_QUOTE_PUB.Freight_Charge_Rec_TYPE
6076 IS
6077 TMP_REC ASO_QUOTE_PUB.Freight_Charge_REC_TYPE;
6078 BEGIN
6079 RETURN TMP_REC;
6080 END GET_Freight_Charge_Rec;
6081
6082 FUNCTION GET_Tax_Detail_Rec RETURN ASO_QUOTE_PUB.Tax_Detail_Rec_TYPE
6083 IS
6084 TMP_REC ASO_QUOTE_PUB.Tax_Detail_REC_TYPE;
6085 BEGIN
6086 RETURN TMP_REC;
6087 END GET_Tax_Detail_Rec;
6088
6089 FUNCTION GET_Tax_Control_Rec RETURN ASO_TAX_INT.Tax_control_rec_type
6090 IS
6091 TMP_REC ASO_TAX_INT.Tax_control_rec_type ;
6092 BEGIN
6093 RETURN TMP_REC;
6094 END GET_Tax_Control_Rec;
6095
6096 FUNCTION GET_Header_Rltship_Rec
6097 RETURN ASO_QUOTE_PUB.Header_Rltship_Rec_TYPE
6098 IS
6099 TMP_REC ASO_QUOTE_PUB.Header_Rltship_REC_TYPE;
6100 BEGIN
6101 RETURN TMP_REC;
6102 END GET_Header_Rltship_Rec;
6103
6104
6105 FUNCTION GET_Line_Rltship_Rec RETURN ASO_QUOTE_PUB.Line_Rltship_Rec_TYPE
6106 IS
6107 TMP_REC ASO_QUOTE_PUB.Line_Rltship_REC_TYPE;
6108 BEGIN
6109 RETURN TMP_REC;
6110 END GET_Line_Rltship_Rec;
6111
6112 FUNCTION GET_PARTY_RLTSHIP_Rec RETURN ASO_QUOTE_PUB.PARTY_RLTSHIP_Rec_TYPE
6113 IS
6114 TMP_REC ASO_QUOTE_PUB.PARTY_RLTSHIP_REC_TYPE;
6115 BEGIN
6116 RETURN TMP_REC;
6117 END GET_PARTY_RLTSHIP_Rec;
6118
6119 FUNCTION GET_Related_Object_Rec
6120 RETURN ASO_QUOTE_PUB.Related_Object_Rec_TYPE
6121 IS
6122 TMP_REC ASO_QUOTE_PUB.Related_Object_REC_TYPE;
6123 BEGIN
6124 RETURN TMP_REC;
6125 END GET_Related_Object_Rec;
6126
6127 FUNCTION GET_RELATED_OBJ_Rec RETURN ASO_QUOTE_PUB.RELATED_OBJ_Rec_TYPE
6128 IS
6129 TMP_REC ASO_QUOTE_PUB.RELATED_OBJ_REC_TYPE;
6130 BEGIN
6131 RETURN TMP_REC;
6132 END GET_RELATED_OBJ_Rec;
6133
6134 FUNCTION GET_Line_Attribs_Ext_Rec
6135 RETURN ASO_QUOTE_PUB.Line_Attribs_Ext_Rec_TYPE
6136 IS
6137 TMP_REC ASO_QUOTE_PUB.Line_Attribs_Ext_REC_TYPE;
6138 BEGIN
6139 RETURN TMP_REC;
6140 END GET_Line_Attribs_Ext_Rec;
6141
6142 FUNCTION GET_Order_Header_Rec RETURN ASO_QUOTE_PUB.Order_Header_Rec_TYPE
6143 IS
6144 TMP_REC ASO_QUOTE_PUB.Order_Header_REC_TYPE;
6145 BEGIN
6146 RETURN TMP_REC;
6147 END GET_Order_Header_Rec;
6148
6149 FUNCTION GET_SUBMIT_CONTROL_REC RETURN ASO_QUOTE_PUB.Submit_Control_Rec_Type
6150 IS
6151 TMP_REC ASO_QUOTE_PUB.Submit_Control_Rec_Type;
6152 BEGIN
6153 RETURN TMP_REC;
6154 END Get_Submit_Control_Rec;
6155
6156
6157 FUNCTION GET_Sales_Alloc_Control_Rec RETURN ASO_QUOTE_PUB.Sales_Alloc_Control_Rec_Type
6158 IS
6159 TMP_REC ASO_QUOTE_PUB.Sales_Alloc_Control_Rec_Type;
6160 BEGIN
6161 RETURN TMP_REC;
6162 END Get_Sales_Alloc_Control_Rec;
6163
6164
6165 FUNCTION GET_Party_Rec RETURN ASO_PARTY_INT.Party_Rec_Type
6166 IS
6167 TMP_REC ASO_PARTY_INT.Party_Rec_Type;
6168 BEGIN
6169 RETURN TMP_REC;
6170 END GET_Party_Rec;
6171
6172 FUNCTION GET_Location_Rec RETURN ASO_PARTY_INT.Location_Rec_Type
6173 IS
6174 TMP_REC ASO_PARTY_INT.Location_Rec_Type;
6175 BEGIN
6176 RETURN TMP_REC;
6177 END GET_Location_Rec;
6178
6179 FUNCTION GET_Party_Site_Rec RETURN ASO_PARTY_INT.Party_Site_Rec_Type
6180 IS
6181 TMP_REC ASO_PARTY_INT.Party_Site_Rec_Type;
6182 BEGIN
6183 RETURN TMP_REC;
6184 END GET_Party_Site_Rec;
6185
6186 FUNCTION GET_Org_Contact_Rec RETURN ASO_PARTY_INT.Org_Contact_Rec_Type
6187 IS
6188 TMP_REC ASO_PARTY_INT.Org_Contact_Rec_Type;
6189 BEGIN
6190 RETURN TMP_REC;
6191 END GET_Org_Contact_Rec;
6192
6193 FUNCTION GET_Contact_Point_Rec
6194 RETURN ASO_PARTY_INT.Contact_Point_Rec_Type
6195 IS
6196 TMP_REC ASO_PARTY_INT.Contact_Point_Rec_Type;
6197 BEGIN
6198 RETURN TMP_REC;
6199 END GET_Contact_Point_Rec;
6200
6201
6202 FUNCTION GET_Out_Contact_Point_Rec
6203 RETURN ASO_PARTY_INT.Out_Contact_Point_Rec_Type
6204 IS
6205 TMP_REC ASO_PARTY_INT.Out_Contact_Point_Rec_Type;
6206 BEGIN
6207 RETURN TMP_REC;
6208 END GET_Out_Contact_Point_Rec;
6209
6210 FUNCTION GET_Contact_Restriction_Rec
6211 RETURN ASO_PARTY_INT.Contact_Restrictions_Rec_Type
6212 IS
6213 TMP_REC ASO_PARTY_INT.Contact_Restrictions_Rec_Type;
6214 BEGIN
6215 RETURN TMP_REC;
6216 END GET_Contact_Restriction_Rec;
6217
6218 FUNCTION GET_PRICING_CONTROL_REC RETURN ASO_PRICING_INT.PRICING_CONTROL_REC_TYPE
6219 IS
6220 TMP_REC ASO_PRICING_INT.PRICING_CONTROL_REC_TYPE;
6221 BEGIN
6222 RETURN TMP_REC;
6223 END GET_PRICING_CONTROL_REC;
6224
6225 FUNCTION GET_X_Order_Header_Rec RETURN ASO_ORDER_INT.Order_Header_Rec_Type
6226 IS
6227 TMP_REC ASO_ORDER_INT.Order_Header_Rec_Type;
6228 BEGIN
6229 RETURN TMP_REC;
6230 END GET_X_Order_Header_Rec;
6231
6232 FUNCTION GET_X_Order_Line_Rec RETURN ASO_ORDER_INT.Order_Line_Rec_Type
6233 IS
6234 TMP_REC ASO_ORDER_INT.Order_Line_Rec_Type;
6235 BEGIN
6236 RETURN TMP_REC;
6237 END GET_X_Order_Line_Rec;
6238
6239 FUNCTION GET_X_Control_Rec RETURN ASO_ORDER_INT.Control_Rec_Type
6240 IS
6241 TMP_REC ASO_ORDER_INT.Control_Rec_Type;
6242 BEGIN
6243 RETURN TMP_REC;
6244 END GET_X_Control_Rec;
6245 FUNCTION GET_QTE_IN_REC RETURN ASO_OPP_QTE_PUB.OPP_QTE_IN_REC_TYPE
6246 IS
6247 TMP_REC ASO_OPP_QTE_PUB.OPP_QTE_IN_REC_TYPE;
6248 BEGIN
6249 RETURN TMP_REC;
6250 END GET_QTE_IN_REC;
6251 FUNCTION GET_QTE_OUT_REC RETURN ASO_OPP_QTE_PUB.OPP_QTE_OUT_REC_TYPE
6252 IS
6253 TMP_REC ASO_OPP_QTE_PUB.OPP_QTE_OUT_REC_TYPE;
6254 BEGIN
6255 RETURN TMP_REC;
6256 END GET_QTE_OUT_REC;
6257 FUNCTION GET_Qte_Access_Rec RETURN ASO_SECURITY_INT.Qte_Access_Rec_Type
6258 IS
6259 TMP_REC ASO_SECURITY_INT.Qte_Access_Rec_Type;
6260 BEGIN
6261 RETURN TMP_REC;
6262 END GET_Qte_Access_Rec;
6263
6264
6265 FUNCTION GET_copy_qte_cntrl_Rec RETURN
6266 ASO_COPY_QUOTE_PUB.Copy_Quote_Control_Rec_Type
6267 IS
6268 TMP_REC ASO_COPY_QUOTE_PUB.Copy_Quote_Control_Rec_Type;
6269 BEGIN
6270 RETURN TMP_REC;
6271 END GET_copy_qte_cntrl_Rec;
6272
6273
6274 FUNCTION GET_copy_qte_hdr_Rec RETURN
6275 ASO_COPY_QUOTE_PUB.Copy_Quote_Header_Rec_Type
6276 IS
6277 TMP_REC ASO_COPY_QUOTE_PUB.Copy_Quote_Header_Rec_Type ;
6278 BEGIN
6279 RETURN TMP_REC;
6280 END GET_copy_qte_hdr_Rec;
6281
6282
6283 FUNCTION GET_Def_Control_Rec RETURN ASO_DEFAULTING_INT.Control_Rec_Type
6284 IS
6285 TMP_REC ASO_DEFAULTING_INT.Control_Rec_Type;
6286 BEGIN
6287 RETURN TMP_REC;
6288 END GET_Def_Control_Rec;
6289
6290
6291 FUNCTION GET_Header_Misc_Rec RETURN ASO_DEFAULTING_INT.Header_Misc_Rec_Type
6292 IS
6293 TMP_REC ASO_DEFAULTING_INT.Header_Misc_Rec_Type;
6294 BEGIN
6295 RETURN TMP_REC;
6296 END GET_Header_Misc_Rec;
6297
6298
6299 FUNCTION GET_Line_Misc_Rec RETURN ASO_DEFAULTING_INT.Line_Misc_Rec_Type
6300 IS
6301 TMP_REC ASO_DEFAULTING_INT.Line_Misc_Rec_Type;
6302 BEGIN
6303 RETURN TMP_REC;
6304 END GET_Line_Misc_Rec;
6305
6306
6307 FUNCTION GET_Attr_Codes_Tbl RETURN ASO_DEFAULTING_INT.ATTRIBUTE_CODES_TBL_TYPE
6308 IS
6309 TMP_REC ASO_DEFAULTING_INT.ATTRIBUTE_CODES_TBL_TYPE;
6310 BEGIN
6311 RETURN TMP_REC;
6312 END GET_Attr_Codes_Tbl;
6313
6314
6315 FUNCTION Decode(l_base_date DATE, comp1 DATE, date1 DATE, date2 DATE)
6316 RETURN DATE
6317 IS
6318 BEGIN
6319 IF l_base_date = comp1 THEN
6320 return date1;
6321 ELSE
6322 return date2;
6323 END IF;
6324 END Decode;
6325
6326 -- Change START
6327 -- Release 12 MOAC Changes : Bug 4500739
6328 -- Changes Done by : Girish
6329 -- Comments : The following functions are used for HR Extra Information Types
6330
6331 FUNCTION GET_OU_ATTRIBUTE_VALUE(p_attribute IN VARCHAR2, p_organization_id IN NUMBER) RETURN VARCHAR2
6332 IS
6333 l_attribute_value HR_ORGANIZATION_INFORMATION.ORG_INFORMATION1%TYPE; -- bug 12324106
6334 BEGIN
6335 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
6336 aso_debug_pub.add('ASO_UTILITY_PVT: GET_OU_ATTRIBUTE_VALUE: p_attribute '||p_attribute,1,'Y');
6337 aso_debug_pub.add('ASO_UTILITY_PVT: GET_OU_ATTRIBUTE_VALUE: p_organization_id '||p_organization_id,1,'Y');
6338 END IF;
6339
6340 IF (p_attribute = G_DEFAULT_ORDER_TYPE) THEN
6341 BEGIN
6342 SELECT ORG_INFORMATION1
6343 INTO l_attribute_value
6344 FROM hr_organization_information
6345 WHERE org_information_context = 'ASO_ORG_INFO'
6346 AND organization_id = p_organization_id ;
6347 EXCEPTION
6348 WHEN NO_DATA_FOUND THEN
6349 RETURN NULL ;
6350 END;
6351 ELSIF (p_attribute = G_DEFAULT_SALESREP) THEN
6352 BEGIN
6353 SELECT ORG_INFORMATION2
6354 INTO l_attribute_value
6355 FROM hr_organization_information
6356 WHERE org_information_context = 'ASO_ORG_INFO'
6357 AND organization_id = p_organization_id ;
6358 EXCEPTION
6359 WHEN NO_DATA_FOUND THEN
6360 RETURN NULL ;
6361 END;
6362 ELSIF (p_attribute = G_DEFAULT_SALES_GROUP) THEN
6363 BEGIN
6364 SELECT ORG_INFORMATION3
6365 INTO l_attribute_value
6366 FROM hr_organization_information
6367 WHERE org_information_context = 'ASO_ORG_INFO'
6368 AND organization_id = p_organization_id ;
6369 EXCEPTION
6370 WHEN NO_DATA_FOUND THEN
6371 RETURN NULL ;
6372 END;
6373 ELSIF (p_attribute = G_DEFAULT_SALES_ROLE) THEN
6374 BEGIN
6375 SELECT ORG_INFORMATION4
6376 INTO l_attribute_value
6377 FROM hr_organization_information
6378 WHERE org_information_context = 'ASO_ORG_INFO'
6379 AND organization_id = p_organization_id ;
6380 EXCEPTION
6381 WHEN NO_DATA_FOUND THEN
6382 RETURN NULL ;
6383 END;
6384 ELSIF (p_attribute = G_DEFAULT_CONTRACT_TEMPLATE) THEN
6385 BEGIN
6386 SELECT ORG_INFORMATION5
6387 INTO l_attribute_value
6388 FROM hr_organization_information
6389 WHERE org_information_context = 'ASO_ORG_INFO'
6390 AND organization_id = p_organization_id ;
6391 EXCEPTION
6392 WHEN NO_DATA_FOUND THEN
6393 RETURN NULL ;
6394 END;
6395 END IF;
6396
6397 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
6398 aso_debug_pub.add('ASO_UTILITY_PVT: GET_OU_ATTRIBUTE_VALUE: l_attribute_value '||l_attribute_value,1,'Y');
6399 END IF;
6400
6401 RETURN l_attribute_value;
6402
6403 END GET_OU_ATTRIBUTE_VALUE;
6404
6405 FUNCTION GET_OU_ATTRIBUTE_VALUE(p_attribute IN VARCHAR2) RETURN VARCHAR2
6406 IS
6407 l_attribute_value HR_ORGANIZATION_INFORMATION.ORG_INFORMATION1%TYPE; -- bug 12324106
6408 l_organization_id NUMBER ;
6409 BEGIN
6410
6411 l_organization_id := MO_GLOBAL.GET_CURRENT_ORG_ID;
6412
6413 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
6414 aso_debug_pub.add('ASO_UTILITY_PVT: GET_OU_ATTRIBUTE_VALUE: p_attribute '||p_attribute,1,'Y');
6415 aso_debug_pub.add('ASO_UTILITY_PVT: GET_OU_ATTRIBUTE_VALUE: l_organization_id '||l_organization_id,1,'Y');
6416 END IF;
6417
6418 l_attribute_value := GET_OU_ATTRIBUTE_VALUE(p_attribute, l_organization_id);
6419
6420
6421 IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
6422 aso_debug_pub.add('ASO_UTILITY_PVT: GET_OU_ATTRIBUTE_VALUE: l_attribute_value '||l_attribute_value,1,'Y');
6423 END IF;
6424
6425 RETURN l_attribute_value;
6426
6427 END GET_OU_ATTRIBUTE_VALUE;
6428
6429 FUNCTION GET_DEFAULT_ORDER_TYPE RETURN VARCHAR2
6430 IS
6431 BEGIN
6432 RETURN G_DEFAULT_ORDER_TYPE;
6433 END GET_DEFAULT_ORDER_TYPE;
6434
6435 FUNCTION GET_DEFAULT_SALESREP RETURN VARCHAR2
6436 IS
6437 BEGIN
6438 RETURN G_DEFAULT_SALESREP;
6439 END GET_DEFAULT_SALESREP;
6440
6441 FUNCTION GET_DEFAULT_SALES_GROUP RETURN VARCHAR2
6442 IS
6443 BEGIN
6444 RETURN G_DEFAULT_SALES_GROUP;
6445 END GET_DEFAULT_SALES_GROUP;
6446
6447 FUNCTION GET_DEFAULT_SALES_ROLE RETURN VARCHAR2
6448 IS
6449 BEGIN
6450 RETURN G_DEFAULT_SALES_ROLE;
6451 END GET_DEFAULT_SALES_ROLE;
6452
6453 FUNCTION GET_DEFAULT_CONTRACT_TEMPLATE RETURN VARCHAR2
6454 IS
6455 BEGIN
6456 RETURN G_DEFAULT_CONTRACT_TEMPLATE;
6457 END GET_DEFAULT_CONTRACT_TEMPLATE;
6458
6459 -- Change END
6460
6461 -- Change START
6462 -- Release 12
6463 -- Changes Done by : Girish
6464 -- Comments : Procedure to add entry in ASO_CHANGED_QUOTES
6465
6466 PROCEDURE UPDATE_CHANGED_QUOTES (
6467 p_quote_number ASO_CHANGED_QUOTES.QUOTE_NUMBER%TYPE
6468 )
6469 IS
6470
6471 l_module_name VARCHAR2(30) := 'ASO';
6472 l_source_name VARCHAR2(50) := 'asovutlb.pls';
6473 l_error_text VARCHAR2(2000);
6474
6475 l_quote_number ASO_CHANGED_QUOTES.QUOTE_NUMBER%TYPE;
6476 l_conc_request_id ASO_CHANGED_QUOTES.CONC_REQUEST_ID%TYPE;
6477 l_to_insert NUMBER ;
6478 l_found_rec NUMBER ;
6479
6480 G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
6481 G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;
6482
6483 CURSOR cur_find_rec(p_quote_number ASO_CHANGED_QUOTES.QUOTE_NUMBER%TYPE) IS
6484 SELECT quote_number, conc_request_id
6485 FROM aso_changed_quotes
6486 WHERE quote_number = p_quote_number;
6487 BEGIN
6488
6489 l_to_insert := 0;
6490 l_found_rec := 0;
6491
6492 OPEN cur_find_rec(p_quote_number);
6493 IF cur_find_rec%ISOPEN THEN
6494 LOOP
6495 FETCH cur_find_rec INTO l_quote_number, l_conc_request_id ;
6496
6497 IF (cur_find_rec%ROWCOUNT = 0) THEN
6498 IF aso_debug_pub.g_debug_flag = 'Y' THEN
6499 aso_debug_pub.add('ASO_UTILITY_PVT.UPDATE_CHANGED_QUOTES : No record found for the quote number, inserting the new record.', 1, 'Y');
6500 END IF;
6501 l_to_insert := 1;
6502 END IF ;
6503
6504 EXIT WHEN cur_find_rec%NOTFOUND ;
6505
6506 IF (l_conc_request_id IS NOT null)
6507 THEN
6508 -- Record exists but a conc request id is also present, hence insert the record
6509 IF aso_debug_pub.g_debug_flag = 'Y' THEN
6510 aso_debug_pub.add('ASO_UTILITY_PVT.UPDATE_CHANGED_QUOTES : Found record with quote number passed but the conc request id is not null, hence inserting the new record.', 1, 'Y');
6511 END IF;
6512 l_to_insert := 1;
6513 END IF;
6514
6515 IF (l_conc_request_id IS null)
6516 THEN
6517 -- Record exists with a null conc request id, hence we need not insert a new record
6518 IF aso_debug_pub.g_debug_flag = 'Y' THEN
6519 aso_debug_pub.add('ASO_UTILITY_PVT.UPDATE_CHANGED_QUOTES : Found record with quote number and the conc request id is null, hence no need to insert the new record.', 1, 'Y');
6520 END IF;
6521 l_found_rec := 1;
6522 END IF;
6523
6524 END LOOP ;
6525 CLOSE cur_find_rec;
6526 ELSE
6527 -- TBD : If the cursor does not open, then insert the record or not?
6528 l_to_insert := 1;
6529 END IF;
6530
6531 IF (l_found_rec = 1) THEN
6532 l_to_insert := 0;
6533 END IF;
6534
6535
6536 IF (l_to_insert = 1) THEN
6537
6538 IF aso_debug_pub.g_debug_flag = 'Y' THEN
6539 aso_debug_pub.add('ASO_UTILITY_PVT.UPDATE_CHANGED_QUOTES : Before Inserting record in ASO_CHANGED_QUOTES', 1, 'Y');
6540 aso_debug_pub.add('ASO_UTILITY_PVT.UPDATE_CHANGED_QUOTES : Quote Number : ' || p_quote_number, 1, 'Y');
6541 END IF;
6542
6543 ASO_CHANGED_QUOTES_PKG.INSERT_ROW(
6544 P_QUOTE_NUMBER => p_quote_number,
6545 P_LAST_UPDATE_DATE => SYSDATE,
6546 P_LAST_UPDATED_BY => G_USER_ID,
6547 P_CREATION_DATE => SYSDATE,
6548 P_CREATED_BY => G_USER_ID,
6549 P_LAST_UPDATE_LOGIN => G_LOGIN_ID,
6550 P_REQUEST_ID => FND_API.G_MISS_NUM,
6551 P_PROGRAM_APPLICATION_ID => FND_API.G_MISS_NUM,
6552 P_PROGRAM_ID => FND_API.G_MISS_NUM,
6553 P_PROGRAM_UPDATE_DATE => FND_API.G_MISS_DATE,
6554 P_CONC_REQUEST_ID => FND_API.G_MISS_NUM
6555 );
6556
6557 END IF;
6558
6559 EXCEPTION
6560 WHEN OTHERS THEN
6561 l_error_text := 'Error in ASO_UTILITY_PVT.UPDATE_CHANGED_QUOTES : ' || SQLERRM;
6562 aso_upgrade_pvt.add_message( p_module_name => l_module_name,
6563 p_error_level => 'ERROR',
6564 p_error_text => l_error_text,
6565 p_source_name => l_source_name
6566 );
6567
6568 END UPDATE_CHANGED_QUOTES;
6569
6570 -- Change END
6571
6572 --Procedure added by Anoop Rajan on 30/09/2005 to print login details
6573 procedure print_login_info is
6574 cursor CUR_MO_GLOB is select
6575 ORGANIZATION_ID,
6576 ORGANIZATION_NAME
6577 FROM MO_GLOB_ORG_ACCESS_TMP;
6578
6579 l_security_profile_id NUMBER;
6580 l_org_id NUMBER;
6581 l_def_org_id NUMBER;
6582 l_file VARCHAR2(200);
6583 begin
6584 IF (aso_debug_pub.g_debug_flag = 'Y' ) THEN
6585
6586 aso_debug_pub.add( '*******************************************',1, 'Y' );
6587 aso_debug_pub.add( '***** Printing the Variable Values *****',1, 'Y' );
6588 aso_debug_pub.add( '*******************************************',1, 'Y' );
6589 aso_debug_pub.add( ' ',1, 'Y' );
6590
6591 aso_debug_pub.add(rpad('USER ID',50,'------')||'------>'||FND_GLOBAL.USER_ID , 1, 'Y');
6592 aso_debug_pub.add(rpad('RESPONSIBILITY ID',50,'------')||'------>'||FND_GLOBAL.RESP_ID , 1, 'Y');
6593 aso_debug_pub.add(rpad('RESPONSIBILITY APPLICATION ID',50,'------')||'------>'||FND_GLOBAL.RESP_APPL_ID , 1, 'Y');
6594 aso_debug_pub.add(rpad('USER NAME',50,'------')||'------>'||FND_GLOBAL.USER_NAME , 1, 'Y');
6595 aso_debug_pub.add(rpad('RESPONSIBILITY NAME',50,'------')||'------>'||FND_GLOBAL.RESP_NAME , 1, 'Y');
6596 aso_debug_pub.add(rpad('APPLICATION NAME',50,'------')||'------>'||FND_GLOBAL.APPLICATION_NAME , 1, 'Y');
6597 aso_debug_pub.add(rpad('APPLICATION SHORT NAME',50,'------')||'------>'||FND_GLOBAL.APPLICATION_SHORT_NAME , 1, 'Y');
6598
6599 aso_debug_pub.add( ' ',1, 'Y' );
6600
6601
6602 aso_debug_pub.add( '******************************************',1, 'Y' );
6603 aso_debug_pub.add( '***** Printing the profile values *****',1, 'Y' );
6604 aso_debug_pub.add( '******************************************',1, 'Y' );
6605 aso_debug_pub.add( ' ',1, 'Y' );
6606
6607 fnd_profile.get('XLA_MO_SECURITY_PROFILE_LEVEL',l_security_profile_id);
6608 fnd_profile.get('DEFAULT_ORG_ID',l_def_org_id);
6609 fnd_profile.get('ORG_ID',l_org_id);
6610 aso_debug_pub.add(rpad('SECURITY PROFILE ID',50,'------')||'------>'||l_security_profile_id , 1, 'Y');
6611 aso_debug_pub.add(rpad('DEFAULT ORG ID',50,'------')||'------>'||l_def_org_id , 1, 'Y');
6612 aso_debug_pub.add(rpad('ORG ID',50,'------')||'------>'||l_org_id , 1, 'Y');
6613
6614 aso_debug_pub.add( ' ',1, 'Y' );
6615
6616
6617 aso_debug_pub.add( '********************************************************',1, 'Y' );
6618 aso_debug_pub.add( '***** Printing the MO_GLOB_ORG_ACCESS_TMP details *****',1, 'Y' );
6619 aso_debug_pub.add( '********************************************************',1, 'Y' );
6620 aso_debug_pub.add( ' ',1, 'Y' );
6621
6622 aso_debug_pub.add(rpad('ORGANIZATION_ID',50,'------')||'<----->'||rpad('ORGANIZATION_NAME',50,' ') , 1, 'Y');
6623 for i in CUR_MO_GLOB loop
6624 aso_debug_pub.add(rpad(i.ORGANIZATION_ID,50,'------')||'------>'||rpad(i.ORGANIZATION_NAME,50,' '), 1, 'Y');
6625 end loop;
6626
6627 aso_debug_pub.add( ' ',1, 'Y' );
6628
6629
6630 aso_debug_pub.add( '********************************************************',1, 'Y' );
6631 aso_debug_pub.add( '************** Printing the ORG details **************',1, 'Y' );
6632 aso_debug_pub.add( '********************************************************',1, 'Y' );
6633 aso_debug_pub.add( ' ',1, 'Y' );
6634
6635 aso_debug_pub.add(rpad('CURRENT ORG ID',50,'------')||'------>'||MO_GLOBAL.get_current_org_id , 1, 'Y');
6636 aso_debug_pub.add(rpad('ACCESS MODE',50,'------')||'------>'||MO_GLOBAL.get_access_mode , 1, 'Y');
6637 aso_debug_pub.add(rpad('OPERATING UNITS COUNT',50,'------')||'------>'||MO_GLOBAL.get_ou_count , 1, 'Y');
6638 aso_debug_pub.add(rpad('DEFAULT ORG_ID',50,'------')||'------>'||MO_UTILS.get_default_org_id , 1, 'Y');
6639 aso_debug_pub.add(rpad('SYS CONTEXT',50,'------')||'------>'||sys_context('multi_org2','current_org_id') , 1, 'Y');
6640
6641 aso_debug_pub.add( ' ',1, 'Y' );
6642
6643 END IF;
6644 END print_login_info;
6645
6646
6647 FUNCTION Tax_Rec_Exists( p_tax_rec IN ASO_QUOTE_PUB.Tax_Detail_Rec_Type ) RETURN BOOLEAN
6648 IS
6649
6650 BEGIN
6651 IF aso_debug_pub.g_debug_flag = 'Y' THEN
6652 aso_debug_pub.add('Begin tax_Rec_Exists function.', 1, 'Y');
6653 END IF;
6654
6655 IF ( P_tax_rec.ATTRIBUTE1<> FND_API.G_MISS_CHAR OR
6656 P_tax_rec.ATTRIBUTE10<> FND_API.G_MISS_CHAR OR
6657 P_tax_rec.ATTRIBUTE11<> FND_API.G_MISS_CHAR OR
6658 P_tax_rec.ATTRIBUTE12<> FND_API.G_MISS_CHAR OR
6659 P_tax_rec.ATTRIBUTE13<> FND_API.G_MISS_CHAR OR
6660 P_tax_rec.ATTRIBUTE14<> FND_API.G_MISS_CHAR OR
6661 P_tax_rec.ATTRIBUTE15<> FND_API.G_MISS_CHAR OR
6662 P_tax_rec.ATTRIBUTE2<> FND_API.G_MISS_CHAR OR
6663 P_tax_rec.ATTRIBUTE3<> FND_API.G_MISS_CHAR OR
6664 P_tax_rec.ATTRIBUTE4<> FND_API.G_MISS_CHAR OR
6665 P_tax_rec.ATTRIBUTE5<> FND_API.G_MISS_CHAR OR
6666 P_tax_rec.ATTRIBUTE6<> FND_API.G_MISS_CHAR OR
6667 P_tax_rec.ATTRIBUTE7<> FND_API.G_MISS_CHAR OR
6668 P_tax_rec.ATTRIBUTE8<> FND_API.G_MISS_CHAR OR
6669 P_tax_rec.ATTRIBUTE9<> FND_API.G_MISS_CHAR OR
6670 P_tax_rec.ATTRIBUTE_CATEGORY<> FND_API.G_MISS_CHAR OR
6671 P_tax_rec.CREATED_BY<> FND_API.G_MISS_NUM OR
6672 P_tax_rec.CREATION_DATE<> FND_API.G_MISS_DATE OR
6673 P_tax_rec.LAST_UPDATED_BY<> FND_API.G_MISS_NUM OR
6674 P_tax_rec.LAST_UPDATE_DATE<> FND_API.G_MISS_DATE OR
6675 P_tax_rec.LAST_UPDATE_LOGIN<> FND_API.G_MISS_NUM OR
6676 P_tax_rec.ORIG_TAX_CODE<> FND_API.G_MISS_CHAR OR
6677 P_tax_rec.PROGRAM_APPLICATION_ID<> FND_API.G_MISS_NUM OR
6678 P_tax_rec.PROGRAM_ID<> FND_API.G_MISS_NUM OR
6679 P_tax_rec.PROGRAM_UPDATE_DATE<> FND_API.G_MISS_DATE OR
6680 P_tax_rec.QUOTE_HEADER_ID<> FND_API.G_MISS_NUM OR
6681 P_tax_rec.QUOTE_LINE_ID<> FND_API.G_MISS_NUM OR
6682 P_tax_rec.QUOTE_SHIPMENT_ID<> FND_API.G_MISS_NUM OR
6683 P_tax_rec.REQUEST_ID<> FND_API.G_MISS_NUM OR
6684 P_tax_rec.TAX_AMOUNT<> FND_API.G_MISS_NUM OR
6685 P_tax_rec.TAX_CODE<> FND_API.G_MISS_CHAR OR
6686 P_tax_rec.TAX_DATE<> FND_API.G_MISS_DATE OR
6687 P_tax_rec.TAX_DETAIL_ID<> FND_API.G_MISS_NUM OR
6688 P_tax_rec.TAX_EXEMPT_FLAG<> FND_API.G_MISS_CHAR OR
6689 P_tax_rec.TAX_EXEMPT_NUMBER<> FND_API.G_MISS_CHAR OR
6690 P_tax_rec.TAX_EXEMPT_REASON_CODE<> FND_API.G_MISS_CHAR OR
6691 P_tax_rec.TAX_RATE<> FND_API.G_MISS_NUM ) THEN
6692
6693 IF aso_debug_pub.g_debug_flag = 'Y' THEN
6694 aso_debug_pub.add('Tax_Rec_Exists function returning TRUE');
6695 END IF;
6696
6697 return TRUE;
6698
6699 ELSE
6700
6701 IF aso_debug_pub.g_debug_flag = 'Y' THEN
6702 aso_debug_pub.add('Tax_Rec_Exists function returning FALSE');
6703 END IF;
6704
6705 return FALSE;
6706
6707 END IF;
6708
6709 END Tax_Rec_Exists;
6710
6711
6712 END ASO_UTILITY_PVT;
6713