63: --
64: -- 1-Reviewed quote line price calculation (New requirements defined by Mara
65: -- AND Jorg)
66: -- 2-Reviewed contract comments update with specific OKC message.
67: -- 3-Moved trace procedures to the OKC_UTIL package
68: --
69: -- Modified By Eric TRUSZ 07-27-2000
70: --
71: -- 1-Removed use of service_ref_line_number in quote creation, used to
757: PROCEDURE print_error(pos IN NUMBER) IS
758: x_msg_count NUMBER;
759: x_msg_data VARCHAR2(1000);
760: BEGIN
761: IF okc_util.l_trace_flag OR okc_util.l_log_flag THEN
762: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
763: p_data => x_msg_data
764: );
765: IF (l_debug = 'Y') THEN
762: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
763: p_data => x_msg_data
764: );
765: IF (l_debug = 'Y') THEN
766: okc_util.print_trace(pos, '==EXCEPTION=================');
767: END IF;
768: x_msg_data := fnd_msg_pub.get( p_msg_index => x_msg_count,
769: p_encoded => 'F'
770: );
768: x_msg_data := fnd_msg_pub.get( p_msg_index => x_msg_count,
769: p_encoded => 'F'
770: );
771: IF (l_debug = 'Y') THEN
772: okc_util.print_trace(pos, 'Message : '||x_msg_data);
773: okc_util.print_trace(pos, '============================');
774: END IF;
775: END IF;
776: END print_error;
769: p_encoded => 'F'
770: );
771: IF (l_debug = 'Y') THEN
772: okc_util.print_trace(pos, 'Message : '||x_msg_data);
773: okc_util.print_trace(pos, '============================');
774: END IF;
775: END IF;
776: END print_error;
777:
849:
850: BEGIN
851:
852: IF (l_debug = 'Y') THEN
853: okc_util.print_trace(3, ' ');
854: okc_util.print_trace(3, '------------------- ');
855: okc_util.print_trace(3, 'START BUILD_K_RULES');
856: okc_util.print_trace(3, '------------------- ');
857: okc_util.print_trace(3, ' ');
850: BEGIN
851:
852: IF (l_debug = 'Y') THEN
853: okc_util.print_trace(3, ' ');
854: okc_util.print_trace(3, '------------------- ');
855: okc_util.print_trace(3, 'START BUILD_K_RULES');
856: okc_util.print_trace(3, '------------------- ');
857: okc_util.print_trace(3, ' ');
858: END IF;
851:
852: IF (l_debug = 'Y') THEN
853: okc_util.print_trace(3, ' ');
854: okc_util.print_trace(3, '------------------- ');
855: okc_util.print_trace(3, 'START BUILD_K_RULES');
856: okc_util.print_trace(3, '------------------- ');
857: okc_util.print_trace(3, ' ');
858: END IF;
859:
852: IF (l_debug = 'Y') THEN
853: okc_util.print_trace(3, ' ');
854: okc_util.print_trace(3, '------------------- ');
855: okc_util.print_trace(3, 'START BUILD_K_RULES');
856: okc_util.print_trace(3, '------------------- ');
857: okc_util.print_trace(3, ' ');
858: END IF;
859:
860: l_sto_data_rec := NULL;
853: okc_util.print_trace(3, ' ');
854: okc_util.print_trace(3, '------------------- ');
855: okc_util.print_trace(3, 'START BUILD_K_RULES');
856: okc_util.print_trace(3, '------------------- ');
857: okc_util.print_trace(3, ' ');
858: END IF;
859:
860: l_sto_data_rec := NULL;
861: l_bto_data_rec := NULL;
869: l_bt_cust_acct_id := null;
870:
871:
872: IF (l_debug = 'Y') THEN
873: okc_util.print_trace(3, ' ');
874: okc_util.print_trace(3, 'Rules:');
875: okc_util.print_trace(3, '=======');
876: END IF;
877: l_idx := 0;
870:
871:
872: IF (l_debug = 'Y') THEN
873: okc_util.print_trace(3, ' ');
874: okc_util.print_trace(3, 'Rules:');
875: okc_util.print_trace(3, '=======');
876: END IF;
877: l_idx := 0;
878: l_rd_nb := 0;
871:
872: IF (l_debug = 'Y') THEN
873: okc_util.print_trace(3, ' ');
874: okc_util.print_trace(3, 'Rules:');
875: okc_util.print_trace(3, '=======');
876: END IF;
877: l_idx := 0;
878: l_rd_nb := 0;
879: l_rd_custacct_nb := 0;
882: l_rd_billto_nb := 0;
883: l_rd_shipto_nb := 0;
884: l_rd_shipmtd_nb := 0;
885: IF (l_debug = 'Y') THEN
886: okc_util.print_trace(3, '-->Rule selection');
887: END IF;
888:
889: FOR r_rule IN c_rules(p_chr_id, p_cle_id, l_cust.id) LOOP
890: IF p_cle_id IS NULL THEN
902: ELSE
903: l_rd_custacct_nb := l_rd_custacct_nb + 1;
904: l_rd_nb:=l_rd_nb+1;
905: IF (l_debug = 'Y') THEN
906: okc_util.print_trace(4, '-->Rule selected: '||g_rd_custacct);
907: END IF;
908: END IF;
909: IF (l_debug = 'Y') THEN
910: okc_util.print_trace(5, ' Cust Acct Id: '||r_rule.object1_id1);
906: okc_util.print_trace(4, '-->Rule selected: '||g_rd_custacct);
907: END IF;
908: END IF;
909: IF (l_debug = 'Y') THEN
910: okc_util.print_trace(5, ' Cust Acct Id: '||r_rule.object1_id1);
911: END IF;
912: END IF;
913: END IF;
914:
926: ELSE
927: l_rd_price_nb := l_rd_price_nb + 1;
928: l_rd_nb:=l_rd_nb+1;
929: IF (l_debug = 'Y') THEN
930: okc_util.print_trace(4, '-->Rule selected: '||g_rd_price);
931: END IF;
932: END IF;
933: IF (l_debug = 'Y') THEN
934: okc_util.print_trace(5, ' Price List Id: '||r_rule.object1_id1);
930: okc_util.print_trace(4, '-->Rule selected: '||g_rd_price);
931: END IF;
932: END IF;
933: IF (l_debug = 'Y') THEN
934: okc_util.print_trace(5, ' Price List Id: '||r_rule.object1_id1);
935: END IF;
936: END IF;
937:
938:
950: ELSE
951: l_rd_invrule_nb := l_rd_invrule_nb + 1;
952: l_rd_nb:=l_rd_nb+1;
953: IF (l_debug = 'Y') THEN
954: okc_util.print_trace(4, '-->Rule selected: '||g_rd_invrule);
955: END IF;
956: END IF;
957: IF (l_debug = 'Y') THEN
958: okc_util.print_trace(5, ' Inv Rule Id: '||r_rule.object1_id1);
954: okc_util.print_trace(4, '-->Rule selected: '||g_rd_invrule);
955: END IF;
956: END IF;
957: IF (l_debug = 'Y') THEN
958: okc_util.print_trace(5, ' Inv Rule Id: '||r_rule.object1_id1);
959: END IF;
960: END IF;
961:
962: IF p_cle_id IS NULL THEN
978: l_exchange_date;
979: CLOSE c_conv_type;
980:
981: IF (l_debug = 'Y') THEN
982: okc_util.print_trace(4, '-->Rule selected: '||g_rd_convert);
983: okc_util.print_trace(5, ' Exchange type code = '||l_exchange_type);
984: okc_util.print_trace(5, ' Exchange rate = '||l_exchange_rate);
985: okc_util.print_trace(5, ' Exchange rate date = '||l_exchange_date);
986: END IF;
979: CLOSE c_conv_type;
980:
981: IF (l_debug = 'Y') THEN
982: okc_util.print_trace(4, '-->Rule selected: '||g_rd_convert);
983: okc_util.print_trace(5, ' Exchange type code = '||l_exchange_type);
984: okc_util.print_trace(5, ' Exchange rate = '||l_exchange_rate);
985: okc_util.print_trace(5, ' Exchange rate date = '||l_exchange_date);
986: END IF;
987: l_rd_convert_nb := l_rd_convert_nb + 1;
980:
981: IF (l_debug = 'Y') THEN
982: okc_util.print_trace(4, '-->Rule selected: '||g_rd_convert);
983: okc_util.print_trace(5, ' Exchange type code = '||l_exchange_type);
984: okc_util.print_trace(5, ' Exchange rate = '||l_exchange_rate);
985: okc_util.print_trace(5, ' Exchange rate date = '||l_exchange_date);
986: END IF;
987: l_rd_convert_nb := l_rd_convert_nb + 1;
988: l_rd_nb:=l_rd_nb+1;
981: IF (l_debug = 'Y') THEN
982: okc_util.print_trace(4, '-->Rule selected: '||g_rd_convert);
983: okc_util.print_trace(5, ' Exchange type code = '||l_exchange_type);
984: okc_util.print_trace(5, ' Exchange rate = '||l_exchange_rate);
985: okc_util.print_trace(5, ' Exchange rate date = '||l_exchange_date);
986: END IF;
987: l_rd_convert_nb := l_rd_convert_nb + 1;
988: l_rd_nb:=l_rd_nb+1;
989: END IF;
1036:
1037: CLOSE c_party_site;
1038:
1039: IF (l_debug = 'Y') THEN
1040: okc_util.print_trace(4, '-->Rule selected: '||g_rd_shipto);
1041: okc_util.print_trace(5, ' Party_site_id (STO) = '||l_st_party_site_id);
1042: okc_util.print_trace(5, ' Cust Acct Id (STO) = '||l_st_cust_acct_id);
1043: okc_util.print_trace(5, ' Party Id (STO) = '||l_st_party_id);
1044: END IF;
1037: CLOSE c_party_site;
1038:
1039: IF (l_debug = 'Y') THEN
1040: okc_util.print_trace(4, '-->Rule selected: '||g_rd_shipto);
1041: okc_util.print_trace(5, ' Party_site_id (STO) = '||l_st_party_site_id);
1042: okc_util.print_trace(5, ' Cust Acct Id (STO) = '||l_st_cust_acct_id);
1043: okc_util.print_trace(5, ' Party Id (STO) = '||l_st_party_id);
1044: END IF;
1045: l_rd_shipto_nb := l_rd_shipto_nb + 1;
1038:
1039: IF (l_debug = 'Y') THEN
1040: okc_util.print_trace(4, '-->Rule selected: '||g_rd_shipto);
1041: okc_util.print_trace(5, ' Party_site_id (STO) = '||l_st_party_site_id);
1042: okc_util.print_trace(5, ' Cust Acct Id (STO) = '||l_st_cust_acct_id);
1043: okc_util.print_trace(5, ' Party Id (STO) = '||l_st_party_id);
1044: END IF;
1045: l_rd_shipto_nb := l_rd_shipto_nb + 1;
1046: l_rd_nb:=l_rd_nb+1;
1039: IF (l_debug = 'Y') THEN
1040: okc_util.print_trace(4, '-->Rule selected: '||g_rd_shipto);
1041: okc_util.print_trace(5, ' Party_site_id (STO) = '||l_st_party_site_id);
1042: okc_util.print_trace(5, ' Cust Acct Id (STO) = '||l_st_cust_acct_id);
1043: okc_util.print_trace(5, ' Party Id (STO) = '||l_st_party_id);
1044: END IF;
1045: l_rd_shipto_nb := l_rd_shipto_nb + 1;
1046: l_rd_nb:=l_rd_nb+1;
1047: END IF;
1099:
1100: CLOSE c_party_site;
1101:
1102: IF (l_debug = 'Y') THEN
1103: okc_util.print_trace(4, '-->Rule selected: '||g_rd_billto);
1104: okc_util.print_trace(5, ' Party_site_id (BTO) = '||l_bt_party_site_id);
1105: okc_util.print_trace(5, ' Cust Acct Id (BTO) = '||l_bt_cust_acct_id);
1106: okc_util.print_trace(5, ' Party Id (BTO) = '||l_bt_party_id);
1107: END IF;
1100: CLOSE c_party_site;
1101:
1102: IF (l_debug = 'Y') THEN
1103: okc_util.print_trace(4, '-->Rule selected: '||g_rd_billto);
1104: okc_util.print_trace(5, ' Party_site_id (BTO) = '||l_bt_party_site_id);
1105: okc_util.print_trace(5, ' Cust Acct Id (BTO) = '||l_bt_cust_acct_id);
1106: okc_util.print_trace(5, ' Party Id (BTO) = '||l_bt_party_id);
1107: END IF;
1108: l_rd_billto_nb := l_rd_billto_nb + 1;
1101:
1102: IF (l_debug = 'Y') THEN
1103: okc_util.print_trace(4, '-->Rule selected: '||g_rd_billto);
1104: okc_util.print_trace(5, ' Party_site_id (BTO) = '||l_bt_party_site_id);
1105: okc_util.print_trace(5, ' Cust Acct Id (BTO) = '||l_bt_cust_acct_id);
1106: okc_util.print_trace(5, ' Party Id (BTO) = '||l_bt_party_id);
1107: END IF;
1108: l_rd_billto_nb := l_rd_billto_nb + 1;
1109: l_rd_nb:=l_rd_nb+1;
1102: IF (l_debug = 'Y') THEN
1103: okc_util.print_trace(4, '-->Rule selected: '||g_rd_billto);
1104: okc_util.print_trace(5, ' Party_site_id (BTO) = '||l_bt_party_site_id);
1105: okc_util.print_trace(5, ' Cust Acct Id (BTO) = '||l_bt_cust_acct_id);
1106: okc_util.print_trace(5, ' Party Id (BTO) = '||l_bt_party_id);
1107: END IF;
1108: l_rd_billto_nb := l_rd_billto_nb + 1;
1109: l_rd_nb:=l_rd_nb+1;
1110: END IF;
1121:
1122: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1123:
1124: IF (l_debug = 'Y') THEN
1125: okc_util.print_trace(3, '-->Rule selection: '||l_rd_nb||' rule(s) selected');
1126: okc_util.print_trace(3, '-->Return status '||x_return_status );
1127: END IF;
1128:
1129: IF (l_debug = 'Y') THEN
1122: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1123:
1124: IF (l_debug = 'Y') THEN
1125: okc_util.print_trace(3, '-->Rule selection: '||l_rd_nb||' rule(s) selected');
1126: okc_util.print_trace(3, '-->Return status '||x_return_status );
1127: END IF;
1128:
1129: IF (l_debug = 'Y') THEN
1130: okc_util.print_trace(3, ' ');
1126: okc_util.print_trace(3, '-->Return status '||x_return_status );
1127: END IF;
1128:
1129: IF (l_debug = 'Y') THEN
1130: okc_util.print_trace(3, ' ');
1131: okc_util.print_trace(3, '------------------- ');
1132: okc_util.print_trace(3, ' END BUILD_K_RULES');
1133: okc_util.print_trace(3, '------------------- ');
1134: okc_util.print_trace(3, ' ');
1127: END IF;
1128:
1129: IF (l_debug = 'Y') THEN
1130: okc_util.print_trace(3, ' ');
1131: okc_util.print_trace(3, '------------------- ');
1132: okc_util.print_trace(3, ' END BUILD_K_RULES');
1133: okc_util.print_trace(3, '------------------- ');
1134: okc_util.print_trace(3, ' ');
1135: END IF;
1128:
1129: IF (l_debug = 'Y') THEN
1130: okc_util.print_trace(3, ' ');
1131: okc_util.print_trace(3, '------------------- ');
1132: okc_util.print_trace(3, ' END BUILD_K_RULES');
1133: okc_util.print_trace(3, '------------------- ');
1134: okc_util.print_trace(3, ' ');
1135: END IF;
1136: EXCEPTION
1129: IF (l_debug = 'Y') THEN
1130: okc_util.print_trace(3, ' ');
1131: okc_util.print_trace(3, '------------------- ');
1132: okc_util.print_trace(3, ' END BUILD_K_RULES');
1133: okc_util.print_trace(3, '------------------- ');
1134: okc_util.print_trace(3, ' ');
1135: END IF;
1136: EXCEPTION
1137: WHEN e_exit THEN
1130: okc_util.print_trace(3, ' ');
1131: okc_util.print_trace(3, '------------------- ');
1132: okc_util.print_trace(3, ' END BUILD_K_RULES');
1133: okc_util.print_trace(3, '------------------- ');
1134: okc_util.print_trace(3, ' ');
1135: END IF;
1136: EXCEPTION
1137: WHEN e_exit THEN
1138: IF c_party_site%ISOPEN THEN
1335:
1336: BEGIN
1337:
1338: IF (l_debug = 'Y') THEN
1339: OKC_UTIL.print_trace(1, ' ');
1340: OKC_UTIL.print_trace(1, '>START - OKC_OC_INT_KTQ_PVT.VALIDATE_K_ELIGIBILITY - Check up on specific contract conditions');
1341: END IF;
1342:
1343: IF (l_debug = 'Y') THEN
1336: BEGIN
1337:
1338: IF (l_debug = 'Y') THEN
1339: OKC_UTIL.print_trace(1, ' ');
1340: OKC_UTIL.print_trace(1, '>START - OKC_OC_INT_KTQ_PVT.VALIDATE_K_ELIGIBILITY - Check up on specific contract conditions');
1341: END IF;
1342:
1343: IF (l_debug = 'Y') THEN
1344: OKC_UTIL.print_trace(1, ' ');
1340: OKC_UTIL.print_trace(1, '>START - OKC_OC_INT_KTQ_PVT.VALIDATE_K_ELIGIBILITY - Check up on specific contract conditions');
1341: END IF;
1342:
1343: IF (l_debug = 'Y') THEN
1344: OKC_UTIL.print_trace(1, ' ');
1345: OKC_UTIL.print_trace(1, 'The input quote id = '||p_quote_id);
1346: OKC_UTIL.print_trace(1, ' ');
1347: OKC_UTIL.print_trace(1, 'First contract validations: common general conditions');
1348: OKC_UTIL.print_trace(1, '--------------------------------------------------------');
1341: END IF;
1342:
1343: IF (l_debug = 'Y') THEN
1344: OKC_UTIL.print_trace(1, ' ');
1345: OKC_UTIL.print_trace(1, 'The input quote id = '||p_quote_id);
1346: OKC_UTIL.print_trace(1, ' ');
1347: OKC_UTIL.print_trace(1, 'First contract validations: common general conditions');
1348: OKC_UTIL.print_trace(1, '--------------------------------------------------------');
1349: OKC_UTIL.print_trace(2, 'Checking on : contract category is KFORQUOTE');
1342:
1343: IF (l_debug = 'Y') THEN
1344: OKC_UTIL.print_trace(1, ' ');
1345: OKC_UTIL.print_trace(1, 'The input quote id = '||p_quote_id);
1346: OKC_UTIL.print_trace(1, ' ');
1347: OKC_UTIL.print_trace(1, 'First contract validations: common general conditions');
1348: OKC_UTIL.print_trace(1, '--------------------------------------------------------');
1349: OKC_UTIL.print_trace(2, 'Checking on : contract category is KFORQUOTE');
1350: END IF;
1343: IF (l_debug = 'Y') THEN
1344: OKC_UTIL.print_trace(1, ' ');
1345: OKC_UTIL.print_trace(1, 'The input quote id = '||p_quote_id);
1346: OKC_UTIL.print_trace(1, ' ');
1347: OKC_UTIL.print_trace(1, 'First contract validations: common general conditions');
1348: OKC_UTIL.print_trace(1, '--------------------------------------------------------');
1349: OKC_UTIL.print_trace(2, 'Checking on : contract category is KFORQUOTE');
1350: END IF;
1351:
1344: OKC_UTIL.print_trace(1, ' ');
1345: OKC_UTIL.print_trace(1, 'The input quote id = '||p_quote_id);
1346: OKC_UTIL.print_trace(1, ' ');
1347: OKC_UTIL.print_trace(1, 'First contract validations: common general conditions');
1348: OKC_UTIL.print_trace(1, '--------------------------------------------------------');
1349: OKC_UTIL.print_trace(2, 'Checking on : contract category is KFORQUOTE');
1350: END IF;
1351:
1352: IF p_k_header_rec.scs_code = g_k_kfq_subclass THEN
1345: OKC_UTIL.print_trace(1, 'The input quote id = '||p_quote_id);
1346: OKC_UTIL.print_trace(1, ' ');
1347: OKC_UTIL.print_trace(1, 'First contract validations: common general conditions');
1348: OKC_UTIL.print_trace(1, '--------------------------------------------------------');
1349: OKC_UTIL.print_trace(2, 'Checking on : contract category is KFORQUOTE');
1350: END IF;
1351:
1352: IF p_k_header_rec.scs_code = g_k_kfq_subclass THEN
1353: IF (l_debug = 'Y') THEN
1350: END IF;
1351:
1352: IF p_k_header_rec.scs_code = g_k_kfq_subclass THEN
1353: IF (l_debug = 'Y') THEN
1354: OKC_UTIL.print_trace(2,' ');
1355: OKC_UTIL.print_trace(2, 'Checking on : relationship between contract and quote for which the');
1356: OKC_UTIL.print_trace(2, ' code is CONTRACTISTERMSFORQUOTE and type is OKX_QUOTEHEAD');
1357: OKC_UTIL.print_trace(2, ' ');
1358: END IF;
1351:
1352: IF p_k_header_rec.scs_code = g_k_kfq_subclass THEN
1353: IF (l_debug = 'Y') THEN
1354: OKC_UTIL.print_trace(2,' ');
1355: OKC_UTIL.print_trace(2, 'Checking on : relationship between contract and quote for which the');
1356: OKC_UTIL.print_trace(2, ' code is CONTRACTISTERMSFORQUOTE and type is OKX_QUOTEHEAD');
1357: OKC_UTIL.print_trace(2, ' ');
1358: END IF;
1359:
1352: IF p_k_header_rec.scs_code = g_k_kfq_subclass THEN
1353: IF (l_debug = 'Y') THEN
1354: OKC_UTIL.print_trace(2,' ');
1355: OKC_UTIL.print_trace(2, 'Checking on : relationship between contract and quote for which the');
1356: OKC_UTIL.print_trace(2, ' code is CONTRACTISTERMSFORQUOTE and type is OKX_QUOTEHEAD');
1357: OKC_UTIL.print_trace(2, ' ');
1358: END IF;
1359:
1360: OPEN c_q_k_rel(p_k_header_rec.id, null, p_quote_id, g_rlt_code_ktq, g_rlt_typ_qh);
1353: IF (l_debug = 'Y') THEN
1354: OKC_UTIL.print_trace(2,' ');
1355: OKC_UTIL.print_trace(2, 'Checking on : relationship between contract and quote for which the');
1356: OKC_UTIL.print_trace(2, ' code is CONTRACTISTERMSFORQUOTE and type is OKX_QUOTEHEAD');
1357: OKC_UTIL.print_trace(2, ' ');
1358: END IF;
1359:
1360: OPEN c_q_k_rel(p_k_header_rec.id, null, p_quote_id, g_rlt_code_ktq, g_rlt_typ_qh);
1361: FETCH c_q_k_rel into l_object_id1;
1362: IF c_q_k_rel%NOTFOUND THEN
1363: CLOSE c_q_k_rel;
1364:
1365: IF (l_debug = 'Y') THEN
1366: OKC_UTIL.print_trace(2,' ');
1367: OKC_UTIL.print_trace(2, 'Checking on : relationship between contract and quote for which the');
1368: OKC_UTIL.print_trace(2, ' code is CONTRACTNEGOTIATESQUOTE and type is OKX_QUOTEHEAD');
1369: OKC_UTIL.print_trace(2, ' ');
1370: END IF;
1363: CLOSE c_q_k_rel;
1364:
1365: IF (l_debug = 'Y') THEN
1366: OKC_UTIL.print_trace(2,' ');
1367: OKC_UTIL.print_trace(2, 'Checking on : relationship between contract and quote for which the');
1368: OKC_UTIL.print_trace(2, ' code is CONTRACTNEGOTIATESQUOTE and type is OKX_QUOTEHEAD');
1369: OKC_UTIL.print_trace(2, ' ');
1370: END IF;
1371:
1364:
1365: IF (l_debug = 'Y') THEN
1366: OKC_UTIL.print_trace(2,' ');
1367: OKC_UTIL.print_trace(2, 'Checking on : relationship between contract and quote for which the');
1368: OKC_UTIL.print_trace(2, ' code is CONTRACTNEGOTIATESQUOTE and type is OKX_QUOTEHEAD');
1369: OKC_UTIL.print_trace(2, ' ');
1370: END IF;
1371:
1372: OPEN c_q_k_rel(p_k_header_rec.id, null, p_quote_id, g_rlt_code_knq, g_rlt_typ_qh);
1365: IF (l_debug = 'Y') THEN
1366: OKC_UTIL.print_trace(2,' ');
1367: OKC_UTIL.print_trace(2, 'Checking on : relationship between contract and quote for which the');
1368: OKC_UTIL.print_trace(2, ' code is CONTRACTNEGOTIATESQUOTE and type is OKX_QUOTEHEAD');
1369: OKC_UTIL.print_trace(2, ' ');
1370: END IF;
1371:
1372: OPEN c_q_k_rel(p_k_header_rec.id, null, p_quote_id, g_rlt_code_knq, g_rlt_typ_qh);
1373: FETCH c_q_k_rel into l_object_id1;
1381: p_token2_value => l_q_nbr);
1382:
1383: x_return_status := OKC_API.G_RET_STS_ERROR;
1384: IF (l_debug = 'Y') THEN
1385: OKC_UTIL.print_trace(2, 'No relationship exists between the quote and the contract');
1386: END IF;
1387: print_error(3);
1388: RAISE e_exit;
1389: ELSE
1388: RAISE e_exit;
1389: ELSE
1390: g_quote_id := l_object_id1;
1391: IF (l_debug = 'Y') THEN
1392: okc_util.print_trace(2,'The fetched quote id = '||g_quote_id);
1393: END IF;
1394: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1395: p_rel_code := g_rlt_code_knq;
1396: END IF;
1405: p_token2_value => l_q_nbr);
1406:
1407: x_return_status := OKC_API.G_RET_STS_ERROR;
1408: IF (l_debug = 'Y') THEN
1409: OKC_UTIL.print_trace(2, '2.No relationship exists between the quote and the contract');
1410: END IF;
1411: print_error(3);
1412: RAISE e_exit;
1413: END IF;
1412: RAISE e_exit;
1413: END IF;
1414: g_quote_id := l_object_id1;
1415: IF (l_debug = 'Y') THEN
1416: okc_util.print_trace(2,'2.The fetched quote id = '||g_quote_id);
1417: END IF;
1418: l_ktq_flag := OKC_API.G_TRUE;
1419: p_rel_code := g_rlt_code_ktq;
1420: END IF;
1423: p_msg_name => 'OKO_K2Q_INVCAT');
1424:
1425: x_return_status := OKC_API.G_RET_STS_ERROR;
1426: IF (l_debug = 'Y') THEN
1427: OKC_UTIL.print_trace(2, 'The contract category doesnot belong to KFORQUOTE');
1428: END IF;
1429: print_error(3);
1430: RAISE e_exit;
1431: END IF;
1434: /*
1435: -- Checking for the quote's expiration date
1436:
1437: IF (l_debug = 'Y') THEN
1438: OKC_UTIL.print_trace(1, 'Second contract validations: common general conditions');
1439: OKC_UTIL.print_trace(1, '--------------------------------------------------------');
1440: OKC_UTIL.print_trace(2, 'Checking on : Quote''s expiration date');
1441: END IF;
1442:
1435: -- Checking for the quote's expiration date
1436:
1437: IF (l_debug = 'Y') THEN
1438: OKC_UTIL.print_trace(1, 'Second contract validations: common general conditions');
1439: OKC_UTIL.print_trace(1, '--------------------------------------------------------');
1440: OKC_UTIL.print_trace(2, 'Checking on : Quote''s expiration date');
1441: END IF;
1442:
1443: OPEN c_qh_expiration(g_quote_id);
1436:
1437: IF (l_debug = 'Y') THEN
1438: OKC_UTIL.print_trace(1, 'Second contract validations: common general conditions');
1439: OKC_UTIL.print_trace(1, '--------------------------------------------------------');
1440: OKC_UTIL.print_trace(2, 'Checking on : Quote''s expiration date');
1441: END IF;
1442:
1443: OPEN c_qh_expiration(g_quote_id);
1444: FETCH c_qh_expiration INTO l_quot_exp_date;
1452: p_token2_value => g_k_kfq_subclass);
1453:
1454: x_return_status := OKC_API.G_RET_STS_ERROR;
1455: IF (l_debug = 'Y') THEN
1456: OKC_UTIL.print_trace(2, 'The quote has already expired');
1457: END IF;
1458: print_error(3);
1459: RAISE e_exit;
1460: ELSE
1458: print_error(3);
1459: RAISE e_exit;
1460: ELSE
1461: IF (l_debug = 'Y') THEN
1462: OKC_UTIL.print_trace(2, 'checked for the quote''s expr date - the quote is still valid');
1463: END IF;
1464: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1465: END IF;
1466: CLOSE c_qh_expiration;
1625: BEGIN
1626:
1627:
1628: IF (l_debug = 'Y') THEN
1629: okc_util.print_trace(1, ' ');
1630: okc_util.print_trace(1, '>START - OKC_OC_INT_KTQ_PVT.BUILD_K_STRUCTURES - Get contract information');
1631: END IF;
1632:
1633: --
1626:
1627:
1628: IF (l_debug = 'Y') THEN
1629: okc_util.print_trace(1, ' ');
1630: okc_util.print_trace(1, '>START - OKC_OC_INT_KTQ_PVT.BUILD_K_STRUCTURES - Get contract information');
1631: END IF;
1632:
1633: --
1634: -- get contract header information
1635: -- already selected in STEP 1
1636: --
1637:
1638: IF (l_debug = 'Y') THEN
1639: okc_util.print_trace(2, 'Contract Header:');
1640: okc_util.print_trace(2, '================');
1641: okc_util.print_trace(3, 'Org Id = '||l_chr.authoring_org_id);
1642: okc_util.print_trace(3, 'Inv Org Id = '||l_chr.inv_organization_id);
1643: okc_util.print_trace(3, 'Contract NUMBER = '||l_chr.contract_number);
1636: --
1637:
1638: IF (l_debug = 'Y') THEN
1639: okc_util.print_trace(2, 'Contract Header:');
1640: okc_util.print_trace(2, '================');
1641: okc_util.print_trace(3, 'Org Id = '||l_chr.authoring_org_id);
1642: okc_util.print_trace(3, 'Inv Org Id = '||l_chr.inv_organization_id);
1643: okc_util.print_trace(3, 'Contract NUMBER = '||l_chr.contract_number);
1644: okc_util.print_trace(3, 'Contract modifier = '||l_chr.contract_number_modifier);
1637:
1638: IF (l_debug = 'Y') THEN
1639: okc_util.print_trace(2, 'Contract Header:');
1640: okc_util.print_trace(2, '================');
1641: okc_util.print_trace(3, 'Org Id = '||l_chr.authoring_org_id);
1642: okc_util.print_trace(3, 'Inv Org Id = '||l_chr.inv_organization_id);
1643: okc_util.print_trace(3, 'Contract NUMBER = '||l_chr.contract_number);
1644: okc_util.print_trace(3, 'Contract modifier = '||l_chr.contract_number_modifier);
1645: okc_util.print_trace(3, 'Currency code = '||l_chr.currency_code);
1638: IF (l_debug = 'Y') THEN
1639: okc_util.print_trace(2, 'Contract Header:');
1640: okc_util.print_trace(2, '================');
1641: okc_util.print_trace(3, 'Org Id = '||l_chr.authoring_org_id);
1642: okc_util.print_trace(3, 'Inv Org Id = '||l_chr.inv_organization_id);
1643: okc_util.print_trace(3, 'Contract NUMBER = '||l_chr.contract_number);
1644: okc_util.print_trace(3, 'Contract modifier = '||l_chr.contract_number_modifier);
1645: okc_util.print_trace(3, 'Currency code = '||l_chr.currency_code);
1646: okc_util.print_trace(3, 'Estimated amount = '||LTRIM(TO_CHAR(l_chr.estimated_amount, '9G999G999G990D00')));
1639: okc_util.print_trace(2, 'Contract Header:');
1640: okc_util.print_trace(2, '================');
1641: okc_util.print_trace(3, 'Org Id = '||l_chr.authoring_org_id);
1642: okc_util.print_trace(3, 'Inv Org Id = '||l_chr.inv_organization_id);
1643: okc_util.print_trace(3, 'Contract NUMBER = '||l_chr.contract_number);
1644: okc_util.print_trace(3, 'Contract modifier = '||l_chr.contract_number_modifier);
1645: okc_util.print_trace(3, 'Currency code = '||l_chr.currency_code);
1646: okc_util.print_trace(3, 'Estimated amount = '||LTRIM(TO_CHAR(l_chr.estimated_amount, '9G999G999G990D00')));
1647: END IF;
1640: okc_util.print_trace(2, '================');
1641: okc_util.print_trace(3, 'Org Id = '||l_chr.authoring_org_id);
1642: okc_util.print_trace(3, 'Inv Org Id = '||l_chr.inv_organization_id);
1643: okc_util.print_trace(3, 'Contract NUMBER = '||l_chr.contract_number);
1644: okc_util.print_trace(3, 'Contract modifier = '||l_chr.contract_number_modifier);
1645: okc_util.print_trace(3, 'Currency code = '||l_chr.currency_code);
1646: okc_util.print_trace(3, 'Estimated amount = '||LTRIM(TO_CHAR(l_chr.estimated_amount, '9G999G999G990D00')));
1647: END IF;
1648:
1641: okc_util.print_trace(3, 'Org Id = '||l_chr.authoring_org_id);
1642: okc_util.print_trace(3, 'Inv Org Id = '||l_chr.inv_organization_id);
1643: okc_util.print_trace(3, 'Contract NUMBER = '||l_chr.contract_number);
1644: okc_util.print_trace(3, 'Contract modifier = '||l_chr.contract_number_modifier);
1645: okc_util.print_trace(3, 'Currency code = '||l_chr.currency_code);
1646: okc_util.print_trace(3, 'Estimated amount = '||LTRIM(TO_CHAR(l_chr.estimated_amount, '9G999G999G990D00')));
1647: END IF;
1648:
1649: IF (l_debug = 'Y') THEN
1642: okc_util.print_trace(3, 'Inv Org Id = '||l_chr.inv_organization_id);
1643: okc_util.print_trace(3, 'Contract NUMBER = '||l_chr.contract_number);
1644: okc_util.print_trace(3, 'Contract modifier = '||l_chr.contract_number_modifier);
1645: okc_util.print_trace(3, 'Currency code = '||l_chr.currency_code);
1646: okc_util.print_trace(3, 'Estimated amount = '||LTRIM(TO_CHAR(l_chr.estimated_amount, '9G999G999G990D00')));
1647: END IF;
1648:
1649: IF (l_debug = 'Y') THEN
1650: okc_util.print_trace(3, ' ');
1646: okc_util.print_trace(3, 'Estimated amount = '||LTRIM(TO_CHAR(l_chr.estimated_amount, '9G999G999G990D00')));
1647: END IF;
1648:
1649: IF (l_debug = 'Y') THEN
1650: okc_util.print_trace(3, ' ');
1651: END IF;
1652: --
1653: -- get customer information
1654: --
1653: -- get customer information
1654: --
1655:
1656: IF (l_debug = 'Y') THEN
1657: okc_util.print_trace(3, 'Party:');
1658: okc_util.print_trace(3, '=======');
1659: END IF;
1660: l_nb_parties:=0;
1661: l_nb_roles:=0;
1654: --
1655:
1656: IF (l_debug = 'Y') THEN
1657: okc_util.print_trace(3, 'Party:');
1658: okc_util.print_trace(3, '=======');
1659: END IF;
1660: l_nb_parties:=0;
1661: l_nb_roles:=0;
1662: l_legentity:=0;
1671: IF l_cust.jtot_object1_code <> g_okx_legentity THEN
1672: l_party:=l_party+1;
1673: l_customer:=l_cust;
1674: IF (l_debug = 'Y') THEN
1675: okc_util.print_trace(3, 'Party code = '||l_cust.jtot_object1_code);
1676: okc_util.print_trace(3, 'Party_id1 = '||l_cust.object1_id1);
1677: okc_util.print_trace(3, 'Party_id2 = '||l_cust.object1_id2);
1678: END IF;
1679: ELSE
1672: l_party:=l_party+1;
1673: l_customer:=l_cust;
1674: IF (l_debug = 'Y') THEN
1675: okc_util.print_trace(3, 'Party code = '||l_cust.jtot_object1_code);
1676: okc_util.print_trace(3, 'Party_id1 = '||l_cust.object1_id1);
1677: okc_util.print_trace(3, 'Party_id2 = '||l_cust.object1_id2);
1678: END IF;
1679: ELSE
1680: l_legentity:=l_legentity+1;
1673: l_customer:=l_cust;
1674: IF (l_debug = 'Y') THEN
1675: okc_util.print_trace(3, 'Party code = '||l_cust.jtot_object1_code);
1676: okc_util.print_trace(3, 'Party_id1 = '||l_cust.object1_id1);
1677: okc_util.print_trace(3, 'Party_id2 = '||l_cust.object1_id2);
1678: END IF;
1679: ELSE
1680: l_legentity:=l_legentity+1;
1681: END IF;
1751: -- Make a call to the build_k_rules procedure to get
1752: -- the header level rules
1753: --
1754: IF (l_debug = 'Y') THEN
1755: okc_util.print_trace(3,'====================================');
1756: okc_util.print_trace(3,'Retrieving the rules at header level');
1757: okc_util.print_trace(3,'====================================');
1758: END IF;
1759:
1752: -- the header level rules
1753: --
1754: IF (l_debug = 'Y') THEN
1755: okc_util.print_trace(3,'====================================');
1756: okc_util.print_trace(3,'Retrieving the rules at header level');
1757: okc_util.print_trace(3,'====================================');
1758: END IF;
1759:
1760: build_k_rules ( p_chr_id => p_chr_id,
1753: --
1754: IF (l_debug = 'Y') THEN
1755: okc_util.print_trace(3,'====================================');
1756: okc_util.print_trace(3,'Retrieving the rules at header level');
1757: okc_util.print_trace(3,'====================================');
1758: END IF;
1759:
1760: build_k_rules ( p_chr_id => p_chr_id,
1761: p_cle_id => NULL,
1783: raise e_exit;
1784: END IF;
1785:
1786: IF (l_debug = 'Y') THEN
1787: okc_util.print_trace(3,'==============================================');
1788: okc_util.print_trace(3,'Completed retrieving the rules at header level');
1789: okc_util.print_trace(3,'==============================================');
1790: END IF;
1791:
1784: END IF;
1785:
1786: IF (l_debug = 'Y') THEN
1787: okc_util.print_trace(3,'==============================================');
1788: okc_util.print_trace(3,'Completed retrieving the rules at header level');
1789: okc_util.print_trace(3,'==============================================');
1790: END IF;
1791:
1792: --
1785:
1786: IF (l_debug = 'Y') THEN
1787: okc_util.print_trace(3,'==============================================');
1788: okc_util.print_trace(3,'Completed retrieving the rules at header level');
1789: okc_util.print_trace(3,'==============================================');
1790: END IF;
1791:
1792: --
1793: -- get all the top lines in detail
1806: l_lines := 0;
1807: l_idx := 0;
1808: l_cp_idx := 0;
1809: IF (l_debug = 'Y') THEN
1810: okc_util.print_trace(2, '===================');
1811: okc_util.print_trace(2, 'Contract Top Lines:');
1812: okc_util.print_trace(2, '===================');
1813: END IF;
1814:
1807: l_idx := 0;
1808: l_cp_idx := 0;
1809: IF (l_debug = 'Y') THEN
1810: okc_util.print_trace(2, '===================');
1811: okc_util.print_trace(2, 'Contract Top Lines:');
1812: okc_util.print_trace(2, '===================');
1813: END IF;
1814:
1815: FOR r_cle_i IN c_top_cle_init(p_chr_id) LOOP
1808: l_cp_idx := 0;
1809: IF (l_debug = 'Y') THEN
1810: okc_util.print_trace(2, '===================');
1811: okc_util.print_trace(2, 'Contract Top Lines:');
1812: okc_util.print_trace(2, '===================');
1813: END IF;
1814:
1815: FOR r_cle_i IN c_top_cle_init(p_chr_id) LOOP
1816: IF (l_debug = 'Y') THEN
1813: END IF;
1814:
1815: FOR r_cle_i IN c_top_cle_init(p_chr_id) LOOP
1816: IF (l_debug = 'Y') THEN
1817: okc_util.print_trace(2,'>>Select contract line');
1818: END IF;
1819:
1820: OPEN c_top_cle(p_chr_id, r_cle_i.line_id);
1821: FETCH c_top_cle INTO r_cle;
1838: l_item_name :=r_cle.item_name;
1839: l_customer_order_enabled_flag := r_cle.customer_order_enabled_flag;
1840:
1841: IF (l_debug = 'Y') THEN
1842: okc_util.print_trace(2, '>>Select contract line product name');
1843: END IF;
1844:
1845: IF rtrim(ltrim(r_cle.item_source_code)) IS NOT NULL THEN
1846: IF rtrim(ltrim(r_cle.item_source_table)) NOT LIKE
1860: END IF;
1861: --
1862: l_lines:=l_lines+1;
1863: --
1864: --okc_util.print_trace(2,' ');
1865: IF (l_debug = 'Y') THEN
1866: okc_util.print_trace(2,'--------------');
1867: okc_util.print_trace(2,'> Line_id = '||r_cle.line_id);
1868: okc_util.print_trace(2,'Line NUMBER = '||r_cle.line_number);
1862: l_lines:=l_lines+1;
1863: --
1864: --okc_util.print_trace(2,' ');
1865: IF (l_debug = 'Y') THEN
1866: okc_util.print_trace(2,'--------------');
1867: okc_util.print_trace(2,'> Line_id = '||r_cle.line_id);
1868: okc_util.print_trace(2,'Line NUMBER = '||r_cle.line_number);
1869: okc_util.print_trace(2,'--------------');
1870: okc_util.print_trace(2,'Line style = '||r_cle.line_style);
1863: --
1864: --okc_util.print_trace(2,' ');
1865: IF (l_debug = 'Y') THEN
1866: okc_util.print_trace(2,'--------------');
1867: okc_util.print_trace(2,'> Line_id = '||r_cle.line_id);
1868: okc_util.print_trace(2,'Line NUMBER = '||r_cle.line_number);
1869: okc_util.print_trace(2,'--------------');
1870: okc_util.print_trace(2,'Line style = '||r_cle.line_style);
1871: okc_util.print_trace(2,'Line type = '||r_cle.line_type);
1864: --okc_util.print_trace(2,' ');
1865: IF (l_debug = 'Y') THEN
1866: okc_util.print_trace(2,'--------------');
1867: okc_util.print_trace(2,'> Line_id = '||r_cle.line_id);
1868: okc_util.print_trace(2,'Line NUMBER = '||r_cle.line_number);
1869: okc_util.print_trace(2,'--------------');
1870: okc_util.print_trace(2,'Line style = '||r_cle.line_style);
1871: okc_util.print_trace(2,'Line type = '||r_cle.line_type);
1872: okc_util.print_trace(2,'Line source code = '||r_cle.line_source_code);
1865: IF (l_debug = 'Y') THEN
1866: okc_util.print_trace(2,'--------------');
1867: okc_util.print_trace(2,'> Line_id = '||r_cle.line_id);
1868: okc_util.print_trace(2,'Line NUMBER = '||r_cle.line_number);
1869: okc_util.print_trace(2,'--------------');
1870: okc_util.print_trace(2,'Line style = '||r_cle.line_style);
1871: okc_util.print_trace(2,'Line type = '||r_cle.line_type);
1872: okc_util.print_trace(2,'Line source code = '||r_cle.line_source_code);
1873: okc_util.print_trace(2,'Line source table = '||r_cle.line_source_table);
1866: okc_util.print_trace(2,'--------------');
1867: okc_util.print_trace(2,'> Line_id = '||r_cle.line_id);
1868: okc_util.print_trace(2,'Line NUMBER = '||r_cle.line_number);
1869: okc_util.print_trace(2,'--------------');
1870: okc_util.print_trace(2,'Line style = '||r_cle.line_style);
1871: okc_util.print_trace(2,'Line type = '||r_cle.line_type);
1872: okc_util.print_trace(2,'Line source code = '||r_cle.line_source_code);
1873: okc_util.print_trace(2,'Line source table = '||r_cle.line_source_table);
1874: okc_util.print_trace(2,'Item source code = '||r_cle.item_source_code);
1867: okc_util.print_trace(2,'> Line_id = '||r_cle.line_id);
1868: okc_util.print_trace(2,'Line NUMBER = '||r_cle.line_number);
1869: okc_util.print_trace(2,'--------------');
1870: okc_util.print_trace(2,'Line style = '||r_cle.line_style);
1871: okc_util.print_trace(2,'Line type = '||r_cle.line_type);
1872: okc_util.print_trace(2,'Line source code = '||r_cle.line_source_code);
1873: okc_util.print_trace(2,'Line source table = '||r_cle.line_source_table);
1874: okc_util.print_trace(2,'Item source code = '||r_cle.item_source_code);
1875: okc_util.print_trace(2,'Item source table = '||r_cle.item_source_table);
1868: okc_util.print_trace(2,'Line NUMBER = '||r_cle.line_number);
1869: okc_util.print_trace(2,'--------------');
1870: okc_util.print_trace(2,'Line style = '||r_cle.line_style);
1871: okc_util.print_trace(2,'Line type = '||r_cle.line_type);
1872: okc_util.print_trace(2,'Line source code = '||r_cle.line_source_code);
1873: okc_util.print_trace(2,'Line source table = '||r_cle.line_source_table);
1874: okc_util.print_trace(2,'Item source code = '||r_cle.item_source_code);
1875: okc_util.print_trace(2,'Item source table = '||r_cle.item_source_table);
1876: okc_util.print_trace(2,'Item id1 = '||r_cle.object_id1);
1869: okc_util.print_trace(2,'--------------');
1870: okc_util.print_trace(2,'Line style = '||r_cle.line_style);
1871: okc_util.print_trace(2,'Line type = '||r_cle.line_type);
1872: okc_util.print_trace(2,'Line source code = '||r_cle.line_source_code);
1873: okc_util.print_trace(2,'Line source table = '||r_cle.line_source_table);
1874: okc_util.print_trace(2,'Item source code = '||r_cle.item_source_code);
1875: okc_util.print_trace(2,'Item source table = '||r_cle.item_source_table);
1876: okc_util.print_trace(2,'Item id1 = '||r_cle.object_id1);
1877: okc_util.print_trace(2,'Item id2 = '||r_cle.object_id2);
1870: okc_util.print_trace(2,'Line style = '||r_cle.line_style);
1871: okc_util.print_trace(2,'Line type = '||r_cle.line_type);
1872: okc_util.print_trace(2,'Line source code = '||r_cle.line_source_code);
1873: okc_util.print_trace(2,'Line source table = '||r_cle.line_source_table);
1874: okc_util.print_trace(2,'Item source code = '||r_cle.item_source_code);
1875: okc_util.print_trace(2,'Item source table = '||r_cle.item_source_table);
1876: okc_util.print_trace(2,'Item id1 = '||r_cle.object_id1);
1877: okc_util.print_trace(2,'Item id2 = '||r_cle.object_id2);
1878: END IF;
1871: okc_util.print_trace(2,'Line type = '||r_cle.line_type);
1872: okc_util.print_trace(2,'Line source code = '||r_cle.line_source_code);
1873: okc_util.print_trace(2,'Line source table = '||r_cle.line_source_table);
1874: okc_util.print_trace(2,'Item source code = '||r_cle.item_source_code);
1875: okc_util.print_trace(2,'Item source table = '||r_cle.item_source_table);
1876: okc_util.print_trace(2,'Item id1 = '||r_cle.object_id1);
1877: okc_util.print_trace(2,'Item id2 = '||r_cle.object_id2);
1878: END IF;
1879: --okc_util.print_trace(2,'Item name = '||r_cle.item_name);
1872: okc_util.print_trace(2,'Line source code = '||r_cle.line_source_code);
1873: okc_util.print_trace(2,'Line source table = '||r_cle.line_source_table);
1874: okc_util.print_trace(2,'Item source code = '||r_cle.item_source_code);
1875: okc_util.print_trace(2,'Item source table = '||r_cle.item_source_table);
1876: okc_util.print_trace(2,'Item id1 = '||r_cle.object_id1);
1877: okc_util.print_trace(2,'Item id2 = '||r_cle.object_id2);
1878: END IF;
1879: --okc_util.print_trace(2,'Item name = '||r_cle.item_name);
1880: IF (l_debug = 'Y') THEN
1873: okc_util.print_trace(2,'Line source table = '||r_cle.line_source_table);
1874: okc_util.print_trace(2,'Item source code = '||r_cle.item_source_code);
1875: okc_util.print_trace(2,'Item source table = '||r_cle.item_source_table);
1876: okc_util.print_trace(2,'Item id1 = '||r_cle.object_id1);
1877: okc_util.print_trace(2,'Item id2 = '||r_cle.object_id2);
1878: END IF;
1879: --okc_util.print_trace(2,'Item name = '||r_cle.item_name);
1880: IF (l_debug = 'Y') THEN
1881: okc_util.print_trace(2,'Item name = '||l_item_name);
1875: okc_util.print_trace(2,'Item source table = '||r_cle.item_source_table);
1876: okc_util.print_trace(2,'Item id1 = '||r_cle.object_id1);
1877: okc_util.print_trace(2,'Item id2 = '||r_cle.object_id2);
1878: END IF;
1879: --okc_util.print_trace(2,'Item name = '||r_cle.item_name);
1880: IF (l_debug = 'Y') THEN
1881: okc_util.print_trace(2,'Item name = '||l_item_name);
1882: END IF;
1883: --okc_util.print_trace(2,'Item Orderable = '||r_cle.customer_order_enabled_flag);
1877: okc_util.print_trace(2,'Item id2 = '||r_cle.object_id2);
1878: END IF;
1879: --okc_util.print_trace(2,'Item name = '||r_cle.item_name);
1880: IF (l_debug = 'Y') THEN
1881: okc_util.print_trace(2,'Item name = '||l_item_name);
1882: END IF;
1883: --okc_util.print_trace(2,'Item Orderable = '||r_cle.customer_order_enabled_flag);
1884: IF (l_debug = 'Y') THEN
1885: okc_util.print_trace(2,'Item Orderable = '||l_customer_order_enabled_flag);
1879: --okc_util.print_trace(2,'Item name = '||r_cle.item_name);
1880: IF (l_debug = 'Y') THEN
1881: okc_util.print_trace(2,'Item name = '||l_item_name);
1882: END IF;
1883: --okc_util.print_trace(2,'Item Orderable = '||r_cle.customer_order_enabled_flag);
1884: IF (l_debug = 'Y') THEN
1885: okc_util.print_trace(2,'Item Orderable = '||l_customer_order_enabled_flag);
1886: okc_util.print_trace(2,'Item Priced = '||r_cle.priced_item_yn);
1887: okc_util.print_trace(2,'Quantity = '||r_cle.qty);
1881: okc_util.print_trace(2,'Item name = '||l_item_name);
1882: END IF;
1883: --okc_util.print_trace(2,'Item Orderable = '||r_cle.customer_order_enabled_flag);
1884: IF (l_debug = 'Y') THEN
1885: okc_util.print_trace(2,'Item Orderable = '||l_customer_order_enabled_flag);
1886: okc_util.print_trace(2,'Item Priced = '||r_cle.priced_item_yn);
1887: okc_util.print_trace(2,'Quantity = '||r_cle.qty);
1888: okc_util.print_trace(2,'UOM = '||r_cle.uom_code);
1889: okc_util.print_trace(2,'Currency code = '||r_cle.currency_code);
1882: END IF;
1883: --okc_util.print_trace(2,'Item Orderable = '||r_cle.customer_order_enabled_flag);
1884: IF (l_debug = 'Y') THEN
1885: okc_util.print_trace(2,'Item Orderable = '||l_customer_order_enabled_flag);
1886: okc_util.print_trace(2,'Item Priced = '||r_cle.priced_item_yn);
1887: okc_util.print_trace(2,'Quantity = '||r_cle.qty);
1888: okc_util.print_trace(2,'UOM = '||r_cle.uom_code);
1889: okc_util.print_trace(2,'Currency code = '||r_cle.currency_code);
1890: END IF;
1883: --okc_util.print_trace(2,'Item Orderable = '||r_cle.customer_order_enabled_flag);
1884: IF (l_debug = 'Y') THEN
1885: okc_util.print_trace(2,'Item Orderable = '||l_customer_order_enabled_flag);
1886: okc_util.print_trace(2,'Item Priced = '||r_cle.priced_item_yn);
1887: okc_util.print_trace(2,'Quantity = '||r_cle.qty);
1888: okc_util.print_trace(2,'UOM = '||r_cle.uom_code);
1889: okc_util.print_trace(2,'Currency code = '||r_cle.currency_code);
1890: END IF;
1891: --okc_util.print_trace(2,'Negot. price = '||r_cle.price);
1884: IF (l_debug = 'Y') THEN
1885: okc_util.print_trace(2,'Item Orderable = '||l_customer_order_enabled_flag);
1886: okc_util.print_trace(2,'Item Priced = '||r_cle.priced_item_yn);
1887: okc_util.print_trace(2,'Quantity = '||r_cle.qty);
1888: okc_util.print_trace(2,'UOM = '||r_cle.uom_code);
1889: okc_util.print_trace(2,'Currency code = '||r_cle.currency_code);
1890: END IF;
1891: --okc_util.print_trace(2,'Negot. price = '||r_cle.price);
1892: IF (l_debug = 'Y') THEN
1885: okc_util.print_trace(2,'Item Orderable = '||l_customer_order_enabled_flag);
1886: okc_util.print_trace(2,'Item Priced = '||r_cle.priced_item_yn);
1887: okc_util.print_trace(2,'Quantity = '||r_cle.qty);
1888: okc_util.print_trace(2,'UOM = '||r_cle.uom_code);
1889: okc_util.print_trace(2,'Currency code = '||r_cle.currency_code);
1890: END IF;
1891: --okc_util.print_trace(2,'Negot. price = '||r_cle.price);
1892: IF (l_debug = 'Y') THEN
1893: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(r_cle.price_unit, '9G999G999G990D00')));
1887: okc_util.print_trace(2,'Quantity = '||r_cle.qty);
1888: okc_util.print_trace(2,'UOM = '||r_cle.uom_code);
1889: okc_util.print_trace(2,'Currency code = '||r_cle.currency_code);
1890: END IF;
1891: --okc_util.print_trace(2,'Negot. price = '||r_cle.price);
1892: IF (l_debug = 'Y') THEN
1893: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(r_cle.price_unit, '9G999G999G990D00')));
1894: okc_util.print_trace(2,'Start date = '||r_cle.start_date);
1895: okc_util.print_trace(2,'End date = '||r_cle.end_date);
1889: okc_util.print_trace(2,'Currency code = '||r_cle.currency_code);
1890: END IF;
1891: --okc_util.print_trace(2,'Negot. price = '||r_cle.price);
1892: IF (l_debug = 'Y') THEN
1893: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(r_cle.price_unit, '9G999G999G990D00')));
1894: okc_util.print_trace(2,'Start date = '||r_cle.start_date);
1895: okc_util.print_trace(2,'End date = '||r_cle.end_date);
1896: END IF;
1897:
1890: END IF;
1891: --okc_util.print_trace(2,'Negot. price = '||r_cle.price);
1892: IF (l_debug = 'Y') THEN
1893: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(r_cle.price_unit, '9G999G999G990D00')));
1894: okc_util.print_trace(2,'Start date = '||r_cle.start_date);
1895: okc_util.print_trace(2,'End date = '||r_cle.end_date);
1896: END IF;
1897:
1898: IF (l_debug = 'Y') THEN
1891: --okc_util.print_trace(2,'Negot. price = '||r_cle.price);
1892: IF (l_debug = 'Y') THEN
1893: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(r_cle.price_unit, '9G999G999G990D00')));
1894: okc_util.print_trace(2,'Start date = '||r_cle.start_date);
1895: okc_util.print_trace(2,'End date = '||r_cle.end_date);
1896: END IF;
1897:
1898: IF (l_debug = 'Y') THEN
1899: okc_util.print_trace(2,'Config header id = '||r_cle.config_header_id);
1895: okc_util.print_trace(2,'End date = '||r_cle.end_date);
1896: END IF;
1897:
1898: IF (l_debug = 'Y') THEN
1899: okc_util.print_trace(2,'Config header id = '||r_cle.config_header_id);
1900: okc_util.print_trace(2,'config rev Num = '||r_cle.config_revision_number);
1901: okc_util.print_trace(2,'Config item id = '||r_cle.config_item_id);
1902: okc_util.print_trace(2,'Config complet yn = '||r_cle.config_complete_yn);
1903: okc_util.print_trace(2,'Config valid yn = '||r_cle.config_valid_yn);
1896: END IF;
1897:
1898: IF (l_debug = 'Y') THEN
1899: okc_util.print_trace(2,'Config header id = '||r_cle.config_header_id);
1900: okc_util.print_trace(2,'config rev Num = '||r_cle.config_revision_number);
1901: okc_util.print_trace(2,'Config item id = '||r_cle.config_item_id);
1902: okc_util.print_trace(2,'Config complet yn = '||r_cle.config_complete_yn);
1903: okc_util.print_trace(2,'Config valid yn = '||r_cle.config_valid_yn);
1904: okc_util.print_trace(2,'Component code = '||r_cle.component_code);
1897:
1898: IF (l_debug = 'Y') THEN
1899: okc_util.print_trace(2,'Config header id = '||r_cle.config_header_id);
1900: okc_util.print_trace(2,'config rev Num = '||r_cle.config_revision_number);
1901: okc_util.print_trace(2,'Config item id = '||r_cle.config_item_id);
1902: okc_util.print_trace(2,'Config complet yn = '||r_cle.config_complete_yn);
1903: okc_util.print_trace(2,'Config valid yn = '||r_cle.config_valid_yn);
1904: okc_util.print_trace(2,'Component code = '||r_cle.component_code);
1905: okc_util.print_trace(2,'Config item type = '||r_cle.end_date);
1898: IF (l_debug = 'Y') THEN
1899: okc_util.print_trace(2,'Config header id = '||r_cle.config_header_id);
1900: okc_util.print_trace(2,'config rev Num = '||r_cle.config_revision_number);
1901: okc_util.print_trace(2,'Config item id = '||r_cle.config_item_id);
1902: okc_util.print_trace(2,'Config complet yn = '||r_cle.config_complete_yn);
1903: okc_util.print_trace(2,'Config valid yn = '||r_cle.config_valid_yn);
1904: okc_util.print_trace(2,'Component code = '||r_cle.component_code);
1905: okc_util.print_trace(2,'Config item type = '||r_cle.end_date);
1906: END IF;
1899: okc_util.print_trace(2,'Config header id = '||r_cle.config_header_id);
1900: okc_util.print_trace(2,'config rev Num = '||r_cle.config_revision_number);
1901: okc_util.print_trace(2,'Config item id = '||r_cle.config_item_id);
1902: okc_util.print_trace(2,'Config complet yn = '||r_cle.config_complete_yn);
1903: okc_util.print_trace(2,'Config valid yn = '||r_cle.config_valid_yn);
1904: okc_util.print_trace(2,'Component code = '||r_cle.component_code);
1905: okc_util.print_trace(2,'Config item type = '||r_cle.end_date);
1906: END IF;
1907:
1900: okc_util.print_trace(2,'config rev Num = '||r_cle.config_revision_number);
1901: okc_util.print_trace(2,'Config item id = '||r_cle.config_item_id);
1902: okc_util.print_trace(2,'Config complet yn = '||r_cle.config_complete_yn);
1903: okc_util.print_trace(2,'Config valid yn = '||r_cle.config_valid_yn);
1904: okc_util.print_trace(2,'Component code = '||r_cle.component_code);
1905: okc_util.print_trace(2,'Config item type = '||r_cle.end_date);
1906: END IF;
1907:
1908:
1901: okc_util.print_trace(2,'Config item id = '||r_cle.config_item_id);
1902: okc_util.print_trace(2,'Config complet yn = '||r_cle.config_complete_yn);
1903: okc_util.print_trace(2,'Config valid yn = '||r_cle.config_valid_yn);
1904: okc_util.print_trace(2,'Component code = '||r_cle.component_code);
1905: okc_util.print_trace(2,'Config item type = '||r_cle.end_date);
1906: END IF;
1907:
1908:
1909:
1929:
1930:
1931:
1932: IF (l_debug = 'Y') THEN
1933: okc_util.print_trace(2,'============================');
1934: okc_util.print_trace(2,'Contract line idx = '||l_idx);
1935: okc_util.print_trace(2,'============================');
1936: END IF;
1937:
1930:
1931:
1932: IF (l_debug = 'Y') THEN
1933: okc_util.print_trace(2,'============================');
1934: okc_util.print_trace(2,'Contract line idx = '||l_idx);
1935: okc_util.print_trace(2,'============================');
1936: END IF;
1937:
1938:
1931:
1932: IF (l_debug = 'Y') THEN
1933: okc_util.print_trace(2,'============================');
1934: okc_util.print_trace(2,'Contract line idx = '||l_idx);
1935: okc_util.print_trace(2,'============================');
1936: END IF;
1937:
1938:
1939: IF (l_debug = 'Y') THEN
1936: END IF;
1937:
1938:
1939: IF (l_debug = 'Y') THEN
1940: okc_util.print_trace(2,'--------------');
1941: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
1942: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
1943: okc_util.print_trace(2,'--------------');
1944: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
1937:
1938:
1939: IF (l_debug = 'Y') THEN
1940: okc_util.print_trace(2,'--------------');
1941: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
1942: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
1943: okc_util.print_trace(2,'--------------');
1944: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
1945: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
1938:
1939: IF (l_debug = 'Y') THEN
1940: okc_util.print_trace(2,'--------------');
1941: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
1942: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
1943: okc_util.print_trace(2,'--------------');
1944: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
1945: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
1946: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
1939: IF (l_debug = 'Y') THEN
1940: okc_util.print_trace(2,'--------------');
1941: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
1942: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
1943: okc_util.print_trace(2,'--------------');
1944: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
1945: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
1946: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
1947: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
1940: okc_util.print_trace(2,'--------------');
1941: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
1942: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
1943: okc_util.print_trace(2,'--------------');
1944: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
1945: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
1946: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
1947: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
1948: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
1941: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
1942: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
1943: okc_util.print_trace(2,'--------------');
1944: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
1945: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
1946: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
1947: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
1948: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
1949: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
1942: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
1943: okc_util.print_trace(2,'--------------');
1944: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
1945: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
1946: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
1947: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
1948: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
1949: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
1950: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
1943: okc_util.print_trace(2,'--------------');
1944: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
1945: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
1946: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
1947: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
1948: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
1949: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
1950: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
1951: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
1944: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
1945: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
1946: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
1947: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
1948: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
1949: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
1950: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
1951: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
1952: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
1945: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
1946: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
1947: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
1948: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
1949: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
1950: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
1951: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
1952: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
1953: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
1946: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
1947: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
1948: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
1949: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
1950: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
1951: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
1952: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
1953: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
1954: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
1947: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
1948: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
1949: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
1950: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
1951: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
1952: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
1953: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
1954: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
1955: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
1948: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
1949: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
1950: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
1951: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
1952: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
1953: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
1954: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
1955: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
1956: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
1949: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
1950: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
1951: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
1952: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
1953: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
1954: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
1955: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
1956: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
1957: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
1950: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
1951: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
1952: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
1953: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
1954: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
1955: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
1956: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
1957: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
1958: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
1951: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
1952: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
1953: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
1954: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
1955: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
1956: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
1957: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
1958: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
1959: END IF;
1952: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
1953: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
1954: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
1955: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
1956: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
1957: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
1958: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
1959: END IF;
1960: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
1953: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
1954: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
1955: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
1956: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
1957: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
1958: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
1959: END IF;
1960: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
1961: IF (l_debug = 'Y') THEN
1954: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
1955: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
1956: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
1957: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
1958: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
1959: END IF;
1960: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
1961: IF (l_debug = 'Y') THEN
1962: okc_util.print_trace(2,'Start date = '||l_line_info_tab(l_idx).start_date);
1956: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
1957: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
1958: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
1959: END IF;
1960: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
1961: IF (l_debug = 'Y') THEN
1962: okc_util.print_trace(2,'Start date = '||l_line_info_tab(l_idx).start_date);
1963: okc_util.print_trace(2,'End date = '||l_line_info_tab(l_idx).end_date);
1964: END IF;
1958: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
1959: END IF;
1960: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
1961: IF (l_debug = 'Y') THEN
1962: okc_util.print_trace(2,'Start date = '||l_line_info_tab(l_idx).start_date);
1963: okc_util.print_trace(2,'End date = '||l_line_info_tab(l_idx).end_date);
1964: END IF;
1965:
1966: IF (l_debug = 'Y') THEN
1959: END IF;
1960: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
1961: IF (l_debug = 'Y') THEN
1962: okc_util.print_trace(2,'Start date = '||l_line_info_tab(l_idx).start_date);
1963: okc_util.print_trace(2,'End date = '||l_line_info_tab(l_idx).end_date);
1964: END IF;
1965:
1966: IF (l_debug = 'Y') THEN
1967: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
1963: okc_util.print_trace(2,'End date = '||l_line_info_tab(l_idx).end_date);
1964: END IF;
1965:
1966: IF (l_debug = 'Y') THEN
1967: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
1968: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
1969: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
1970: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
1971: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
1964: END IF;
1965:
1966: IF (l_debug = 'Y') THEN
1967: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
1968: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
1969: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
1970: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
1971: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
1972: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
1965:
1966: IF (l_debug = 'Y') THEN
1967: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
1968: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
1969: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
1970: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
1971: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
1972: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
1973: okc_util.print_trace(2,'Config item type = '||l_line_info_tab(l_idx).end_date);
1966: IF (l_debug = 'Y') THEN
1967: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
1968: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
1969: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
1970: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
1971: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
1972: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
1973: okc_util.print_trace(2,'Config item type = '||l_line_info_tab(l_idx).end_date);
1974: END IF;
1967: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
1968: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
1969: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
1970: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
1971: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
1972: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
1973: okc_util.print_trace(2,'Config item type = '||l_line_info_tab(l_idx).end_date);
1974: END IF;
1975:
1968: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
1969: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
1970: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
1971: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
1972: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
1973: okc_util.print_trace(2,'Config item type = '||l_line_info_tab(l_idx).end_date);
1974: END IF;
1975:
1976:
1969: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
1970: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
1971: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
1972: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
1973: okc_util.print_trace(2,'Config item type = '||l_line_info_tab(l_idx).end_date);
1974: END IF;
1975:
1976:
1977: IF (l_debug = 'Y') THEN
1974: END IF;
1975:
1976:
1977: IF (l_debug = 'Y') THEN
1978: okc_util.print_trace(2,'============================');
1979: okc_util.print_trace(2,'Contract line idx = '||l_idx);
1980: okc_util.print_trace(2,'============================');
1981: END IF;
1982:
1975:
1976:
1977: IF (l_debug = 'Y') THEN
1978: okc_util.print_trace(2,'============================');
1979: okc_util.print_trace(2,'Contract line idx = '||l_idx);
1980: okc_util.print_trace(2,'============================');
1981: END IF;
1982:
1983:
1976:
1977: IF (l_debug = 'Y') THEN
1978: okc_util.print_trace(2,'============================');
1979: okc_util.print_trace(2,'Contract line idx = '||l_idx);
1980: okc_util.print_trace(2,'============================');
1981: END IF;
1982:
1983:
1984:
2004: l_line_info_tab(l_idx).qty := rtrim(ltrim(l_svc_duration));
2005: l_line_info_tab(l_idx).uom_code := rtrim(ltrim(l_svc_period));
2006:
2007: IF (l_debug = 'Y') THEN
2008: okc_util.print_trace(3,'Duration quantity AND Period uom:');
2009: okc_util.print_trace(3,'=================================');
2010: okc_util.print_trace(3,'Quantity = '||l_line_info_tab(l_idx).qty);
2011: okc_util.print_trace(3,'UOM = '||l_line_info_tab(l_idx).uom_code);
2012: okc_util.print_trace(3,'Duration = '||l_svc_duration);
2005: l_line_info_tab(l_idx).uom_code := rtrim(ltrim(l_svc_period));
2006:
2007: IF (l_debug = 'Y') THEN
2008: okc_util.print_trace(3,'Duration quantity AND Period uom:');
2009: okc_util.print_trace(3,'=================================');
2010: okc_util.print_trace(3,'Quantity = '||l_line_info_tab(l_idx).qty);
2011: okc_util.print_trace(3,'UOM = '||l_line_info_tab(l_idx).uom_code);
2012: okc_util.print_trace(3,'Duration = '||l_svc_duration);
2013: okc_util.print_trace(3,'Period = '||l_svc_period);
2006:
2007: IF (l_debug = 'Y') THEN
2008: okc_util.print_trace(3,'Duration quantity AND Period uom:');
2009: okc_util.print_trace(3,'=================================');
2010: okc_util.print_trace(3,'Quantity = '||l_line_info_tab(l_idx).qty);
2011: okc_util.print_trace(3,'UOM = '||l_line_info_tab(l_idx).uom_code);
2012: okc_util.print_trace(3,'Duration = '||l_svc_duration);
2013: okc_util.print_trace(3,'Period = '||l_svc_period);
2014: END IF;
2007: IF (l_debug = 'Y') THEN
2008: okc_util.print_trace(3,'Duration quantity AND Period uom:');
2009: okc_util.print_trace(3,'=================================');
2010: okc_util.print_trace(3,'Quantity = '||l_line_info_tab(l_idx).qty);
2011: okc_util.print_trace(3,'UOM = '||l_line_info_tab(l_idx).uom_code);
2012: okc_util.print_trace(3,'Duration = '||l_svc_duration);
2013: okc_util.print_trace(3,'Period = '||l_svc_period);
2014: END IF;
2015:
2008: okc_util.print_trace(3,'Duration quantity AND Period uom:');
2009: okc_util.print_trace(3,'=================================');
2010: okc_util.print_trace(3,'Quantity = '||l_line_info_tab(l_idx).qty);
2011: okc_util.print_trace(3,'UOM = '||l_line_info_tab(l_idx).uom_code);
2012: okc_util.print_trace(3,'Duration = '||l_svc_duration);
2013: okc_util.print_trace(3,'Period = '||l_svc_period);
2014: END IF;
2015:
2016:
2009: okc_util.print_trace(3,'=================================');
2010: okc_util.print_trace(3,'Quantity = '||l_line_info_tab(l_idx).qty);
2011: okc_util.print_trace(3,'UOM = '||l_line_info_tab(l_idx).uom_code);
2012: okc_util.print_trace(3,'Duration = '||l_svc_duration);
2013: okc_util.print_trace(3,'Period = '||l_svc_period);
2014: END IF;
2015:
2016:
2017: --
2018: -- Check and populate the top lines rules table
2019: --
2020:
2021: IF (l_debug = 'Y') THEN
2022: okc_util.print_trace(3,'==================================');
2023: okc_util.print_trace(3,'Retrieving the rules at line level');
2024: END IF;
2025:
2026: build_k_rules( p_chr_id => p_chr_id,
2019: --
2020:
2021: IF (l_debug = 'Y') THEN
2022: okc_util.print_trace(3,'==================================');
2023: okc_util.print_trace(3,'Retrieving the rules at line level');
2024: END IF;
2025:
2026: build_k_rules( p_chr_id => p_chr_id,
2027: p_cle_id => l_line_info_tab(l_idx).line_id,
2050: raise e_exit;
2051: END IF;
2052:
2053: IF (l_debug = 'Y') THEN
2054: okc_util.print_trace(3,'Completed retrieving the rules at line level');
2055: okc_util.print_trace(3,'==================================');
2056: END IF;
2057:
2058: --
2051: END IF;
2052:
2053: IF (l_debug = 'Y') THEN
2054: okc_util.print_trace(3,'Completed retrieving the rules at line level');
2055: okc_util.print_trace(3,'==================================');
2056: END IF;
2057:
2058: --
2059: -- get covered product information
2109: l_covlvl_info_tab(l_cp_idx).svc_duration := rtrim(ltrim(l_svc_duration));
2110: l_covlvl_info_tab(l_cp_idx).svc_period := rtrim(ltrim(l_svc_period));
2111:
2112: IF (l_debug = 'Y') THEN
2113: okc_util.print_trace(3,'Contract Covered Lines:');
2114: okc_util.print_trace(3,'=======================');
2115: END IF;
2116:
2117: IF (l_debug = 'Y') THEN
2110: l_covlvl_info_tab(l_cp_idx).svc_period := rtrim(ltrim(l_svc_period));
2111:
2112: IF (l_debug = 'Y') THEN
2113: okc_util.print_trace(3,'Contract Covered Lines:');
2114: okc_util.print_trace(3,'=======================');
2115: END IF;
2116:
2117: IF (l_debug = 'Y') THEN
2118: okc_util.print_trace(3,'>> Line_id = '||l_covlvl_info_tab(l_cp_idx).line_id);
2114: okc_util.print_trace(3,'=======================');
2115: END IF;
2116:
2117: IF (l_debug = 'Y') THEN
2118: okc_util.print_trace(3,'>> Line_id = '||l_covlvl_info_tab(l_cp_idx).line_id);
2119: okc_util.print_trace(3,'Line NUMBER = '||l_covlvl_info_tab(l_cp_idx).line_number);
2120: okc_util.print_trace(3,'--------------');
2121: okc_util.print_trace(3,'Top Line idx = '||l_covlvl_info_tab(l_cp_idx).line_tab_idx);
2122: okc_util.print_trace(3,'--------------');
2115: END IF;
2116:
2117: IF (l_debug = 'Y') THEN
2118: okc_util.print_trace(3,'>> Line_id = '||l_covlvl_info_tab(l_cp_idx).line_id);
2119: okc_util.print_trace(3,'Line NUMBER = '||l_covlvl_info_tab(l_cp_idx).line_number);
2120: okc_util.print_trace(3,'--------------');
2121: okc_util.print_trace(3,'Top Line idx = '||l_covlvl_info_tab(l_cp_idx).line_tab_idx);
2122: okc_util.print_trace(3,'--------------');
2123: okc_util.print_trace(3,'Line style = '||l_covlvl_info_tab(l_cp_idx).line_style);
2116:
2117: IF (l_debug = 'Y') THEN
2118: okc_util.print_trace(3,'>> Line_id = '||l_covlvl_info_tab(l_cp_idx).line_id);
2119: okc_util.print_trace(3,'Line NUMBER = '||l_covlvl_info_tab(l_cp_idx).line_number);
2120: okc_util.print_trace(3,'--------------');
2121: okc_util.print_trace(3,'Top Line idx = '||l_covlvl_info_tab(l_cp_idx).line_tab_idx);
2122: okc_util.print_trace(3,'--------------');
2123: okc_util.print_trace(3,'Line style = '||l_covlvl_info_tab(l_cp_idx).line_style);
2124: okc_util.print_trace(3,'Line type = '||l_covlvl_info_tab(l_cp_idx).line_type);
2117: IF (l_debug = 'Y') THEN
2118: okc_util.print_trace(3,'>> Line_id = '||l_covlvl_info_tab(l_cp_idx).line_id);
2119: okc_util.print_trace(3,'Line NUMBER = '||l_covlvl_info_tab(l_cp_idx).line_number);
2120: okc_util.print_trace(3,'--------------');
2121: okc_util.print_trace(3,'Top Line idx = '||l_covlvl_info_tab(l_cp_idx).line_tab_idx);
2122: okc_util.print_trace(3,'--------------');
2123: okc_util.print_trace(3,'Line style = '||l_covlvl_info_tab(l_cp_idx).line_style);
2124: okc_util.print_trace(3,'Line type = '||l_covlvl_info_tab(l_cp_idx).line_type);
2125: okc_util.print_trace(3,'Line source code = '||l_covlvl_info_tab(l_cp_idx).line_source_code);
2118: okc_util.print_trace(3,'>> Line_id = '||l_covlvl_info_tab(l_cp_idx).line_id);
2119: okc_util.print_trace(3,'Line NUMBER = '||l_covlvl_info_tab(l_cp_idx).line_number);
2120: okc_util.print_trace(3,'--------------');
2121: okc_util.print_trace(3,'Top Line idx = '||l_covlvl_info_tab(l_cp_idx).line_tab_idx);
2122: okc_util.print_trace(3,'--------------');
2123: okc_util.print_trace(3,'Line style = '||l_covlvl_info_tab(l_cp_idx).line_style);
2124: okc_util.print_trace(3,'Line type = '||l_covlvl_info_tab(l_cp_idx).line_type);
2125: okc_util.print_trace(3,'Line source code = '||l_covlvl_info_tab(l_cp_idx).line_source_code);
2126: okc_util.print_trace(3,'Line source table = '||l_covlvl_info_tab(l_cp_idx).line_source_table);
2119: okc_util.print_trace(3,'Line NUMBER = '||l_covlvl_info_tab(l_cp_idx).line_number);
2120: okc_util.print_trace(3,'--------------');
2121: okc_util.print_trace(3,'Top Line idx = '||l_covlvl_info_tab(l_cp_idx).line_tab_idx);
2122: okc_util.print_trace(3,'--------------');
2123: okc_util.print_trace(3,'Line style = '||l_covlvl_info_tab(l_cp_idx).line_style);
2124: okc_util.print_trace(3,'Line type = '||l_covlvl_info_tab(l_cp_idx).line_type);
2125: okc_util.print_trace(3,'Line source code = '||l_covlvl_info_tab(l_cp_idx).line_source_code);
2126: okc_util.print_trace(3,'Line source table = '||l_covlvl_info_tab(l_cp_idx).line_source_table);
2127: okc_util.print_trace(3,'Prod source code = '||l_covlvl_info_tab(l_cp_idx).item_source_code);
2120: okc_util.print_trace(3,'--------------');
2121: okc_util.print_trace(3,'Top Line idx = '||l_covlvl_info_tab(l_cp_idx).line_tab_idx);
2122: okc_util.print_trace(3,'--------------');
2123: okc_util.print_trace(3,'Line style = '||l_covlvl_info_tab(l_cp_idx).line_style);
2124: okc_util.print_trace(3,'Line type = '||l_covlvl_info_tab(l_cp_idx).line_type);
2125: okc_util.print_trace(3,'Line source code = '||l_covlvl_info_tab(l_cp_idx).line_source_code);
2126: okc_util.print_trace(3,'Line source table = '||l_covlvl_info_tab(l_cp_idx).line_source_table);
2127: okc_util.print_trace(3,'Prod source code = '||l_covlvl_info_tab(l_cp_idx).item_source_code);
2128: okc_util.print_trace(3,'Prod source table = '||l_covlvl_info_tab(l_cp_idx).item_source_table);
2121: okc_util.print_trace(3,'Top Line idx = '||l_covlvl_info_tab(l_cp_idx).line_tab_idx);
2122: okc_util.print_trace(3,'--------------');
2123: okc_util.print_trace(3,'Line style = '||l_covlvl_info_tab(l_cp_idx).line_style);
2124: okc_util.print_trace(3,'Line type = '||l_covlvl_info_tab(l_cp_idx).line_type);
2125: okc_util.print_trace(3,'Line source code = '||l_covlvl_info_tab(l_cp_idx).line_source_code);
2126: okc_util.print_trace(3,'Line source table = '||l_covlvl_info_tab(l_cp_idx).line_source_table);
2127: okc_util.print_trace(3,'Prod source code = '||l_covlvl_info_tab(l_cp_idx).item_source_code);
2128: okc_util.print_trace(3,'Prod source table = '||l_covlvl_info_tab(l_cp_idx).item_source_table);
2129: okc_util.print_trace(3,'Cust Prod id1/Line id = '||l_covlvl_info_tab(l_cp_idx).id1);
2122: okc_util.print_trace(3,'--------------');
2123: okc_util.print_trace(3,'Line style = '||l_covlvl_info_tab(l_cp_idx).line_style);
2124: okc_util.print_trace(3,'Line type = '||l_covlvl_info_tab(l_cp_idx).line_type);
2125: okc_util.print_trace(3,'Line source code = '||l_covlvl_info_tab(l_cp_idx).line_source_code);
2126: okc_util.print_trace(3,'Line source table = '||l_covlvl_info_tab(l_cp_idx).line_source_table);
2127: okc_util.print_trace(3,'Prod source code = '||l_covlvl_info_tab(l_cp_idx).item_source_code);
2128: okc_util.print_trace(3,'Prod source table = '||l_covlvl_info_tab(l_cp_idx).item_source_table);
2129: okc_util.print_trace(3,'Cust Prod id1/Line id = '||l_covlvl_info_tab(l_cp_idx).id1);
2130: okc_util.print_trace(3,'Cust Prod id2 = '||l_covlvl_info_tab(l_cp_idx).id2);
2123: okc_util.print_trace(3,'Line style = '||l_covlvl_info_tab(l_cp_idx).line_style);
2124: okc_util.print_trace(3,'Line type = '||l_covlvl_info_tab(l_cp_idx).line_type);
2125: okc_util.print_trace(3,'Line source code = '||l_covlvl_info_tab(l_cp_idx).line_source_code);
2126: okc_util.print_trace(3,'Line source table = '||l_covlvl_info_tab(l_cp_idx).line_source_table);
2127: okc_util.print_trace(3,'Prod source code = '||l_covlvl_info_tab(l_cp_idx).item_source_code);
2128: okc_util.print_trace(3,'Prod source table = '||l_covlvl_info_tab(l_cp_idx).item_source_table);
2129: okc_util.print_trace(3,'Cust Prod id1/Line id = '||l_covlvl_info_tab(l_cp_idx).id1);
2130: okc_util.print_trace(3,'Cust Prod id2 = '||l_covlvl_info_tab(l_cp_idx).id2);
2131: okc_util.print_trace(3,'Cust Prod name = '||l_covlvl_info_tab(l_cp_idx).prod_name);
2124: okc_util.print_trace(3,'Line type = '||l_covlvl_info_tab(l_cp_idx).line_type);
2125: okc_util.print_trace(3,'Line source code = '||l_covlvl_info_tab(l_cp_idx).line_source_code);
2126: okc_util.print_trace(3,'Line source table = '||l_covlvl_info_tab(l_cp_idx).line_source_table);
2127: okc_util.print_trace(3,'Prod source code = '||l_covlvl_info_tab(l_cp_idx).item_source_code);
2128: okc_util.print_trace(3,'Prod source table = '||l_covlvl_info_tab(l_cp_idx).item_source_table);
2129: okc_util.print_trace(3,'Cust Prod id1/Line id = '||l_covlvl_info_tab(l_cp_idx).id1);
2130: okc_util.print_trace(3,'Cust Prod id2 = '||l_covlvl_info_tab(l_cp_idx).id2);
2131: okc_util.print_trace(3,'Cust Prod name = '||l_covlvl_info_tab(l_cp_idx).prod_name);
2132: okc_util.print_trace(3,'Prod Priced = '||l_covlvl_info_tab(l_cp_idx).priced_item_yn);
2125: okc_util.print_trace(3,'Line source code = '||l_covlvl_info_tab(l_cp_idx).line_source_code);
2126: okc_util.print_trace(3,'Line source table = '||l_covlvl_info_tab(l_cp_idx).line_source_table);
2127: okc_util.print_trace(3,'Prod source code = '||l_covlvl_info_tab(l_cp_idx).item_source_code);
2128: okc_util.print_trace(3,'Prod source table = '||l_covlvl_info_tab(l_cp_idx).item_source_table);
2129: okc_util.print_trace(3,'Cust Prod id1/Line id = '||l_covlvl_info_tab(l_cp_idx).id1);
2130: okc_util.print_trace(3,'Cust Prod id2 = '||l_covlvl_info_tab(l_cp_idx).id2);
2131: okc_util.print_trace(3,'Cust Prod name = '||l_covlvl_info_tab(l_cp_idx).prod_name);
2132: okc_util.print_trace(3,'Prod Priced = '||l_covlvl_info_tab(l_cp_idx).priced_item_yn);
2133: okc_util.print_trace(3,'Quantity = '||l_covlvl_info_tab(l_cp_idx).qty);
2126: okc_util.print_trace(3,'Line source table = '||l_covlvl_info_tab(l_cp_idx).line_source_table);
2127: okc_util.print_trace(3,'Prod source code = '||l_covlvl_info_tab(l_cp_idx).item_source_code);
2128: okc_util.print_trace(3,'Prod source table = '||l_covlvl_info_tab(l_cp_idx).item_source_table);
2129: okc_util.print_trace(3,'Cust Prod id1/Line id = '||l_covlvl_info_tab(l_cp_idx).id1);
2130: okc_util.print_trace(3,'Cust Prod id2 = '||l_covlvl_info_tab(l_cp_idx).id2);
2131: okc_util.print_trace(3,'Cust Prod name = '||l_covlvl_info_tab(l_cp_idx).prod_name);
2132: okc_util.print_trace(3,'Prod Priced = '||l_covlvl_info_tab(l_cp_idx).priced_item_yn);
2133: okc_util.print_trace(3,'Quantity = '||l_covlvl_info_tab(l_cp_idx).qty);
2134: okc_util.print_trace(3,'UOM = '||l_covlvl_info_tab(l_cp_idx).uom_code);
2127: okc_util.print_trace(3,'Prod source code = '||l_covlvl_info_tab(l_cp_idx).item_source_code);
2128: okc_util.print_trace(3,'Prod source table = '||l_covlvl_info_tab(l_cp_idx).item_source_table);
2129: okc_util.print_trace(3,'Cust Prod id1/Line id = '||l_covlvl_info_tab(l_cp_idx).id1);
2130: okc_util.print_trace(3,'Cust Prod id2 = '||l_covlvl_info_tab(l_cp_idx).id2);
2131: okc_util.print_trace(3,'Cust Prod name = '||l_covlvl_info_tab(l_cp_idx).prod_name);
2132: okc_util.print_trace(3,'Prod Priced = '||l_covlvl_info_tab(l_cp_idx).priced_item_yn);
2133: okc_util.print_trace(3,'Quantity = '||l_covlvl_info_tab(l_cp_idx).qty);
2134: okc_util.print_trace(3,'UOM = '||l_covlvl_info_tab(l_cp_idx).uom_code);
2135: okc_util.print_trace(3,'Currency code = '||l_covlvl_info_tab(l_cp_idx).currency_code);
2128: okc_util.print_trace(3,'Prod source table = '||l_covlvl_info_tab(l_cp_idx).item_source_table);
2129: okc_util.print_trace(3,'Cust Prod id1/Line id = '||l_covlvl_info_tab(l_cp_idx).id1);
2130: okc_util.print_trace(3,'Cust Prod id2 = '||l_covlvl_info_tab(l_cp_idx).id2);
2131: okc_util.print_trace(3,'Cust Prod name = '||l_covlvl_info_tab(l_cp_idx).prod_name);
2132: okc_util.print_trace(3,'Prod Priced = '||l_covlvl_info_tab(l_cp_idx).priced_item_yn);
2133: okc_util.print_trace(3,'Quantity = '||l_covlvl_info_tab(l_cp_idx).qty);
2134: okc_util.print_trace(3,'UOM = '||l_covlvl_info_tab(l_cp_idx).uom_code);
2135: okc_util.print_trace(3,'Currency code = '||l_covlvl_info_tab(l_cp_idx).currency_code);
2136: END IF;
2129: okc_util.print_trace(3,'Cust Prod id1/Line id = '||l_covlvl_info_tab(l_cp_idx).id1);
2130: okc_util.print_trace(3,'Cust Prod id2 = '||l_covlvl_info_tab(l_cp_idx).id2);
2131: okc_util.print_trace(3,'Cust Prod name = '||l_covlvl_info_tab(l_cp_idx).prod_name);
2132: okc_util.print_trace(3,'Prod Priced = '||l_covlvl_info_tab(l_cp_idx).priced_item_yn);
2133: okc_util.print_trace(3,'Quantity = '||l_covlvl_info_tab(l_cp_idx).qty);
2134: okc_util.print_trace(3,'UOM = '||l_covlvl_info_tab(l_cp_idx).uom_code);
2135: okc_util.print_trace(3,'Currency code = '||l_covlvl_info_tab(l_cp_idx).currency_code);
2136: END IF;
2137: --okc_util.print_trace(3,'Negoc. price = '||l_covlvl_info_tab(l_cp_idx).price);
2130: okc_util.print_trace(3,'Cust Prod id2 = '||l_covlvl_info_tab(l_cp_idx).id2);
2131: okc_util.print_trace(3,'Cust Prod name = '||l_covlvl_info_tab(l_cp_idx).prod_name);
2132: okc_util.print_trace(3,'Prod Priced = '||l_covlvl_info_tab(l_cp_idx).priced_item_yn);
2133: okc_util.print_trace(3,'Quantity = '||l_covlvl_info_tab(l_cp_idx).qty);
2134: okc_util.print_trace(3,'UOM = '||l_covlvl_info_tab(l_cp_idx).uom_code);
2135: okc_util.print_trace(3,'Currency code = '||l_covlvl_info_tab(l_cp_idx).currency_code);
2136: END IF;
2137: --okc_util.print_trace(3,'Negoc. price = '||l_covlvl_info_tab(l_cp_idx).price);
2138: IF (l_debug = 'Y') THEN
2131: okc_util.print_trace(3,'Cust Prod name = '||l_covlvl_info_tab(l_cp_idx).prod_name);
2132: okc_util.print_trace(3,'Prod Priced = '||l_covlvl_info_tab(l_cp_idx).priced_item_yn);
2133: okc_util.print_trace(3,'Quantity = '||l_covlvl_info_tab(l_cp_idx).qty);
2134: okc_util.print_trace(3,'UOM = '||l_covlvl_info_tab(l_cp_idx).uom_code);
2135: okc_util.print_trace(3,'Currency code = '||l_covlvl_info_tab(l_cp_idx).currency_code);
2136: END IF;
2137: --okc_util.print_trace(3,'Negoc. price = '||l_covlvl_info_tab(l_cp_idx).price);
2138: IF (l_debug = 'Y') THEN
2139: okc_util.print_trace(3,'Unit price = '||LTRIM(TO_CHAR(l_covlvl_info_tab(l_cp_idx).price_unit, '9G999G999G990D00')));
2133: okc_util.print_trace(3,'Quantity = '||l_covlvl_info_tab(l_cp_idx).qty);
2134: okc_util.print_trace(3,'UOM = '||l_covlvl_info_tab(l_cp_idx).uom_code);
2135: okc_util.print_trace(3,'Currency code = '||l_covlvl_info_tab(l_cp_idx).currency_code);
2136: END IF;
2137: --okc_util.print_trace(3,'Negoc. price = '||l_covlvl_info_tab(l_cp_idx).price);
2138: IF (l_debug = 'Y') THEN
2139: okc_util.print_trace(3,'Unit price = '||LTRIM(TO_CHAR(l_covlvl_info_tab(l_cp_idx).price_unit, '9G999G999G990D00')));
2140: okc_util.print_trace(3,'Start date = '||l_covlvl_info_tab(l_cp_idx).start_date);
2141: okc_util.print_trace(3,'End date = '||l_covlvl_info_tab(l_cp_idx).end_date);
2135: okc_util.print_trace(3,'Currency code = '||l_covlvl_info_tab(l_cp_idx).currency_code);
2136: END IF;
2137: --okc_util.print_trace(3,'Negoc. price = '||l_covlvl_info_tab(l_cp_idx).price);
2138: IF (l_debug = 'Y') THEN
2139: okc_util.print_trace(3,'Unit price = '||LTRIM(TO_CHAR(l_covlvl_info_tab(l_cp_idx).price_unit, '9G999G999G990D00')));
2140: okc_util.print_trace(3,'Start date = '||l_covlvl_info_tab(l_cp_idx).start_date);
2141: okc_util.print_trace(3,'End date = '||l_covlvl_info_tab(l_cp_idx).end_date);
2142: okc_util.print_trace(3,'SVC duration = '||l_covlvl_info_tab(l_cp_idx).svc_duration);
2143: okc_util.print_trace(3,'SVC period = '||l_covlvl_info_tab(l_cp_idx).svc_period);
2136: END IF;
2137: --okc_util.print_trace(3,'Negoc. price = '||l_covlvl_info_tab(l_cp_idx).price);
2138: IF (l_debug = 'Y') THEN
2139: okc_util.print_trace(3,'Unit price = '||LTRIM(TO_CHAR(l_covlvl_info_tab(l_cp_idx).price_unit, '9G999G999G990D00')));
2140: okc_util.print_trace(3,'Start date = '||l_covlvl_info_tab(l_cp_idx).start_date);
2141: okc_util.print_trace(3,'End date = '||l_covlvl_info_tab(l_cp_idx).end_date);
2142: okc_util.print_trace(3,'SVC duration = '||l_covlvl_info_tab(l_cp_idx).svc_duration);
2143: okc_util.print_trace(3,'SVC period = '||l_covlvl_info_tab(l_cp_idx).svc_period);
2144: okc_util.print_trace(3,' ');
2137: --okc_util.print_trace(3,'Negoc. price = '||l_covlvl_info_tab(l_cp_idx).price);
2138: IF (l_debug = 'Y') THEN
2139: okc_util.print_trace(3,'Unit price = '||LTRIM(TO_CHAR(l_covlvl_info_tab(l_cp_idx).price_unit, '9G999G999G990D00')));
2140: okc_util.print_trace(3,'Start date = '||l_covlvl_info_tab(l_cp_idx).start_date);
2141: okc_util.print_trace(3,'End date = '||l_covlvl_info_tab(l_cp_idx).end_date);
2142: okc_util.print_trace(3,'SVC duration = '||l_covlvl_info_tab(l_cp_idx).svc_duration);
2143: okc_util.print_trace(3,'SVC period = '||l_covlvl_info_tab(l_cp_idx).svc_period);
2144: okc_util.print_trace(3,' ');
2145: END IF;
2138: IF (l_debug = 'Y') THEN
2139: okc_util.print_trace(3,'Unit price = '||LTRIM(TO_CHAR(l_covlvl_info_tab(l_cp_idx).price_unit, '9G999G999G990D00')));
2140: okc_util.print_trace(3,'Start date = '||l_covlvl_info_tab(l_cp_idx).start_date);
2141: okc_util.print_trace(3,'End date = '||l_covlvl_info_tab(l_cp_idx).end_date);
2142: okc_util.print_trace(3,'SVC duration = '||l_covlvl_info_tab(l_cp_idx).svc_duration);
2143: okc_util.print_trace(3,'SVC period = '||l_covlvl_info_tab(l_cp_idx).svc_period);
2144: okc_util.print_trace(3,' ');
2145: END IF;
2146: END LOOP;
2139: okc_util.print_trace(3,'Unit price = '||LTRIM(TO_CHAR(l_covlvl_info_tab(l_cp_idx).price_unit, '9G999G999G990D00')));
2140: okc_util.print_trace(3,'Start date = '||l_covlvl_info_tab(l_cp_idx).start_date);
2141: okc_util.print_trace(3,'End date = '||l_covlvl_info_tab(l_cp_idx).end_date);
2142: okc_util.print_trace(3,'SVC duration = '||l_covlvl_info_tab(l_cp_idx).svc_duration);
2143: okc_util.print_trace(3,'SVC period = '||l_covlvl_info_tab(l_cp_idx).svc_period);
2144: okc_util.print_trace(3,' ');
2145: END IF;
2146: END LOOP;
2147:
2140: okc_util.print_trace(3,'Start date = '||l_covlvl_info_tab(l_cp_idx).start_date);
2141: okc_util.print_trace(3,'End date = '||l_covlvl_info_tab(l_cp_idx).end_date);
2142: okc_util.print_trace(3,'SVC duration = '||l_covlvl_info_tab(l_cp_idx).svc_duration);
2143: okc_util.print_trace(3,'SVC period = '||l_covlvl_info_tab(l_cp_idx).svc_period);
2144: okc_util.print_trace(3,' ');
2145: END IF;
2146: END LOOP;
2147:
2148: ELSE -- IF is_top_line_orderable_i(r_cle ...) THEN
2155: x_msg_data := fnd_msg_pub.get( p_msg_index => i,
2156: p_encoded => 'F'
2157: );
2158: IF (l_debug = 'Y') THEN
2159: okc_util.print_trace(2, '==EXCEPTION=================');
2160: okc_util.print_trace(2, 'Message : '||x_msg_data);
2161: okc_util.print_trace(2, '============================');
2162: END IF;
2163: END LOOP;
2156: p_encoded => 'F'
2157: );
2158: IF (l_debug = 'Y') THEN
2159: okc_util.print_trace(2, '==EXCEPTION=================');
2160: okc_util.print_trace(2, 'Message : '||x_msg_data);
2161: okc_util.print_trace(2, '============================');
2162: END IF;
2163: END LOOP;
2164: END IF;
2157: );
2158: IF (l_debug = 'Y') THEN
2159: okc_util.print_trace(2, '==EXCEPTION=================');
2160: okc_util.print_trace(2, 'Message : '||x_msg_data);
2161: okc_util.print_trace(2, '============================');
2162: END IF;
2163: END LOOP;
2164: END IF;
2165:
2216: l_line_info_tab(l_idx).item_name := l_item_name;
2217: l_line_info_tab(l_idx).customer_order_enabled_flag := l_customer_order_enabled_flag;
2218:
2219: IF (l_debug = 'Y') THEN
2220: okc_util.print_trace(2,'============================');
2221: okc_util.print_trace(2,'Contract line idx - II = '||l_idx);
2222: okc_util.print_trace(2,'============================');
2223: END IF;
2224:
2217: l_line_info_tab(l_idx).customer_order_enabled_flag := l_customer_order_enabled_flag;
2218:
2219: IF (l_debug = 'Y') THEN
2220: okc_util.print_trace(2,'============================');
2221: okc_util.print_trace(2,'Contract line idx - II = '||l_idx);
2222: okc_util.print_trace(2,'============================');
2223: END IF;
2224:
2225: IF (l_debug = 'Y') THEN
2218:
2219: IF (l_debug = 'Y') THEN
2220: okc_util.print_trace(2,'============================');
2221: okc_util.print_trace(2,'Contract line idx - II = '||l_idx);
2222: okc_util.print_trace(2,'============================');
2223: END IF;
2224:
2225: IF (l_debug = 'Y') THEN
2226: okc_util.print_trace(2,'--------------');
2222: okc_util.print_trace(2,'============================');
2223: END IF;
2224:
2225: IF (l_debug = 'Y') THEN
2226: okc_util.print_trace(2,'--------------');
2227: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
2228: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
2229: okc_util.print_trace(2,'--------------');
2230: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
2223: END IF;
2224:
2225: IF (l_debug = 'Y') THEN
2226: okc_util.print_trace(2,'--------------');
2227: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
2228: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
2229: okc_util.print_trace(2,'--------------');
2230: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
2231: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
2224:
2225: IF (l_debug = 'Y') THEN
2226: okc_util.print_trace(2,'--------------');
2227: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
2228: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
2229: okc_util.print_trace(2,'--------------');
2230: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
2231: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
2232: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
2225: IF (l_debug = 'Y') THEN
2226: okc_util.print_trace(2,'--------------');
2227: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
2228: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
2229: okc_util.print_trace(2,'--------------');
2230: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
2231: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
2232: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
2233: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
2226: okc_util.print_trace(2,'--------------');
2227: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
2228: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
2229: okc_util.print_trace(2,'--------------');
2230: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
2231: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
2232: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
2233: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
2234: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
2227: okc_util.print_trace(2,'> Line_id = '||l_line_info_tab(l_idx).line_id);
2228: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
2229: okc_util.print_trace(2,'--------------');
2230: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
2231: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
2232: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
2233: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
2234: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
2235: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
2228: okc_util.print_trace(2,'Line NUMBER = '||l_line_info_tab(l_idx).line_number);
2229: okc_util.print_trace(2,'--------------');
2230: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
2231: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
2232: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
2233: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
2234: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
2235: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
2236: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
2229: okc_util.print_trace(2,'--------------');
2230: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
2231: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
2232: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
2233: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
2234: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
2235: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
2236: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
2237: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
2230: okc_util.print_trace(2,'Line style = '||l_line_info_tab(l_idx).line_style);
2231: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
2232: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
2233: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
2234: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
2235: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
2236: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
2237: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
2238: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
2231: okc_util.print_trace(2,'Line type = '||l_line_info_tab(l_idx).line_type);
2232: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
2233: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
2234: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
2235: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
2236: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
2237: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
2238: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
2239: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
2232: okc_util.print_trace(2,'Line source code = '||l_line_info_tab(l_idx).line_source_code);
2233: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
2234: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
2235: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
2236: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
2237: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
2238: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
2239: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
2240: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
2233: okc_util.print_trace(2,'Line source table = '||l_line_info_tab(l_idx).line_source_table);
2234: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
2235: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
2236: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
2237: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
2238: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
2239: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
2240: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
2241: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
2234: okc_util.print_trace(2,'Item source code = '||l_line_info_tab(l_idx).item_source_code);
2235: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
2236: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
2237: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
2238: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
2239: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
2240: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
2241: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
2242: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
2235: okc_util.print_trace(2,'Item source table = '||l_line_info_tab(l_idx).item_source_table);
2236: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
2237: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
2238: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
2239: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
2240: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
2241: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
2242: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
2243: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
2236: okc_util.print_trace(2,'Item id1 = '||l_line_info_tab(l_idx).object_id1);
2237: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
2238: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
2239: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
2240: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
2241: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
2242: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
2243: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
2244: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
2237: okc_util.print_trace(2,'Item id2 = '||l_line_info_tab(l_idx).object_id2);
2238: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
2239: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
2240: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
2241: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
2242: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
2243: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
2244: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
2245: END IF;
2238: okc_util.print_trace(2,'Item name = '||l_line_info_tab(l_idx).item_name);
2239: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
2240: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
2241: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
2242: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
2243: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
2244: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
2245: END IF;
2246: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
2239: okc_util.print_trace(2,'Item Orderable = '||l_line_info_tab(l_idx).customer_order_enabled_flag);
2240: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
2241: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
2242: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
2243: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
2244: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
2245: END IF;
2246: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
2247: IF (l_debug = 'Y') THEN
2240: okc_util.print_trace(2,'Item Priced = '||l_line_info_tab(l_idx).priced_item_yn);
2241: okc_util.print_trace(2,'Quantity = '||l_line_info_tab(l_idx).qty);
2242: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
2243: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
2244: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
2245: END IF;
2246: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
2247: IF (l_debug = 'Y') THEN
2248: okc_util.print_trace(2,'Start date = '||l_line_info_tab(l_idx).start_date);
2242: okc_util.print_trace(2,'UOM = '||l_line_info_tab(l_idx).uom_code);
2243: okc_util.print_trace(2,'Currency code = '||l_line_info_tab(l_idx).currency_code);
2244: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
2245: END IF;
2246: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
2247: IF (l_debug = 'Y') THEN
2248: okc_util.print_trace(2,'Start date = '||l_line_info_tab(l_idx).start_date);
2249: okc_util.print_trace(2,'End date = '||l_line_info_tab(l_idx).end_date);
2250: END IF;
2244: okc_util.print_trace(2,'Unit price = '||LTRIM(TO_CHAR(l_line_info_tab(l_idx).price_unit, '9G999G999G990D00')));
2245: END IF;
2246: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
2247: IF (l_debug = 'Y') THEN
2248: okc_util.print_trace(2,'Start date = '||l_line_info_tab(l_idx).start_date);
2249: okc_util.print_trace(2,'End date = '||l_line_info_tab(l_idx).end_date);
2250: END IF;
2251:
2252: IF (l_debug = 'Y') THEN
2245: END IF;
2246: --okc_util.print_trace(2,'Negot. price = '||l_line_info_tab(l_idx).price);
2247: IF (l_debug = 'Y') THEN
2248: okc_util.print_trace(2,'Start date = '||l_line_info_tab(l_idx).start_date);
2249: okc_util.print_trace(2,'End date = '||l_line_info_tab(l_idx).end_date);
2250: END IF;
2251:
2252: IF (l_debug = 'Y') THEN
2253: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
2249: okc_util.print_trace(2,'End date = '||l_line_info_tab(l_idx).end_date);
2250: END IF;
2251:
2252: IF (l_debug = 'Y') THEN
2253: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
2254: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
2255: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
2256: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
2257: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
2250: END IF;
2251:
2252: IF (l_debug = 'Y') THEN
2253: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
2254: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
2255: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
2256: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
2257: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
2258: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
2251:
2252: IF (l_debug = 'Y') THEN
2253: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
2254: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
2255: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
2256: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
2257: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
2258: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
2259: okc_util.print_trace(2,'Config item type = '||l_line_info_tab(l_idx).end_date);
2252: IF (l_debug = 'Y') THEN
2253: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
2254: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
2255: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
2256: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
2257: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
2258: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
2259: okc_util.print_trace(2,'Config item type = '||l_line_info_tab(l_idx).end_date);
2260: END IF;
2253: okc_util.print_trace(2,'Config header id = '||l_line_info_tab(l_idx).config_header_id);
2254: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
2255: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
2256: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
2257: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
2258: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
2259: okc_util.print_trace(2,'Config item type = '||l_line_info_tab(l_idx).end_date);
2260: END IF;
2261:
2254: okc_util.print_trace(2,'config rev Num = '||l_line_info_tab(l_idx).config_revision_number);
2255: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
2256: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
2257: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
2258: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
2259: okc_util.print_trace(2,'Config item type = '||l_line_info_tab(l_idx).end_date);
2260: END IF;
2261:
2262: IF (l_debug = 'Y') THEN
2255: okc_util.print_trace(2,'Config item id = '||l_line_info_tab(l_idx).config_item_id);
2256: okc_util.print_trace(2,'Config complet yn = '||l_line_info_tab(l_idx).config_complete_yn);
2257: okc_util.print_trace(2,'Config valid yn = '||l_line_info_tab(l_idx).config_valid_yn);
2258: okc_util.print_trace(2,'Component code = '||l_line_info_tab(l_idx).component_code);
2259: okc_util.print_trace(2,'Config item type = '||l_line_info_tab(l_idx).end_date);
2260: END IF;
2261:
2262: IF (l_debug = 'Y') THEN
2263: okc_util.print_trace(2,'============================');
2259: okc_util.print_trace(2,'Config item type = '||l_line_info_tab(l_idx).end_date);
2260: END IF;
2261:
2262: IF (l_debug = 'Y') THEN
2263: okc_util.print_trace(2,'============================');
2264: okc_util.print_trace(2,'Contract line idx - II = '||l_idx);
2265: okc_util.print_trace(2,'============================');
2266: END IF;
2267: --
2260: END IF;
2261:
2262: IF (l_debug = 'Y') THEN
2263: okc_util.print_trace(2,'============================');
2264: okc_util.print_trace(2,'Contract line idx - II = '||l_idx);
2265: okc_util.print_trace(2,'============================');
2266: END IF;
2267: --
2268: -- Check and populate the top lines rules table
2261:
2262: IF (l_debug = 'Y') THEN
2263: okc_util.print_trace(2,'============================');
2264: okc_util.print_trace(2,'Contract line idx - II = '||l_idx);
2265: okc_util.print_trace(2,'============================');
2266: END IF;
2267: --
2268: -- Check and populate the top lines rules table
2269: --
2268: -- Check and populate the top lines rules table
2269: --
2270:
2271: IF (l_debug = 'Y') THEN
2272: okc_util.print_trace(3,'==================================');
2273: okc_util.print_trace(3,'Retrieving the rules at line level - II');
2274: okc_util.print_trace(3,'==================================');
2275: END IF;
2276:
2269: --
2270:
2271: IF (l_debug = 'Y') THEN
2272: okc_util.print_trace(3,'==================================');
2273: okc_util.print_trace(3,'Retrieving the rules at line level - II');
2274: okc_util.print_trace(3,'==================================');
2275: END IF;
2276:
2277: build_k_rules( p_chr_id => p_chr_id,
2270:
2271: IF (l_debug = 'Y') THEN
2272: okc_util.print_trace(3,'==================================');
2273: okc_util.print_trace(3,'Retrieving the rules at line level - II');
2274: okc_util.print_trace(3,'==================================');
2275: END IF;
2276:
2277: build_k_rules( p_chr_id => p_chr_id,
2278: p_cle_id => l_line_info_tab(l_idx).line_id,
2301: raise e_exit;
2302: END IF;
2303:
2304: IF (l_debug = 'Y') THEN
2305: okc_util.print_trace(3,'=================================================');
2306: okc_util.print_trace(3,'Completed retrieving the rules at line level - II');
2307: okc_util.print_trace(3,'=================================================');
2308: END IF;
2309:
2302: END IF;
2303:
2304: IF (l_debug = 'Y') THEN
2305: okc_util.print_trace(3,'=================================================');
2306: okc_util.print_trace(3,'Completed retrieving the rules at line level - II');
2307: okc_util.print_trace(3,'=================================================');
2308: END IF;
2309:
2310:
2303:
2304: IF (l_debug = 'Y') THEN
2305: okc_util.print_trace(3,'=================================================');
2306: okc_util.print_trace(3,'Completed retrieving the rules at line level - II');
2307: okc_util.print_trace(3,'=================================================');
2308: END IF;
2309:
2310:
2311: ELSE -- IF is_top_line_orderable_i(r_cle ...) THEN
2317: x_msg_data := fnd_msg_pub.get( p_msg_index => i,
2318: p_encoded => 'F'
2319: );
2320: IF (l_debug = 'Y') THEN
2321: okc_util.print_trace(2, '==EXCEPTION=================');
2322: okc_util.print_trace(2, 'Message : '||x_msg_data);
2323: okc_util.print_trace(2, '============================');
2324: END IF;
2325: END LOOP;
2318: p_encoded => 'F'
2319: );
2320: IF (l_debug = 'Y') THEN
2321: okc_util.print_trace(2, '==EXCEPTION=================');
2322: okc_util.print_trace(2, 'Message : '||x_msg_data);
2323: okc_util.print_trace(2, '============================');
2324: END IF;
2325: END LOOP;
2326:
2319: );
2320: IF (l_debug = 'Y') THEN
2321: okc_util.print_trace(2, '==EXCEPTION=================');
2322: okc_util.print_trace(2, 'Message : '||x_msg_data);
2323: okc_util.print_trace(2, '============================');
2324: END IF;
2325: END LOOP;
2326:
2327: --
2418: --
2419:
2420: IF l_lines = 0 THEN
2421: IF (l_debug = 'Y') THEN
2422: okc_util.print_trace(3, ' ');
2423: okc_util.print_trace(3, '******************************************************************');
2424: okc_util.print_trace(4, 'NO lines');
2425: okc_util.print_trace(3, '******************************************************************');
2426: END IF;
2419:
2420: IF l_lines = 0 THEN
2421: IF (l_debug = 'Y') THEN
2422: okc_util.print_trace(3, ' ');
2423: okc_util.print_trace(3, '******************************************************************');
2424: okc_util.print_trace(4, 'NO lines');
2425: okc_util.print_trace(3, '******************************************************************');
2426: END IF;
2427: okc_api.set_message(G_APP_NAME1,
2420: IF l_lines = 0 THEN
2421: IF (l_debug = 'Y') THEN
2422: okc_util.print_trace(3, ' ');
2423: okc_util.print_trace(3, '******************************************************************');
2424: okc_util.print_trace(4, 'NO lines');
2425: okc_util.print_trace(3, '******************************************************************');
2426: END IF;
2427: okc_api.set_message(G_APP_NAME1,
2428: 'OKO_K2Q_NOLINESFORUPDT',
2421: IF (l_debug = 'Y') THEN
2422: okc_util.print_trace(3, ' ');
2423: okc_util.print_trace(3, '******************************************************************');
2424: okc_util.print_trace(4, 'NO lines');
2425: okc_util.print_trace(3, '******************************************************************');
2426: END IF;
2427: okc_api.set_message(G_APP_NAME1,
2428: 'OKO_K2Q_NOLINESFORUPDT',
2429: 'KNUMBER',
2433: RAISE e_exit;
2434: END IF;
2435: IF l_idx = 0 THEN
2436: IF (l_debug = 'Y') THEN
2437: okc_util.print_trace(3, ' ');
2438: okc_util.print_trace(3, '******************************************************************');
2439: okc_util.print_trace(4, 'NO orderable lines');
2440: okc_util.print_trace(3, '******************************************************************');
2441: END IF;
2434: END IF;
2435: IF l_idx = 0 THEN
2436: IF (l_debug = 'Y') THEN
2437: okc_util.print_trace(3, ' ');
2438: okc_util.print_trace(3, '******************************************************************');
2439: okc_util.print_trace(4, 'NO orderable lines');
2440: okc_util.print_trace(3, '******************************************************************');
2441: END IF;
2442: okc_api.set_message(G_APP_NAME1,
2435: IF l_idx = 0 THEN
2436: IF (l_debug = 'Y') THEN
2437: okc_util.print_trace(3, ' ');
2438: okc_util.print_trace(3, '******************************************************************');
2439: okc_util.print_trace(4, 'NO orderable lines');
2440: okc_util.print_trace(3, '******************************************************************');
2441: END IF;
2442: okc_api.set_message(G_APP_NAME1,
2443: 'OKO_K2Q_NOORDLNFORUPDT',
2436: IF (l_debug = 'Y') THEN
2437: okc_util.print_trace(3, ' ');
2438: okc_util.print_trace(3, '******************************************************************');
2439: okc_util.print_trace(4, 'NO orderable lines');
2440: okc_util.print_trace(3, '******************************************************************');
2441: END IF;
2442: okc_api.set_message(G_APP_NAME1,
2443: 'OKO_K2Q_NOORDLNFORUPDT',
2444: 'KNUMBER',
2449: END IF;
2450:
2451: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2452: IF (l_debug = 'Y') THEN
2453: okc_util.print_trace(1, '
2455: EXCEPTION
2456: WHEN e_exit THEN
2457: IF c_chr%ISOPEN THEN
2577:
2578: BEGIN
2579:
2580: IF (l_debug = 'Y') THEN
2581: okc_util.print_trace(1, ' ');
2582: okc_util.print_trace(1, '>START - OKC_OC_INT_KTQ_PVT.BUILD_QTE_HDR - Get quote header information');
2583: END IF;
2584:
2585: px_qte_hdr_rec.org_id := l_chr.authoring_org_id;
2578: BEGIN
2579:
2580: IF (l_debug = 'Y') THEN
2581: okc_util.print_trace(1, ' ');
2582: okc_util.print_trace(1, '>START - OKC_OC_INT_KTQ_PVT.BUILD_QTE_HDR - Get quote header information');
2583: END IF;
2584:
2585: px_qte_hdr_rec.org_id := l_chr.authoring_org_id;
2586: px_qte_hdr_rec.currency_code := l_chr.currency_code; -- add back in when available
2719: END IF;
2720: CLOSE c_chr;
2721:
2722: IF (l_debug = 'Y') THEN
2723: okc_util.print_trace(1, ' ');
2724: okc_util.print_trace(1, 'INPUT RECORD FOR QUOTE UPDATION - Quote Header:');
2725: okc_util.print_trace(1, '===============================================');
2726: okc_util.print_trace(2, 'Org_id = '||px_qte_hdr_rec.org_id);
2727: okc_util.print_trace(2, 'Original syst ref (contract num) = '||px_qte_hdr_rec.original_system_reference);
2720: CLOSE c_chr;
2721:
2722: IF (l_debug = 'Y') THEN
2723: okc_util.print_trace(1, ' ');
2724: okc_util.print_trace(1, 'INPUT RECORD FOR QUOTE UPDATION - Quote Header:');
2725: okc_util.print_trace(1, '===============================================');
2726: okc_util.print_trace(2, 'Org_id = '||px_qte_hdr_rec.org_id);
2727: okc_util.print_trace(2, 'Original syst ref (contract num) = '||px_qte_hdr_rec.original_system_reference);
2728: okc_util.print_trace(2, 'Quote name = '||px_qte_hdr_rec.quote_name);
2721:
2722: IF (l_debug = 'Y') THEN
2723: okc_util.print_trace(1, ' ');
2724: okc_util.print_trace(1, 'INPUT RECORD FOR QUOTE UPDATION - Quote Header:');
2725: okc_util.print_trace(1, '===============================================');
2726: okc_util.print_trace(2, 'Org_id = '||px_qte_hdr_rec.org_id);
2727: okc_util.print_trace(2, 'Original syst ref (contract num) = '||px_qte_hdr_rec.original_system_reference);
2728: okc_util.print_trace(2, 'Quote name = '||px_qte_hdr_rec.quote_name);
2729: okc_util.print_trace(2, 'Quote version = '||px_qte_hdr_rec.quote_version);
2722: IF (l_debug = 'Y') THEN
2723: okc_util.print_trace(1, ' ');
2724: okc_util.print_trace(1, 'INPUT RECORD FOR QUOTE UPDATION - Quote Header:');
2725: okc_util.print_trace(1, '===============================================');
2726: okc_util.print_trace(2, 'Org_id = '||px_qte_hdr_rec.org_id);
2727: okc_util.print_trace(2, 'Original syst ref (contract num) = '||px_qte_hdr_rec.original_system_reference);
2728: okc_util.print_trace(2, 'Quote name = '||px_qte_hdr_rec.quote_name);
2729: okc_util.print_trace(2, 'Quote version = '||px_qte_hdr_rec.quote_version);
2730: okc_util.print_trace(2, 'Quote source code = '||px_qte_hdr_rec.quote_source_code);
2723: okc_util.print_trace(1, ' ');
2724: okc_util.print_trace(1, 'INPUT RECORD FOR QUOTE UPDATION - Quote Header:');
2725: okc_util.print_trace(1, '===============================================');
2726: okc_util.print_trace(2, 'Org_id = '||px_qte_hdr_rec.org_id);
2727: okc_util.print_trace(2, 'Original syst ref (contract num) = '||px_qte_hdr_rec.original_system_reference);
2728: okc_util.print_trace(2, 'Quote name = '||px_qte_hdr_rec.quote_name);
2729: okc_util.print_trace(2, 'Quote version = '||px_qte_hdr_rec.quote_version);
2730: okc_util.print_trace(2, 'Quote source code = '||px_qte_hdr_rec.quote_source_code);
2731: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(px_qte_hdr_rec.quote_category_code)));
2724: okc_util.print_trace(1, 'INPUT RECORD FOR QUOTE UPDATION - Quote Header:');
2725: okc_util.print_trace(1, '===============================================');
2726: okc_util.print_trace(2, 'Org_id = '||px_qte_hdr_rec.org_id);
2727: okc_util.print_trace(2, 'Original syst ref (contract num) = '||px_qte_hdr_rec.original_system_reference);
2728: okc_util.print_trace(2, 'Quote name = '||px_qte_hdr_rec.quote_name);
2729: okc_util.print_trace(2, 'Quote version = '||px_qte_hdr_rec.quote_version);
2730: okc_util.print_trace(2, 'Quote source code = '||px_qte_hdr_rec.quote_source_code);
2731: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(px_qte_hdr_rec.quote_category_code)));
2732: okc_util.print_trace(2, 'Quote expiration date= '||px_qte_hdr_rec.quote_expiration_date);
2725: okc_util.print_trace(1, '===============================================');
2726: okc_util.print_trace(2, 'Org_id = '||px_qte_hdr_rec.org_id);
2727: okc_util.print_trace(2, 'Original syst ref (contract num) = '||px_qte_hdr_rec.original_system_reference);
2728: okc_util.print_trace(2, 'Quote name = '||px_qte_hdr_rec.quote_name);
2729: okc_util.print_trace(2, 'Quote version = '||px_qte_hdr_rec.quote_version);
2730: okc_util.print_trace(2, 'Quote source code = '||px_qte_hdr_rec.quote_source_code);
2731: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(px_qte_hdr_rec.quote_category_code)));
2732: okc_util.print_trace(2, 'Quote expiration date= '||px_qte_hdr_rec.quote_expiration_date);
2733: okc_util.print_trace(2, 'Party_id = '||px_qte_hdr_rec.party_id);
2726: okc_util.print_trace(2, 'Org_id = '||px_qte_hdr_rec.org_id);
2727: okc_util.print_trace(2, 'Original syst ref (contract num) = '||px_qte_hdr_rec.original_system_reference);
2728: okc_util.print_trace(2, 'Quote name = '||px_qte_hdr_rec.quote_name);
2729: okc_util.print_trace(2, 'Quote version = '||px_qte_hdr_rec.quote_version);
2730: okc_util.print_trace(2, 'Quote source code = '||px_qte_hdr_rec.quote_source_code);
2731: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(px_qte_hdr_rec.quote_category_code)));
2732: okc_util.print_trace(2, 'Quote expiration date= '||px_qte_hdr_rec.quote_expiration_date);
2733: okc_util.print_trace(2, 'Party_id = '||px_qte_hdr_rec.party_id);
2734: okc_util.print_trace(2, 'Cust Acct Id = '||px_qte_hdr_rec.cust_account_id);
2727: okc_util.print_trace(2, 'Original syst ref (contract num) = '||px_qte_hdr_rec.original_system_reference);
2728: okc_util.print_trace(2, 'Quote name = '||px_qte_hdr_rec.quote_name);
2729: okc_util.print_trace(2, 'Quote version = '||px_qte_hdr_rec.quote_version);
2730: okc_util.print_trace(2, 'Quote source code = '||px_qte_hdr_rec.quote_source_code);
2731: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(px_qte_hdr_rec.quote_category_code)));
2732: okc_util.print_trace(2, 'Quote expiration date= '||px_qte_hdr_rec.quote_expiration_date);
2733: okc_util.print_trace(2, 'Party_id = '||px_qte_hdr_rec.party_id);
2734: okc_util.print_trace(2, 'Cust Acct Id = '||px_qte_hdr_rec.cust_account_id);
2735: okc_util.print_trace(2, 'Price List Id = '||px_qte_hdr_rec.price_list_id);
2728: okc_util.print_trace(2, 'Quote name = '||px_qte_hdr_rec.quote_name);
2729: okc_util.print_trace(2, 'Quote version = '||px_qte_hdr_rec.quote_version);
2730: okc_util.print_trace(2, 'Quote source code = '||px_qte_hdr_rec.quote_source_code);
2731: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(px_qte_hdr_rec.quote_category_code)));
2732: okc_util.print_trace(2, 'Quote expiration date= '||px_qte_hdr_rec.quote_expiration_date);
2733: okc_util.print_trace(2, 'Party_id = '||px_qte_hdr_rec.party_id);
2734: okc_util.print_trace(2, 'Cust Acct Id = '||px_qte_hdr_rec.cust_account_id);
2735: okc_util.print_trace(2, 'Price List Id = '||px_qte_hdr_rec.price_list_id);
2736: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_hdr_rec.invoicing_rule_id);
2729: okc_util.print_trace(2, 'Quote version = '||px_qte_hdr_rec.quote_version);
2730: okc_util.print_trace(2, 'Quote source code = '||px_qte_hdr_rec.quote_source_code);
2731: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(px_qte_hdr_rec.quote_category_code)));
2732: okc_util.print_trace(2, 'Quote expiration date= '||px_qte_hdr_rec.quote_expiration_date);
2733: okc_util.print_trace(2, 'Party_id = '||px_qte_hdr_rec.party_id);
2734: okc_util.print_trace(2, 'Cust Acct Id = '||px_qte_hdr_rec.cust_account_id);
2735: okc_util.print_trace(2, 'Price List Id = '||px_qte_hdr_rec.price_list_id);
2736: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_hdr_rec.invoicing_rule_id);
2737: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_hdr_rec.invoice_to_party_id);
2730: okc_util.print_trace(2, 'Quote source code = '||px_qte_hdr_rec.quote_source_code);
2731: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(px_qte_hdr_rec.quote_category_code)));
2732: okc_util.print_trace(2, 'Quote expiration date= '||px_qte_hdr_rec.quote_expiration_date);
2733: okc_util.print_trace(2, 'Party_id = '||px_qte_hdr_rec.party_id);
2734: okc_util.print_trace(2, 'Cust Acct Id = '||px_qte_hdr_rec.cust_account_id);
2735: okc_util.print_trace(2, 'Price List Id = '||px_qte_hdr_rec.price_list_id);
2736: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_hdr_rec.invoicing_rule_id);
2737: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_hdr_rec.invoice_to_party_id);
2738: okc_util.print_trace(2, 'Inv To Party Site Id = '||px_qte_hdr_rec.invoice_to_party_site_id);
2731: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(px_qte_hdr_rec.quote_category_code)));
2732: okc_util.print_trace(2, 'Quote expiration date= '||px_qte_hdr_rec.quote_expiration_date);
2733: okc_util.print_trace(2, 'Party_id = '||px_qte_hdr_rec.party_id);
2734: okc_util.print_trace(2, 'Cust Acct Id = '||px_qte_hdr_rec.cust_account_id);
2735: okc_util.print_trace(2, 'Price List Id = '||px_qte_hdr_rec.price_list_id);
2736: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_hdr_rec.invoicing_rule_id);
2737: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_hdr_rec.invoice_to_party_id);
2738: okc_util.print_trace(2, 'Inv To Party Site Id = '||px_qte_hdr_rec.invoice_to_party_site_id);
2739: END IF;
2732: okc_util.print_trace(2, 'Quote expiration date= '||px_qte_hdr_rec.quote_expiration_date);
2733: okc_util.print_trace(2, 'Party_id = '||px_qte_hdr_rec.party_id);
2734: okc_util.print_trace(2, 'Cust Acct Id = '||px_qte_hdr_rec.cust_account_id);
2735: okc_util.print_trace(2, 'Price List Id = '||px_qte_hdr_rec.price_list_id);
2736: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_hdr_rec.invoicing_rule_id);
2737: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_hdr_rec.invoice_to_party_id);
2738: okc_util.print_trace(2, 'Inv To Party Site Id = '||px_qte_hdr_rec.invoice_to_party_site_id);
2739: END IF;
2740: --okc_util.print_trace(2, 'Ship To Party Id = '||px_hd_shipment_rec.ship_to_party_id);
2733: okc_util.print_trace(2, 'Party_id = '||px_qte_hdr_rec.party_id);
2734: okc_util.print_trace(2, 'Cust Acct Id = '||px_qte_hdr_rec.cust_account_id);
2735: okc_util.print_trace(2, 'Price List Id = '||px_qte_hdr_rec.price_list_id);
2736: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_hdr_rec.invoicing_rule_id);
2737: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_hdr_rec.invoice_to_party_id);
2738: okc_util.print_trace(2, 'Inv To Party Site Id = '||px_qte_hdr_rec.invoice_to_party_site_id);
2739: END IF;
2740: --okc_util.print_trace(2, 'Ship To Party Id = '||px_hd_shipment_rec.ship_to_party_id);
2741: --okc_util.print_trace(2, 'Ship To Party Site Id= '||px_hd_shipment_rec.ship_to_party_site_id);
2734: okc_util.print_trace(2, 'Cust Acct Id = '||px_qte_hdr_rec.cust_account_id);
2735: okc_util.print_trace(2, 'Price List Id = '||px_qte_hdr_rec.price_list_id);
2736: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_hdr_rec.invoicing_rule_id);
2737: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_hdr_rec.invoice_to_party_id);
2738: okc_util.print_trace(2, 'Inv To Party Site Id = '||px_qte_hdr_rec.invoice_to_party_site_id);
2739: END IF;
2740: --okc_util.print_trace(2, 'Ship To Party Id = '||px_hd_shipment_rec.ship_to_party_id);
2741: --okc_util.print_trace(2, 'Ship To Party Site Id= '||px_hd_shipment_rec.ship_to_party_site_id);
2742: IF (l_debug = 'Y') THEN
2736: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_hdr_rec.invoicing_rule_id);
2737: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_hdr_rec.invoice_to_party_id);
2738: okc_util.print_trace(2, 'Inv To Party Site Id = '||px_qte_hdr_rec.invoice_to_party_site_id);
2739: END IF;
2740: --okc_util.print_trace(2, 'Ship To Party Id = '||px_hd_shipment_rec.ship_to_party_id);
2741: --okc_util.print_trace(2, 'Ship To Party Site Id= '||px_hd_shipment_rec.ship_to_party_site_id);
2742: IF (l_debug = 'Y') THEN
2743: okc_util.print_trace(2, 'Currency code = '||px_qte_hdr_rec.currency_code);
2744: END IF;
2737: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_hdr_rec.invoice_to_party_id);
2738: okc_util.print_trace(2, 'Inv To Party Site Id = '||px_qte_hdr_rec.invoice_to_party_site_id);
2739: END IF;
2740: --okc_util.print_trace(2, 'Ship To Party Id = '||px_hd_shipment_rec.ship_to_party_id);
2741: --okc_util.print_trace(2, 'Ship To Party Site Id= '||px_hd_shipment_rec.ship_to_party_site_id);
2742: IF (l_debug = 'Y') THEN
2743: okc_util.print_trace(2, 'Currency code = '||px_qte_hdr_rec.currency_code);
2744: END IF;
2745: --okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_quote_price, '9G999G999G990D00')));
2739: END IF;
2740: --okc_util.print_trace(2, 'Ship To Party Id = '||px_hd_shipment_rec.ship_to_party_id);
2741: --okc_util.print_trace(2, 'Ship To Party Site Id= '||px_hd_shipment_rec.ship_to_party_site_id);
2742: IF (l_debug = 'Y') THEN
2743: okc_util.print_trace(2, 'Currency code = '||px_qte_hdr_rec.currency_code);
2744: END IF;
2745: --okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_quote_price, '9G999G999G990D00')));
2746: IF (l_debug = 'Y') THEN
2747: okc_util.print_trace(2, 'Total list price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_list_price, '9G999G999G990D00')));
2741: --okc_util.print_trace(2, 'Ship To Party Site Id= '||px_hd_shipment_rec.ship_to_party_site_id);
2742: IF (l_debug = 'Y') THEN
2743: okc_util.print_trace(2, 'Currency code = '||px_qte_hdr_rec.currency_code);
2744: END IF;
2745: --okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_quote_price, '9G999G999G990D00')));
2746: IF (l_debug = 'Y') THEN
2747: okc_util.print_trace(2, 'Total list price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_list_price, '9G999G999G990D00')));
2748: okc_util.print_trace(2, 'Total adjusted amount= '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_adjusted_amount, '9G999G999G990D00')));
2749: okc_util.print_trace(2, 'Total adjusted amount= '||to_number(px_qte_hdr_rec.total_adjusted_amount));
2743: okc_util.print_trace(2, 'Currency code = '||px_qte_hdr_rec.currency_code);
2744: END IF;
2745: --okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_quote_price, '9G999G999G990D00')));
2746: IF (l_debug = 'Y') THEN
2747: okc_util.print_trace(2, 'Total list price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_list_price, '9G999G999G990D00')));
2748: okc_util.print_trace(2, 'Total adjusted amount= '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_adjusted_amount, '9G999G999G990D00')));
2749: okc_util.print_trace(2, 'Total adjusted amount= '||to_number(px_qte_hdr_rec.total_adjusted_amount));
2750: okc_util.print_trace(2, 'Exchange type code = '||px_qte_hdr_rec.exchange_type_code);
2751: okc_util.print_trace(2, 'Exchange rate = '||px_qte_hdr_rec.exchange_rate);
2744: END IF;
2745: --okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_quote_price, '9G999G999G990D00')));
2746: IF (l_debug = 'Y') THEN
2747: okc_util.print_trace(2, 'Total list price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_list_price, '9G999G999G990D00')));
2748: okc_util.print_trace(2, 'Total adjusted amount= '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_adjusted_amount, '9G999G999G990D00')));
2749: okc_util.print_trace(2, 'Total adjusted amount= '||to_number(px_qte_hdr_rec.total_adjusted_amount));
2750: okc_util.print_trace(2, 'Exchange type code = '||px_qte_hdr_rec.exchange_type_code);
2751: okc_util.print_trace(2, 'Exchange rate = '||px_qte_hdr_rec.exchange_rate);
2752: okc_util.print_trace(2, 'Exchange rate date = '||px_qte_hdr_rec.exchange_rate_date);
2745: --okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_quote_price, '9G999G999G990D00')));
2746: IF (l_debug = 'Y') THEN
2747: okc_util.print_trace(2, 'Total list price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_list_price, '9G999G999G990D00')));
2748: okc_util.print_trace(2, 'Total adjusted amount= '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_adjusted_amount, '9G999G999G990D00')));
2749: okc_util.print_trace(2, 'Total adjusted amount= '||to_number(px_qte_hdr_rec.total_adjusted_amount));
2750: okc_util.print_trace(2, 'Exchange type code = '||px_qte_hdr_rec.exchange_type_code);
2751: okc_util.print_trace(2, 'Exchange rate = '||px_qte_hdr_rec.exchange_rate);
2752: okc_util.print_trace(2, 'Exchange rate date = '||px_qte_hdr_rec.exchange_rate_date);
2753: okc_util.print_trace(2, '---------------------------------------');
2746: IF (l_debug = 'Y') THEN
2747: okc_util.print_trace(2, 'Total list price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_list_price, '9G999G999G990D00')));
2748: okc_util.print_trace(2, 'Total adjusted amount= '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_adjusted_amount, '9G999G999G990D00')));
2749: okc_util.print_trace(2, 'Total adjusted amount= '||to_number(px_qte_hdr_rec.total_adjusted_amount));
2750: okc_util.print_trace(2, 'Exchange type code = '||px_qte_hdr_rec.exchange_type_code);
2751: okc_util.print_trace(2, 'Exchange rate = '||px_qte_hdr_rec.exchange_rate);
2752: okc_util.print_trace(2, 'Exchange rate date = '||px_qte_hdr_rec.exchange_rate_date);
2753: okc_util.print_trace(2, '---------------------------------------');
2754: okc_util.print_trace(2, 'Quote header Id = '||px_qte_hdr_rec.quote_header_id);
2747: okc_util.print_trace(2, 'Total list price = '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_list_price, '9G999G999G990D00')));
2748: okc_util.print_trace(2, 'Total adjusted amount= '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_adjusted_amount, '9G999G999G990D00')));
2749: okc_util.print_trace(2, 'Total adjusted amount= '||to_number(px_qte_hdr_rec.total_adjusted_amount));
2750: okc_util.print_trace(2, 'Exchange type code = '||px_qte_hdr_rec.exchange_type_code);
2751: okc_util.print_trace(2, 'Exchange rate = '||px_qte_hdr_rec.exchange_rate);
2752: okc_util.print_trace(2, 'Exchange rate date = '||px_qte_hdr_rec.exchange_rate_date);
2753: okc_util.print_trace(2, '---------------------------------------');
2754: okc_util.print_trace(2, 'Quote header Id = '||px_qte_hdr_rec.quote_header_id);
2755: okc_util.print_trace(2, 'Quote NUMBER = '||px_qte_hdr_rec.quote_number);
2748: okc_util.print_trace(2, 'Total adjusted amount= '||LTRIM(TO_CHAR(px_qte_hdr_rec.total_adjusted_amount, '9G999G999G990D00')));
2749: okc_util.print_trace(2, 'Total adjusted amount= '||to_number(px_qte_hdr_rec.total_adjusted_amount));
2750: okc_util.print_trace(2, 'Exchange type code = '||px_qte_hdr_rec.exchange_type_code);
2751: okc_util.print_trace(2, 'Exchange rate = '||px_qte_hdr_rec.exchange_rate);
2752: okc_util.print_trace(2, 'Exchange rate date = '||px_qte_hdr_rec.exchange_rate_date);
2753: okc_util.print_trace(2, '---------------------------------------');
2754: okc_util.print_trace(2, 'Quote header Id = '||px_qte_hdr_rec.quote_header_id);
2755: okc_util.print_trace(2, 'Quote NUMBER = '||px_qte_hdr_rec.quote_number);
2756: okc_util.print_trace(2, 'Quote status Id = '||px_qte_hdr_rec.quote_status_id);
2749: okc_util.print_trace(2, 'Total adjusted amount= '||to_number(px_qte_hdr_rec.total_adjusted_amount));
2750: okc_util.print_trace(2, 'Exchange type code = '||px_qte_hdr_rec.exchange_type_code);
2751: okc_util.print_trace(2, 'Exchange rate = '||px_qte_hdr_rec.exchange_rate);
2752: okc_util.print_trace(2, 'Exchange rate date = '||px_qte_hdr_rec.exchange_rate_date);
2753: okc_util.print_trace(2, '---------------------------------------');
2754: okc_util.print_trace(2, 'Quote header Id = '||px_qte_hdr_rec.quote_header_id);
2755: okc_util.print_trace(2, 'Quote NUMBER = '||px_qte_hdr_rec.quote_number);
2756: okc_util.print_trace(2, 'Quote status Id = '||px_qte_hdr_rec.quote_status_id);
2757: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(px_qte_hdr_rec.quote_status_code)));
2750: okc_util.print_trace(2, 'Exchange type code = '||px_qte_hdr_rec.exchange_type_code);
2751: okc_util.print_trace(2, 'Exchange rate = '||px_qte_hdr_rec.exchange_rate);
2752: okc_util.print_trace(2, 'Exchange rate date = '||px_qte_hdr_rec.exchange_rate_date);
2753: okc_util.print_trace(2, '---------------------------------------');
2754: okc_util.print_trace(2, 'Quote header Id = '||px_qte_hdr_rec.quote_header_id);
2755: okc_util.print_trace(2, 'Quote NUMBER = '||px_qte_hdr_rec.quote_number);
2756: okc_util.print_trace(2, 'Quote status Id = '||px_qte_hdr_rec.quote_status_id);
2757: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(px_qte_hdr_rec.quote_status_code)));
2758: okc_util.print_trace(2, 'Quote status = '||ltrim(rtrim(px_qte_hdr_rec.quote_status)));
2751: okc_util.print_trace(2, 'Exchange rate = '||px_qte_hdr_rec.exchange_rate);
2752: okc_util.print_trace(2, 'Exchange rate date = '||px_qte_hdr_rec.exchange_rate_date);
2753: okc_util.print_trace(2, '---------------------------------------');
2754: okc_util.print_trace(2, 'Quote header Id = '||px_qte_hdr_rec.quote_header_id);
2755: okc_util.print_trace(2, 'Quote NUMBER = '||px_qte_hdr_rec.quote_number);
2756: okc_util.print_trace(2, 'Quote status Id = '||px_qte_hdr_rec.quote_status_id);
2757: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(px_qte_hdr_rec.quote_status_code)));
2758: okc_util.print_trace(2, 'Quote status = '||ltrim(rtrim(px_qte_hdr_rec.quote_status)));
2759: END IF;
2752: okc_util.print_trace(2, 'Exchange rate date = '||px_qte_hdr_rec.exchange_rate_date);
2753: okc_util.print_trace(2, '---------------------------------------');
2754: okc_util.print_trace(2, 'Quote header Id = '||px_qte_hdr_rec.quote_header_id);
2755: okc_util.print_trace(2, 'Quote NUMBER = '||px_qte_hdr_rec.quote_number);
2756: okc_util.print_trace(2, 'Quote status Id = '||px_qte_hdr_rec.quote_status_id);
2757: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(px_qte_hdr_rec.quote_status_code)));
2758: okc_util.print_trace(2, 'Quote status = '||ltrim(rtrim(px_qte_hdr_rec.quote_status)));
2759: END IF;
2760:
2753: okc_util.print_trace(2, '---------------------------------------');
2754: okc_util.print_trace(2, 'Quote header Id = '||px_qte_hdr_rec.quote_header_id);
2755: okc_util.print_trace(2, 'Quote NUMBER = '||px_qte_hdr_rec.quote_number);
2756: okc_util.print_trace(2, 'Quote status Id = '||px_qte_hdr_rec.quote_status_id);
2757: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(px_qte_hdr_rec.quote_status_code)));
2758: okc_util.print_trace(2, 'Quote status = '||ltrim(rtrim(px_qte_hdr_rec.quote_status)));
2759: END IF;
2760:
2761: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2754: okc_util.print_trace(2, 'Quote header Id = '||px_qte_hdr_rec.quote_header_id);
2755: okc_util.print_trace(2, 'Quote NUMBER = '||px_qte_hdr_rec.quote_number);
2756: okc_util.print_trace(2, 'Quote status Id = '||px_qte_hdr_rec.quote_status_id);
2757: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(px_qte_hdr_rec.quote_status_code)));
2758: okc_util.print_trace(2, 'Quote status = '||ltrim(rtrim(px_qte_hdr_rec.quote_status)));
2759: END IF;
2760:
2761: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2762: IF (l_debug = 'Y') THEN
2759: END IF;
2760:
2761: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2762: IF (l_debug = 'Y') THEN
2763: okc_util.print_trace(1, '
2765: EXCEPTION
2766: WHEN e_exit THEN
2767: -- nothing more to do
2870: WHERE quote_line_id = b_ql_id;
2871:
2872: BEGIN
2873: IF (l_debug = 'Y') THEN
2874: okc_util.print_trace(1, ' ');
2875: okc_util.print_trace(1, '>START - OKC_OC_INT_KTQ_PVT.BUILD_QTE_LINE - Get quote line AND quote detail line information');
2876: END IF;
2877:
2878: --
2871:
2872: BEGIN
2873: IF (l_debug = 'Y') THEN
2874: okc_util.print_trace(1, ' ');
2875: okc_util.print_trace(1, '>START - OKC_OC_INT_KTQ_PVT.BUILD_QTE_LINE - Get quote line AND quote detail line information');
2876: END IF;
2877:
2878: --
2879: -- housekeeping
2887: -- x_total_price := 0;
2888:
2889: IF l_line_info_tab.first is not NULL THEN
2890: IF (l_debug = 'Y') THEN
2891: okc_util.print_trace(2,'l_line_info_tab.count '||l_line_info_tab.count);
2892: END IF;
2893: FOR c IN 1..2 LOOP
2894: --
2895: -- need to ensure that license product lines are processed before
2906:
2907: IF l_continue THEN
2908:
2909: IF (l_debug = 'Y') THEN
2910: okc_util.print_trace(2, ' ');
2911: okc_util.print_trace(2, '-----------------------------');
2912: okc_util.print_trace(2, 'Contract line idx = '||i);
2913: okc_util.print_trace(2, 'Contract line NUMBER = '||l_line_info_tab(i).line_number);
2914: okc_util.print_trace(2, '-----------------------------');
2907: IF l_continue THEN
2908:
2909: IF (l_debug = 'Y') THEN
2910: okc_util.print_trace(2, ' ');
2911: okc_util.print_trace(2, '-----------------------------');
2912: okc_util.print_trace(2, 'Contract line idx = '||i);
2913: okc_util.print_trace(2, 'Contract line NUMBER = '||l_line_info_tab(i).line_number);
2914: okc_util.print_trace(2, '-----------------------------');
2915: END IF;
2908:
2909: IF (l_debug = 'Y') THEN
2910: okc_util.print_trace(2, ' ');
2911: okc_util.print_trace(2, '-----------------------------');
2912: okc_util.print_trace(2, 'Contract line idx = '||i);
2913: okc_util.print_trace(2, 'Contract line NUMBER = '||l_line_info_tab(i).line_number);
2914: okc_util.print_trace(2, '-----------------------------');
2915: END IF;
2916:
2909: IF (l_debug = 'Y') THEN
2910: okc_util.print_trace(2, ' ');
2911: okc_util.print_trace(2, '-----------------------------');
2912: okc_util.print_trace(2, 'Contract line idx = '||i);
2913: okc_util.print_trace(2, 'Contract line NUMBER = '||l_line_info_tab(i).line_number);
2914: okc_util.print_trace(2, '-----------------------------');
2915: END IF;
2916:
2917: --
2910: okc_util.print_trace(2, ' ');
2911: okc_util.print_trace(2, '-----------------------------');
2912: okc_util.print_trace(2, 'Contract line idx = '||i);
2913: okc_util.print_trace(2, 'Contract line NUMBER = '||l_line_info_tab(i).line_number);
2914: okc_util.print_trace(2, '-----------------------------');
2915: END IF;
2916:
2917: --
2918: -- define one quote line
2932: FETCH c_q_k_rel INTO l_quote_line_id;
2933: IF c_q_k_rel%FOUND THEN -- UPDATE
2934:
2935: IF (l_debug = 'Y') THEN
2936: okc_util.print_trace(2,'Quote line: Related quote line found - update ');
2937: END IF;
2938:
2939: IF (l_debug = 'Y') THEN
2940: okc_util.print_trace(2,'l_line_info_tab('||i||') - config_item_type = '||l_line_info_tab(i).config_item_type);
2936: okc_util.print_trace(2,'Quote line: Related quote line found - update ');
2937: END IF;
2938:
2939: IF (l_debug = 'Y') THEN
2940: okc_util.print_trace(2,'l_line_info_tab('||i||') - config_item_type = '||l_line_info_tab(i).config_item_type);
2941: END IF;
2942: IF l_line_info_tab(i).config_item_type IN (g_okc_model_item,g_okc_base_item) THEN
2943: --
2944: -- Configurable item
2957: px_qte_line_tbl(l_ql).quote_line_id := l_quote_line_id;
2958: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
2959:
2960: IF (l_debug = 'Y') THEN
2961: okc_util.print_trace(2,'1a.Found an entry in px_qte_line_tbl with index = '||l_ql);
2962: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
2963: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
2964: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
2965: END IF;
2958: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
2959:
2960: IF (l_debug = 'Y') THEN
2961: okc_util.print_trace(2,'1a.Found an entry in px_qte_line_tbl with index = '||l_ql);
2962: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
2963: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
2964: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
2965: END IF;
2966:
2959:
2960: IF (l_debug = 'Y') THEN
2961: okc_util.print_trace(2,'1a.Found an entry in px_qte_line_tbl with index = '||l_ql);
2962: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
2963: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
2964: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
2965: END IF;
2966:
2967: EXIT;
2960: IF (l_debug = 'Y') THEN
2961: okc_util.print_trace(2,'1a.Found an entry in px_qte_line_tbl with index = '||l_ql);
2962: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
2963: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
2964: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
2965: END IF;
2966:
2967: EXIT;
2968: END IF;
2976: px_qte_line_tbl(l_ql).quote_line_id := l_quote_line_id;
2977: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
2978:
2979: IF (l_debug = 'Y') THEN
2980: okc_util.print_trace(2,'1a.Did not find any entry in px_qte_line_tbl');
2981: okc_util.print_trace(2,'Index = '||l_ql);
2982: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
2983: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
2984: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
2977: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
2978:
2979: IF (l_debug = 'Y') THEN
2980: okc_util.print_trace(2,'1a.Did not find any entry in px_qte_line_tbl');
2981: okc_util.print_trace(2,'Index = '||l_ql);
2982: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
2983: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
2984: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
2985: END IF;
2978:
2979: IF (l_debug = 'Y') THEN
2980: okc_util.print_trace(2,'1a.Did not find any entry in px_qte_line_tbl');
2981: okc_util.print_trace(2,'Index = '||l_ql);
2982: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
2983: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
2984: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
2985: END IF;
2986: END IF;
2979: IF (l_debug = 'Y') THEN
2980: okc_util.print_trace(2,'1a.Did not find any entry in px_qte_line_tbl');
2981: okc_util.print_trace(2,'Index = '||l_ql);
2982: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
2983: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
2984: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
2985: END IF;
2986: END IF;
2987:
2980: okc_util.print_trace(2,'1a.Did not find any entry in px_qte_line_tbl');
2981: okc_util.print_trace(2,'Index = '||l_ql);
2982: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
2983: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
2984: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
2985: END IF;
2986: END IF;
2987:
2988: ELSE -- l_line_info_tab(i).config_item_type IN
2999: px_qte_line_tbl(l_ql).quote_line_id := l_quote_line_id;
3000: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
3001:
3002: IF (l_debug = 'Y') THEN
3003: okc_util.print_trace(2,'1a.case of a non top model or non top base line - update ');
3004: okc_util.print_trace(2,'Index = '||l_ql);
3005: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3006: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
3007: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3000: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
3001:
3002: IF (l_debug = 'Y') THEN
3003: okc_util.print_trace(2,'1a.case of a non top model or non top base line - update ');
3004: okc_util.print_trace(2,'Index = '||l_ql);
3005: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3006: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
3007: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3008: END IF;
3001:
3002: IF (l_debug = 'Y') THEN
3003: okc_util.print_trace(2,'1a.case of a non top model or non top base line - update ');
3004: okc_util.print_trace(2,'Index = '||l_ql);
3005: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3006: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
3007: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3008: END IF;
3009:
3002: IF (l_debug = 'Y') THEN
3003: okc_util.print_trace(2,'1a.case of a non top model or non top base line - update ');
3004: okc_util.print_trace(2,'Index = '||l_ql);
3005: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3006: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
3007: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3008: END IF;
3009:
3010: END IF; --l_line_info_tab(i).config_item_type IN
3003: okc_util.print_trace(2,'1a.case of a non top model or non top base line - update ');
3004: okc_util.print_trace(2,'Index = '||l_ql);
3005: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3006: okc_util.print_trace(2,'Qte line id = '||px_qte_line_tbl(l_ql).quote_line_id);
3007: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3008: END IF;
3009:
3010: END IF; --l_line_info_tab(i).config_item_type IN
3011:
3014: -- Check against px_k2q_line_tbl to find if there is an entry for the
3015: -- parent line id, in case of a configurable item
3016: --
3017: IF (l_debug = 'Y') THEN
3018: okc_util.print_trace(2,'Quote line: Related quote line not found - create ');
3019: END IF;
3020:
3021: IF (l_debug = 'Y') THEN
3022: okc_util.print_trace(2,'l_line_info_tab('||i||') - config_item_type = '||l_line_info_tab(i).config_item_type);
3018: okc_util.print_trace(2,'Quote line: Related quote line not found - create ');
3019: END IF;
3020:
3021: IF (l_debug = 'Y') THEN
3022: okc_util.print_trace(2,'l_line_info_tab('||i||') - config_item_type = '||l_line_info_tab(i).config_item_type);
3023: END IF;
3024: IF l_line_info_tab(i).config_item_type IN (g_okc_model_item,g_okc_base_item) THEN
3025: --
3026: -- Check against px_k2q_line_tbl
3037: px_qte_line_tbl(l_ql).operation_code := g_aso_op_code_create;
3038: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
3039:
3040: IF (l_debug = 'Y') THEN
3041: okc_util.print_trace(2,'2a.Found an entry in px_qte_line_tbl with index = '||l_ql);
3042: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3043: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3044: END IF;
3045:
3038: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
3039:
3040: IF (l_debug = 'Y') THEN
3041: okc_util.print_trace(2,'2a.Found an entry in px_qte_line_tbl with index = '||l_ql);
3042: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3043: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3044: END IF;
3045:
3046: EXIT;
3039:
3040: IF (l_debug = 'Y') THEN
3041: okc_util.print_trace(2,'2a.Found an entry in px_qte_line_tbl with index = '||l_ql);
3042: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3043: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3044: END IF;
3045:
3046: EXIT;
3047: END IF;
3054: px_qte_line_tbl(l_ql).operation_code := g_aso_op_code_create;
3055: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
3056:
3057: IF (l_debug = 'Y') THEN
3058: okc_util.print_trace(2,'2a.Didnot find any entry in px_qte_line_tbl ');
3059: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3060: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3061: END IF;
3062:
3055: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
3056:
3057: IF (l_debug = 'Y') THEN
3058: okc_util.print_trace(2,'2a.Didnot find any entry in px_qte_line_tbl ');
3059: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3060: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3061: END IF;
3062:
3063: END IF;
3056:
3057: IF (l_debug = 'Y') THEN
3058: okc_util.print_trace(2,'2a.Didnot find any entry in px_qte_line_tbl ');
3059: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3060: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3061: END IF;
3062:
3063: END IF;
3064: ELSE -- l_line_info_tab(i).config_item_type IN (g_okc_model_item,g_okc_base_item)
3066: px_qte_line_tbl(l_ql).operation_code := g_aso_op_code_create;
3067: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
3068:
3069: IF (l_debug = 'Y') THEN
3070: okc_util.print_trace(2,'2a.case of a non top model or non top base line - create ');
3071: okc_util.print_trace(2,'Index = '||l_ql);
3072: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3073: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3074: END IF;
3067: px_qte_line_tbl(l_ql).quote_header_id:= g_quote_id;
3068:
3069: IF (l_debug = 'Y') THEN
3070: okc_util.print_trace(2,'2a.case of a non top model or non top base line - create ');
3071: okc_util.print_trace(2,'Index = '||l_ql);
3072: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3073: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3074: END IF;
3075:
3068:
3069: IF (l_debug = 'Y') THEN
3070: okc_util.print_trace(2,'2a.case of a non top model or non top base line - create ');
3071: okc_util.print_trace(2,'Index = '||l_ql);
3072: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3073: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3074: END IF;
3075:
3076: END IF; -- l_line_info_tab(i).config_item_type IN (g_okc_model_item,g_okc_base_item)
3069: IF (l_debug = 'Y') THEN
3070: okc_util.print_trace(2,'2a.case of a non top model or non top base line - create ');
3071: okc_util.print_trace(2,'Index = '||l_ql);
3072: okc_util.print_trace(2,'Operation code = '||px_qte_line_tbl(l_ql).operation_code);
3073: okc_util.print_trace(2,'Qte header id = '||px_qte_line_tbl(l_ql).quote_header_id);
3074: END IF;
3075:
3076: END IF; -- l_line_info_tab(i).config_item_type IN (g_okc_model_item,g_okc_base_item)
3077:
3077:
3078: END IF; -- c_q_k_rel%FOUND
3079:
3080: IF (l_debug = 'Y') THEN
3081: okc_util.print_trace(2, 'Qte line table - operation code '|| px_qte_line_tbl(l_ql).operation_code);
3082: okc_util.print_trace(2, 'Qte line table - qte hdr id '|| px_qte_line_tbl(l_ql).quote_header_id);
3083: okc_util.print_trace(2, 'Qte line table - qte line id '|| px_qte_line_tbl(l_ql).quote_line_id);
3084: END IF;
3085:
3078: END IF; -- c_q_k_rel%FOUND
3079:
3080: IF (l_debug = 'Y') THEN
3081: okc_util.print_trace(2, 'Qte line table - operation code '|| px_qte_line_tbl(l_ql).operation_code);
3082: okc_util.print_trace(2, 'Qte line table - qte hdr id '|| px_qte_line_tbl(l_ql).quote_header_id);
3083: okc_util.print_trace(2, 'Qte line table - qte line id '|| px_qte_line_tbl(l_ql).quote_line_id);
3084: END IF;
3085:
3086: CLOSE c_q_k_rel;
3079:
3080: IF (l_debug = 'Y') THEN
3081: okc_util.print_trace(2, 'Qte line table - operation code '|| px_qte_line_tbl(l_ql).operation_code);
3082: okc_util.print_trace(2, 'Qte line table - qte hdr id '|| px_qte_line_tbl(l_ql).quote_header_id);
3083: okc_util.print_trace(2, 'Qte line table - qte line id '|| px_qte_line_tbl(l_ql).quote_line_id);
3084: END IF;
3085:
3086: CLOSE c_q_k_rel;
3087:
3085:
3086: CLOSE c_q_k_rel;
3087:
3088: IF (l_debug = 'Y') THEN
3089: okc_util.print_trace(2, 'Quote line NUMBER = '||l_ql);
3090: okc_util.print_trace(2, '-----------------------------');
3091: END IF;
3092:
3093: IF (l_debug = 'Y') THEN
3086: CLOSE c_q_k_rel;
3087:
3088: IF (l_debug = 'Y') THEN
3089: okc_util.print_trace(2, 'Quote line NUMBER = '||l_ql);
3090: okc_util.print_trace(2, '-----------------------------');
3091: END IF;
3092:
3093: IF (l_debug = 'Y') THEN
3094: okc_util.print_trace(2, '>> Building quote line structures');
3090: okc_util.print_trace(2, '-----------------------------');
3091: END IF;
3092:
3093: IF (l_debug = 'Y') THEN
3094: okc_util.print_trace(2, '>> Building quote line structures');
3095: END IF;
3096: px_qte_line_tbl(l_ql).line_number := l_ql;
3097: px_qte_line_tbl(l_ql).org_id := l_chr.authoring_org_id;
3098: px_qte_line_tbl(l_ql).inventory_item_id:= l_line_info_tab(i).object_id1;
3103: px_qte_line_tbl(l_ql).currency_code := l_line_info_tab(i).currency_code;
3104:
3105:
3106: IF (l_debug = 'Y') THEN
3107: okc_util.print_trace(2,'Qte line table - line number '||px_qte_line_tbl(l_ql).line_number);
3108: okc_util.print_trace(2,'Qte line table - org id '||px_qte_line_tbl(l_ql).org_id);
3109: okc_util.print_trace(2,'Qte line table - item id '||px_qte_line_tbl(l_ql).inventory_item_id);
3110: okc_util.print_trace(2,'Qte line table - organization id '||px_qte_line_tbl(l_ql).organization_id);
3111: okc_util.print_trace(2,'Qte line table - quantity '||px_qte_line_tbl(l_ql).quantity);
3104:
3105:
3106: IF (l_debug = 'Y') THEN
3107: okc_util.print_trace(2,'Qte line table - line number '||px_qte_line_tbl(l_ql).line_number);
3108: okc_util.print_trace(2,'Qte line table - org id '||px_qte_line_tbl(l_ql).org_id);
3109: okc_util.print_trace(2,'Qte line table - item id '||px_qte_line_tbl(l_ql).inventory_item_id);
3110: okc_util.print_trace(2,'Qte line table - organization id '||px_qte_line_tbl(l_ql).organization_id);
3111: okc_util.print_trace(2,'Qte line table - quantity '||px_qte_line_tbl(l_ql).quantity);
3112: okc_util.print_trace(2,'Qte line table - uom_code '||px_qte_line_tbl(l_ql).uom_code);
3105:
3106: IF (l_debug = 'Y') THEN
3107: okc_util.print_trace(2,'Qte line table - line number '||px_qte_line_tbl(l_ql).line_number);
3108: okc_util.print_trace(2,'Qte line table - org id '||px_qte_line_tbl(l_ql).org_id);
3109: okc_util.print_trace(2,'Qte line table - item id '||px_qte_line_tbl(l_ql).inventory_item_id);
3110: okc_util.print_trace(2,'Qte line table - organization id '||px_qte_line_tbl(l_ql).organization_id);
3111: okc_util.print_trace(2,'Qte line table - quantity '||px_qte_line_tbl(l_ql).quantity);
3112: okc_util.print_trace(2,'Qte line table - uom_code '||px_qte_line_tbl(l_ql).uom_code);
3113: okc_util.print_trace(2,'Qte line table - start_date_active'||px_qte_line_tbl(l_ql).start_date_active);
3106: IF (l_debug = 'Y') THEN
3107: okc_util.print_trace(2,'Qte line table - line number '||px_qte_line_tbl(l_ql).line_number);
3108: okc_util.print_trace(2,'Qte line table - org id '||px_qte_line_tbl(l_ql).org_id);
3109: okc_util.print_trace(2,'Qte line table - item id '||px_qte_line_tbl(l_ql).inventory_item_id);
3110: okc_util.print_trace(2,'Qte line table - organization id '||px_qte_line_tbl(l_ql).organization_id);
3111: okc_util.print_trace(2,'Qte line table - quantity '||px_qte_line_tbl(l_ql).quantity);
3112: okc_util.print_trace(2,'Qte line table - uom_code '||px_qte_line_tbl(l_ql).uom_code);
3113: okc_util.print_trace(2,'Qte line table - start_date_active'||px_qte_line_tbl(l_ql).start_date_active);
3114: okc_util.print_trace(2,'Qte line table - currency_code '||px_qte_line_tbl(l_ql).currency_code);
3107: okc_util.print_trace(2,'Qte line table - line number '||px_qte_line_tbl(l_ql).line_number);
3108: okc_util.print_trace(2,'Qte line table - org id '||px_qte_line_tbl(l_ql).org_id);
3109: okc_util.print_trace(2,'Qte line table - item id '||px_qte_line_tbl(l_ql).inventory_item_id);
3110: okc_util.print_trace(2,'Qte line table - organization id '||px_qte_line_tbl(l_ql).organization_id);
3111: okc_util.print_trace(2,'Qte line table - quantity '||px_qte_line_tbl(l_ql).quantity);
3112: okc_util.print_trace(2,'Qte line table - uom_code '||px_qte_line_tbl(l_ql).uom_code);
3113: okc_util.print_trace(2,'Qte line table - start_date_active'||px_qte_line_tbl(l_ql).start_date_active);
3114: okc_util.print_trace(2,'Qte line table - currency_code '||px_qte_line_tbl(l_ql).currency_code);
3115: END IF;
3108: okc_util.print_trace(2,'Qte line table - org id '||px_qte_line_tbl(l_ql).org_id);
3109: okc_util.print_trace(2,'Qte line table - item id '||px_qte_line_tbl(l_ql).inventory_item_id);
3110: okc_util.print_trace(2,'Qte line table - organization id '||px_qte_line_tbl(l_ql).organization_id);
3111: okc_util.print_trace(2,'Qte line table - quantity '||px_qte_line_tbl(l_ql).quantity);
3112: okc_util.print_trace(2,'Qte line table - uom_code '||px_qte_line_tbl(l_ql).uom_code);
3113: okc_util.print_trace(2,'Qte line table - start_date_active'||px_qte_line_tbl(l_ql).start_date_active);
3114: okc_util.print_trace(2,'Qte line table - currency_code '||px_qte_line_tbl(l_ql).currency_code);
3115: END IF;
3116:
3109: okc_util.print_trace(2,'Qte line table - item id '||px_qte_line_tbl(l_ql).inventory_item_id);
3110: okc_util.print_trace(2,'Qte line table - organization id '||px_qte_line_tbl(l_ql).organization_id);
3111: okc_util.print_trace(2,'Qte line table - quantity '||px_qte_line_tbl(l_ql).quantity);
3112: okc_util.print_trace(2,'Qte line table - uom_code '||px_qte_line_tbl(l_ql).uom_code);
3113: okc_util.print_trace(2,'Qte line table - start_date_active'||px_qte_line_tbl(l_ql).start_date_active);
3114: okc_util.print_trace(2,'Qte line table - currency_code '||px_qte_line_tbl(l_ql).currency_code);
3115: END IF;
3116:
3117:
3110: okc_util.print_trace(2,'Qte line table - organization id '||px_qte_line_tbl(l_ql).organization_id);
3111: okc_util.print_trace(2,'Qte line table - quantity '||px_qte_line_tbl(l_ql).quantity);
3112: okc_util.print_trace(2,'Qte line table - uom_code '||px_qte_line_tbl(l_ql).uom_code);
3113: okc_util.print_trace(2,'Qte line table - start_date_active'||px_qte_line_tbl(l_ql).start_date_active);
3114: okc_util.print_trace(2,'Qte line table - currency_code '||px_qte_line_tbl(l_ql).currency_code);
3115: END IF;
3116:
3117:
3118: IF (l_debug = 'Y') THEN
3115: END IF;
3116:
3117:
3118: IF (l_debug = 'Y') THEN
3119: okc_util.print_trace(2,'Obtaining the rule(s)');
3120: END IF;
3121: -- Obtain the top line rules
3122:
3123: FOR k IN l_kl_rule_tab.FIRST..l_kl_rule_tab.LAST LOOP
3121: -- Obtain the top line rules
3122:
3123: FOR k IN l_kl_rule_tab.FIRST..l_kl_rule_tab.LAST LOOP
3124: IF (l_debug = 'Y') THEN
3125: okc_util.print_trace(2,'rule category '||l_kl_rule_tab(k).rule_information_category);
3126: okc_util.print_trace(2,'rule - rule tab cle_id '||l_kl_rule_tab(k).cle_id);
3127: okc_util.print_trace(2,'rule - line info tab line_id '||l_line_info_tab(i).line_id);
3128: END IF;
3129:
3122:
3123: FOR k IN l_kl_rule_tab.FIRST..l_kl_rule_tab.LAST LOOP
3124: IF (l_debug = 'Y') THEN
3125: okc_util.print_trace(2,'rule category '||l_kl_rule_tab(k).rule_information_category);
3126: okc_util.print_trace(2,'rule - rule tab cle_id '||l_kl_rule_tab(k).cle_id);
3127: okc_util.print_trace(2,'rule - line info tab line_id '||l_line_info_tab(i).line_id);
3128: END IF;
3129:
3130: IF l_kl_rule_tab(k).cle_id = l_line_info_tab(i).line_id THEN
3123: FOR k IN l_kl_rule_tab.FIRST..l_kl_rule_tab.LAST LOOP
3124: IF (l_debug = 'Y') THEN
3125: okc_util.print_trace(2,'rule category '||l_kl_rule_tab(k).rule_information_category);
3126: okc_util.print_trace(2,'rule - rule tab cle_id '||l_kl_rule_tab(k).cle_id);
3127: okc_util.print_trace(2,'rule - line info tab line_id '||l_line_info_tab(i).line_id);
3128: END IF;
3129:
3130: IF l_kl_rule_tab(k).cle_id = l_line_info_tab(i).line_id THEN
3131:
3134: IF l_kl_rule_tab(k).rule_information_category = g_rd_price THEN
3135: -- price list
3136: px_qte_line_tbl(l_ql).price_list_id := NVL(l_kl_rule_tab(k).object1_id1,px_qte_hdr_rec.price_list_id);
3137: IF (l_debug = 'Y') THEN
3138: okc_util.print_trace(2,'Qte line table - price list id '|| px_qte_line_tbl(l_ql).price_list_id);
3139: END IF;
3140: ELSIF l_kl_rule_tab(k).rule_information_category = g_rd_invrule THEN
3141: -- invoice rule
3142: px_qte_line_tbl(l_ql).invoicing_rule_id := NVL(l_kl_rule_tab(k).object1_id1,px_qte_hdr_rec.invoicing_rule_id);
3140: ELSIF l_kl_rule_tab(k).rule_information_category = g_rd_invrule THEN
3141: -- invoice rule
3142: px_qte_line_tbl(l_ql).invoicing_rule_id := NVL(l_kl_rule_tab(k).object1_id1,px_qte_hdr_rec.invoicing_rule_id);
3143: IF (l_debug = 'Y') THEN
3144: okc_util.print_trace(2,'Qte line table - inv rule id '|| px_qte_line_tbl(l_ql).invoicing_rule_id);
3145: END IF;
3146:
3147: ELSIF l_kl_rule_tab(k).rule_information_category = g_rd_shipmtd THEN
3148: px_qte_ln_shipment_tbl(l_ql).ship_method_code := l_kl_rule_tab(k).rule_information_category;
3146:
3147: ELSIF l_kl_rule_tab(k).rule_information_category = g_rd_shipmtd THEN
3148: px_qte_ln_shipment_tbl(l_ql).ship_method_code := l_kl_rule_tab(k).rule_information_category;
3149: IF (l_debug = 'Y') THEN
3150: okc_util.print_trace(2,'Qte line table - ship_method_code '||px_qte_ln_shipment_tbl(l_ql).ship_method_code);
3151: END IF;
3152: -- shipment method
3153: ELSIF l_kl_rule_tab(k).rule_information_category = g_rd_shipto THEN
3154: l_k_ship_found := 'Y';
3159: --
3160: -- obtain the bill to rule
3161: --
3162: IF (l_debug = 'Y') THEN
3163: okc_util.print_trace(2,'Obtaining the Billto rule');
3164: END IF;
3165: IF l_kl_bto_data_tab.FIRST IS NOT NULL THEN
3166: FOR k IN l_kl_bto_data_tab.FIRST..l_kl_bto_data_tab.LAST LOOP
3167: IF l_kl_bto_data_tab(k).cle_id = l_line_info_tab(i).line_id THEN
3169: px_qte_line_tbl(l_ql).invoice_to_party_site_id := NVL(l_kl_bto_data_tab(k).party_site_id,px_qte_hdr_rec.invoice_to_party_site_id);
3170: -- px_qte_line_tbl(l_ql).invoice_to_party_id := NVL(l_kl_bto_data_tab(k).party_id,px_qte_hdr_rec.invoice_to_party_id);
3171:
3172: IF (l_debug = 'Y') THEN
3173: okc_util.print_trace(2,'Qte line table - invoice_to_party_site_id '|| px_qte_line_tbl(l_ql).invoice_to_party_site_id);
3174: okc_util.print_trace(2,'Qte line table - invoice_to_party_id '|| px_qte_line_tbl(l_ql).invoice_to_party_id);
3175: END IF;
3176: END IF;
3177: END LOOP;
3170: -- px_qte_line_tbl(l_ql).invoice_to_party_id := NVL(l_kl_bto_data_tab(k).party_id,px_qte_hdr_rec.invoice_to_party_id);
3171:
3172: IF (l_debug = 'Y') THEN
3173: okc_util.print_trace(2,'Qte line table - invoice_to_party_site_id '|| px_qte_line_tbl(l_ql).invoice_to_party_site_id);
3174: okc_util.print_trace(2,'Qte line table - invoice_to_party_id '|| px_qte_line_tbl(l_ql).invoice_to_party_id);
3175: END IF;
3176: END IF;
3177: END LOOP;
3178: END IF;
3177: END LOOP;
3178: END IF;
3179:
3180: IF (l_debug = 'Y') THEN
3181: okc_util.print_trace(2,'Obtaining the ship to rule and operation code');
3182: END IF;
3183: --
3184: -- obtain the ship to rule and the operation code
3185: --
3187:
3188: FOR k IN l_kl_sto_data_tab.FIRST..l_kl_sto_data_tab.LAST LOOP
3189:
3190: IF (l_debug = 'Y') THEN
3191: OKC_UTIL.PRINT_TRACE(2,'ship to rule at line level found');
3192: END IF;
3193:
3194: IF l_kl_sto_data_tab(k).cle_id = l_line_info_tab(i).line_id THEN
3195:
3298: -- We need to retrieve the quote line NUMBER of the
3299: -- related License Product line
3300: --
3301: IF (l_debug = 'Y') THEN
3302: okc_util.print_trace(3, '>Look for Quote line number of the Lic Prod line');
3303: END IF;
3304: l_lp_found := FALSE;
3305: IF px_k2q_line_tbl.first IS NOT NULL THEN
3306:
3335:
3336: END IF; -- IF l_covlvl_info_tab.first IS NOT NULL THEN
3337:
3338: IF (l_debug = 'Y') THEN
3339: okc_util.print_trace(2,' ');
3340: okc_util.print_trace(2,'QDL ');
3341: okc_util.print_trace(2,'l_line_info_tab('||i||').config_item_type = '||l_line_info_tab(i).config_item_type);
3342: okc_util.print_trace(2,' ');
3343: END IF;
3336: END IF; -- IF l_covlvl_info_tab.first IS NOT NULL THEN
3337:
3338: IF (l_debug = 'Y') THEN
3339: okc_util.print_trace(2,' ');
3340: okc_util.print_trace(2,'QDL ');
3341: okc_util.print_trace(2,'l_line_info_tab('||i||').config_item_type = '||l_line_info_tab(i).config_item_type);
3342: okc_util.print_trace(2,' ');
3343: END IF;
3344:
3337:
3338: IF (l_debug = 'Y') THEN
3339: okc_util.print_trace(2,' ');
3340: okc_util.print_trace(2,'QDL ');
3341: okc_util.print_trace(2,'l_line_info_tab('||i||').config_item_type = '||l_line_info_tab(i).config_item_type);
3342: okc_util.print_trace(2,' ');
3343: END IF;
3344:
3345:
3338: IF (l_debug = 'Y') THEN
3339: okc_util.print_trace(2,' ');
3340: okc_util.print_trace(2,'QDL ');
3341: okc_util.print_trace(2,'l_line_info_tab('||i||').config_item_type = '||l_line_info_tab(i).config_item_type);
3342: okc_util.print_trace(2,' ');
3343: END IF;
3344:
3345:
3346: IF NOT l_cp_found AND px_qte_line_tbl(l_ql).operation_code = g_aso_op_code_update AND
3360: l_dql := l_dql + 1;
3361: px_qte_line_dtl_tbl(l_dql).operation_code := g_aso_op_code_delete;
3362: px_qte_line_dtl_tbl(l_dql).quote_line_detail_id := l_id1;
3363: IF (l_debug = 'Y') THEN
3364: okc_util.print_trace(2,'case of a Non service, Non configurable item, deleting a qte dtl line');
3365: END IF;
3366: END IF;
3367: CLOSE c_qdl;
3368: END IF;
3389: IF px_qte_line_dtl_tbl(k).quote_line_id = px_qte_line_tbl(l_ql).quote_line_id THEN
3390: l_qdl_a_found := 'Y';
3391: l_dql := k;
3392: IF (l_debug = 'Y') THEN
3393: okc_util.print_trace(2,'1a.case of a Non service,Configurable item, updating qte dtl line');
3394: END IF;
3395: EXIT;
3396: END IF;
3397: END LOOP;
3399: IF l_qdl_a_found = 'N' THEN -- The previous check did'nt find any entry in the PL/SQLtable
3400: i_l_dql := l_dql + 1;
3401: l_dql := i_l_dql;
3402: IF (l_debug = 'Y') THEN
3403: okc_util.print_trace(2,'1a.case of a Non service,Configurable item, check against qte dtl line PL/SQL table didnot find any QDL');
3404: END IF;
3405: END IF;
3406:
3407: px_qte_line_dtl_tbl(l_dql).operation_code := g_aso_op_code_update;
3424: px_qte_line_dtl_tbl(l_dql).service_ref_line_number := NULL;
3425:
3426:
3427: IF (l_debug = 'Y') THEN
3428: okc_util.print_trace(2, ' ');
3429: okc_util.print_trace(2, 'Quote detail line values');
3430: okc_util.print_trace(2, ' ');
3431: END IF;
3432:
3425:
3426:
3427: IF (l_debug = 'Y') THEN
3428: okc_util.print_trace(2, ' ');
3429: okc_util.print_trace(2, 'Quote detail line values');
3430: okc_util.print_trace(2, ' ');
3431: END IF;
3432:
3433: IF (l_debug = 'Y') THEN
3426:
3427: IF (l_debug = 'Y') THEN
3428: okc_util.print_trace(2, ' ');
3429: okc_util.print_trace(2, 'Quote detail line values');
3430: okc_util.print_trace(2, ' ');
3431: END IF;
3432:
3433: IF (l_debug = 'Y') THEN
3434: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3430: okc_util.print_trace(2, ' ');
3431: END IF;
3432:
3433: IF (l_debug = 'Y') THEN
3434: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3435: okc_util.print_trace(2,'qte_line_dtl_id '||px_qte_line_dtl_tbl(l_dql).quote_line_detail_id);
3436: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3437: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3438: okc_util.print_trace(2,'config_rev_num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3431: END IF;
3432:
3433: IF (l_debug = 'Y') THEN
3434: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3435: okc_util.print_trace(2,'qte_line_dtl_id '||px_qte_line_dtl_tbl(l_dql).quote_line_detail_id);
3436: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3437: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3438: okc_util.print_trace(2,'config_rev_num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3439: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3432:
3433: IF (l_debug = 'Y') THEN
3434: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3435: okc_util.print_trace(2,'qte_line_dtl_id '||px_qte_line_dtl_tbl(l_dql).quote_line_detail_id);
3436: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3437: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3438: okc_util.print_trace(2,'config_rev_num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3439: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3440: okc_util.print_trace(2,'complete conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3433: IF (l_debug = 'Y') THEN
3434: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3435: okc_util.print_trace(2,'qte_line_dtl_id '||px_qte_line_dtl_tbl(l_dql).quote_line_detail_id);
3436: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3437: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3438: okc_util.print_trace(2,'config_rev_num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3439: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3440: okc_util.print_trace(2,'complete conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3441: okc_util.print_trace(2,'valid_conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3434: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3435: okc_util.print_trace(2,'qte_line_dtl_id '||px_qte_line_dtl_tbl(l_dql).quote_line_detail_id);
3436: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3437: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3438: okc_util.print_trace(2,'config_rev_num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3439: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3440: okc_util.print_trace(2,'complete conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3441: okc_util.print_trace(2,'valid_conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3442: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3435: okc_util.print_trace(2,'qte_line_dtl_id '||px_qte_line_dtl_tbl(l_dql).quote_line_detail_id);
3436: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3437: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3438: okc_util.print_trace(2,'config_rev_num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3439: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3440: okc_util.print_trace(2,'complete conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3441: okc_util.print_trace(2,'valid_conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3442: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3443: END IF;
3436: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3437: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3438: okc_util.print_trace(2,'config_rev_num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3439: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3440: okc_util.print_trace(2,'complete conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3441: okc_util.print_trace(2,'valid_conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3442: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3443: END IF;
3444:
3437: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3438: okc_util.print_trace(2,'config_rev_num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3439: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3440: okc_util.print_trace(2,'complete conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3441: okc_util.print_trace(2,'valid_conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3442: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3443: END IF;
3444:
3445:
3438: okc_util.print_trace(2,'config_rev_num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3439: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3440: okc_util.print_trace(2,'complete conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3441: okc_util.print_trace(2,'valid_conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3442: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3443: END IF;
3444:
3445:
3446: ELSE -- c_qdl%FOUND (i.e. quote detail line not found )
3455: IF px_qte_line_dtl_tbl(k).quote_line_id = px_qte_line_tbl(l_ql).quote_line_id THEN
3456: l_qdl_a_found := 'Y';
3457: l_dql := k;
3458: IF (l_debug = 'Y') THEN
3459: okc_util.print_trace(2,'Case of qdl not found in okx_quote_line_detail_v but found in the PL/SQL table');
3460: END IF;
3461: EXIT;
3462: END IF;
3463: END LOOP;
3465: IF l_qdl_a_found = 'N' THEN -- The previous check did'nt find any entry in the PL/SQLtable
3466: i_l_dql := l_dql + 1;
3467: l_dql := i_l_dql;
3468: IF (l_debug = 'Y') THEN
3469: okc_util.print_trace(2,'Case of qdl not found in neither okx_quote_line_detail_v nor the PL/SQL table');
3470: END IF;
3471: END IF;
3472:
3473: px_qte_line_dtl_tbl(l_dql).operation_code := g_aso_op_code_create;
3481: px_qte_line_dtl_tbl(l_dql).component_code := l_line_info_tab(i).component_code;
3482:
3483:
3484: IF (l_debug = 'Y') THEN
3485: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3486: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3487: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3488: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3489: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3482:
3483:
3484: IF (l_debug = 'Y') THEN
3485: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3486: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3487: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3488: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3489: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3490: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3483:
3484: IF (l_debug = 'Y') THEN
3485: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3486: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3487: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3488: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3489: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3490: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3491: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3484: IF (l_debug = 'Y') THEN
3485: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3486: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3487: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3488: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3489: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3490: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3491: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3492: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3485: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3486: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3487: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3488: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3489: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3490: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3491: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3492: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3493: END IF;
3486: okc_util.print_trace(2,'quote_line_id '||px_qte_line_dtl_tbl(l_dql).quote_line_id);
3487: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3488: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3489: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3490: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3491: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3492: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3493: END IF;
3494:
3487: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3488: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3489: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3490: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3491: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3492: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3493: END IF;
3494:
3495:
3488: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3489: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3490: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3491: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3492: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3493: END IF;
3494:
3495:
3496: END IF; -- IF c_qdl%FOUND THEN
3516: IF px_qte_line_dtl_tbl(k).qte_line_index = l_ql THEN
3517: l_qdl_b_found := 'Y';
3518: l_dql := k;
3519: IF (l_debug = 'Y') THEN
3520: okc_util.print_trace(2,'Case of Non service, Configurable item, entry found in PL/SQL table - create QDL ');
3521: END IF;
3522: px_qte_line_dtl_tbl(l_dql).operation_code := g_aso_op_code_create;
3523: px_qte_line_dtl_tbl(l_dql).qte_line_index := l_ql;
3524:
3529: px_qte_line_dtl_tbl(l_dql).valid_configuration_flag := l_line_info_tab(i).config_valid_yn;
3530: px_qte_line_dtl_tbl(l_dql).component_code := l_line_info_tab(i).component_code;
3531:
3532: IF (l_debug = 'Y') THEN
3533: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3534: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3535: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3536: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3537: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3530: px_qte_line_dtl_tbl(l_dql).component_code := l_line_info_tab(i).component_code;
3531:
3532: IF (l_debug = 'Y') THEN
3533: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3534: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3535: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3536: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3537: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3538: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3531:
3532: IF (l_debug = 'Y') THEN
3533: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3534: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3535: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3536: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3537: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3538: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3539: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3532: IF (l_debug = 'Y') THEN
3533: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3534: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3535: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3536: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3537: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3538: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3539: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3540: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3533: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3534: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3535: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3536: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3537: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3538: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3539: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3540: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3541: END IF;
3534: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3535: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3536: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3537: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3538: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3539: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3540: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3541: END IF;
3542:
3535: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3536: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3537: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3538: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3539: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3540: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3541: END IF;
3542:
3543: EXIT;
3536: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3537: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3538: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3539: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3540: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3541: END IF;
3542:
3543: EXIT;
3544: END IF;
3551: px_qte_line_dtl_tbl(l_dql).operation_code := g_aso_op_code_create;
3552: px_qte_line_dtl_tbl(l_dql).qte_line_index := l_ql;
3553:
3554: IF (l_debug = 'Y') THEN
3555: okc_util.print_trace(2,'Case of Non service, Configurable item,no entry in PL/SQL table - create QDL ');
3556: END IF;
3557:
3558: px_qte_line_dtl_tbl(l_dql).config_header_id := l_line_info_tab(i).config_header_id;
3559: px_qte_line_dtl_tbl(l_dql).config_revision_num := l_line_info_tab(i).config_revision_number;
3562: px_qte_line_dtl_tbl(l_dql).valid_configuration_flag := l_line_info_tab(i).config_valid_yn;
3563: px_qte_line_dtl_tbl(l_dql).component_code := l_line_info_tab(i).component_code;
3564:
3565: IF (l_debug = 'Y') THEN
3566: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3567: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3568: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3569: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3570: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3563: px_qte_line_dtl_tbl(l_dql).component_code := l_line_info_tab(i).component_code;
3564:
3565: IF (l_debug = 'Y') THEN
3566: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3567: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3568: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3569: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3570: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3571: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3564:
3565: IF (l_debug = 'Y') THEN
3566: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3567: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3568: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3569: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3570: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3571: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3572: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3565: IF (l_debug = 'Y') THEN
3566: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3567: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3568: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3569: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3570: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3571: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3572: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3573: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3566: okc_util.print_trace(2,'operation_code '||px_qte_line_dtl_tbl(l_dql).operation_code);
3567: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3568: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3569: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3570: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3571: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3572: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3573: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3574: END IF;
3567: okc_util.print_trace(2,'quote_line_idx '||px_qte_line_dtl_tbl(l_dql).qte_line_index);
3568: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3569: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3570: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3571: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3572: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3573: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3574: END IF;
3575: END IF;
3568: okc_util.print_trace(2,'config_header_id '||px_qte_line_dtl_tbl(l_dql).config_header_id);
3569: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3570: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3571: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3572: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3573: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3574: END IF;
3575: END IF;
3576:
3569: okc_util.print_trace(2,'config_rev num '||px_qte_line_dtl_tbl(l_dql).config_revision_num);
3570: okc_util.print_trace(2,'config_item_id '||px_qte_line_dtl_tbl(l_dql).config_item_id);
3571: okc_util.print_trace(2,'comp conf flag '||px_qte_line_dtl_tbl(l_dql).complete_configuration_flag);
3572: okc_util.print_trace(2,'valid conf flag '||px_qte_line_dtl_tbl(l_dql).valid_configuration_flag);
3573: okc_util.print_trace(2,'component_code '||px_qte_line_dtl_tbl(l_dql).component_code);
3574: END IF;
3575: END IF;
3576:
3577: END IF; -- IF NOT l_cp_found AND px_qte_line_tbl(l_ql).operation_code = g_aso_op_code_update
3582: -- UPDATE CONFIG INFORMATION
3583: -- =========================
3584: --
3585: IF (l_debug = 'Y') THEN
3586: okc_util.print_trace(2,' ');
3587: okc_util.print_trace(2,' UPDATING CONFIG INFORMATION ');
3588: okc_util.print_trace(2,' ');
3589: END IF;
3590:
3583: -- =========================
3584: --
3585: IF (l_debug = 'Y') THEN
3586: okc_util.print_trace(2,' ');
3587: okc_util.print_trace(2,' UPDATING CONFIG INFORMATION ');
3588: okc_util.print_trace(2,' ');
3589: END IF;
3590:
3591: IF l_line_info_tab(i).config_item_type = g_okc_model_item THEN
3584: --
3585: IF (l_debug = 'Y') THEN
3586: okc_util.print_trace(2,' ');
3587: okc_util.print_trace(2,' UPDATING CONFIG INFORMATION ');
3588: okc_util.print_trace(2,' ');
3589: END IF;
3590:
3591: IF l_line_info_tab(i).config_item_type = g_okc_model_item THEN
3592: px_qte_line_tbl(l_ql).item_type_code := g_aso_model_item; -- 'MDL'
3609: -- calculate a quote line price, from the contract
3610: -- line(index i=l_cur_tl)
3611: --
3612: IF (l_debug = 'Y') THEN
3613: okc_util.print_trace(3, '--Quantity of the contract top line = '||l_line_info_tab(l_cur_tl).qty);
3614: okc_util.print_trace(3, '--Unit of Measure of the contract top line = '||l_line_info_tab(l_cur_tl).uom_code);
3615: END IF;
3616:
3617: IF (l_debug = 'Y') THEN
3610: -- line(index i=l_cur_tl)
3611: --
3612: IF (l_debug = 'Y') THEN
3613: okc_util.print_trace(3, '--Quantity of the contract top line = '||l_line_info_tab(l_cur_tl).qty);
3614: okc_util.print_trace(3, '--Unit of Measure of the contract top line = '||l_line_info_tab(l_cur_tl).uom_code);
3615: END IF;
3616:
3617: IF (l_debug = 'Y') THEN
3618: okc_util.print_trace(2,' ');
3614: okc_util.print_trace(3, '--Unit of Measure of the contract top line = '||l_line_info_tab(l_cur_tl).uom_code);
3615: END IF;
3616:
3617: IF (l_debug = 'Y') THEN
3618: okc_util.print_trace(2,' ');
3619: okc_util.print_trace(2,' Calculating line list price and line adjusted amount ' );
3620: okc_util.print_trace(2,' ');
3621: END IF;
3622:
3615: END IF;
3616:
3617: IF (l_debug = 'Y') THEN
3618: okc_util.print_trace(2,' ');
3619: okc_util.print_trace(2,' Calculating line list price and line adjusted amount ' );
3620: okc_util.print_trace(2,' ');
3621: END IF;
3622:
3623: px_qte_line_tbl(l_ql).line_list_price := NVL(l_line_info_tab(l_cur_tl).price_unit,ROUND(l_line_info_tab(l_cur_tl).line_list_price / l_line_info_tab(l_cur_tl).qty, 2));
3616:
3617: IF (l_debug = 'Y') THEN
3618: okc_util.print_trace(2,' ');
3619: okc_util.print_trace(2,' Calculating line list price and line adjusted amount ' );
3620: okc_util.print_trace(2,' ');
3621: END IF;
3622:
3623: px_qte_line_tbl(l_ql).line_list_price := NVL(l_line_info_tab(l_cur_tl).price_unit,ROUND(l_line_info_tab(l_cur_tl).line_list_price / l_line_info_tab(l_cur_tl).qty, 2));
3624: IF (l_debug = 'Y') THEN
3621: END IF;
3622:
3623: px_qte_line_tbl(l_ql).line_list_price := NVL(l_line_info_tab(l_cur_tl).price_unit,ROUND(l_line_info_tab(l_cur_tl).line_list_price / l_line_info_tab(l_cur_tl).qty, 2));
3624: IF (l_debug = 'Y') THEN
3625: okc_util.print_trace(3,' px_qte_line_tbl(l_ql).line_list_price = '|| px_qte_line_tbl(l_ql).line_list_price);
3626: END IF;
3627:
3628: px_qte_line_tbl(l_ql).line_adjusted_amount := px_qte_line_tbl(l_ql).line_list_price-ROUND(l_line_info_tab(l_cur_tl).price_negotiated/l_line_info_tab(l_cur_tl).qty,2);
3629: IF (l_debug = 'Y') THEN
3626: END IF;
3627:
3628: px_qte_line_tbl(l_ql).line_adjusted_amount := px_qte_line_tbl(l_ql).line_list_price-ROUND(l_line_info_tab(l_cur_tl).price_negotiated/l_line_info_tab(l_cur_tl).qty,2);
3629: IF (l_debug = 'Y') THEN
3630: okc_util.print_trace(3,' px_qte_line_tbl(l_ql).line_adjusted_amount = '|| px_qte_line_tbl(l_ql).line_adjusted_amount);
3631: END IF;
3632:
3633: px_qte_line_tbl(l_ql).price_list_id := l_line_info_tab(l_cur_tl).price_list_id;
3634: IF (l_debug = 'Y') THEN
3631: END IF;
3632:
3633: px_qte_line_tbl(l_ql).price_list_id := l_line_info_tab(l_cur_tl).price_list_id;
3634: IF (l_debug = 'Y') THEN
3635: okc_util.print_trace(3,' px_qte_line_tbl(l_ql).price_list_id = '|| px_qte_line_tbl(l_ql).price_list_id);
3636: END IF;
3637:
3638: px_qte_line_tbl(l_ql).price_list_line_id := l_line_info_tab(l_cur_tl).price_list_line_id;
3639: IF (l_debug = 'Y') THEN
3636: END IF;
3637:
3638: px_qte_line_tbl(l_ql).price_list_line_id := l_line_info_tab(l_cur_tl).price_list_line_id;
3639: IF (l_debug = 'Y') THEN
3640: okc_util.print_trace(3,' px_qte_line_tbl(l_ql).price_list_line_id = '||px_qte_line_tbl(l_ql).price_list_line_id);
3641: END IF;
3642:
3643:
3644: --
3644: --
3645: -- record relation in the px_k2q_line_tbl PL/SQL table
3646: --
3647: IF (l_debug = 'Y') THEN
3648: okc_util.print_trace(2,' ');
3649: okc_util.print_trace(2,' Creating relation in px_k2q_line_tbl PL/SQL table ');
3650: okc_util.print_trace(2,' ');
3651: END IF;
3652:
3645: -- record relation in the px_k2q_line_tbl PL/SQL table
3646: --
3647: IF (l_debug = 'Y') THEN
3648: okc_util.print_trace(2,' ');
3649: okc_util.print_trace(2,' Creating relation in px_k2q_line_tbl PL/SQL table ');
3650: okc_util.print_trace(2,' ');
3651: END IF;
3652:
3653: px_k2q_line_tbl(l_ql).k_line_id := l_line_info_tab(l_cur_tl).line_id;
3646: --
3647: IF (l_debug = 'Y') THEN
3648: okc_util.print_trace(2,' ');
3649: okc_util.print_trace(2,' Creating relation in px_k2q_line_tbl PL/SQL table ');
3650: okc_util.print_trace(2,' ');
3651: END IF;
3652:
3653: px_k2q_line_tbl(l_ql).k_line_id := l_line_info_tab(l_cur_tl).line_id;
3654: px_k2q_line_tbl(l_ql).q_line_idx := l_ql;
3658: px_k2q_line_tbl(l_ql).q_item_type_code := px_qte_line_tbl(l_ql).item_type_code;
3659: END IF;
3660:
3661: IF (l_debug = 'Y') THEN
3662: okc_util.print_trace(5, '-----------------------------');
3663: okc_util.print_trace(5, 'Quote line NUMBER = '||px_qte_line_tbl(l_ql).line_number);
3664: okc_util.print_trace(5, '-----------------------------');
3665: okc_util.print_trace(6, 'Quote line quantity = '||px_qte_line_tbl(l_ql).quantity);
3666: okc_util.print_trace(6, 'Quote line uom = '||px_qte_line_tbl(l_ql).uom_code);
3659: END IF;
3660:
3661: IF (l_debug = 'Y') THEN
3662: okc_util.print_trace(5, '-----------------------------');
3663: okc_util.print_trace(5, 'Quote line NUMBER = '||px_qte_line_tbl(l_ql).line_number);
3664: okc_util.print_trace(5, '-----------------------------');
3665: okc_util.print_trace(6, 'Quote line quantity = '||px_qte_line_tbl(l_ql).quantity);
3666: okc_util.print_trace(6, 'Quote line uom = '||px_qte_line_tbl(l_ql).uom_code);
3667: END IF;
3660:
3661: IF (l_debug = 'Y') THEN
3662: okc_util.print_trace(5, '-----------------------------');
3663: okc_util.print_trace(5, 'Quote line NUMBER = '||px_qte_line_tbl(l_ql).line_number);
3664: okc_util.print_trace(5, '-----------------------------');
3665: okc_util.print_trace(6, 'Quote line quantity = '||px_qte_line_tbl(l_ql).quantity);
3666: okc_util.print_trace(6, 'Quote line uom = '||px_qte_line_tbl(l_ql).uom_code);
3667: END IF;
3668: -- okc_util.print_trace(6, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(l_ql).line_quote_price, '9G999G999G990D00')));
3661: IF (l_debug = 'Y') THEN
3662: okc_util.print_trace(5, '-----------------------------');
3663: okc_util.print_trace(5, 'Quote line NUMBER = '||px_qte_line_tbl(l_ql).line_number);
3664: okc_util.print_trace(5, '-----------------------------');
3665: okc_util.print_trace(6, 'Quote line quantity = '||px_qte_line_tbl(l_ql).quantity);
3666: okc_util.print_trace(6, 'Quote line uom = '||px_qte_line_tbl(l_ql).uom_code);
3667: END IF;
3668: -- okc_util.print_trace(6, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(l_ql).line_quote_price, '9G999G999G990D00')));
3669: -- okc_util.print_trace(6, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(l_ql).line_quote_price*px_qte_line_tbl(l_ql).quantity, '9G999G999G990D00')));
3662: okc_util.print_trace(5, '-----------------------------');
3663: okc_util.print_trace(5, 'Quote line NUMBER = '||px_qte_line_tbl(l_ql).line_number);
3664: okc_util.print_trace(5, '-----------------------------');
3665: okc_util.print_trace(6, 'Quote line quantity = '||px_qte_line_tbl(l_ql).quantity);
3666: okc_util.print_trace(6, 'Quote line uom = '||px_qte_line_tbl(l_ql).uom_code);
3667: END IF;
3668: -- okc_util.print_trace(6, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(l_ql).line_quote_price, '9G999G999G990D00')));
3669: -- okc_util.print_trace(6, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(l_ql).line_quote_price*px_qte_line_tbl(l_ql).quantity, '9G999G999G990D00')));
3670:
3664: okc_util.print_trace(5, '-----------------------------');
3665: okc_util.print_trace(6, 'Quote line quantity = '||px_qte_line_tbl(l_ql).quantity);
3666: okc_util.print_trace(6, 'Quote line uom = '||px_qte_line_tbl(l_ql).uom_code);
3667: END IF;
3668: -- okc_util.print_trace(6, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(l_ql).line_quote_price, '9G999G999G990D00')));
3669: -- okc_util.print_trace(6, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(l_ql).line_quote_price*px_qte_line_tbl(l_ql).quantity, '9G999G999G990D00')));
3670:
3671:
3672: END IF; -- IF l_continue THEN
3665: okc_util.print_trace(6, 'Quote line quantity = '||px_qte_line_tbl(l_ql).quantity);
3666: okc_util.print_trace(6, 'Quote line uom = '||px_qte_line_tbl(l_ql).uom_code);
3667: END IF;
3668: -- okc_util.print_trace(6, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(l_ql).line_quote_price, '9G999G999G990D00')));
3669: -- okc_util.print_trace(6, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(l_ql).line_quote_price*px_qte_line_tbl(l_ql).quantity, '9G999G999G990D00')));
3670:
3671:
3672: END IF; -- IF l_continue THEN
3673: END LOOP; --qteline
3682: --
3683:
3684:
3685: IF (l_debug = 'Y') THEN
3686: okc_util.print_trace(2,' ');
3687: okc_util.print_trace(2,' Calling the OKC_OC_INT_CONFIG_PVT.quote_line_relationship procedure ');
3688: okc_util.print_trace(2,' ');
3689: END IF;
3690:
3683:
3684:
3685: IF (l_debug = 'Y') THEN
3686: okc_util.print_trace(2,' ');
3687: okc_util.print_trace(2,' Calling the OKC_OC_INT_CONFIG_PVT.quote_line_relationship procedure ');
3688: okc_util.print_trace(2,' ');
3689: END IF;
3690:
3691:
3684:
3685: IF (l_debug = 'Y') THEN
3686: okc_util.print_trace(2,' ');
3687: okc_util.print_trace(2,' Calling the OKC_OC_INT_CONFIG_PVT.quote_line_relationship procedure ');
3688: okc_util.print_trace(2,' ');
3689: END IF;
3690:
3691:
3692: OKC_OC_INT_CONFIG_PVT.quote_line_relationship(
3706:
3707: END IF;
3708:
3709: IF (l_debug = 'Y') THEN
3710: okc_util.print_trace(2,' ');
3711: okc_util.print_trace(2,' Success - Calling the OKC_OC_INT_CONFIG_PVT.quote_line_relationship procedure ');
3712: okc_util.print_trace(2,' ');
3713: END IF;
3714:
3707: END IF;
3708:
3709: IF (l_debug = 'Y') THEN
3710: okc_util.print_trace(2,' ');
3711: okc_util.print_trace(2,' Success - Calling the OKC_OC_INT_CONFIG_PVT.quote_line_relationship procedure ');
3712: okc_util.print_trace(2,' ');
3713: END IF;
3714:
3715: -- Need to identify the quote lines that have to be deleted, for which
3708:
3709: IF (l_debug = 'Y') THEN
3710: okc_util.print_trace(2,' ');
3711: okc_util.print_trace(2,' Success - Calling the OKC_OC_INT_CONFIG_PVT.quote_line_relationship procedure ');
3712: okc_util.print_trace(2,' ');
3713: END IF;
3714:
3715: -- Need to identify the quote lines that have to be deleted, for which
3716: -- the contract lines have already been deleted.
3754:
3755:
3756: IF l_ql = 0 THEN
3757: IF (l_debug = 'Y') THEN
3758: okc_util.print_trace(2, ' ');
3759: okc_util.print_trace(2, '******************************************************************');
3760: okc_util.print_trace(3, 'NO quote lines: All contract top lines have been discarded');
3761: okc_util.print_trace(2, '******************************************************************');
3762: END IF;
3755:
3756: IF l_ql = 0 THEN
3757: IF (l_debug = 'Y') THEN
3758: okc_util.print_trace(2, ' ');
3759: okc_util.print_trace(2, '******************************************************************');
3760: okc_util.print_trace(3, 'NO quote lines: All contract top lines have been discarded');
3761: okc_util.print_trace(2, '******************************************************************');
3762: END IF;
3763: okc_api.set_message(G_APP_NAME1,
3756: IF l_ql = 0 THEN
3757: IF (l_debug = 'Y') THEN
3758: okc_util.print_trace(2, ' ');
3759: okc_util.print_trace(2, '******************************************************************');
3760: okc_util.print_trace(3, 'NO quote lines: All contract top lines have been discarded');
3761: okc_util.print_trace(2, '******************************************************************');
3762: END IF;
3763: okc_api.set_message(G_APP_NAME1,
3764: 'OKO_K2Q_NOORDLINES',
3757: IF (l_debug = 'Y') THEN
3758: okc_util.print_trace(2, ' ');
3759: okc_util.print_trace(2, '******************************************************************');
3760: okc_util.print_trace(3, 'NO quote lines: All contract top lines have been discarded');
3761: okc_util.print_trace(2, '******************************************************************');
3762: END IF;
3763: okc_api.set_message(G_APP_NAME1,
3764: 'OKO_K2Q_NOORDLINES',
3765: 'KNUMBER',
3770: ELSE
3771: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3772: END IF;
3773:
3774: --okc_util.print_trace(2, ' ');
3775: --okc_util.print_trace(2, '=====================================');
3776: --okc_util.print_trace(2, 'Total Quote Price = '||LTRIM(TO_CHAR(x_total_price, '9G999G999G990D00')));
3777: --okc_util.print_trace(2, '=====================================');
3778: IF (l_debug = 'Y') THEN
3771: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3772: END IF;
3773:
3774: --okc_util.print_trace(2, ' ');
3775: --okc_util.print_trace(2, '=====================================');
3776: --okc_util.print_trace(2, 'Total Quote Price = '||LTRIM(TO_CHAR(x_total_price, '9G999G999G990D00')));
3777: --okc_util.print_trace(2, '=====================================');
3778: IF (l_debug = 'Y') THEN
3779: okc_util.print_trace(1, ' ');
3772: END IF;
3773:
3774: --okc_util.print_trace(2, ' ');
3775: --okc_util.print_trace(2, '=====================================');
3776: --okc_util.print_trace(2, 'Total Quote Price = '||LTRIM(TO_CHAR(x_total_price, '9G999G999G990D00')));
3777: --okc_util.print_trace(2, '=====================================');
3778: IF (l_debug = 'Y') THEN
3779: okc_util.print_trace(1, ' ');
3780: okc_util.print_trace(1, 'INPUT RECORD FOR QUOTE CREATION - Quote Lines:');
3773:
3774: --okc_util.print_trace(2, ' ');
3775: --okc_util.print_trace(2, '=====================================');
3776: --okc_util.print_trace(2, 'Total Quote Price = '||LTRIM(TO_CHAR(x_total_price, '9G999G999G990D00')));
3777: --okc_util.print_trace(2, '=====================================');
3778: IF (l_debug = 'Y') THEN
3779: okc_util.print_trace(1, ' ');
3780: okc_util.print_trace(1, 'INPUT RECORD FOR QUOTE CREATION - Quote Lines:');
3781: okc_util.print_trace(1, '==============================================');
3775: --okc_util.print_trace(2, '=====================================');
3776: --okc_util.print_trace(2, 'Total Quote Price = '||LTRIM(TO_CHAR(x_total_price, '9G999G999G990D00')));
3777: --okc_util.print_trace(2, '=====================================');
3778: IF (l_debug = 'Y') THEN
3779: okc_util.print_trace(1, ' ');
3780: okc_util.print_trace(1, 'INPUT RECORD FOR QUOTE CREATION - Quote Lines:');
3781: okc_util.print_trace(1, '==============================================');
3782: END IF;
3783: IF px_qte_line_tbl.first IS NOT NULL THEN
3776: --okc_util.print_trace(2, 'Total Quote Price = '||LTRIM(TO_CHAR(x_total_price, '9G999G999G990D00')));
3777: --okc_util.print_trace(2, '=====================================');
3778: IF (l_debug = 'Y') THEN
3779: okc_util.print_trace(1, ' ');
3780: okc_util.print_trace(1, 'INPUT RECORD FOR QUOTE CREATION - Quote Lines:');
3781: okc_util.print_trace(1, '==============================================');
3782: END IF;
3783: IF px_qte_line_tbl.first IS NOT NULL THEN
3784: FOR i IN px_qte_line_tbl.first..px_qte_line_tbl.last LOOP
3777: --okc_util.print_trace(2, '=====================================');
3778: IF (l_debug = 'Y') THEN
3779: okc_util.print_trace(1, ' ');
3780: okc_util.print_trace(1, 'INPUT RECORD FOR QUOTE CREATION - Quote Lines:');
3781: okc_util.print_trace(1, '==============================================');
3782: END IF;
3783: IF px_qte_line_tbl.first IS NOT NULL THEN
3784: FOR i IN px_qte_line_tbl.first..px_qte_line_tbl.last LOOP
3785: IF (l_debug = 'Y') THEN
3782: END IF;
3783: IF px_qte_line_tbl.first IS NOT NULL THEN
3784: FOR i IN px_qte_line_tbl.first..px_qte_line_tbl.last LOOP
3785: IF (l_debug = 'Y') THEN
3786: okc_util.print_trace(2, '> Org Id = '||px_qte_line_tbl(i).org_id);
3787: okc_util.print_trace(2, 'Quote Line NUMBER = '||px_qte_line_tbl(i).line_number);
3788: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(px_qte_line_tbl(i).line_category_code)));
3789: okc_util.print_trace(2, 'Item type code = '||px_qte_line_tbl(i).item_type_code);
3790: okc_util.print_trace(2, 'Start date active = '||px_qte_line_tbl(i).start_date_active);
3783: IF px_qte_line_tbl.first IS NOT NULL THEN
3784: FOR i IN px_qte_line_tbl.first..px_qte_line_tbl.last LOOP
3785: IF (l_debug = 'Y') THEN
3786: okc_util.print_trace(2, '> Org Id = '||px_qte_line_tbl(i).org_id);
3787: okc_util.print_trace(2, 'Quote Line NUMBER = '||px_qte_line_tbl(i).line_number);
3788: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(px_qte_line_tbl(i).line_category_code)));
3789: okc_util.print_trace(2, 'Item type code = '||px_qte_line_tbl(i).item_type_code);
3790: okc_util.print_trace(2, 'Start date active = '||px_qte_line_tbl(i).start_date_active);
3791: okc_util.print_trace(2, 'End date active = '||px_qte_line_tbl(i).end_date_active);
3784: FOR i IN px_qte_line_tbl.first..px_qte_line_tbl.last LOOP
3785: IF (l_debug = 'Y') THEN
3786: okc_util.print_trace(2, '> Org Id = '||px_qte_line_tbl(i).org_id);
3787: okc_util.print_trace(2, 'Quote Line NUMBER = '||px_qte_line_tbl(i).line_number);
3788: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(px_qte_line_tbl(i).line_category_code)));
3789: okc_util.print_trace(2, 'Item type code = '||px_qte_line_tbl(i).item_type_code);
3790: okc_util.print_trace(2, 'Start date active = '||px_qte_line_tbl(i).start_date_active);
3791: okc_util.print_trace(2, 'End date active = '||px_qte_line_tbl(i).end_date_active);
3792: okc_util.print_trace(2, 'Price List Id = '||px_qte_line_tbl(i).price_list_id);
3785: IF (l_debug = 'Y') THEN
3786: okc_util.print_trace(2, '> Org Id = '||px_qte_line_tbl(i).org_id);
3787: okc_util.print_trace(2, 'Quote Line NUMBER = '||px_qte_line_tbl(i).line_number);
3788: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(px_qte_line_tbl(i).line_category_code)));
3789: okc_util.print_trace(2, 'Item type code = '||px_qte_line_tbl(i).item_type_code);
3790: okc_util.print_trace(2, 'Start date active = '||px_qte_line_tbl(i).start_date_active);
3791: okc_util.print_trace(2, 'End date active = '||px_qte_line_tbl(i).end_date_active);
3792: okc_util.print_trace(2, 'Price List Id = '||px_qte_line_tbl(i).price_list_id);
3793: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_line_tbl(i).invoicing_rule_id);
3786: okc_util.print_trace(2, '> Org Id = '||px_qte_line_tbl(i).org_id);
3787: okc_util.print_trace(2, 'Quote Line NUMBER = '||px_qte_line_tbl(i).line_number);
3788: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(px_qte_line_tbl(i).line_category_code)));
3789: okc_util.print_trace(2, 'Item type code = '||px_qte_line_tbl(i).item_type_code);
3790: okc_util.print_trace(2, 'Start date active = '||px_qte_line_tbl(i).start_date_active);
3791: okc_util.print_trace(2, 'End date active = '||px_qte_line_tbl(i).end_date_active);
3792: okc_util.print_trace(2, 'Price List Id = '||px_qte_line_tbl(i).price_list_id);
3793: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_line_tbl(i).invoicing_rule_id);
3794: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_line_tbl(i).invoice_to_party_id);
3787: okc_util.print_trace(2, 'Quote Line NUMBER = '||px_qte_line_tbl(i).line_number);
3788: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(px_qte_line_tbl(i).line_category_code)));
3789: okc_util.print_trace(2, 'Item type code = '||px_qte_line_tbl(i).item_type_code);
3790: okc_util.print_trace(2, 'Start date active = '||px_qte_line_tbl(i).start_date_active);
3791: okc_util.print_trace(2, 'End date active = '||px_qte_line_tbl(i).end_date_active);
3792: okc_util.print_trace(2, 'Price List Id = '||px_qte_line_tbl(i).price_list_id);
3793: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_line_tbl(i).invoicing_rule_id);
3794: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_line_tbl(i).invoice_to_party_id);
3795: okc_util.print_trace(2, 'Inv To Party site Id = '||px_qte_line_tbl(i).invoice_to_party_site_id);
3788: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(px_qte_line_tbl(i).line_category_code)));
3789: okc_util.print_trace(2, 'Item type code = '||px_qte_line_tbl(i).item_type_code);
3790: okc_util.print_trace(2, 'Start date active = '||px_qte_line_tbl(i).start_date_active);
3791: okc_util.print_trace(2, 'End date active = '||px_qte_line_tbl(i).end_date_active);
3792: okc_util.print_trace(2, 'Price List Id = '||px_qte_line_tbl(i).price_list_id);
3793: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_line_tbl(i).invoicing_rule_id);
3794: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_line_tbl(i).invoice_to_party_id);
3795: okc_util.print_trace(2, 'Inv To Party site Id = '||px_qte_line_tbl(i).invoice_to_party_site_id);
3796: okc_util.print_trace(2, 'Inv Item Id = '||px_qte_line_tbl(i).inventory_item_id);
3789: okc_util.print_trace(2, 'Item type code = '||px_qte_line_tbl(i).item_type_code);
3790: okc_util.print_trace(2, 'Start date active = '||px_qte_line_tbl(i).start_date_active);
3791: okc_util.print_trace(2, 'End date active = '||px_qte_line_tbl(i).end_date_active);
3792: okc_util.print_trace(2, 'Price List Id = '||px_qte_line_tbl(i).price_list_id);
3793: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_line_tbl(i).invoicing_rule_id);
3794: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_line_tbl(i).invoice_to_party_id);
3795: okc_util.print_trace(2, 'Inv To Party site Id = '||px_qte_line_tbl(i).invoice_to_party_site_id);
3796: okc_util.print_trace(2, 'Inv Item Id = '||px_qte_line_tbl(i).inventory_item_id);
3797: okc_util.print_trace(2, 'Organization Id = '||px_qte_line_tbl(i).organization_id);
3790: okc_util.print_trace(2, 'Start date active = '||px_qte_line_tbl(i).start_date_active);
3791: okc_util.print_trace(2, 'End date active = '||px_qte_line_tbl(i).end_date_active);
3792: okc_util.print_trace(2, 'Price List Id = '||px_qte_line_tbl(i).price_list_id);
3793: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_line_tbl(i).invoicing_rule_id);
3794: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_line_tbl(i).invoice_to_party_id);
3795: okc_util.print_trace(2, 'Inv To Party site Id = '||px_qte_line_tbl(i).invoice_to_party_site_id);
3796: okc_util.print_trace(2, 'Inv Item Id = '||px_qte_line_tbl(i).inventory_item_id);
3797: okc_util.print_trace(2, 'Organization Id = '||px_qte_line_tbl(i).organization_id);
3798: okc_util.print_trace(2, 'Quantity = '||px_qte_line_tbl(i).quantity);
3791: okc_util.print_trace(2, 'End date active = '||px_qte_line_tbl(i).end_date_active);
3792: okc_util.print_trace(2, 'Price List Id = '||px_qte_line_tbl(i).price_list_id);
3793: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_line_tbl(i).invoicing_rule_id);
3794: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_line_tbl(i).invoice_to_party_id);
3795: okc_util.print_trace(2, 'Inv To Party site Id = '||px_qte_line_tbl(i).invoice_to_party_site_id);
3796: okc_util.print_trace(2, 'Inv Item Id = '||px_qte_line_tbl(i).inventory_item_id);
3797: okc_util.print_trace(2, 'Organization Id = '||px_qte_line_tbl(i).organization_id);
3798: okc_util.print_trace(2, 'Quantity = '||px_qte_line_tbl(i).quantity);
3799: okc_util.print_trace(2, 'UOM = '||px_qte_line_tbl(i).uom_code);
3792: okc_util.print_trace(2, 'Price List Id = '||px_qte_line_tbl(i).price_list_id);
3793: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_line_tbl(i).invoicing_rule_id);
3794: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_line_tbl(i).invoice_to_party_id);
3795: okc_util.print_trace(2, 'Inv To Party site Id = '||px_qte_line_tbl(i).invoice_to_party_site_id);
3796: okc_util.print_trace(2, 'Inv Item Id = '||px_qte_line_tbl(i).inventory_item_id);
3797: okc_util.print_trace(2, 'Organization Id = '||px_qte_line_tbl(i).organization_id);
3798: okc_util.print_trace(2, 'Quantity = '||px_qte_line_tbl(i).quantity);
3799: okc_util.print_trace(2, 'UOM = '||px_qte_line_tbl(i).uom_code);
3800: okc_util.print_trace(2, 'Currency code = '||px_qte_line_tbl(i).currency_code);
3793: okc_util.print_trace(2, 'Inv Rule Id = '||px_qte_line_tbl(i).invoicing_rule_id);
3794: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_line_tbl(i).invoice_to_party_id);
3795: okc_util.print_trace(2, 'Inv To Party site Id = '||px_qte_line_tbl(i).invoice_to_party_site_id);
3796: okc_util.print_trace(2, 'Inv Item Id = '||px_qte_line_tbl(i).inventory_item_id);
3797: okc_util.print_trace(2, 'Organization Id = '||px_qte_line_tbl(i).organization_id);
3798: okc_util.print_trace(2, 'Quantity = '||px_qte_line_tbl(i).quantity);
3799: okc_util.print_trace(2, 'UOM = '||px_qte_line_tbl(i).uom_code);
3800: okc_util.print_trace(2, 'Currency code = '||px_qte_line_tbl(i).currency_code);
3801: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
3794: okc_util.print_trace(2, 'Inv To Party Id = '||px_qte_line_tbl(i).invoice_to_party_id);
3795: okc_util.print_trace(2, 'Inv To Party site Id = '||px_qte_line_tbl(i).invoice_to_party_site_id);
3796: okc_util.print_trace(2, 'Inv Item Id = '||px_qte_line_tbl(i).inventory_item_id);
3797: okc_util.print_trace(2, 'Organization Id = '||px_qte_line_tbl(i).organization_id);
3798: okc_util.print_trace(2, 'Quantity = '||px_qte_line_tbl(i).quantity);
3799: okc_util.print_trace(2, 'UOM = '||px_qte_line_tbl(i).uom_code);
3800: okc_util.print_trace(2, 'Currency code = '||px_qte_line_tbl(i).currency_code);
3801: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
3802: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price*px_qte_line_tbl(i).quantity, '9G999G999G990D99')));
3795: okc_util.print_trace(2, 'Inv To Party site Id = '||px_qte_line_tbl(i).invoice_to_party_site_id);
3796: okc_util.print_trace(2, 'Inv Item Id = '||px_qte_line_tbl(i).inventory_item_id);
3797: okc_util.print_trace(2, 'Organization Id = '||px_qte_line_tbl(i).organization_id);
3798: okc_util.print_trace(2, 'Quantity = '||px_qte_line_tbl(i).quantity);
3799: okc_util.print_trace(2, 'UOM = '||px_qte_line_tbl(i).uom_code);
3800: okc_util.print_trace(2, 'Currency code = '||px_qte_line_tbl(i).currency_code);
3801: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
3802: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price*px_qte_line_tbl(i).quantity, '9G999G999G990D99')));
3803: okc_util.print_trace(2, '---------------------------------------');
3796: okc_util.print_trace(2, 'Inv Item Id = '||px_qte_line_tbl(i).inventory_item_id);
3797: okc_util.print_trace(2, 'Organization Id = '||px_qte_line_tbl(i).organization_id);
3798: okc_util.print_trace(2, 'Quantity = '||px_qte_line_tbl(i).quantity);
3799: okc_util.print_trace(2, 'UOM = '||px_qte_line_tbl(i).uom_code);
3800: okc_util.print_trace(2, 'Currency code = '||px_qte_line_tbl(i).currency_code);
3801: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
3802: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price*px_qte_line_tbl(i).quantity, '9G999G999G990D99')));
3803: okc_util.print_trace(2, '---------------------------------------');
3804: okc_util.print_trace(2, 'Quote Header Id = '||px_qte_line_tbl(i).quote_header_id);
3797: okc_util.print_trace(2, 'Organization Id = '||px_qte_line_tbl(i).organization_id);
3798: okc_util.print_trace(2, 'Quantity = '||px_qte_line_tbl(i).quantity);
3799: okc_util.print_trace(2, 'UOM = '||px_qte_line_tbl(i).uom_code);
3800: okc_util.print_trace(2, 'Currency code = '||px_qte_line_tbl(i).currency_code);
3801: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
3802: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price*px_qte_line_tbl(i).quantity, '9G999G999G990D99')));
3803: okc_util.print_trace(2, '---------------------------------------');
3804: okc_util.print_trace(2, 'Quote Header Id = '||px_qte_line_tbl(i).quote_header_id);
3805: okc_util.print_trace(2, 'Quote Line Id = '||px_qte_line_tbl(i).quote_line_id);
3798: okc_util.print_trace(2, 'Quantity = '||px_qte_line_tbl(i).quantity);
3799: okc_util.print_trace(2, 'UOM = '||px_qte_line_tbl(i).uom_code);
3800: okc_util.print_trace(2, 'Currency code = '||px_qte_line_tbl(i).currency_code);
3801: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
3802: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price*px_qte_line_tbl(i).quantity, '9G999G999G990D99')));
3803: okc_util.print_trace(2, '---------------------------------------');
3804: okc_util.print_trace(2, 'Quote Header Id = '||px_qte_line_tbl(i).quote_header_id);
3805: okc_util.print_trace(2, 'Quote Line Id = '||px_qte_line_tbl(i).quote_line_id);
3806: END IF;
3799: okc_util.print_trace(2, 'UOM = '||px_qte_line_tbl(i).uom_code);
3800: okc_util.print_trace(2, 'Currency code = '||px_qte_line_tbl(i).currency_code);
3801: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
3802: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price*px_qte_line_tbl(i).quantity, '9G999G999G990D99')));
3803: okc_util.print_trace(2, '---------------------------------------');
3804: okc_util.print_trace(2, 'Quote Header Id = '||px_qte_line_tbl(i).quote_header_id);
3805: okc_util.print_trace(2, 'Quote Line Id = '||px_qte_line_tbl(i).quote_line_id);
3806: END IF;
3807:
3800: okc_util.print_trace(2, 'Currency code = '||px_qte_line_tbl(i).currency_code);
3801: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
3802: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price*px_qte_line_tbl(i).quantity, '9G999G999G990D99')));
3803: okc_util.print_trace(2, '---------------------------------------');
3804: okc_util.print_trace(2, 'Quote Header Id = '||px_qte_line_tbl(i).quote_header_id);
3805: okc_util.print_trace(2, 'Quote Line Id = '||px_qte_line_tbl(i).quote_line_id);
3806: END IF;
3807:
3808: IF px_qte_line_dtl_tbl.first IS NOT NULL THEN
3801: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
3802: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(px_qte_line_tbl(i).line_quote_price*px_qte_line_tbl(i).quantity, '9G999G999G990D99')));
3803: okc_util.print_trace(2, '---------------------------------------');
3804: okc_util.print_trace(2, 'Quote Header Id = '||px_qte_line_tbl(i).quote_header_id);
3805: okc_util.print_trace(2, 'Quote Line Id = '||px_qte_line_tbl(i).quote_line_id);
3806: END IF;
3807:
3808: IF px_qte_line_dtl_tbl.first IS NOT NULL THEN
3809: IF (l_debug = 'Y') THEN
3806: END IF;
3807:
3808: IF px_qte_line_dtl_tbl.first IS NOT NULL THEN
3809: IF (l_debug = 'Y') THEN
3810: okc_util.print_trace(3, ' ');
3811: okc_util.print_trace(3, 'INPUT RECORD FOR QUOTE CREATION - Quote Detail Lines:');
3812: okc_util.print_trace(3, '===============================================');
3813: END IF;
3814: l_nb_qte_line_dtl:=0;
3807:
3808: IF px_qte_line_dtl_tbl.first IS NOT NULL THEN
3809: IF (l_debug = 'Y') THEN
3810: okc_util.print_trace(3, ' ');
3811: okc_util.print_trace(3, 'INPUT RECORD FOR QUOTE CREATION - Quote Detail Lines:');
3812: okc_util.print_trace(3, '===============================================');
3813: END IF;
3814: l_nb_qte_line_dtl:=0;
3815: FOR j IN px_qte_line_dtl_tbl.first..px_qte_line_dtl_tbl.last LOOP
3808: IF px_qte_line_dtl_tbl.first IS NOT NULL THEN
3809: IF (l_debug = 'Y') THEN
3810: okc_util.print_trace(3, ' ');
3811: okc_util.print_trace(3, 'INPUT RECORD FOR QUOTE CREATION - Quote Detail Lines:');
3812: okc_util.print_trace(3, '===============================================');
3813: END IF;
3814: l_nb_qte_line_dtl:=0;
3815: FOR j IN px_qte_line_dtl_tbl.first..px_qte_line_dtl_tbl.last LOOP
3816:
3819:
3820: l_nb_qte_line_dtl:=l_nb_qte_line_dtl + 1;
3821:
3822: IF (l_debug = 'Y') THEN
3823: okc_util.print_trace(4, '>> Quote Line NUMBER = '||px_qte_line_dtl_tbl(j).qte_line_index);
3824: okc_util.print_trace(4, 'Service Ref type code = '||px_qte_line_dtl_tbl(j).service_ref_type_code);
3825: okc_util.print_trace(4, 'Service Ref Syst Id = '||px_qte_line_dtl_tbl(j).service_ref_system_id);
3826: okc_util.print_trace(4, 'Service Ref Line Id = '||px_qte_line_dtl_tbl(j).service_ref_line_id);
3827: END IF;
3820: l_nb_qte_line_dtl:=l_nb_qte_line_dtl + 1;
3821:
3822: IF (l_debug = 'Y') THEN
3823: okc_util.print_trace(4, '>> Quote Line NUMBER = '||px_qte_line_dtl_tbl(j).qte_line_index);
3824: okc_util.print_trace(4, 'Service Ref type code = '||px_qte_line_dtl_tbl(j).service_ref_type_code);
3825: okc_util.print_trace(4, 'Service Ref Syst Id = '||px_qte_line_dtl_tbl(j).service_ref_system_id);
3826: okc_util.print_trace(4, 'Service Ref Line Id = '||px_qte_line_dtl_tbl(j).service_ref_line_id);
3827: END IF;
3828: --okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_line_number);
3821:
3822: IF (l_debug = 'Y') THEN
3823: okc_util.print_trace(4, '>> Quote Line NUMBER = '||px_qte_line_dtl_tbl(j).qte_line_index);
3824: okc_util.print_trace(4, 'Service Ref type code = '||px_qte_line_dtl_tbl(j).service_ref_type_code);
3825: okc_util.print_trace(4, 'Service Ref Syst Id = '||px_qte_line_dtl_tbl(j).service_ref_system_id);
3826: okc_util.print_trace(4, 'Service Ref Line Id = '||px_qte_line_dtl_tbl(j).service_ref_line_id);
3827: END IF;
3828: --okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_line_number);
3829: IF (l_debug = 'Y') THEN
3822: IF (l_debug = 'Y') THEN
3823: okc_util.print_trace(4, '>> Quote Line NUMBER = '||px_qte_line_dtl_tbl(j).qte_line_index);
3824: okc_util.print_trace(4, 'Service Ref type code = '||px_qte_line_dtl_tbl(j).service_ref_type_code);
3825: okc_util.print_trace(4, 'Service Ref Syst Id = '||px_qte_line_dtl_tbl(j).service_ref_system_id);
3826: okc_util.print_trace(4, 'Service Ref Line Id = '||px_qte_line_dtl_tbl(j).service_ref_line_id);
3827: END IF;
3828: --okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_line_number);
3829: IF (l_debug = 'Y') THEN
3830: okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3824: okc_util.print_trace(4, 'Service Ref type code = '||px_qte_line_dtl_tbl(j).service_ref_type_code);
3825: okc_util.print_trace(4, 'Service Ref Syst Id = '||px_qte_line_dtl_tbl(j).service_ref_system_id);
3826: okc_util.print_trace(4, 'Service Ref Line Id = '||px_qte_line_dtl_tbl(j).service_ref_line_id);
3827: END IF;
3828: --okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_line_number);
3829: IF (l_debug = 'Y') THEN
3830: okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3831: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3832: okc_util.print_trace(4, 'Service Ref Order Num = '||px_qte_line_dtl_tbl(j).service_ref_order_number);
3826: okc_util.print_trace(4, 'Service Ref Line Id = '||px_qte_line_dtl_tbl(j).service_ref_line_id);
3827: END IF;
3828: --okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_line_number);
3829: IF (l_debug = 'Y') THEN
3830: okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3831: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3832: okc_util.print_trace(4, 'Service Ref Order Num = '||px_qte_line_dtl_tbl(j).service_ref_order_number);
3833: okc_util.print_trace(4, 'Service duration = '||px_qte_line_dtl_tbl(j).service_duration);
3834: okc_util.print_trace(4, 'Service period = '||px_qte_line_dtl_tbl(j).service_period);
3827: END IF;
3828: --okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_line_number);
3829: IF (l_debug = 'Y') THEN
3830: okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3831: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3832: okc_util.print_trace(4, 'Service Ref Order Num = '||px_qte_line_dtl_tbl(j).service_ref_order_number);
3833: okc_util.print_trace(4, 'Service duration = '||px_qte_line_dtl_tbl(j).service_duration);
3834: okc_util.print_trace(4, 'Service period = '||px_qte_line_dtl_tbl(j).service_period);
3835: END IF;
3828: --okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_line_number);
3829: IF (l_debug = 'Y') THEN
3830: okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3831: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3832: okc_util.print_trace(4, 'Service Ref Order Num = '||px_qte_line_dtl_tbl(j).service_ref_order_number);
3833: okc_util.print_trace(4, 'Service duration = '||px_qte_line_dtl_tbl(j).service_duration);
3834: okc_util.print_trace(4, 'Service period = '||px_qte_line_dtl_tbl(j).service_period);
3835: END IF;
3836:
3829: IF (l_debug = 'Y') THEN
3830: okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3831: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3832: okc_util.print_trace(4, 'Service Ref Order Num = '||px_qte_line_dtl_tbl(j).service_ref_order_number);
3833: okc_util.print_trace(4, 'Service duration = '||px_qte_line_dtl_tbl(j).service_duration);
3834: okc_util.print_trace(4, 'Service period = '||px_qte_line_dtl_tbl(j).service_period);
3835: END IF;
3836:
3837: IF (l_debug = 'Y') THEN
3830: okc_util.print_trace(4, 'Service Ref Line Num = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3831: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||px_qte_line_dtl_tbl(j).service_ref_qte_line_index);
3832: okc_util.print_trace(4, 'Service Ref Order Num = '||px_qte_line_dtl_tbl(j).service_ref_order_number);
3833: okc_util.print_trace(4, 'Service duration = '||px_qte_line_dtl_tbl(j).service_duration);
3834: okc_util.print_trace(4, 'Service period = '||px_qte_line_dtl_tbl(j).service_period);
3835: END IF;
3836:
3837: IF (l_debug = 'Y') THEN
3838: okc_util.print_trace(4, 'config_header_id = '||px_qte_line_dtl_tbl(j).config_header_id);
3834: okc_util.print_trace(4, 'Service period = '||px_qte_line_dtl_tbl(j).service_period);
3835: END IF;
3836:
3837: IF (l_debug = 'Y') THEN
3838: okc_util.print_trace(4, 'config_header_id = '||px_qte_line_dtl_tbl(j).config_header_id);
3839: okc_util.print_trace(4, 'config_rev num = '||px_qte_line_dtl_tbl(j).config_revision_num);
3840: okc_util.print_trace(4, 'config_item_id = '||px_qte_line_dtl_tbl(j).config_item_id);
3841: okc_util.print_trace(4, 'comp conf flag = '||px_qte_line_dtl_tbl(j).complete_configuration_flag);
3842: okc_util.print_trace(4, 'valid conf flag = '||px_qte_line_dtl_tbl(j).valid_configuration_flag);
3835: END IF;
3836:
3837: IF (l_debug = 'Y') THEN
3838: okc_util.print_trace(4, 'config_header_id = '||px_qte_line_dtl_tbl(j).config_header_id);
3839: okc_util.print_trace(4, 'config_rev num = '||px_qte_line_dtl_tbl(j).config_revision_num);
3840: okc_util.print_trace(4, 'config_item_id = '||px_qte_line_dtl_tbl(j).config_item_id);
3841: okc_util.print_trace(4, 'comp conf flag = '||px_qte_line_dtl_tbl(j).complete_configuration_flag);
3842: okc_util.print_trace(4, 'valid conf flag = '||px_qte_line_dtl_tbl(j).valid_configuration_flag);
3843: okc_util.print_trace(4, 'component_code = '||px_qte_line_dtl_tbl(j).component_code);
3836:
3837: IF (l_debug = 'Y') THEN
3838: okc_util.print_trace(4, 'config_header_id = '||px_qte_line_dtl_tbl(j).config_header_id);
3839: okc_util.print_trace(4, 'config_rev num = '||px_qte_line_dtl_tbl(j).config_revision_num);
3840: okc_util.print_trace(4, 'config_item_id = '||px_qte_line_dtl_tbl(j).config_item_id);
3841: okc_util.print_trace(4, 'comp conf flag = '||px_qte_line_dtl_tbl(j).complete_configuration_flag);
3842: okc_util.print_trace(4, 'valid conf flag = '||px_qte_line_dtl_tbl(j).valid_configuration_flag);
3843: okc_util.print_trace(4, 'component_code = '||px_qte_line_dtl_tbl(j).component_code);
3844: END IF;
3837: IF (l_debug = 'Y') THEN
3838: okc_util.print_trace(4, 'config_header_id = '||px_qte_line_dtl_tbl(j).config_header_id);
3839: okc_util.print_trace(4, 'config_rev num = '||px_qte_line_dtl_tbl(j).config_revision_num);
3840: okc_util.print_trace(4, 'config_item_id = '||px_qte_line_dtl_tbl(j).config_item_id);
3841: okc_util.print_trace(4, 'comp conf flag = '||px_qte_line_dtl_tbl(j).complete_configuration_flag);
3842: okc_util.print_trace(4, 'valid conf flag = '||px_qte_line_dtl_tbl(j).valid_configuration_flag);
3843: okc_util.print_trace(4, 'component_code = '||px_qte_line_dtl_tbl(j).component_code);
3844: END IF;
3845:
3838: okc_util.print_trace(4, 'config_header_id = '||px_qte_line_dtl_tbl(j).config_header_id);
3839: okc_util.print_trace(4, 'config_rev num = '||px_qte_line_dtl_tbl(j).config_revision_num);
3840: okc_util.print_trace(4, 'config_item_id = '||px_qte_line_dtl_tbl(j).config_item_id);
3841: okc_util.print_trace(4, 'comp conf flag = '||px_qte_line_dtl_tbl(j).complete_configuration_flag);
3842: okc_util.print_trace(4, 'valid conf flag = '||px_qte_line_dtl_tbl(j).valid_configuration_flag);
3843: okc_util.print_trace(4, 'component_code = '||px_qte_line_dtl_tbl(j).component_code);
3844: END IF;
3845:
3846:
3839: okc_util.print_trace(4, 'config_rev num = '||px_qte_line_dtl_tbl(j).config_revision_num);
3840: okc_util.print_trace(4, 'config_item_id = '||px_qte_line_dtl_tbl(j).config_item_id);
3841: okc_util.print_trace(4, 'comp conf flag = '||px_qte_line_dtl_tbl(j).complete_configuration_flag);
3842: okc_util.print_trace(4, 'valid conf flag = '||px_qte_line_dtl_tbl(j).valid_configuration_flag);
3843: okc_util.print_trace(4, 'component_code = '||px_qte_line_dtl_tbl(j).component_code);
3844: END IF;
3845:
3846:
3847: IF (l_debug = 'Y') THEN
3844: END IF;
3845:
3846:
3847: IF (l_debug = 'Y') THEN
3848: okc_util.print_trace(4, '---------------------------------------');
3849: okc_util.print_trace(4, 'Quote Line Id = '||px_qte_line_dtl_tbl(j).quote_line_id);
3850: okc_util.print_trace(4, 'Quote Detail Line Id = '||px_qte_line_dtl_tbl(j).quote_line_detail_id);
3851: END IF;
3852:
3845:
3846:
3847: IF (l_debug = 'Y') THEN
3848: okc_util.print_trace(4, '---------------------------------------');
3849: okc_util.print_trace(4, 'Quote Line Id = '||px_qte_line_dtl_tbl(j).quote_line_id);
3850: okc_util.print_trace(4, 'Quote Detail Line Id = '||px_qte_line_dtl_tbl(j).quote_line_detail_id);
3851: END IF;
3852:
3853: END IF;
3846:
3847: IF (l_debug = 'Y') THEN
3848: okc_util.print_trace(4, '---------------------------------------');
3849: okc_util.print_trace(4, 'Quote Line Id = '||px_qte_line_dtl_tbl(j).quote_line_id);
3850: okc_util.print_trace(4, 'Quote Detail Line Id = '||px_qte_line_dtl_tbl(j).quote_line_detail_id);
3851: END IF;
3852:
3853: END IF;
3854: END LOOP;
3853: END IF;
3854: END LOOP;
3855: IF l_nb_qte_line_dtl = 0 THEN
3856: IF (l_debug = 'Y') THEN
3857: okc_util.print_trace(4, 'NO Quote Detail Lines');
3858: END IF;
3859: END IF;
3860: ELSE
3861: IF (l_debug = 'Y') THEN
3858: END IF;
3859: END IF;
3860: ELSE
3861: IF (l_debug = 'Y') THEN
3862: okc_util.print_trace(3, ' ');
3863: okc_util.print_trace(3, 'INPUT RECORD FOR QUOTE CREATION - Quote Detail Lines:');
3864: okc_util.print_trace(3, '=====================================================');
3865: okc_util.print_trace(4, 'NO Quote Detail Lines');
3866: END IF;
3859: END IF;
3860: ELSE
3861: IF (l_debug = 'Y') THEN
3862: okc_util.print_trace(3, ' ');
3863: okc_util.print_trace(3, 'INPUT RECORD FOR QUOTE CREATION - Quote Detail Lines:');
3864: okc_util.print_trace(3, '=====================================================');
3865: okc_util.print_trace(4, 'NO Quote Detail Lines');
3866: END IF;
3867: END IF;
3860: ELSE
3861: IF (l_debug = 'Y') THEN
3862: okc_util.print_trace(3, ' ');
3863: okc_util.print_trace(3, 'INPUT RECORD FOR QUOTE CREATION - Quote Detail Lines:');
3864: okc_util.print_trace(3, '=====================================================');
3865: okc_util.print_trace(4, 'NO Quote Detail Lines');
3866: END IF;
3867: END IF;
3868:
3861: IF (l_debug = 'Y') THEN
3862: okc_util.print_trace(3, ' ');
3863: okc_util.print_trace(3, 'INPUT RECORD FOR QUOTE CREATION - Quote Detail Lines:');
3864: okc_util.print_trace(3, '=====================================================');
3865: okc_util.print_trace(4, 'NO Quote Detail Lines');
3866: END IF;
3867: END IF;
3868:
3869: IF (l_debug = 'Y') THEN
3866: END IF;
3867: END IF;
3868:
3869: IF (l_debug = 'Y') THEN
3870: okc_util.print_trace(5, ' ');
3871: okc_util.print_trace(5, 'INPUT RECORD FOR RELATIONSHIP CREATION - Contract Line-Quote Line Relationship:');
3872: okc_util.print_trace(5, '=====================================================');
3873: END IF;
3874:
3867: END IF;
3868:
3869: IF (l_debug = 'Y') THEN
3870: okc_util.print_trace(5, ' ');
3871: okc_util.print_trace(5, 'INPUT RECORD FOR RELATIONSHIP CREATION - Contract Line-Quote Line Relationship:');
3872: okc_util.print_trace(5, '=====================================================');
3873: END IF;
3874:
3875: IF (l_debug = 'Y') THEN
3868:
3869: IF (l_debug = 'Y') THEN
3870: okc_util.print_trace(5, ' ');
3871: okc_util.print_trace(5, 'INPUT RECORD FOR RELATIONSHIP CREATION - Contract Line-Quote Line Relationship:');
3872: okc_util.print_trace(5, '=====================================================');
3873: END IF;
3874:
3875: IF (l_debug = 'Y') THEN
3876: okc_util.print_trace(2,'px_k2q_tab_count '||px_k2q_line_tbl.count);
3872: okc_util.print_trace(5, '=====================================================');
3873: END IF;
3874:
3875: IF (l_debug = 'Y') THEN
3876: okc_util.print_trace(2,'px_k2q_tab_count '||px_k2q_line_tbl.count);
3877: END IF;
3878:
3879: IF px_k2q_line_tbl.EXISTS(i) THEN
3880: IF (l_debug = 'Y') THEN
3877: END IF;
3878:
3879: IF px_k2q_line_tbl.EXISTS(i) THEN
3880: IF (l_debug = 'Y') THEN
3881: okc_util.print_trace(6, 'Contract Line Id = '||px_k2q_line_tbl(i).k_line_id);
3882: okc_util.print_trace(6, 'Contract Line parent id = '||px_k2q_line_tbl(i).k_parent_line_id);
3883: okc_util.print_trace(6, 'Quote Line Index = '||px_k2q_line_tbl(i).q_line_idx);
3884: okc_util.print_trace(6, 'Quote Item type code = '||px_k2q_line_tbl(i).q_item_type_code);
3885: END IF;
3878:
3879: IF px_k2q_line_tbl.EXISTS(i) THEN
3880: IF (l_debug = 'Y') THEN
3881: okc_util.print_trace(6, 'Contract Line Id = '||px_k2q_line_tbl(i).k_line_id);
3882: okc_util.print_trace(6, 'Contract Line parent id = '||px_k2q_line_tbl(i).k_parent_line_id);
3883: okc_util.print_trace(6, 'Quote Line Index = '||px_k2q_line_tbl(i).q_line_idx);
3884: okc_util.print_trace(6, 'Quote Item type code = '||px_k2q_line_tbl(i).q_item_type_code);
3885: END IF;
3886: END IF;
3879: IF px_k2q_line_tbl.EXISTS(i) THEN
3880: IF (l_debug = 'Y') THEN
3881: okc_util.print_trace(6, 'Contract Line Id = '||px_k2q_line_tbl(i).k_line_id);
3882: okc_util.print_trace(6, 'Contract Line parent id = '||px_k2q_line_tbl(i).k_parent_line_id);
3883: okc_util.print_trace(6, 'Quote Line Index = '||px_k2q_line_tbl(i).q_line_idx);
3884: okc_util.print_trace(6, 'Quote Item type code = '||px_k2q_line_tbl(i).q_item_type_code);
3885: END IF;
3886: END IF;
3887: IF (l_debug = 'Y') THEN
3880: IF (l_debug = 'Y') THEN
3881: okc_util.print_trace(6, 'Contract Line Id = '||px_k2q_line_tbl(i).k_line_id);
3882: okc_util.print_trace(6, 'Contract Line parent id = '||px_k2q_line_tbl(i).k_parent_line_id);
3883: okc_util.print_trace(6, 'Quote Line Index = '||px_k2q_line_tbl(i).q_line_idx);
3884: okc_util.print_trace(6, 'Quote Item type code = '||px_k2q_line_tbl(i).q_item_type_code);
3885: END IF;
3886: END IF;
3887: IF (l_debug = 'Y') THEN
3888: okc_util.print_trace(2, ' ');
3884: okc_util.print_trace(6, 'Quote Item type code = '||px_k2q_line_tbl(i).q_item_type_code);
3885: END IF;
3886: END IF;
3887: IF (l_debug = 'Y') THEN
3888: okc_util.print_trace(2, ' ');
3889: END IF;
3890:
3891: END LOOP;
3892: ELSE
3890:
3891: END LOOP;
3892: ELSE
3893: IF (l_debug = 'Y') THEN
3894: okc_util.print_trace(2, 'NO Quote Lines');
3895: END IF;
3896: END IF;
3897: IF (l_debug = 'Y') THEN
3898: okc_util.print_trace(2, ' ');
3894: okc_util.print_trace(2, 'NO Quote Lines');
3895: END IF;
3896: END IF;
3897: IF (l_debug = 'Y') THEN
3898: okc_util.print_trace(2, ' ');
3899: okc_util.print_trace(1, '
3901:
3902: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3895: END IF;
3896: END IF;
3897: IF (l_debug = 'Y') THEN
3898: okc_util.print_trace(2, ' ');
3899: okc_util.print_trace(1, '
3901:
3902: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3903:
4068: l_quote_hd_price_attr_tab.DELETE;
4069:
4070:
4071: IF (l_debug = 'Y') THEN
4072: okc_util.print_trace(0, ' ');
4073: okc_util.print_trace(0, '>START - OKC_OC_INT_KTQ_PVT.CREATE_QUOTE_FROM_K -');
4074: okc_util.print_trace(0, ' ');
4075: okc_util.print_trace(0, ' ');
4076: okc_util.print_trace(0, '================================================');
4069:
4070:
4071: IF (l_debug = 'Y') THEN
4072: okc_util.print_trace(0, ' ');
4073: okc_util.print_trace(0, '>START - OKC_OC_INT_KTQ_PVT.CREATE_QUOTE_FROM_K -');
4074: okc_util.print_trace(0, ' ');
4075: okc_util.print_trace(0, ' ');
4076: okc_util.print_trace(0, '================================================');
4077: okc_util.print_trace(0, 'STEP 1 : FETCH AND LOCK CONTRACT, AND INITIALIZE CONTEXT');
4070:
4071: IF (l_debug = 'Y') THEN
4072: okc_util.print_trace(0, ' ');
4073: okc_util.print_trace(0, '>START - OKC_OC_INT_KTQ_PVT.CREATE_QUOTE_FROM_K -');
4074: okc_util.print_trace(0, ' ');
4075: okc_util.print_trace(0, ' ');
4076: okc_util.print_trace(0, '================================================');
4077: okc_util.print_trace(0, 'STEP 1 : FETCH AND LOCK CONTRACT, AND INITIALIZE CONTEXT');
4078: okc_util.print_trace(0, '================================================');
4071: IF (l_debug = 'Y') THEN
4072: okc_util.print_trace(0, ' ');
4073: okc_util.print_trace(0, '>START - OKC_OC_INT_KTQ_PVT.CREATE_QUOTE_FROM_K -');
4074: okc_util.print_trace(0, ' ');
4075: okc_util.print_trace(0, ' ');
4076: okc_util.print_trace(0, '================================================');
4077: okc_util.print_trace(0, 'STEP 1 : FETCH AND LOCK CONTRACT, AND INITIALIZE CONTEXT');
4078: okc_util.print_trace(0, '================================================');
4079: okc_util.print_trace(0, ' ');
4072: okc_util.print_trace(0, ' ');
4073: okc_util.print_trace(0, '>START - OKC_OC_INT_KTQ_PVT.CREATE_QUOTE_FROM_K -');
4074: okc_util.print_trace(0, ' ');
4075: okc_util.print_trace(0, ' ');
4076: okc_util.print_trace(0, '================================================');
4077: okc_util.print_trace(0, 'STEP 1 : FETCH AND LOCK CONTRACT, AND INITIALIZE CONTEXT');
4078: okc_util.print_trace(0, '================================================');
4079: okc_util.print_trace(0, ' ');
4080: END IF;
4073: okc_util.print_trace(0, '>START - OKC_OC_INT_KTQ_PVT.CREATE_QUOTE_FROM_K -');
4074: okc_util.print_trace(0, ' ');
4075: okc_util.print_trace(0, ' ');
4076: okc_util.print_trace(0, '================================================');
4077: okc_util.print_trace(0, 'STEP 1 : FETCH AND LOCK CONTRACT, AND INITIALIZE CONTEXT');
4078: okc_util.print_trace(0, '================================================');
4079: okc_util.print_trace(0, ' ');
4080: END IF;
4081:
4074: okc_util.print_trace(0, ' ');
4075: okc_util.print_trace(0, ' ');
4076: okc_util.print_trace(0, '================================================');
4077: okc_util.print_trace(0, 'STEP 1 : FETCH AND LOCK CONTRACT, AND INITIALIZE CONTEXT');
4078: okc_util.print_trace(0, '================================================');
4079: okc_util.print_trace(0, ' ');
4080: END IF;
4081:
4082: --
4075: okc_util.print_trace(0, ' ');
4076: okc_util.print_trace(0, '================================================');
4077: okc_util.print_trace(0, 'STEP 1 : FETCH AND LOCK CONTRACT, AND INITIALIZE CONTEXT');
4078: okc_util.print_trace(0, '================================================');
4079: okc_util.print_trace(0, ' ');
4080: END IF;
4081:
4082: --
4083: -- housekeeping
4083: -- housekeeping
4084: --
4085:
4086: IF (l_debug = 'Y') THEN
4087: okc_util.print_trace(1, 'Initialize the message list');
4088: END IF;
4089: okc_api.init_msg_list(p_init_msg_list => p_init_msg_list);
4090: l_init_msg_count:=fnd_msg_pub.count_msg;
4091:
4092: --
4093: -- fetch the contract
4094: --
4095: IF (l_debug = 'Y') THEN
4096: okc_util.print_trace(1,'The Input contract id is '||p_contract_id);
4097: END IF;
4098:
4099: IF (l_debug = 'Y') THEN
4100: okc_util.print_trace(1, 'Fetch the contract');
4096: okc_util.print_trace(1,'The Input contract id is '||p_contract_id);
4097: END IF;
4098:
4099: IF (l_debug = 'Y') THEN
4100: okc_util.print_trace(1, 'Fetch the contract');
4101: END IF;
4102: OPEN c_chr(p_contract_id);
4103: FETCH c_chr INTO l_chr;
4104: IF c_chr%NOTFOUND THEN
4119: l_k_nbr := l_chr.contract_number;
4120: END IF;
4121:
4122: IF (l_debug = 'Y') THEN
4123: okc_util.print_trace(1,'The contract number for the given contract id is '||l_k_nbr);
4124: END IF;
4125:
4126: --
4127: -- lock the contract
4129: -- - to update contract comments
4130: --
4131:
4132: IF (l_debug = 'Y') THEN
4133: okc_util.print_trace(1, 'Lock the contract');
4134: END IF;
4135: l_chrv_rec.id := p_contract_id;
4136: l_chrv_rec.object_version_number := l_chr.object_version_number;
4137: okc_contract_pub.lock_contract_header (
4161: -- set organization context
4162: --
4163:
4164: IF (l_debug = 'Y') THEN
4165: okc_util.print_trace(1, 'Set the contract context');
4166: END IF;
4167: IF p_contract_id IS NULL THEN
4168: OKC_API.set_message(p_app_name => g_app_name,
4169: p_msg_name => 'OKC_K2Q_KIDISNULL');
4170: print_error(2);
4171: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4172: END IF;
4173: okc_context.set_okc_org_context(p_chr_id => p_contract_id);
4174: IF p_trace_mode = okc_api.g_true AND okc_util.l_trace_flag THEN
4175: okc_util.l_complete_trace_file_name2 := '- Trace file = '|| okc_util.l_complete_trace_file_name;
4176: ELSE
4177: okc_util.l_complete_trace_file_name2 := '- Request Id = '|| okc_util.l_request_id;
4178: END IF;
4171: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4172: END IF;
4173: okc_context.set_okc_org_context(p_chr_id => p_contract_id);
4174: IF p_trace_mode = okc_api.g_true AND okc_util.l_trace_flag THEN
4175: okc_util.l_complete_trace_file_name2 := '- Trace file = '|| okc_util.l_complete_trace_file_name;
4176: ELSE
4177: okc_util.l_complete_trace_file_name2 := '- Request Id = '|| okc_util.l_request_id;
4178: END IF;
4179: IF p_trace_mode = okc_api.g_true AND okc_util.l_trace_flag THEN
4173: okc_context.set_okc_org_context(p_chr_id => p_contract_id);
4174: IF p_trace_mode = okc_api.g_true AND okc_util.l_trace_flag THEN
4175: okc_util.l_complete_trace_file_name2 := '- Trace file = '|| okc_util.l_complete_trace_file_name;
4176: ELSE
4177: okc_util.l_complete_trace_file_name2 := '- Request Id = '|| okc_util.l_request_id;
4178: END IF;
4179: IF p_trace_mode = okc_api.g_true AND okc_util.l_trace_flag THEN
4180: OKC_API.set_message(p_app_name => g_app_name,
4181: p_msg_name => 'OKC_K2Q_TRACEFILE',
4175: okc_util.l_complete_trace_file_name2 := '- Trace file = '|| okc_util.l_complete_trace_file_name;
4176: ELSE
4177: okc_util.l_complete_trace_file_name2 := '- Request Id = '|| okc_util.l_request_id;
4178: END IF;
4179: IF p_trace_mode = okc_api.g_true AND okc_util.l_trace_flag THEN
4180: OKC_API.set_message(p_app_name => g_app_name,
4181: p_msg_name => 'OKC_K2Q_TRACEFILE',
4182: p_token1 => 'TRACEFILE',
4183: p_token1_value => okc_util.l_complete_trace_file_name2);
4179: IF p_trace_mode = okc_api.g_true AND okc_util.l_trace_flag THEN
4180: OKC_API.set_message(p_app_name => g_app_name,
4181: p_msg_name => 'OKC_K2Q_TRACEFILE',
4182: p_token1 => 'TRACEFILE',
4183: p_token1_value => okc_util.l_complete_trace_file_name2);
4184: END IF;
4185: --
4186: -- fetch the contract
4187: --
4186: -- fetch the contract
4187: --
4188:
4189: IF (l_debug = 'Y') THEN
4190: okc_util.print_trace(1, 'Fetch the contract');
4191: END IF;
4192: OPEN c_k_header(p_contract_id);
4193: FETCH c_k_header INTO l_k_header_rec;
4194: CLOSE c_k_header;
4197: -- Check up on contract eligibility for a quote creation
4198: --
4199:
4200: IF (l_debug = 'Y') THEN
4201: okc_util.print_trace(0, ' ');
4202: okc_util.print_trace(0, ' ');
4203: okc_util.print_trace(0, '==========================================================');
4204: okc_util.print_trace(0, 'STEP 2 : CHECK CONTRACT ELIGIBILITY FOR THE QUOTE UPDATION');
4205: okc_util.print_trace(0, '==========================================================');
4198: --
4199:
4200: IF (l_debug = 'Y') THEN
4201: okc_util.print_trace(0, ' ');
4202: okc_util.print_trace(0, ' ');
4203: okc_util.print_trace(0, '==========================================================');
4204: okc_util.print_trace(0, 'STEP 2 : CHECK CONTRACT ELIGIBILITY FOR THE QUOTE UPDATION');
4205: okc_util.print_trace(0, '==========================================================');
4206: okc_util.print_trace(0, ' ');
4199:
4200: IF (l_debug = 'Y') THEN
4201: okc_util.print_trace(0, ' ');
4202: okc_util.print_trace(0, ' ');
4203: okc_util.print_trace(0, '==========================================================');
4204: okc_util.print_trace(0, 'STEP 2 : CHECK CONTRACT ELIGIBILITY FOR THE QUOTE UPDATION');
4205: okc_util.print_trace(0, '==========================================================');
4206: okc_util.print_trace(0, ' ');
4207: END IF;
4200: IF (l_debug = 'Y') THEN
4201: okc_util.print_trace(0, ' ');
4202: okc_util.print_trace(0, ' ');
4203: okc_util.print_trace(0, '==========================================================');
4204: okc_util.print_trace(0, 'STEP 2 : CHECK CONTRACT ELIGIBILITY FOR THE QUOTE UPDATION');
4205: okc_util.print_trace(0, '==========================================================');
4206: okc_util.print_trace(0, ' ');
4207: END IF;
4208: validate_k_eligibility( l_k_header_rec,
4201: okc_util.print_trace(0, ' ');
4202: okc_util.print_trace(0, ' ');
4203: okc_util.print_trace(0, '==========================================================');
4204: okc_util.print_trace(0, 'STEP 2 : CHECK CONTRACT ELIGIBILITY FOR THE QUOTE UPDATION');
4205: okc_util.print_trace(0, '==========================================================');
4206: okc_util.print_trace(0, ' ');
4207: END IF;
4208: validate_k_eligibility( l_k_header_rec,
4209: p_quote_id,
4202: okc_util.print_trace(0, ' ');
4203: okc_util.print_trace(0, '==========================================================');
4204: okc_util.print_trace(0, 'STEP 2 : CHECK CONTRACT ELIGIBILITY FOR THE QUOTE UPDATION');
4205: okc_util.print_trace(0, '==========================================================');
4206: okc_util.print_trace(0, ' ');
4207: END IF;
4208: validate_k_eligibility( l_k_header_rec,
4209: p_quote_id,
4210: l_return_status
4220: --
4221: -- fetch the Quote
4222: --
4223: IF (l_debug = 'Y') THEN
4224: okc_util.print_trace(1,' ');
4225: okc_util.print_trace(1,'The Input quote id is '||g_quote_id);
4226: END IF;
4227:
4228: IF (l_debug = 'Y') THEN
4221: -- fetch the Quote
4222: --
4223: IF (l_debug = 'Y') THEN
4224: okc_util.print_trace(1,' ');
4225: okc_util.print_trace(1,'The Input quote id is '||g_quote_id);
4226: END IF;
4227:
4228: IF (l_debug = 'Y') THEN
4229: okc_util.print_trace(1, 'Fetch the Quote');
4225: okc_util.print_trace(1,'The Input quote id is '||g_quote_id);
4226: END IF;
4227:
4228: IF (l_debug = 'Y') THEN
4229: okc_util.print_trace(1, 'Fetch the Quote');
4230: END IF;
4231: OPEN c_qhr(g_quote_id);
4232: FETCH c_qhr INTO l_qhr;
4233:
4249: l_q_nbr := l_qhr.quote_number;
4250: END IF;
4251:
4252: IF (l_debug = 'Y') THEN
4253: okc_util.print_trace(1,'The quote number for the given quote id is '||l_q_nbr);
4254: END IF;
4255:
4256:
4257: --
4258: -- get the contract information
4259: --
4260:
4261: IF (l_debug = 'Y') THEN
4262: okc_util.print_trace(0, ' ');
4263: okc_util.print_trace(0, ' ');
4264: okc_util.print_trace(0, '================================================');
4265: okc_util.print_trace(0, 'STEP 3 : BUILD CONTRACT STRUCTURES');
4266: okc_util.print_trace(0, '================================================');
4259: --
4260:
4261: IF (l_debug = 'Y') THEN
4262: okc_util.print_trace(0, ' ');
4263: okc_util.print_trace(0, ' ');
4264: okc_util.print_trace(0, '================================================');
4265: okc_util.print_trace(0, 'STEP 3 : BUILD CONTRACT STRUCTURES');
4266: okc_util.print_trace(0, '================================================');
4267: okc_util.print_trace(0, ' ');
4260:
4261: IF (l_debug = 'Y') THEN
4262: okc_util.print_trace(0, ' ');
4263: okc_util.print_trace(0, ' ');
4264: okc_util.print_trace(0, '================================================');
4265: okc_util.print_trace(0, 'STEP 3 : BUILD CONTRACT STRUCTURES');
4266: okc_util.print_trace(0, '================================================');
4267: okc_util.print_trace(0, ' ');
4268: okc_util.print_trace(0, 'The Input contract is '||p_contract_id);
4261: IF (l_debug = 'Y') THEN
4262: okc_util.print_trace(0, ' ');
4263: okc_util.print_trace(0, ' ');
4264: okc_util.print_trace(0, '================================================');
4265: okc_util.print_trace(0, 'STEP 3 : BUILD CONTRACT STRUCTURES');
4266: okc_util.print_trace(0, '================================================');
4267: okc_util.print_trace(0, ' ');
4268: okc_util.print_trace(0, 'The Input contract is '||p_contract_id);
4269: okc_util.print_trace(0, 'The Input quote is '||g_quote_id);
4262: okc_util.print_trace(0, ' ');
4263: okc_util.print_trace(0, ' ');
4264: okc_util.print_trace(0, '================================================');
4265: okc_util.print_trace(0, 'STEP 3 : BUILD CONTRACT STRUCTURES');
4266: okc_util.print_trace(0, '================================================');
4267: okc_util.print_trace(0, ' ');
4268: okc_util.print_trace(0, 'The Input contract is '||p_contract_id);
4269: okc_util.print_trace(0, 'The Input quote is '||g_quote_id);
4270: okc_util.print_trace(0, 'The Input relationship is '||p_rel_code);
4263: okc_util.print_trace(0, ' ');
4264: okc_util.print_trace(0, '================================================');
4265: okc_util.print_trace(0, 'STEP 3 : BUILD CONTRACT STRUCTURES');
4266: okc_util.print_trace(0, '================================================');
4267: okc_util.print_trace(0, ' ');
4268: okc_util.print_trace(0, 'The Input contract is '||p_contract_id);
4269: okc_util.print_trace(0, 'The Input quote is '||g_quote_id);
4270: okc_util.print_trace(0, 'The Input relationship is '||p_rel_code);
4271: okc_util.print_trace(0, 'The contract category is '||l_k_header_rec.scs_code);
4264: okc_util.print_trace(0, '================================================');
4265: okc_util.print_trace(0, 'STEP 3 : BUILD CONTRACT STRUCTURES');
4266: okc_util.print_trace(0, '================================================');
4267: okc_util.print_trace(0, ' ');
4268: okc_util.print_trace(0, 'The Input contract is '||p_contract_id);
4269: okc_util.print_trace(0, 'The Input quote is '||g_quote_id);
4270: okc_util.print_trace(0, 'The Input relationship is '||p_rel_code);
4271: okc_util.print_trace(0, 'The contract category is '||l_k_header_rec.scs_code);
4272: okc_util.print_trace(0, ' ');
4265: okc_util.print_trace(0, 'STEP 3 : BUILD CONTRACT STRUCTURES');
4266: okc_util.print_trace(0, '================================================');
4267: okc_util.print_trace(0, ' ');
4268: okc_util.print_trace(0, 'The Input contract is '||p_contract_id);
4269: okc_util.print_trace(0, 'The Input quote is '||g_quote_id);
4270: okc_util.print_trace(0, 'The Input relationship is '||p_rel_code);
4271: okc_util.print_trace(0, 'The contract category is '||l_k_header_rec.scs_code);
4272: okc_util.print_trace(0, ' ');
4273: END IF;
4266: okc_util.print_trace(0, '================================================');
4267: okc_util.print_trace(0, ' ');
4268: okc_util.print_trace(0, 'The Input contract is '||p_contract_id);
4269: okc_util.print_trace(0, 'The Input quote is '||g_quote_id);
4270: okc_util.print_trace(0, 'The Input relationship is '||p_rel_code);
4271: okc_util.print_trace(0, 'The contract category is '||l_k_header_rec.scs_code);
4272: okc_util.print_trace(0, ' ');
4273: END IF;
4274:
4267: okc_util.print_trace(0, ' ');
4268: okc_util.print_trace(0, 'The Input contract is '||p_contract_id);
4269: okc_util.print_trace(0, 'The Input quote is '||g_quote_id);
4270: okc_util.print_trace(0, 'The Input relationship is '||p_rel_code);
4271: okc_util.print_trace(0, 'The contract category is '||l_k_header_rec.scs_code);
4272: okc_util.print_trace(0, ' ');
4273: END IF;
4274:
4275: build_k_structures(p_contract_id,
4268: okc_util.print_trace(0, 'The Input contract is '||p_contract_id);
4269: okc_util.print_trace(0, 'The Input quote is '||g_quote_id);
4270: okc_util.print_trace(0, 'The Input relationship is '||p_rel_code);
4271: okc_util.print_trace(0, 'The contract category is '||l_k_header_rec.scs_code);
4272: okc_util.print_trace(0, ' ');
4273: END IF;
4274:
4275: build_k_structures(p_contract_id,
4276: -- p_quote_id,
4288: -- populate quote header record
4289: --
4290:
4291: IF (l_debug = 'Y') THEN
4292: okc_util.print_trace(0, ' ');
4293: okc_util.print_trace(0, ' ');
4294: okc_util.print_trace(0, '================================================');
4295: okc_util.print_trace(0, 'STEP 4 : BUILD QUOTE HEADER STRUCTURES');
4296: okc_util.print_trace(0, '================================================');
4289: --
4290:
4291: IF (l_debug = 'Y') THEN
4292: okc_util.print_trace(0, ' ');
4293: okc_util.print_trace(0, ' ');
4294: okc_util.print_trace(0, '================================================');
4295: okc_util.print_trace(0, 'STEP 4 : BUILD QUOTE HEADER STRUCTURES');
4296: okc_util.print_trace(0, '================================================');
4297: okc_util.print_trace(0, ' ');
4290:
4291: IF (l_debug = 'Y') THEN
4292: okc_util.print_trace(0, ' ');
4293: okc_util.print_trace(0, ' ');
4294: okc_util.print_trace(0, '================================================');
4295: okc_util.print_trace(0, 'STEP 4 : BUILD QUOTE HEADER STRUCTURES');
4296: okc_util.print_trace(0, '================================================');
4297: okc_util.print_trace(0, ' ');
4298: END IF;
4291: IF (l_debug = 'Y') THEN
4292: okc_util.print_trace(0, ' ');
4293: okc_util.print_trace(0, ' ');
4294: okc_util.print_trace(0, '================================================');
4295: okc_util.print_trace(0, 'STEP 4 : BUILD QUOTE HEADER STRUCTURES');
4296: okc_util.print_trace(0, '================================================');
4297: okc_util.print_trace(0, ' ');
4298: END IF;
4299: build_qte_hdr(l_quote_header_rec,
4292: okc_util.print_trace(0, ' ');
4293: okc_util.print_trace(0, ' ');
4294: okc_util.print_trace(0, '================================================');
4295: okc_util.print_trace(0, 'STEP 4 : BUILD QUOTE HEADER STRUCTURES');
4296: okc_util.print_trace(0, '================================================');
4297: okc_util.print_trace(0, ' ');
4298: END IF;
4299: build_qte_hdr(l_quote_header_rec,
4300: l_quote_hd_shipment_tab,
4293: okc_util.print_trace(0, ' ');
4294: okc_util.print_trace(0, '================================================');
4295: okc_util.print_trace(0, 'STEP 4 : BUILD QUOTE HEADER STRUCTURES');
4296: okc_util.print_trace(0, '================================================');
4297: okc_util.print_trace(0, ' ');
4298: END IF;
4299: build_qte_hdr(l_quote_header_rec,
4300: l_quote_hd_shipment_tab,
4301: p_contract_id,
4314: -- populate quote lines table, line details
4315: --
4316:
4317: IF (l_debug = 'Y') THEN
4318: okc_util.print_trace(0, ' ');
4319: okc_util.print_trace(0, ' ');
4320: okc_util.print_trace(0, '================================================');
4321: okc_util.print_trace(0, 'STEP 5 : BUILD QUOTE LINE AND QUOTE DETAIL LINE STRUCTURES');
4322: okc_util.print_trace(0, '================================================');
4315: --
4316:
4317: IF (l_debug = 'Y') THEN
4318: okc_util.print_trace(0, ' ');
4319: okc_util.print_trace(0, ' ');
4320: okc_util.print_trace(0, '================================================');
4321: okc_util.print_trace(0, 'STEP 5 : BUILD QUOTE LINE AND QUOTE DETAIL LINE STRUCTURES');
4322: okc_util.print_trace(0, '================================================');
4323: okc_util.print_trace(0, ' ');
4316:
4317: IF (l_debug = 'Y') THEN
4318: okc_util.print_trace(0, ' ');
4319: okc_util.print_trace(0, ' ');
4320: okc_util.print_trace(0, '================================================');
4321: okc_util.print_trace(0, 'STEP 5 : BUILD QUOTE LINE AND QUOTE DETAIL LINE STRUCTURES');
4322: okc_util.print_trace(0, '================================================');
4323: okc_util.print_trace(0, ' ');
4324: END IF;
4317: IF (l_debug = 'Y') THEN
4318: okc_util.print_trace(0, ' ');
4319: okc_util.print_trace(0, ' ');
4320: okc_util.print_trace(0, '================================================');
4321: okc_util.print_trace(0, 'STEP 5 : BUILD QUOTE LINE AND QUOTE DETAIL LINE STRUCTURES');
4322: okc_util.print_trace(0, '================================================');
4323: okc_util.print_trace(0, ' ');
4324: END IF;
4325:
4318: okc_util.print_trace(0, ' ');
4319: okc_util.print_trace(0, ' ');
4320: okc_util.print_trace(0, '================================================');
4321: okc_util.print_trace(0, 'STEP 5 : BUILD QUOTE LINE AND QUOTE DETAIL LINE STRUCTURES');
4322: okc_util.print_trace(0, '================================================');
4323: okc_util.print_trace(0, ' ');
4324: END IF;
4325:
4326: build_qte_line(
4319: okc_util.print_trace(0, ' ');
4320: okc_util.print_trace(0, '================================================');
4321: okc_util.print_trace(0, 'STEP 5 : BUILD QUOTE LINE AND QUOTE DETAIL LINE STRUCTURES');
4322: okc_util.print_trace(0, '================================================');
4323: okc_util.print_trace(0, ' ');
4324: END IF;
4325:
4326: build_qte_line(
4327: p_contract_id
4349: -- populate pricing information fom the pricing API
4350: --
4351:
4352: IF (l_debug = 'Y') THEN
4353: okc_util.print_trace(0, ' ');
4354: okc_util.print_trace(0, ' ');
4355: okc_util.print_trace(0, '=============================================================');
4356: okc_util.print_trace(0, 'STEP 6 : BUILD PRICING INFORMATION FOR QUOTE HEADER AND LINES');
4357: okc_util.print_trace(0, '==============================================================');
4350: --
4351:
4352: IF (l_debug = 'Y') THEN
4353: okc_util.print_trace(0, ' ');
4354: okc_util.print_trace(0, ' ');
4355: okc_util.print_trace(0, '=============================================================');
4356: okc_util.print_trace(0, 'STEP 6 : BUILD PRICING INFORMATION FOR QUOTE HEADER AND LINES');
4357: okc_util.print_trace(0, '==============================================================');
4358: okc_util.print_trace(0, ' ');
4351:
4352: IF (l_debug = 'Y') THEN
4353: okc_util.print_trace(0, ' ');
4354: okc_util.print_trace(0, ' ');
4355: okc_util.print_trace(0, '=============================================================');
4356: okc_util.print_trace(0, 'STEP 6 : BUILD PRICING INFORMATION FOR QUOTE HEADER AND LINES');
4357: okc_util.print_trace(0, '==============================================================');
4358: okc_util.print_trace(0, ' ');
4359: END IF;
4352: IF (l_debug = 'Y') THEN
4353: okc_util.print_trace(0, ' ');
4354: okc_util.print_trace(0, ' ');
4355: okc_util.print_trace(0, '=============================================================');
4356: okc_util.print_trace(0, 'STEP 6 : BUILD PRICING INFORMATION FOR QUOTE HEADER AND LINES');
4357: okc_util.print_trace(0, '==============================================================');
4358: okc_util.print_trace(0, ' ');
4359: END IF;
4360:
4353: okc_util.print_trace(0, ' ');
4354: okc_util.print_trace(0, ' ');
4355: okc_util.print_trace(0, '=============================================================');
4356: okc_util.print_trace(0, 'STEP 6 : BUILD PRICING INFORMATION FOR QUOTE HEADER AND LINES');
4357: okc_util.print_trace(0, '==============================================================');
4358: okc_util.print_trace(0, ' ');
4359: END IF;
4360:
4361:
4354: okc_util.print_trace(0, ' ');
4355: okc_util.print_trace(0, '=============================================================');
4356: okc_util.print_trace(0, 'STEP 6 : BUILD PRICING INFORMATION FOR QUOTE HEADER AND LINES');
4357: okc_util.print_trace(0, '==============================================================');
4358: okc_util.print_trace(0, ' ');
4359: END IF;
4360:
4361:
4362: -- Displaying the values of relation table, quote line table and
4365:
4366: IF l_k2q_line_rel_tab.FIRST IS NOT NULL THEN
4367: FOR m IN l_k2q_line_rel_tab.FIRST..l_k2q_line_rel_tab.LAST LOOP
4368: IF (l_debug = 'Y') THEN
4369: okc_util.print_trace(2,'contract line id '||l_k2q_line_rel_tab(m).k_line_id);
4370: okc_util.print_trace(2,'K parent line id '||l_k2q_line_rel_tab(m).k_parent_line_id);
4371: okc_util.print_trace(2,'Quote line index '||l_k2q_line_rel_tab(m).q_line_idx);
4372: okc_util.print_trace(2,'Quote itm typ cod'||l_k2q_line_rel_tab(m).q_item_type_code);
4373: END IF;
4366: IF l_k2q_line_rel_tab.FIRST IS NOT NULL THEN
4367: FOR m IN l_k2q_line_rel_tab.FIRST..l_k2q_line_rel_tab.LAST LOOP
4368: IF (l_debug = 'Y') THEN
4369: okc_util.print_trace(2,'contract line id '||l_k2q_line_rel_tab(m).k_line_id);
4370: okc_util.print_trace(2,'K parent line id '||l_k2q_line_rel_tab(m).k_parent_line_id);
4371: okc_util.print_trace(2,'Quote line index '||l_k2q_line_rel_tab(m).q_line_idx);
4372: okc_util.print_trace(2,'Quote itm typ cod'||l_k2q_line_rel_tab(m).q_item_type_code);
4373: END IF;
4374: END LOOP;
4367: FOR m IN l_k2q_line_rel_tab.FIRST..l_k2q_line_rel_tab.LAST LOOP
4368: IF (l_debug = 'Y') THEN
4369: okc_util.print_trace(2,'contract line id '||l_k2q_line_rel_tab(m).k_line_id);
4370: okc_util.print_trace(2,'K parent line id '||l_k2q_line_rel_tab(m).k_parent_line_id);
4371: okc_util.print_trace(2,'Quote line index '||l_k2q_line_rel_tab(m).q_line_idx);
4372: okc_util.print_trace(2,'Quote itm typ cod'||l_k2q_line_rel_tab(m).q_item_type_code);
4373: END IF;
4374: END LOOP;
4375: END IF;
4368: IF (l_debug = 'Y') THEN
4369: okc_util.print_trace(2,'contract line id '||l_k2q_line_rel_tab(m).k_line_id);
4370: okc_util.print_trace(2,'K parent line id '||l_k2q_line_rel_tab(m).k_parent_line_id);
4371: okc_util.print_trace(2,'Quote line index '||l_k2q_line_rel_tab(m).q_line_idx);
4372: okc_util.print_trace(2,'Quote itm typ cod'||l_k2q_line_rel_tab(m).q_item_type_code);
4373: END IF;
4374: END LOOP;
4375: END IF;
4376:
4374: END LOOP;
4375: END IF;
4376:
4377: IF (l_debug = 'Y') THEN
4378: okc_util.print_trace(2, '================================================');
4379: END IF;
4380:
4381: IF l_quote_line_tab.FIRST IS NOT NULL THEN
4382: FOR m IN l_quote_line_tab.FIRST..l_quote_line_tab.LAST LOOP
4380:
4381: IF l_quote_line_tab.FIRST IS NOT NULL THEN
4382: FOR m IN l_quote_line_tab.FIRST..l_quote_line_tab.LAST LOOP
4383: IF (l_debug = 'Y') THEN
4384: okc_util.print_trace(2,'quote line id '||l_quote_line_tab(m).quote_line_id);
4385: okc_util.print_trace(2,'quote hdr id '||l_quote_line_tab(m).quote_header_id);
4386: okc_util.print_trace(2,'op code '||l_quote_line_tab(m).operation_code);
4387: okc_util.print_trace(2,'quote line # '||l_quote_line_tab(m).line_number);
4388: okc_util.print_trace(2,'Inv item id '||l_quote_line_tab(m).inventory_item_id);
4381: IF l_quote_line_tab.FIRST IS NOT NULL THEN
4382: FOR m IN l_quote_line_tab.FIRST..l_quote_line_tab.LAST LOOP
4383: IF (l_debug = 'Y') THEN
4384: okc_util.print_trace(2,'quote line id '||l_quote_line_tab(m).quote_line_id);
4385: okc_util.print_trace(2,'quote hdr id '||l_quote_line_tab(m).quote_header_id);
4386: okc_util.print_trace(2,'op code '||l_quote_line_tab(m).operation_code);
4387: okc_util.print_trace(2,'quote line # '||l_quote_line_tab(m).line_number);
4388: okc_util.print_trace(2,'Inv item id '||l_quote_line_tab(m).inventory_item_id);
4389: okc_util.print_trace(2,'quantity '||l_quote_line_tab(m).quantity);
4382: FOR m IN l_quote_line_tab.FIRST..l_quote_line_tab.LAST LOOP
4383: IF (l_debug = 'Y') THEN
4384: okc_util.print_trace(2,'quote line id '||l_quote_line_tab(m).quote_line_id);
4385: okc_util.print_trace(2,'quote hdr id '||l_quote_line_tab(m).quote_header_id);
4386: okc_util.print_trace(2,'op code '||l_quote_line_tab(m).operation_code);
4387: okc_util.print_trace(2,'quote line # '||l_quote_line_tab(m).line_number);
4388: okc_util.print_trace(2,'Inv item id '||l_quote_line_tab(m).inventory_item_id);
4389: okc_util.print_trace(2,'quantity '||l_quote_line_tab(m).quantity);
4390: okc_util.print_trace(2,'UOM code '||l_quote_line_tab(m).uom_code);
4383: IF (l_debug = 'Y') THEN
4384: okc_util.print_trace(2,'quote line id '||l_quote_line_tab(m).quote_line_id);
4385: okc_util.print_trace(2,'quote hdr id '||l_quote_line_tab(m).quote_header_id);
4386: okc_util.print_trace(2,'op code '||l_quote_line_tab(m).operation_code);
4387: okc_util.print_trace(2,'quote line # '||l_quote_line_tab(m).line_number);
4388: okc_util.print_trace(2,'Inv item id '||l_quote_line_tab(m).inventory_item_id);
4389: okc_util.print_trace(2,'quantity '||l_quote_line_tab(m).quantity);
4390: okc_util.print_trace(2,'UOM code '||l_quote_line_tab(m).uom_code);
4391: END IF;
4384: okc_util.print_trace(2,'quote line id '||l_quote_line_tab(m).quote_line_id);
4385: okc_util.print_trace(2,'quote hdr id '||l_quote_line_tab(m).quote_header_id);
4386: okc_util.print_trace(2,'op code '||l_quote_line_tab(m).operation_code);
4387: okc_util.print_trace(2,'quote line # '||l_quote_line_tab(m).line_number);
4388: okc_util.print_trace(2,'Inv item id '||l_quote_line_tab(m).inventory_item_id);
4389: okc_util.print_trace(2,'quantity '||l_quote_line_tab(m).quantity);
4390: okc_util.print_trace(2,'UOM code '||l_quote_line_tab(m).uom_code);
4391: END IF;
4392: END LOOP;
4385: okc_util.print_trace(2,'quote hdr id '||l_quote_line_tab(m).quote_header_id);
4386: okc_util.print_trace(2,'op code '||l_quote_line_tab(m).operation_code);
4387: okc_util.print_trace(2,'quote line # '||l_quote_line_tab(m).line_number);
4388: okc_util.print_trace(2,'Inv item id '||l_quote_line_tab(m).inventory_item_id);
4389: okc_util.print_trace(2,'quantity '||l_quote_line_tab(m).quantity);
4390: okc_util.print_trace(2,'UOM code '||l_quote_line_tab(m).uom_code);
4391: END IF;
4392: END LOOP;
4393: END IF;
4386: okc_util.print_trace(2,'op code '||l_quote_line_tab(m).operation_code);
4387: okc_util.print_trace(2,'quote line # '||l_quote_line_tab(m).line_number);
4388: okc_util.print_trace(2,'Inv item id '||l_quote_line_tab(m).inventory_item_id);
4389: okc_util.print_trace(2,'quantity '||l_quote_line_tab(m).quantity);
4390: okc_util.print_trace(2,'UOM code '||l_quote_line_tab(m).uom_code);
4391: END IF;
4392: END LOOP;
4393: END IF;
4394:
4420: RAISE OKC_API.G_EXCEPTION_ERROR;
4421: END IF;
4422:
4423: IF (l_debug = 'Y') THEN
4424: okc_util.print_trace(0, 'count of l_quote_price_adj_tab = '||l_quote_price_adj_tab.count);
4425: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_tab = '||l_quote_ln_price_adj_tab.count);
4426: okc_util.print_trace(0, ' ');
4427: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4428: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_attr_tab = '||l_quote_ln_price_adj_attr_tab.count);
4421: END IF;
4422:
4423: IF (l_debug = 'Y') THEN
4424: okc_util.print_trace(0, 'count of l_quote_price_adj_tab = '||l_quote_price_adj_tab.count);
4425: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_tab = '||l_quote_ln_price_adj_tab.count);
4426: okc_util.print_trace(0, ' ');
4427: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4428: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_attr_tab = '||l_quote_ln_price_adj_attr_tab.count);
4429: okc_util.print_trace(0, ' ');
4422:
4423: IF (l_debug = 'Y') THEN
4424: okc_util.print_trace(0, 'count of l_quote_price_adj_tab = '||l_quote_price_adj_tab.count);
4425: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_tab = '||l_quote_ln_price_adj_tab.count);
4426: okc_util.print_trace(0, ' ');
4427: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4428: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_attr_tab = '||l_quote_ln_price_adj_attr_tab.count);
4429: okc_util.print_trace(0, ' ');
4430: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4423: IF (l_debug = 'Y') THEN
4424: okc_util.print_trace(0, 'count of l_quote_price_adj_tab = '||l_quote_price_adj_tab.count);
4425: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_tab = '||l_quote_ln_price_adj_tab.count);
4426: okc_util.print_trace(0, ' ');
4427: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4428: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_attr_tab = '||l_quote_ln_price_adj_attr_tab.count);
4429: okc_util.print_trace(0, ' ');
4430: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4431: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_rltship_tab = '||l_qt_ln_price_adj_rltship_tab.count);
4424: okc_util.print_trace(0, 'count of l_quote_price_adj_tab = '||l_quote_price_adj_tab.count);
4425: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_tab = '||l_quote_ln_price_adj_tab.count);
4426: okc_util.print_trace(0, ' ');
4427: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4428: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_attr_tab = '||l_quote_ln_price_adj_attr_tab.count);
4429: okc_util.print_trace(0, ' ');
4430: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4431: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_rltship_tab = '||l_qt_ln_price_adj_rltship_tab.count);
4432: okc_util.print_trace(0, ' ');
4425: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_tab = '||l_quote_ln_price_adj_tab.count);
4426: okc_util.print_trace(0, ' ');
4427: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4428: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_attr_tab = '||l_quote_ln_price_adj_attr_tab.count);
4429: okc_util.print_trace(0, ' ');
4430: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4431: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_rltship_tab = '||l_qt_ln_price_adj_rltship_tab.count);
4432: okc_util.print_trace(0, ' ');
4433: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4426: okc_util.print_trace(0, ' ');
4427: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4428: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_attr_tab = '||l_quote_ln_price_adj_attr_tab.count);
4429: okc_util.print_trace(0, ' ');
4430: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4431: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_rltship_tab = '||l_qt_ln_price_adj_rltship_tab.count);
4432: okc_util.print_trace(0, ' ');
4433: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4434: okc_util.print_trace(0, 'count of l_quote_line_price_attr_tab = '||l_quote_ln_price_attr_tab.count);
4427: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4428: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_attr_tab = '||l_quote_ln_price_adj_attr_tab.count);
4429: okc_util.print_trace(0, ' ');
4430: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4431: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_rltship_tab = '||l_qt_ln_price_adj_rltship_tab.count);
4432: okc_util.print_trace(0, ' ');
4433: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4434: okc_util.print_trace(0, 'count of l_quote_line_price_attr_tab = '||l_quote_ln_price_attr_tab.count);
4435: END IF;
4428: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_attr_tab = '||l_quote_ln_price_adj_attr_tab.count);
4429: okc_util.print_trace(0, ' ');
4430: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4431: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_rltship_tab = '||l_qt_ln_price_adj_rltship_tab.count);
4432: okc_util.print_trace(0, ' ');
4433: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4434: okc_util.print_trace(0, 'count of l_quote_line_price_attr_tab = '||l_quote_ln_price_attr_tab.count);
4435: END IF;
4436:
4429: okc_util.print_trace(0, ' ');
4430: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4431: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_rltship_tab = '||l_qt_ln_price_adj_rltship_tab.count);
4432: okc_util.print_trace(0, ' ');
4433: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4434: okc_util.print_trace(0, 'count of l_quote_line_price_attr_tab = '||l_quote_ln_price_attr_tab.count);
4435: END IF;
4436:
4437: IF l_quote_ln_price_adj_tab.count > 0 THEN
4430: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4431: okc_util.print_trace(0, 'count of l_quote_ln_price_adj_rltship_tab = '||l_qt_ln_price_adj_rltship_tab.count);
4432: okc_util.print_trace(0, ' ');
4433: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4434: okc_util.print_trace(0, 'count of l_quote_line_price_attr_tab = '||l_quote_ln_price_attr_tab.count);
4435: END IF;
4436:
4437: IF l_quote_ln_price_adj_tab.count > 0 THEN
4438: FOR i IN l_quote_ln_price_adj_tab.FIRST..l_quote_ln_price_adj_tab.LAST LOOP
4452: END LOOP;
4453: END IF;
4454:
4455: IF (l_debug = 'Y') THEN
4456: okc_util.print_trace(0,'===========================================');
4457: okc_util.print_trace(0, 'count of l_quote_price_adj_tab = '||l_quote_price_adj_tab.count);
4458: okc_util.print_trace(0, ' ');
4459: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4460: okc_util.print_trace(0, ' ');
4453: END IF;
4454:
4455: IF (l_debug = 'Y') THEN
4456: okc_util.print_trace(0,'===========================================');
4457: okc_util.print_trace(0, 'count of l_quote_price_adj_tab = '||l_quote_price_adj_tab.count);
4458: okc_util.print_trace(0, ' ');
4459: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4460: okc_util.print_trace(0, ' ');
4461: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4454:
4455: IF (l_debug = 'Y') THEN
4456: okc_util.print_trace(0,'===========================================');
4457: okc_util.print_trace(0, 'count of l_quote_price_adj_tab = '||l_quote_price_adj_tab.count);
4458: okc_util.print_trace(0, ' ');
4459: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4460: okc_util.print_trace(0, ' ');
4461: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4462: okc_util.print_trace(0, ' ');
4455: IF (l_debug = 'Y') THEN
4456: okc_util.print_trace(0,'===========================================');
4457: okc_util.print_trace(0, 'count of l_quote_price_adj_tab = '||l_quote_price_adj_tab.count);
4458: okc_util.print_trace(0, ' ');
4459: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4460: okc_util.print_trace(0, ' ');
4461: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4462: okc_util.print_trace(0, ' ');
4463: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4456: okc_util.print_trace(0,'===========================================');
4457: okc_util.print_trace(0, 'count of l_quote_price_adj_tab = '||l_quote_price_adj_tab.count);
4458: okc_util.print_trace(0, ' ');
4459: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4460: okc_util.print_trace(0, ' ');
4461: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4462: okc_util.print_trace(0, ' ');
4463: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4464: okc_util.print_trace(0, 'count of l_quote_line_price_attr_tab = '||l_quote_ln_price_attr_tab.count);
4457: okc_util.print_trace(0, 'count of l_quote_price_adj_tab = '||l_quote_price_adj_tab.count);
4458: okc_util.print_trace(0, ' ');
4459: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4460: okc_util.print_trace(0, ' ');
4461: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4462: okc_util.print_trace(0, ' ');
4463: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4464: okc_util.print_trace(0, 'count of l_quote_line_price_attr_tab = '||l_quote_ln_price_attr_tab.count);
4465: okc_util.print_trace(0,'===========================================');
4458: okc_util.print_trace(0, ' ');
4459: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4460: okc_util.print_trace(0, ' ');
4461: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4462: okc_util.print_trace(0, ' ');
4463: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4464: okc_util.print_trace(0, 'count of l_quote_line_price_attr_tab = '||l_quote_ln_price_attr_tab.count);
4465: okc_util.print_trace(0,'===========================================');
4466: END IF;
4459: okc_util.print_trace(0, 'count of l_quote_price_adj_attr_tab = '||l_quote_price_adj_attr_tab.count);
4460: okc_util.print_trace(0, ' ');
4461: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4462: okc_util.print_trace(0, ' ');
4463: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4464: okc_util.print_trace(0, 'count of l_quote_line_price_attr_tab = '||l_quote_ln_price_attr_tab.count);
4465: okc_util.print_trace(0,'===========================================');
4466: END IF;
4467:
4460: okc_util.print_trace(0, ' ');
4461: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4462: okc_util.print_trace(0, ' ');
4463: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4464: okc_util.print_trace(0, 'count of l_quote_line_price_attr_tab = '||l_quote_ln_price_attr_tab.count);
4465: okc_util.print_trace(0,'===========================================');
4466: END IF;
4467:
4468: IF (l_debug = 'Y') THEN
4461: okc_util.print_trace(0, 'count of l_quote_price_adj_rltship_tab = '||l_quote_price_adj_rltship_tab.count);
4462: okc_util.print_trace(0, ' ');
4463: okc_util.print_trace(0, 'count of l_quote_head_price_attr_tab = '||l_quote_hd_price_attr_tab.count);
4464: okc_util.print_trace(0, 'count of l_quote_line_price_attr_tab = '||l_quote_ln_price_attr_tab.count);
4465: okc_util.print_trace(0,'===========================================');
4466: END IF;
4467:
4468: IF (l_debug = 'Y') THEN
4469: okc_util.print_trace(1,'====================================================================');
4465: okc_util.print_trace(0,'===========================================');
4466: END IF;
4467:
4468: IF (l_debug = 'Y') THEN
4469: okc_util.print_trace(1,'====================================================================');
4470: okc_util.print_trace(1,'DISPLAYING THE PRICING PL/SQL TABLE INFO BEFORE CALLING UPDATE QUOTE');
4471: okc_util.print_trace(1,'====================================================================');
4472: okc_util.print_trace(1,' ');
4473: END IF;
4466: END IF;
4467:
4468: IF (l_debug = 'Y') THEN
4469: okc_util.print_trace(1,'====================================================================');
4470: okc_util.print_trace(1,'DISPLAYING THE PRICING PL/SQL TABLE INFO BEFORE CALLING UPDATE QUOTE');
4471: okc_util.print_trace(1,'====================================================================');
4472: okc_util.print_trace(1,' ');
4473: END IF;
4474:
4467:
4468: IF (l_debug = 'Y') THEN
4469: okc_util.print_trace(1,'====================================================================');
4470: okc_util.print_trace(1,'DISPLAYING THE PRICING PL/SQL TABLE INFO BEFORE CALLING UPDATE QUOTE');
4471: okc_util.print_trace(1,'====================================================================');
4472: okc_util.print_trace(1,' ');
4473: END IF;
4474:
4475: IF (l_debug = 'Y') THEN
4468: IF (l_debug = 'Y') THEN
4469: okc_util.print_trace(1,'====================================================================');
4470: okc_util.print_trace(1,'DISPLAYING THE PRICING PL/SQL TABLE INFO BEFORE CALLING UPDATE QUOTE');
4471: okc_util.print_trace(1,'====================================================================');
4472: okc_util.print_trace(1,' ');
4473: END IF;
4474:
4475: IF (l_debug = 'Y') THEN
4476: okc_util.print_trace(1,'VALUES FROM l_quote_price_adj_tab');
4472: okc_util.print_trace(1,' ');
4473: END IF;
4474:
4475: IF (l_debug = 'Y') THEN
4476: okc_util.print_trace(1,'VALUES FROM l_quote_price_adj_tab');
4477: okc_util.print_trace(1,' ');
4478: END IF;
4479:
4480: IF l_quote_price_adj_tab.count > 0 THEN
4473: END IF;
4474:
4475: IF (l_debug = 'Y') THEN
4476: okc_util.print_trace(1,'VALUES FROM l_quote_price_adj_tab');
4477: okc_util.print_trace(1,' ');
4478: END IF;
4479:
4480: IF l_quote_price_adj_tab.count > 0 THEN
4481: FOR i IN l_quote_price_adj_tab.FIRST..l_quote_price_adj_tab.LAST LOOP
4479:
4480: IF l_quote_price_adj_tab.count > 0 THEN
4481: FOR i IN l_quote_price_adj_tab.FIRST..l_quote_price_adj_tab.LAST LOOP
4482: IF (l_debug = 'Y') THEN
4483: okc_util.print_trace(1,'index value = '||i);
4484: okc_util.print_trace(1,'oper code = '||l_quote_price_adj_tab(i).operation_code);
4485: okc_util.print_trace(1,'Price adj id= '||l_quote_price_adj_tab(i).price_adjustment_id);
4486: okc_util.print_trace(1,'qte hdr id = '||l_quote_price_adj_tab(i).quote_header_id);
4487: okc_util.print_trace(1,'qte line id = '||l_quote_price_adj_tab(i).quote_line_id);
4480: IF l_quote_price_adj_tab.count > 0 THEN
4481: FOR i IN l_quote_price_adj_tab.FIRST..l_quote_price_adj_tab.LAST LOOP
4482: IF (l_debug = 'Y') THEN
4483: okc_util.print_trace(1,'index value = '||i);
4484: okc_util.print_trace(1,'oper code = '||l_quote_price_adj_tab(i).operation_code);
4485: okc_util.print_trace(1,'Price adj id= '||l_quote_price_adj_tab(i).price_adjustment_id);
4486: okc_util.print_trace(1,'qte hdr id = '||l_quote_price_adj_tab(i).quote_header_id);
4487: okc_util.print_trace(1,'qte line id = '||l_quote_price_adj_tab(i).quote_line_id);
4488: okc_util.print_trace(1,'--------------------------------------------');
4481: FOR i IN l_quote_price_adj_tab.FIRST..l_quote_price_adj_tab.LAST LOOP
4482: IF (l_debug = 'Y') THEN
4483: okc_util.print_trace(1,'index value = '||i);
4484: okc_util.print_trace(1,'oper code = '||l_quote_price_adj_tab(i).operation_code);
4485: okc_util.print_trace(1,'Price adj id= '||l_quote_price_adj_tab(i).price_adjustment_id);
4486: okc_util.print_trace(1,'qte hdr id = '||l_quote_price_adj_tab(i).quote_header_id);
4487: okc_util.print_trace(1,'qte line id = '||l_quote_price_adj_tab(i).quote_line_id);
4488: okc_util.print_trace(1,'--------------------------------------------');
4489: END IF;
4482: IF (l_debug = 'Y') THEN
4483: okc_util.print_trace(1,'index value = '||i);
4484: okc_util.print_trace(1,'oper code = '||l_quote_price_adj_tab(i).operation_code);
4485: okc_util.print_trace(1,'Price adj id= '||l_quote_price_adj_tab(i).price_adjustment_id);
4486: okc_util.print_trace(1,'qte hdr id = '||l_quote_price_adj_tab(i).quote_header_id);
4487: okc_util.print_trace(1,'qte line id = '||l_quote_price_adj_tab(i).quote_line_id);
4488: okc_util.print_trace(1,'--------------------------------------------');
4489: END IF;
4490: END LOOP;
4483: okc_util.print_trace(1,'index value = '||i);
4484: okc_util.print_trace(1,'oper code = '||l_quote_price_adj_tab(i).operation_code);
4485: okc_util.print_trace(1,'Price adj id= '||l_quote_price_adj_tab(i).price_adjustment_id);
4486: okc_util.print_trace(1,'qte hdr id = '||l_quote_price_adj_tab(i).quote_header_id);
4487: okc_util.print_trace(1,'qte line id = '||l_quote_price_adj_tab(i).quote_line_id);
4488: okc_util.print_trace(1,'--------------------------------------------');
4489: END IF;
4490: END LOOP;
4491: END IF;
4484: okc_util.print_trace(1,'oper code = '||l_quote_price_adj_tab(i).operation_code);
4485: okc_util.print_trace(1,'Price adj id= '||l_quote_price_adj_tab(i).price_adjustment_id);
4486: okc_util.print_trace(1,'qte hdr id = '||l_quote_price_adj_tab(i).quote_header_id);
4487: okc_util.print_trace(1,'qte line id = '||l_quote_price_adj_tab(i).quote_line_id);
4488: okc_util.print_trace(1,'--------------------------------------------');
4489: END IF;
4490: END LOOP;
4491: END IF;
4492:
4490: END LOOP;
4491: END IF;
4492:
4493: IF (l_debug = 'Y') THEN
4494: okc_util.print_trace(1,' ');
4495: okc_util.print_trace(1,'VALUES FROM l_quote_price_adj_attr_tab');
4496: okc_util.print_trace(1,' ');
4497: END IF;
4498:
4491: END IF;
4492:
4493: IF (l_debug = 'Y') THEN
4494: okc_util.print_trace(1,' ');
4495: okc_util.print_trace(1,'VALUES FROM l_quote_price_adj_attr_tab');
4496: okc_util.print_trace(1,' ');
4497: END IF;
4498:
4499: IF l_quote_price_adj_attr_tab.count > 0 THEN
4492:
4493: IF (l_debug = 'Y') THEN
4494: okc_util.print_trace(1,' ');
4495: okc_util.print_trace(1,'VALUES FROM l_quote_price_adj_attr_tab');
4496: okc_util.print_trace(1,' ');
4497: END IF;
4498:
4499: IF l_quote_price_adj_attr_tab.count > 0 THEN
4500: FOR i IN l_quote_price_adj_attr_tab.FIRST..l_quote_price_adj_attr_tab.LAST LOOP
4498:
4499: IF l_quote_price_adj_attr_tab.count > 0 THEN
4500: FOR i IN l_quote_price_adj_attr_tab.FIRST..l_quote_price_adj_attr_tab.LAST LOOP
4501: IF (l_debug = 'Y') THEN
4502: okc_util.print_trace(1,'index value = '||i);
4503: okc_util.print_trace(1,'oper code = '||l_quote_price_adj_attr_tab(i).operation_code);
4504: okc_util.print_trace(1,'Price adj id= '||l_quote_price_adj_attr_tab(i).price_adjustment_id);
4505: okc_util.print_trace(1,'--------------------------------------------');
4506: END IF;
4499: IF l_quote_price_adj_attr_tab.count > 0 THEN
4500: FOR i IN l_quote_price_adj_attr_tab.FIRST..l_quote_price_adj_attr_tab.LAST LOOP
4501: IF (l_debug = 'Y') THEN
4502: okc_util.print_trace(1,'index value = '||i);
4503: okc_util.print_trace(1,'oper code = '||l_quote_price_adj_attr_tab(i).operation_code);
4504: okc_util.print_trace(1,'Price adj id= '||l_quote_price_adj_attr_tab(i).price_adjustment_id);
4505: okc_util.print_trace(1,'--------------------------------------------');
4506: END IF;
4507: END LOOP;
4500: FOR i IN l_quote_price_adj_attr_tab.FIRST..l_quote_price_adj_attr_tab.LAST LOOP
4501: IF (l_debug = 'Y') THEN
4502: okc_util.print_trace(1,'index value = '||i);
4503: okc_util.print_trace(1,'oper code = '||l_quote_price_adj_attr_tab(i).operation_code);
4504: okc_util.print_trace(1,'Price adj id= '||l_quote_price_adj_attr_tab(i).price_adjustment_id);
4505: okc_util.print_trace(1,'--------------------------------------------');
4506: END IF;
4507: END LOOP;
4508: END IF;
4501: IF (l_debug = 'Y') THEN
4502: okc_util.print_trace(1,'index value = '||i);
4503: okc_util.print_trace(1,'oper code = '||l_quote_price_adj_attr_tab(i).operation_code);
4504: okc_util.print_trace(1,'Price adj id= '||l_quote_price_adj_attr_tab(i).price_adjustment_id);
4505: okc_util.print_trace(1,'--------------------------------------------');
4506: END IF;
4507: END LOOP;
4508: END IF;
4509:
4509:
4510:
4511:
4512: IF (l_debug = 'Y') THEN
4513: okc_util.print_trace(0, ' ');
4514: okc_util.print_trace(0, ' ');
4515: okc_util.print_trace(0, '==================================================================');
4516: okc_util.print_trace(0, 'STEP 7 : BUILD SALES CREDIT INFORMATION FOR QUOTE HEADER AND LINES');
4517: okc_util.print_trace(0, '==================================================================');
4510:
4511:
4512: IF (l_debug = 'Y') THEN
4513: okc_util.print_trace(0, ' ');
4514: okc_util.print_trace(0, ' ');
4515: okc_util.print_trace(0, '==================================================================');
4516: okc_util.print_trace(0, 'STEP 7 : BUILD SALES CREDIT INFORMATION FOR QUOTE HEADER AND LINES');
4517: okc_util.print_trace(0, '==================================================================');
4518: okc_util.print_trace(0, ' ');
4511:
4512: IF (l_debug = 'Y') THEN
4513: okc_util.print_trace(0, ' ');
4514: okc_util.print_trace(0, ' ');
4515: okc_util.print_trace(0, '==================================================================');
4516: okc_util.print_trace(0, 'STEP 7 : BUILD SALES CREDIT INFORMATION FOR QUOTE HEADER AND LINES');
4517: okc_util.print_trace(0, '==================================================================');
4518: okc_util.print_trace(0, ' ');
4519: okc_util.print_trace(0, ' ');
4512: IF (l_debug = 'Y') THEN
4513: okc_util.print_trace(0, ' ');
4514: okc_util.print_trace(0, ' ');
4515: okc_util.print_trace(0, '==================================================================');
4516: okc_util.print_trace(0, 'STEP 7 : BUILD SALES CREDIT INFORMATION FOR QUOTE HEADER AND LINES');
4517: okc_util.print_trace(0, '==================================================================');
4518: okc_util.print_trace(0, ' ');
4519: okc_util.print_trace(0, ' ');
4520: END IF;
4513: okc_util.print_trace(0, ' ');
4514: okc_util.print_trace(0, ' ');
4515: okc_util.print_trace(0, '==================================================================');
4516: okc_util.print_trace(0, 'STEP 7 : BUILD SALES CREDIT INFORMATION FOR QUOTE HEADER AND LINES');
4517: okc_util.print_trace(0, '==================================================================');
4518: okc_util.print_trace(0, ' ');
4519: okc_util.print_trace(0, ' ');
4520: END IF;
4521:
4514: okc_util.print_trace(0, ' ');
4515: okc_util.print_trace(0, '==================================================================');
4516: okc_util.print_trace(0, 'STEP 7 : BUILD SALES CREDIT INFORMATION FOR QUOTE HEADER AND LINES');
4517: okc_util.print_trace(0, '==================================================================');
4518: okc_util.print_trace(0, ' ');
4519: okc_util.print_trace(0, ' ');
4520: END IF;
4521:
4522: OKC_OC_INT_SALESCDT_PVT.build_sales_credit_from_k(p_chr_id =>p_contract_id,
4515: okc_util.print_trace(0, '==================================================================');
4516: okc_util.print_trace(0, 'STEP 7 : BUILD SALES CREDIT INFORMATION FOR QUOTE HEADER AND LINES');
4517: okc_util.print_trace(0, '==================================================================');
4518: okc_util.print_trace(0, ' ');
4519: okc_util.print_trace(0, ' ');
4520: END IF;
4521:
4522: OKC_OC_INT_SALESCDT_PVT.build_sales_credit_from_k(p_chr_id =>p_contract_id,
4523: p_kl_rel_tab =>l_k2q_line_rel_tab,
4541: -- set control record, need to set additional attributes
4542: --
4543:
4544: IF (l_debug = 'Y') THEN
4545: okc_util.print_trace(0, ' ');
4546: okc_util.print_trace(0, 'Initialize control record');
4547: okc_util.print_trace(1, '--------------------------------------------------------');
4548: END IF;
4549: l_control_rec.last_update_date := sysdate;
4542: --
4543:
4544: IF (l_debug = 'Y') THEN
4545: okc_util.print_trace(0, ' ');
4546: okc_util.print_trace(0, 'Initialize control record');
4547: okc_util.print_trace(1, '--------------------------------------------------------');
4548: END IF;
4549: l_control_rec.last_update_date := sysdate;
4550:
4543:
4544: IF (l_debug = 'Y') THEN
4545: okc_util.print_trace(0, ' ');
4546: okc_util.print_trace(0, 'Initialize control record');
4547: okc_util.print_trace(1, '--------------------------------------------------------');
4548: END IF;
4549: l_control_rec.last_update_date := sysdate;
4550:
4551: IF (l_debug = 'Y') THEN
4548: END IF;
4549: l_control_rec.last_update_date := sysdate;
4550:
4551: IF (l_debug = 'Y') THEN
4552: okc_util.print_trace(1, '>START - ******* aso_quote_pub.UPDATE_QUOTE -');
4553: END IF;
4554:
4555: aso_quote_pub.update_quote(p_api_version_number => l_aso_api_version
4556: ,p_init_msg_list => FND_API.G_FALSE
4626: );
4627:
4628: ------------------------------------------------------------------------------------------------
4629: IF (l_debug = 'Y') THEN
4630: okc_util.print_trace(1, '*******************');
4631: END IF;
4632:
4633: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
4634:
4641: p_encoded => 'F'
4642: );
4643: IF x_msg_data IS NOT NULL THEN
4644: IF (l_debug = 'Y') THEN
4645: okc_util.print_trace(0, 'Message : '||x_msg_data);
4646: okc_util.print_trace(0, ' ');
4647: END IF;
4648: END IF;
4649: END LOOP;
4642: );
4643: IF x_msg_data IS NOT NULL THEN
4644: IF (l_debug = 'Y') THEN
4645: okc_util.print_trace(0, 'Message : '||x_msg_data);
4646: okc_util.print_trace(0, ' ');
4647: END IF;
4648: END IF;
4649: END LOOP;
4650: END IF;
4649: END LOOP;
4650: END IF;
4651:
4652: IF (l_debug = 'Y') THEN
4653: okc_util.print_trace(1, '*******************');
4654: END IF;
4655:
4656: ------------------------------------------------------------------------------------------------
4657: IF (l_debug = 'Y') THEN
4654: END IF;
4655:
4656: ------------------------------------------------------------------------------------------------
4657: IF (l_debug = 'Y') THEN
4658: okc_util.print_trace(1, '
4660: okc_util.print_trace(1, ' ');
4661: okc_util.print_trace(1, 'OUTPUT RECORD - Completion status:');
4662: okc_util.print_trace(1, '==================================');
4655:
4656: ------------------------------------------------------------------------------------------------
4657: IF (l_debug = 'Y') THEN
4658: okc_util.print_trace(1, '
4660: okc_util.print_trace(1, ' ');
4661: okc_util.print_trace(1, 'OUTPUT RECORD - Completion status:');
4662: okc_util.print_trace(1, '==================================');
4663: okc_util.print_trace(2, 'Return status = '||l_return_status);
4656: ------------------------------------------------------------------------------------------------
4657: IF (l_debug = 'Y') THEN
4658: okc_util.print_trace(1, '
4660: okc_util.print_trace(1, ' ');
4661: okc_util.print_trace(1, 'OUTPUT RECORD - Completion status:');
4662: okc_util.print_trace(1, '==================================');
4663: okc_util.print_trace(2, 'Return status = '||l_return_status);
4664: okc_util.print_trace(1, ' ');
4657: IF (l_debug = 'Y') THEN
4658: okc_util.print_trace(1, '
4660: okc_util.print_trace(1, ' ');
4661: okc_util.print_trace(1, 'OUTPUT RECORD - Completion status:');
4662: okc_util.print_trace(1, '==================================');
4663: okc_util.print_trace(2, 'Return status = '||l_return_status);
4664: okc_util.print_trace(1, ' ');
4665: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Header:');
4658: okc_util.print_trace(1, '
4660: okc_util.print_trace(1, ' ');
4661: okc_util.print_trace(1, 'OUTPUT RECORD - Completion status:');
4662: okc_util.print_trace(1, '==================================');
4663: okc_util.print_trace(2, 'Return status = '||l_return_status);
4664: okc_util.print_trace(1, ' ');
4665: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Header:');
4666: okc_util.print_trace(1, '=============================');
4659: okc_util.print_trace(1, '--------------------------------------------------------');
4660: okc_util.print_trace(1, ' ');
4661: okc_util.print_trace(1, 'OUTPUT RECORD - Completion status:');
4662: okc_util.print_trace(1, '==================================');
4663: okc_util.print_trace(2, 'Return status = '||l_return_status);
4664: okc_util.print_trace(1, ' ');
4665: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Header:');
4666: okc_util.print_trace(1, '=============================');
4667: okc_util.print_trace(2, 'Org_id = '||lx_qte_header_rec.org_id);
4660: okc_util.print_trace(1, ' ');
4661: okc_util.print_trace(1, 'OUTPUT RECORD - Completion status:');
4662: okc_util.print_trace(1, '==================================');
4663: okc_util.print_trace(2, 'Return status = '||l_return_status);
4664: okc_util.print_trace(1, ' ');
4665: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Header:');
4666: okc_util.print_trace(1, '=============================');
4667: okc_util.print_trace(2, 'Org_id = '||lx_qte_header_rec.org_id);
4668: okc_util.print_trace(2, 'Original syst ref (contract num) = '||ltrim(rtrim(lx_qte_header_rec.original_system_reference)));
4661: okc_util.print_trace(1, 'OUTPUT RECORD - Completion status:');
4662: okc_util.print_trace(1, '==================================');
4663: okc_util.print_trace(2, 'Return status = '||l_return_status);
4664: okc_util.print_trace(1, ' ');
4665: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Header:');
4666: okc_util.print_trace(1, '=============================');
4667: okc_util.print_trace(2, 'Org_id = '||lx_qte_header_rec.org_id);
4668: okc_util.print_trace(2, 'Original syst ref (contract num) = '||ltrim(rtrim(lx_qte_header_rec.original_system_reference)));
4669: okc_util.print_trace(2, 'Quote name = '||ltrim(rtrim(lx_qte_header_rec.quote_name)));
4662: okc_util.print_trace(1, '==================================');
4663: okc_util.print_trace(2, 'Return status = '||l_return_status);
4664: okc_util.print_trace(1, ' ');
4665: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Header:');
4666: okc_util.print_trace(1, '=============================');
4667: okc_util.print_trace(2, 'Org_id = '||lx_qte_header_rec.org_id);
4668: okc_util.print_trace(2, 'Original syst ref (contract num) = '||ltrim(rtrim(lx_qte_header_rec.original_system_reference)));
4669: okc_util.print_trace(2, 'Quote name = '||ltrim(rtrim(lx_qte_header_rec.quote_name)));
4670: okc_util.print_trace(2, 'Quote version = '||lx_qte_header_rec.quote_version);
4663: okc_util.print_trace(2, 'Return status = '||l_return_status);
4664: okc_util.print_trace(1, ' ');
4665: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Header:');
4666: okc_util.print_trace(1, '=============================');
4667: okc_util.print_trace(2, 'Org_id = '||lx_qte_header_rec.org_id);
4668: okc_util.print_trace(2, 'Original syst ref (contract num) = '||ltrim(rtrim(lx_qte_header_rec.original_system_reference)));
4669: okc_util.print_trace(2, 'Quote name = '||ltrim(rtrim(lx_qte_header_rec.quote_name)));
4670: okc_util.print_trace(2, 'Quote version = '||lx_qte_header_rec.quote_version);
4671: okc_util.print_trace(2, 'Quote source code = '||ltrim(rtrim(lx_qte_header_rec.quote_source_code)));
4664: okc_util.print_trace(1, ' ');
4665: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Header:');
4666: okc_util.print_trace(1, '=============================');
4667: okc_util.print_trace(2, 'Org_id = '||lx_qte_header_rec.org_id);
4668: okc_util.print_trace(2, 'Original syst ref (contract num) = '||ltrim(rtrim(lx_qte_header_rec.original_system_reference)));
4669: okc_util.print_trace(2, 'Quote name = '||ltrim(rtrim(lx_qte_header_rec.quote_name)));
4670: okc_util.print_trace(2, 'Quote version = '||lx_qte_header_rec.quote_version);
4671: okc_util.print_trace(2, 'Quote source code = '||ltrim(rtrim(lx_qte_header_rec.quote_source_code)));
4672: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(lx_qte_header_rec.quote_category_code)));
4665: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Header:');
4666: okc_util.print_trace(1, '=============================');
4667: okc_util.print_trace(2, 'Org_id = '||lx_qte_header_rec.org_id);
4668: okc_util.print_trace(2, 'Original syst ref (contract num) = '||ltrim(rtrim(lx_qte_header_rec.original_system_reference)));
4669: okc_util.print_trace(2, 'Quote name = '||ltrim(rtrim(lx_qte_header_rec.quote_name)));
4670: okc_util.print_trace(2, 'Quote version = '||lx_qte_header_rec.quote_version);
4671: okc_util.print_trace(2, 'Quote source code = '||ltrim(rtrim(lx_qte_header_rec.quote_source_code)));
4672: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(lx_qte_header_rec.quote_category_code)));
4673: okc_util.print_trace(2, 'Quote creation date= '||lx_qte_header_rec.creation_date);
4666: okc_util.print_trace(1, '=============================');
4667: okc_util.print_trace(2, 'Org_id = '||lx_qte_header_rec.org_id);
4668: okc_util.print_trace(2, 'Original syst ref (contract num) = '||ltrim(rtrim(lx_qte_header_rec.original_system_reference)));
4669: okc_util.print_trace(2, 'Quote name = '||ltrim(rtrim(lx_qte_header_rec.quote_name)));
4670: okc_util.print_trace(2, 'Quote version = '||lx_qte_header_rec.quote_version);
4671: okc_util.print_trace(2, 'Quote source code = '||ltrim(rtrim(lx_qte_header_rec.quote_source_code)));
4672: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(lx_qte_header_rec.quote_category_code)));
4673: okc_util.print_trace(2, 'Quote creation date= '||lx_qte_header_rec.creation_date);
4674: okc_util.print_trace(2, 'Quote expiration date= '||lx_qte_header_rec.quote_expiration_date);
4667: okc_util.print_trace(2, 'Org_id = '||lx_qte_header_rec.org_id);
4668: okc_util.print_trace(2, 'Original syst ref (contract num) = '||ltrim(rtrim(lx_qte_header_rec.original_system_reference)));
4669: okc_util.print_trace(2, 'Quote name = '||ltrim(rtrim(lx_qte_header_rec.quote_name)));
4670: okc_util.print_trace(2, 'Quote version = '||lx_qte_header_rec.quote_version);
4671: okc_util.print_trace(2, 'Quote source code = '||ltrim(rtrim(lx_qte_header_rec.quote_source_code)));
4672: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(lx_qte_header_rec.quote_category_code)));
4673: okc_util.print_trace(2, 'Quote creation date= '||lx_qte_header_rec.creation_date);
4674: okc_util.print_trace(2, 'Quote expiration date= '||lx_qte_header_rec.quote_expiration_date);
4675: okc_util.print_trace(2, 'Party_id = '||lx_qte_header_rec.party_id);
4668: okc_util.print_trace(2, 'Original syst ref (contract num) = '||ltrim(rtrim(lx_qte_header_rec.original_system_reference)));
4669: okc_util.print_trace(2, 'Quote name = '||ltrim(rtrim(lx_qte_header_rec.quote_name)));
4670: okc_util.print_trace(2, 'Quote version = '||lx_qte_header_rec.quote_version);
4671: okc_util.print_trace(2, 'Quote source code = '||ltrim(rtrim(lx_qte_header_rec.quote_source_code)));
4672: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(lx_qte_header_rec.quote_category_code)));
4673: okc_util.print_trace(2, 'Quote creation date= '||lx_qte_header_rec.creation_date);
4674: okc_util.print_trace(2, 'Quote expiration date= '||lx_qte_header_rec.quote_expiration_date);
4675: okc_util.print_trace(2, 'Party_id = '||lx_qte_header_rec.party_id);
4676: okc_util.print_trace(2, 'Cust Acct Id = '||lx_qte_header_rec.cust_account_id);
4669: okc_util.print_trace(2, 'Quote name = '||ltrim(rtrim(lx_qte_header_rec.quote_name)));
4670: okc_util.print_trace(2, 'Quote version = '||lx_qte_header_rec.quote_version);
4671: okc_util.print_trace(2, 'Quote source code = '||ltrim(rtrim(lx_qte_header_rec.quote_source_code)));
4672: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(lx_qte_header_rec.quote_category_code)));
4673: okc_util.print_trace(2, 'Quote creation date= '||lx_qte_header_rec.creation_date);
4674: okc_util.print_trace(2, 'Quote expiration date= '||lx_qte_header_rec.quote_expiration_date);
4675: okc_util.print_trace(2, 'Party_id = '||lx_qte_header_rec.party_id);
4676: okc_util.print_trace(2, 'Cust Acct Id = '||lx_qte_header_rec.cust_account_id);
4677: okc_util.print_trace(2, 'Price List Id = '||lx_qte_header_rec.price_list_id);
4670: okc_util.print_trace(2, 'Quote version = '||lx_qte_header_rec.quote_version);
4671: okc_util.print_trace(2, 'Quote source code = '||ltrim(rtrim(lx_qte_header_rec.quote_source_code)));
4672: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(lx_qte_header_rec.quote_category_code)));
4673: okc_util.print_trace(2, 'Quote creation date= '||lx_qte_header_rec.creation_date);
4674: okc_util.print_trace(2, 'Quote expiration date= '||lx_qte_header_rec.quote_expiration_date);
4675: okc_util.print_trace(2, 'Party_id = '||lx_qte_header_rec.party_id);
4676: okc_util.print_trace(2, 'Cust Acct Id = '||lx_qte_header_rec.cust_account_id);
4677: okc_util.print_trace(2, 'Price List Id = '||lx_qte_header_rec.price_list_id);
4678: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_header_rec.invoicing_rule_id);
4671: okc_util.print_trace(2, 'Quote source code = '||ltrim(rtrim(lx_qte_header_rec.quote_source_code)));
4672: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(lx_qte_header_rec.quote_category_code)));
4673: okc_util.print_trace(2, 'Quote creation date= '||lx_qte_header_rec.creation_date);
4674: okc_util.print_trace(2, 'Quote expiration date= '||lx_qte_header_rec.quote_expiration_date);
4675: okc_util.print_trace(2, 'Party_id = '||lx_qte_header_rec.party_id);
4676: okc_util.print_trace(2, 'Cust Acct Id = '||lx_qte_header_rec.cust_account_id);
4677: okc_util.print_trace(2, 'Price List Id = '||lx_qte_header_rec.price_list_id);
4678: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_header_rec.invoicing_rule_id);
4679: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_header_rec.invoice_to_party_id);
4672: okc_util.print_trace(2, 'Quote category code = '||ltrim(rtrim(lx_qte_header_rec.quote_category_code)));
4673: okc_util.print_trace(2, 'Quote creation date= '||lx_qte_header_rec.creation_date);
4674: okc_util.print_trace(2, 'Quote expiration date= '||lx_qte_header_rec.quote_expiration_date);
4675: okc_util.print_trace(2, 'Party_id = '||lx_qte_header_rec.party_id);
4676: okc_util.print_trace(2, 'Cust Acct Id = '||lx_qte_header_rec.cust_account_id);
4677: okc_util.print_trace(2, 'Price List Id = '||lx_qte_header_rec.price_list_id);
4678: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_header_rec.invoicing_rule_id);
4679: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_header_rec.invoice_to_party_id);
4680: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_header_rec.invoice_to_party_site_id);
4673: okc_util.print_trace(2, 'Quote creation date= '||lx_qte_header_rec.creation_date);
4674: okc_util.print_trace(2, 'Quote expiration date= '||lx_qte_header_rec.quote_expiration_date);
4675: okc_util.print_trace(2, 'Party_id = '||lx_qte_header_rec.party_id);
4676: okc_util.print_trace(2, 'Cust Acct Id = '||lx_qte_header_rec.cust_account_id);
4677: okc_util.print_trace(2, 'Price List Id = '||lx_qte_header_rec.price_list_id);
4678: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_header_rec.invoicing_rule_id);
4679: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_header_rec.invoice_to_party_id);
4680: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_header_rec.invoice_to_party_site_id);
4681: okc_util.print_trace(2, 'Currency code = '||ltrim(rtrim(lx_qte_header_rec.currency_code)));
4674: okc_util.print_trace(2, 'Quote expiration date= '||lx_qte_header_rec.quote_expiration_date);
4675: okc_util.print_trace(2, 'Party_id = '||lx_qte_header_rec.party_id);
4676: okc_util.print_trace(2, 'Cust Acct Id = '||lx_qte_header_rec.cust_account_id);
4677: okc_util.print_trace(2, 'Price List Id = '||lx_qte_header_rec.price_list_id);
4678: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_header_rec.invoicing_rule_id);
4679: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_header_rec.invoice_to_party_id);
4680: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_header_rec.invoice_to_party_site_id);
4681: okc_util.print_trace(2, 'Currency code = '||ltrim(rtrim(lx_qte_header_rec.currency_code)));
4682: okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(lx_qte_header_rec.total_quote_price, '9G999G999G990D00')));
4675: okc_util.print_trace(2, 'Party_id = '||lx_qte_header_rec.party_id);
4676: okc_util.print_trace(2, 'Cust Acct Id = '||lx_qte_header_rec.cust_account_id);
4677: okc_util.print_trace(2, 'Price List Id = '||lx_qte_header_rec.price_list_id);
4678: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_header_rec.invoicing_rule_id);
4679: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_header_rec.invoice_to_party_id);
4680: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_header_rec.invoice_to_party_site_id);
4681: okc_util.print_trace(2, 'Currency code = '||ltrim(rtrim(lx_qte_header_rec.currency_code)));
4682: okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(lx_qte_header_rec.total_quote_price, '9G999G999G990D00')));
4683: okc_util.print_trace(2, 'Exchange type code = '||ltrim(rtrim(lx_qte_header_rec.exchange_type_code)));
4676: okc_util.print_trace(2, 'Cust Acct Id = '||lx_qte_header_rec.cust_account_id);
4677: okc_util.print_trace(2, 'Price List Id = '||lx_qte_header_rec.price_list_id);
4678: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_header_rec.invoicing_rule_id);
4679: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_header_rec.invoice_to_party_id);
4680: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_header_rec.invoice_to_party_site_id);
4681: okc_util.print_trace(2, 'Currency code = '||ltrim(rtrim(lx_qte_header_rec.currency_code)));
4682: okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(lx_qte_header_rec.total_quote_price, '9G999G999G990D00')));
4683: okc_util.print_trace(2, 'Exchange type code = '||ltrim(rtrim(lx_qte_header_rec.exchange_type_code)));
4684: okc_util.print_trace(2, 'Exchange rate = '||lx_qte_header_rec.exchange_rate);
4677: okc_util.print_trace(2, 'Price List Id = '||lx_qte_header_rec.price_list_id);
4678: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_header_rec.invoicing_rule_id);
4679: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_header_rec.invoice_to_party_id);
4680: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_header_rec.invoice_to_party_site_id);
4681: okc_util.print_trace(2, 'Currency code = '||ltrim(rtrim(lx_qte_header_rec.currency_code)));
4682: okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(lx_qte_header_rec.total_quote_price, '9G999G999G990D00')));
4683: okc_util.print_trace(2, 'Exchange type code = '||ltrim(rtrim(lx_qte_header_rec.exchange_type_code)));
4684: okc_util.print_trace(2, 'Exchange rate = '||lx_qte_header_rec.exchange_rate);
4685: okc_util.print_trace(2, 'Exchange rate date = '||lx_qte_header_rec.exchange_rate_date);
4678: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_header_rec.invoicing_rule_id);
4679: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_header_rec.invoice_to_party_id);
4680: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_header_rec.invoice_to_party_site_id);
4681: okc_util.print_trace(2, 'Currency code = '||ltrim(rtrim(lx_qte_header_rec.currency_code)));
4682: okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(lx_qte_header_rec.total_quote_price, '9G999G999G990D00')));
4683: okc_util.print_trace(2, 'Exchange type code = '||ltrim(rtrim(lx_qte_header_rec.exchange_type_code)));
4684: okc_util.print_trace(2, 'Exchange rate = '||lx_qte_header_rec.exchange_rate);
4685: okc_util.print_trace(2, 'Exchange rate date = '||lx_qte_header_rec.exchange_rate_date);
4686: okc_util.print_trace(2, '---------------------------------------');
4679: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_header_rec.invoice_to_party_id);
4680: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_header_rec.invoice_to_party_site_id);
4681: okc_util.print_trace(2, 'Currency code = '||ltrim(rtrim(lx_qte_header_rec.currency_code)));
4682: okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(lx_qte_header_rec.total_quote_price, '9G999G999G990D00')));
4683: okc_util.print_trace(2, 'Exchange type code = '||ltrim(rtrim(lx_qte_header_rec.exchange_type_code)));
4684: okc_util.print_trace(2, 'Exchange rate = '||lx_qte_header_rec.exchange_rate);
4685: okc_util.print_trace(2, 'Exchange rate date = '||lx_qte_header_rec.exchange_rate_date);
4686: okc_util.print_trace(2, '---------------------------------------');
4687: okc_util.print_trace(2, 'Quote header Id = '||lx_qte_header_rec.quote_header_id);
4680: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_header_rec.invoice_to_party_site_id);
4681: okc_util.print_trace(2, 'Currency code = '||ltrim(rtrim(lx_qte_header_rec.currency_code)));
4682: okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(lx_qte_header_rec.total_quote_price, '9G999G999G990D00')));
4683: okc_util.print_trace(2, 'Exchange type code = '||ltrim(rtrim(lx_qte_header_rec.exchange_type_code)));
4684: okc_util.print_trace(2, 'Exchange rate = '||lx_qte_header_rec.exchange_rate);
4685: okc_util.print_trace(2, 'Exchange rate date = '||lx_qte_header_rec.exchange_rate_date);
4686: okc_util.print_trace(2, '---------------------------------------');
4687: okc_util.print_trace(2, 'Quote header Id = '||lx_qte_header_rec.quote_header_id);
4688: okc_util.print_trace(2, 'Quote NUMBER = '||lx_qte_header_rec.quote_number);
4681: okc_util.print_trace(2, 'Currency code = '||ltrim(rtrim(lx_qte_header_rec.currency_code)));
4682: okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(lx_qte_header_rec.total_quote_price, '9G999G999G990D00')));
4683: okc_util.print_trace(2, 'Exchange type code = '||ltrim(rtrim(lx_qte_header_rec.exchange_type_code)));
4684: okc_util.print_trace(2, 'Exchange rate = '||lx_qte_header_rec.exchange_rate);
4685: okc_util.print_trace(2, 'Exchange rate date = '||lx_qte_header_rec.exchange_rate_date);
4686: okc_util.print_trace(2, '---------------------------------------');
4687: okc_util.print_trace(2, 'Quote header Id = '||lx_qte_header_rec.quote_header_id);
4688: okc_util.print_trace(2, 'Quote NUMBER = '||lx_qte_header_rec.quote_number);
4689: okc_util.print_trace(2, 'Quote status Id = '||lx_qte_header_rec.quote_status_id);
4682: okc_util.print_trace(2, 'Total quote price = '||LTRIM(TO_CHAR(lx_qte_header_rec.total_quote_price, '9G999G999G990D00')));
4683: okc_util.print_trace(2, 'Exchange type code = '||ltrim(rtrim(lx_qte_header_rec.exchange_type_code)));
4684: okc_util.print_trace(2, 'Exchange rate = '||lx_qte_header_rec.exchange_rate);
4685: okc_util.print_trace(2, 'Exchange rate date = '||lx_qte_header_rec.exchange_rate_date);
4686: okc_util.print_trace(2, '---------------------------------------');
4687: okc_util.print_trace(2, 'Quote header Id = '||lx_qte_header_rec.quote_header_id);
4688: okc_util.print_trace(2, 'Quote NUMBER = '||lx_qte_header_rec.quote_number);
4689: okc_util.print_trace(2, 'Quote status Id = '||lx_qte_header_rec.quote_status_id);
4690: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(lx_qte_header_rec.quote_status_code)));
4683: okc_util.print_trace(2, 'Exchange type code = '||ltrim(rtrim(lx_qte_header_rec.exchange_type_code)));
4684: okc_util.print_trace(2, 'Exchange rate = '||lx_qte_header_rec.exchange_rate);
4685: okc_util.print_trace(2, 'Exchange rate date = '||lx_qte_header_rec.exchange_rate_date);
4686: okc_util.print_trace(2, '---------------------------------------');
4687: okc_util.print_trace(2, 'Quote header Id = '||lx_qte_header_rec.quote_header_id);
4688: okc_util.print_trace(2, 'Quote NUMBER = '||lx_qte_header_rec.quote_number);
4689: okc_util.print_trace(2, 'Quote status Id = '||lx_qte_header_rec.quote_status_id);
4690: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(lx_qte_header_rec.quote_status_code)));
4691: okc_util.print_trace(2, 'Quote status = '||ltrim(rtrim(lx_qte_header_rec.quote_status)));
4684: okc_util.print_trace(2, 'Exchange rate = '||lx_qte_header_rec.exchange_rate);
4685: okc_util.print_trace(2, 'Exchange rate date = '||lx_qte_header_rec.exchange_rate_date);
4686: okc_util.print_trace(2, '---------------------------------------');
4687: okc_util.print_trace(2, 'Quote header Id = '||lx_qte_header_rec.quote_header_id);
4688: okc_util.print_trace(2, 'Quote NUMBER = '||lx_qte_header_rec.quote_number);
4689: okc_util.print_trace(2, 'Quote status Id = '||lx_qte_header_rec.quote_status_id);
4690: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(lx_qte_header_rec.quote_status_code)));
4691: okc_util.print_trace(2, 'Quote status = '||ltrim(rtrim(lx_qte_header_rec.quote_status)));
4692: END IF;
4685: okc_util.print_trace(2, 'Exchange rate date = '||lx_qte_header_rec.exchange_rate_date);
4686: okc_util.print_trace(2, '---------------------------------------');
4687: okc_util.print_trace(2, 'Quote header Id = '||lx_qte_header_rec.quote_header_id);
4688: okc_util.print_trace(2, 'Quote NUMBER = '||lx_qte_header_rec.quote_number);
4689: okc_util.print_trace(2, 'Quote status Id = '||lx_qte_header_rec.quote_status_id);
4690: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(lx_qte_header_rec.quote_status_code)));
4691: okc_util.print_trace(2, 'Quote status = '||ltrim(rtrim(lx_qte_header_rec.quote_status)));
4692: END IF;
4693:
4686: okc_util.print_trace(2, '---------------------------------------');
4687: okc_util.print_trace(2, 'Quote header Id = '||lx_qte_header_rec.quote_header_id);
4688: okc_util.print_trace(2, 'Quote NUMBER = '||lx_qte_header_rec.quote_number);
4689: okc_util.print_trace(2, 'Quote status Id = '||lx_qte_header_rec.quote_status_id);
4690: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(lx_qte_header_rec.quote_status_code)));
4691: okc_util.print_trace(2, 'Quote status = '||ltrim(rtrim(lx_qte_header_rec.quote_status)));
4692: END IF;
4693:
4694: IF (l_debug = 'Y') THEN
4687: okc_util.print_trace(2, 'Quote header Id = '||lx_qte_header_rec.quote_header_id);
4688: okc_util.print_trace(2, 'Quote NUMBER = '||lx_qte_header_rec.quote_number);
4689: okc_util.print_trace(2, 'Quote status Id = '||lx_qte_header_rec.quote_status_id);
4690: okc_util.print_trace(2, 'Quote status code = '||ltrim(rtrim(lx_qte_header_rec.quote_status_code)));
4691: okc_util.print_trace(2, 'Quote status = '||ltrim(rtrim(lx_qte_header_rec.quote_status)));
4692: END IF;
4693:
4694: IF (l_debug = 'Y') THEN
4695: okc_util.print_trace(1, ' ');
4691: okc_util.print_trace(2, 'Quote status = '||ltrim(rtrim(lx_qte_header_rec.quote_status)));
4692: END IF;
4693:
4694: IF (l_debug = 'Y') THEN
4695: okc_util.print_trace(1, ' ');
4696: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Lines: '||lx_qte_line_tbl.count||' line(s)');
4697: okc_util.print_trace(1, '============================');
4698: END IF;
4699: IF lx_qte_line_tbl.first IS NOT NULL THEN
4692: END IF;
4693:
4694: IF (l_debug = 'Y') THEN
4695: okc_util.print_trace(1, ' ');
4696: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Lines: '||lx_qte_line_tbl.count||' line(s)');
4697: okc_util.print_trace(1, '============================');
4698: END IF;
4699: IF lx_qte_line_tbl.first IS NOT NULL THEN
4700: FOR i IN lx_qte_line_tbl.first..lx_qte_line_tbl.last LOOP
4693:
4694: IF (l_debug = 'Y') THEN
4695: okc_util.print_trace(1, ' ');
4696: okc_util.print_trace(1, 'OUTPUT RECORD - Quote Lines: '||lx_qte_line_tbl.count||' line(s)');
4697: okc_util.print_trace(1, '============================');
4698: END IF;
4699: IF lx_qte_line_tbl.first IS NOT NULL THEN
4700: FOR i IN lx_qte_line_tbl.first..lx_qte_line_tbl.last LOOP
4701: IF (l_debug = 'Y') THEN
4698: END IF;
4699: IF lx_qte_line_tbl.first IS NOT NULL THEN
4700: FOR i IN lx_qte_line_tbl.first..lx_qte_line_tbl.last LOOP
4701: IF (l_debug = 'Y') THEN
4702: okc_util.print_trace(2, '> Org Id = '||lx_qte_line_tbl(i).org_id);
4703: okc_util.print_trace(2, 'Quote Line NUMBER = '||lx_qte_line_tbl(i).line_number);
4704: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(lx_qte_line_tbl(i).line_category_code)));
4705: okc_util.print_trace(2, 'Start date active = '||lx_qte_line_tbl(i).start_date_active);
4706: okc_util.print_trace(2, 'End date active = '||lx_qte_line_tbl(i).end_date_active);
4699: IF lx_qte_line_tbl.first IS NOT NULL THEN
4700: FOR i IN lx_qte_line_tbl.first..lx_qte_line_tbl.last LOOP
4701: IF (l_debug = 'Y') THEN
4702: okc_util.print_trace(2, '> Org Id = '||lx_qte_line_tbl(i).org_id);
4703: okc_util.print_trace(2, 'Quote Line NUMBER = '||lx_qte_line_tbl(i).line_number);
4704: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(lx_qte_line_tbl(i).line_category_code)));
4705: okc_util.print_trace(2, 'Start date active = '||lx_qte_line_tbl(i).start_date_active);
4706: okc_util.print_trace(2, 'End date active = '||lx_qte_line_tbl(i).end_date_active);
4707: END IF;
4700: FOR i IN lx_qte_line_tbl.first..lx_qte_line_tbl.last LOOP
4701: IF (l_debug = 'Y') THEN
4702: okc_util.print_trace(2, '> Org Id = '||lx_qte_line_tbl(i).org_id);
4703: okc_util.print_trace(2, 'Quote Line NUMBER = '||lx_qte_line_tbl(i).line_number);
4704: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(lx_qte_line_tbl(i).line_category_code)));
4705: okc_util.print_trace(2, 'Start date active = '||lx_qte_line_tbl(i).start_date_active);
4706: okc_util.print_trace(2, 'End date active = '||lx_qte_line_tbl(i).end_date_active);
4707: END IF;
4708: --
4701: IF (l_debug = 'Y') THEN
4702: okc_util.print_trace(2, '> Org Id = '||lx_qte_line_tbl(i).org_id);
4703: okc_util.print_trace(2, 'Quote Line NUMBER = '||lx_qte_line_tbl(i).line_number);
4704: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(lx_qte_line_tbl(i).line_category_code)));
4705: okc_util.print_trace(2, 'Start date active = '||lx_qte_line_tbl(i).start_date_active);
4706: okc_util.print_trace(2, 'End date active = '||lx_qte_line_tbl(i).end_date_active);
4707: END IF;
4708: --
4709: IF (l_debug = 'Y') THEN
4702: okc_util.print_trace(2, '> Org Id = '||lx_qte_line_tbl(i).org_id);
4703: okc_util.print_trace(2, 'Quote Line NUMBER = '||lx_qte_line_tbl(i).line_number);
4704: okc_util.print_trace(2, 'Quote Line category code = '||ltrim(rtrim(lx_qte_line_tbl(i).line_category_code)));
4705: okc_util.print_trace(2, 'Start date active = '||lx_qte_line_tbl(i).start_date_active);
4706: okc_util.print_trace(2, 'End date active = '||lx_qte_line_tbl(i).end_date_active);
4707: END IF;
4708: --
4709: IF (l_debug = 'Y') THEN
4710: okc_util.print_trace(2, 'Price List Id = '||lx_qte_line_tbl(i).price_list_id);
4706: okc_util.print_trace(2, 'End date active = '||lx_qte_line_tbl(i).end_date_active);
4707: END IF;
4708: --
4709: IF (l_debug = 'Y') THEN
4710: okc_util.print_trace(2, 'Price List Id = '||lx_qte_line_tbl(i).price_list_id);
4711: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_line_tbl(i).invoicing_rule_id);
4712: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_line_tbl(i).invoice_to_party_id);
4713: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_line_tbl(i).invoice_to_party_site_id);
4714: END IF;
4707: END IF;
4708: --
4709: IF (l_debug = 'Y') THEN
4710: okc_util.print_trace(2, 'Price List Id = '||lx_qte_line_tbl(i).price_list_id);
4711: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_line_tbl(i).invoicing_rule_id);
4712: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_line_tbl(i).invoice_to_party_id);
4713: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_line_tbl(i).invoice_to_party_site_id);
4714: END IF;
4715: --
4708: --
4709: IF (l_debug = 'Y') THEN
4710: okc_util.print_trace(2, 'Price List Id = '||lx_qte_line_tbl(i).price_list_id);
4711: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_line_tbl(i).invoicing_rule_id);
4712: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_line_tbl(i).invoice_to_party_id);
4713: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_line_tbl(i).invoice_to_party_site_id);
4714: END IF;
4715: --
4716: IF (l_debug = 'Y') THEN
4709: IF (l_debug = 'Y') THEN
4710: okc_util.print_trace(2, 'Price List Id = '||lx_qte_line_tbl(i).price_list_id);
4711: okc_util.print_trace(2, 'Inv Rule Id = '||lx_qte_line_tbl(i).invoicing_rule_id);
4712: okc_util.print_trace(2, 'Inv To Party Id = '||lx_qte_line_tbl(i).invoice_to_party_id);
4713: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_line_tbl(i).invoice_to_party_site_id);
4714: END IF;
4715: --
4716: IF (l_debug = 'Y') THEN
4717: okc_util.print_trace(2, 'Inv Item Id = '||lx_qte_line_tbl(i).inventory_item_id);
4713: okc_util.print_trace(2, 'Inv To Party site Id = '||lx_qte_line_tbl(i).invoice_to_party_site_id);
4714: END IF;
4715: --
4716: IF (l_debug = 'Y') THEN
4717: okc_util.print_trace(2, 'Inv Item Id = '||lx_qte_line_tbl(i).inventory_item_id);
4718: okc_util.print_trace(2, 'Organization Id = '||lx_qte_line_tbl(i).organization_id);
4719: okc_util.print_trace(2, 'Quantity = '||lx_qte_line_tbl(i).quantity);
4720: okc_util.print_trace(2, 'UOM = '||lx_qte_line_tbl(i).uom_code);
4721: okc_util.print_trace(2, 'Currency code = '||lx_qte_line_tbl(i).currency_code);
4714: END IF;
4715: --
4716: IF (l_debug = 'Y') THEN
4717: okc_util.print_trace(2, 'Inv Item Id = '||lx_qte_line_tbl(i).inventory_item_id);
4718: okc_util.print_trace(2, 'Organization Id = '||lx_qte_line_tbl(i).organization_id);
4719: okc_util.print_trace(2, 'Quantity = '||lx_qte_line_tbl(i).quantity);
4720: okc_util.print_trace(2, 'UOM = '||lx_qte_line_tbl(i).uom_code);
4721: okc_util.print_trace(2, 'Currency code = '||lx_qte_line_tbl(i).currency_code);
4722: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
4715: --
4716: IF (l_debug = 'Y') THEN
4717: okc_util.print_trace(2, 'Inv Item Id = '||lx_qte_line_tbl(i).inventory_item_id);
4718: okc_util.print_trace(2, 'Organization Id = '||lx_qte_line_tbl(i).organization_id);
4719: okc_util.print_trace(2, 'Quantity = '||lx_qte_line_tbl(i).quantity);
4720: okc_util.print_trace(2, 'UOM = '||lx_qte_line_tbl(i).uom_code);
4721: okc_util.print_trace(2, 'Currency code = '||lx_qte_line_tbl(i).currency_code);
4722: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
4723: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price*lx_qte_line_tbl(i).quantity, '9G999G999G990D00')));
4716: IF (l_debug = 'Y') THEN
4717: okc_util.print_trace(2, 'Inv Item Id = '||lx_qte_line_tbl(i).inventory_item_id);
4718: okc_util.print_trace(2, 'Organization Id = '||lx_qte_line_tbl(i).organization_id);
4719: okc_util.print_trace(2, 'Quantity = '||lx_qte_line_tbl(i).quantity);
4720: okc_util.print_trace(2, 'UOM = '||lx_qte_line_tbl(i).uom_code);
4721: okc_util.print_trace(2, 'Currency code = '||lx_qte_line_tbl(i).currency_code);
4722: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
4723: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price*lx_qte_line_tbl(i).quantity, '9G999G999G990D00')));
4724: okc_util.print_trace(2, '---------------------------------------');
4717: okc_util.print_trace(2, 'Inv Item Id = '||lx_qte_line_tbl(i).inventory_item_id);
4718: okc_util.print_trace(2, 'Organization Id = '||lx_qte_line_tbl(i).organization_id);
4719: okc_util.print_trace(2, 'Quantity = '||lx_qte_line_tbl(i).quantity);
4720: okc_util.print_trace(2, 'UOM = '||lx_qte_line_tbl(i).uom_code);
4721: okc_util.print_trace(2, 'Currency code = '||lx_qte_line_tbl(i).currency_code);
4722: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
4723: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price*lx_qte_line_tbl(i).quantity, '9G999G999G990D00')));
4724: okc_util.print_trace(2, '---------------------------------------');
4725: okc_util.print_trace(2, 'Quote Header Id = '||lx_qte_line_tbl(i).quote_header_id);
4718: okc_util.print_trace(2, 'Organization Id = '||lx_qte_line_tbl(i).organization_id);
4719: okc_util.print_trace(2, 'Quantity = '||lx_qte_line_tbl(i).quantity);
4720: okc_util.print_trace(2, 'UOM = '||lx_qte_line_tbl(i).uom_code);
4721: okc_util.print_trace(2, 'Currency code = '||lx_qte_line_tbl(i).currency_code);
4722: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
4723: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price*lx_qte_line_tbl(i).quantity, '9G999G999G990D00')));
4724: okc_util.print_trace(2, '---------------------------------------');
4725: okc_util.print_trace(2, 'Quote Header Id = '||lx_qte_line_tbl(i).quote_header_id);
4726: okc_util.print_trace(2, 'Quote Line Id = '||lx_qte_line_tbl(i).quote_line_id);
4719: okc_util.print_trace(2, 'Quantity = '||lx_qte_line_tbl(i).quantity);
4720: okc_util.print_trace(2, 'UOM = '||lx_qte_line_tbl(i).uom_code);
4721: okc_util.print_trace(2, 'Currency code = '||lx_qte_line_tbl(i).currency_code);
4722: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
4723: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price*lx_qte_line_tbl(i).quantity, '9G999G999G990D00')));
4724: okc_util.print_trace(2, '---------------------------------------');
4725: okc_util.print_trace(2, 'Quote Header Id = '||lx_qte_line_tbl(i).quote_header_id);
4726: okc_util.print_trace(2, 'Quote Line Id = '||lx_qte_line_tbl(i).quote_line_id);
4727: END IF;
4720: okc_util.print_trace(2, 'UOM = '||lx_qte_line_tbl(i).uom_code);
4721: okc_util.print_trace(2, 'Currency code = '||lx_qte_line_tbl(i).currency_code);
4722: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
4723: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price*lx_qte_line_tbl(i).quantity, '9G999G999G990D00')));
4724: okc_util.print_trace(2, '---------------------------------------');
4725: okc_util.print_trace(2, 'Quote Header Id = '||lx_qte_line_tbl(i).quote_header_id);
4726: okc_util.print_trace(2, 'Quote Line Id = '||lx_qte_line_tbl(i).quote_line_id);
4727: END IF;
4728:
4721: okc_util.print_trace(2, 'Currency code = '||lx_qte_line_tbl(i).currency_code);
4722: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
4723: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price*lx_qte_line_tbl(i).quantity, '9G999G999G990D00')));
4724: okc_util.print_trace(2, '---------------------------------------');
4725: okc_util.print_trace(2, 'Quote Header Id = '||lx_qte_line_tbl(i).quote_header_id);
4726: okc_util.print_trace(2, 'Quote Line Id = '||lx_qte_line_tbl(i).quote_line_id);
4727: END IF;
4728:
4729: IF lx_qte_line_dtl_tbl.first IS NOT NULL THEN
4722: okc_util.print_trace(2, 'Quote line unit price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price, '9G999G999G990D00')));
4723: okc_util.print_trace(2, 'Quote line price = '||LTRIM(TO_CHAR(lx_qte_line_tbl(i).line_quote_price*lx_qte_line_tbl(i).quantity, '9G999G999G990D00')));
4724: okc_util.print_trace(2, '---------------------------------------');
4725: okc_util.print_trace(2, 'Quote Header Id = '||lx_qte_line_tbl(i).quote_header_id);
4726: okc_util.print_trace(2, 'Quote Line Id = '||lx_qte_line_tbl(i).quote_line_id);
4727: END IF;
4728:
4729: IF lx_qte_line_dtl_tbl.first IS NOT NULL THEN
4730: IF (l_debug = 'Y') THEN
4727: END IF;
4728:
4729: IF lx_qte_line_dtl_tbl.first IS NOT NULL THEN
4730: IF (l_debug = 'Y') THEN
4731: okc_util.print_trace(1, ' ');
4732: okc_util.print_trace(3, 'OUTPUT RECORD - Quote Detail Lines:');
4733: okc_util.print_trace(3, '===================================');
4734: END IF;
4735: l_nb_qte_line_dtl:=0;
4728:
4729: IF lx_qte_line_dtl_tbl.first IS NOT NULL THEN
4730: IF (l_debug = 'Y') THEN
4731: okc_util.print_trace(1, ' ');
4732: okc_util.print_trace(3, 'OUTPUT RECORD - Quote Detail Lines:');
4733: okc_util.print_trace(3, '===================================');
4734: END IF;
4735: l_nb_qte_line_dtl:=0;
4736: FOR j IN lx_qte_line_dtl_tbl.first..lx_qte_line_dtl_tbl.last LOOP
4729: IF lx_qte_line_dtl_tbl.first IS NOT NULL THEN
4730: IF (l_debug = 'Y') THEN
4731: okc_util.print_trace(1, ' ');
4732: okc_util.print_trace(3, 'OUTPUT RECORD - Quote Detail Lines:');
4733: okc_util.print_trace(3, '===================================');
4734: END IF;
4735: l_nb_qte_line_dtl:=0;
4736: FOR j IN lx_qte_line_dtl_tbl.first..lx_qte_line_dtl_tbl.last LOOP
4737: IF lx_qte_line_dtl_tbl(j).qte_line_index = lx_qte_line_tbl(i).line_number THEN
4736: FOR j IN lx_qte_line_dtl_tbl.first..lx_qte_line_dtl_tbl.last LOOP
4737: IF lx_qte_line_dtl_tbl(j).qte_line_index = lx_qte_line_tbl(i).line_number THEN
4738: l_nb_qte_line_dtl:=l_nb_qte_line_dtl+1;
4739: IF (l_debug = 'Y') THEN
4740: okc_util.print_trace(4, '>> Quote Line NUMBER = '||lx_qte_line_dtl_tbl(j).qte_line_index);
4741: okc_util.print_trace(4, 'Service Ref type code = '||lx_qte_line_dtl_tbl(j).service_ref_type_code);
4742: okc_util.print_trace(4, 'Service Ref Syst Id = '||lx_qte_line_dtl_tbl(j).service_ref_system_id);
4743: okc_util.print_trace(4, 'Service Ref Line Id = '||lx_qte_line_dtl_tbl(j).service_ref_line_id);
4744: END IF;
4737: IF lx_qte_line_dtl_tbl(j).qte_line_index = lx_qte_line_tbl(i).line_number THEN
4738: l_nb_qte_line_dtl:=l_nb_qte_line_dtl+1;
4739: IF (l_debug = 'Y') THEN
4740: okc_util.print_trace(4, '>> Quote Line NUMBER = '||lx_qte_line_dtl_tbl(j).qte_line_index);
4741: okc_util.print_trace(4, 'Service Ref type code = '||lx_qte_line_dtl_tbl(j).service_ref_type_code);
4742: okc_util.print_trace(4, 'Service Ref Syst Id = '||lx_qte_line_dtl_tbl(j).service_ref_system_id);
4743: okc_util.print_trace(4, 'Service Ref Line Id = '||lx_qte_line_dtl_tbl(j).service_ref_line_id);
4744: END IF;
4745: --okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_line_number);
4738: l_nb_qte_line_dtl:=l_nb_qte_line_dtl+1;
4739: IF (l_debug = 'Y') THEN
4740: okc_util.print_trace(4, '>> Quote Line NUMBER = '||lx_qte_line_dtl_tbl(j).qte_line_index);
4741: okc_util.print_trace(4, 'Service Ref type code = '||lx_qte_line_dtl_tbl(j).service_ref_type_code);
4742: okc_util.print_trace(4, 'Service Ref Syst Id = '||lx_qte_line_dtl_tbl(j).service_ref_system_id);
4743: okc_util.print_trace(4, 'Service Ref Line Id = '||lx_qte_line_dtl_tbl(j).service_ref_line_id);
4744: END IF;
4745: --okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_line_number);
4746: IF (l_debug = 'Y') THEN
4739: IF (l_debug = 'Y') THEN
4740: okc_util.print_trace(4, '>> Quote Line NUMBER = '||lx_qte_line_dtl_tbl(j).qte_line_index);
4741: okc_util.print_trace(4, 'Service Ref type code = '||lx_qte_line_dtl_tbl(j).service_ref_type_code);
4742: okc_util.print_trace(4, 'Service Ref Syst Id = '||lx_qte_line_dtl_tbl(j).service_ref_system_id);
4743: okc_util.print_trace(4, 'Service Ref Line Id = '||lx_qte_line_dtl_tbl(j).service_ref_line_id);
4744: END IF;
4745: --okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_line_number);
4746: IF (l_debug = 'Y') THEN
4747: okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4741: okc_util.print_trace(4, 'Service Ref type code = '||lx_qte_line_dtl_tbl(j).service_ref_type_code);
4742: okc_util.print_trace(4, 'Service Ref Syst Id = '||lx_qte_line_dtl_tbl(j).service_ref_system_id);
4743: okc_util.print_trace(4, 'Service Ref Line Id = '||lx_qte_line_dtl_tbl(j).service_ref_line_id);
4744: END IF;
4745: --okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_line_number);
4746: IF (l_debug = 'Y') THEN
4747: okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4748: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4749: okc_util.print_trace(4, 'Service Ref Order Num = '||lx_qte_line_dtl_tbl(j).service_ref_order_number);
4743: okc_util.print_trace(4, 'Service Ref Line Id = '||lx_qte_line_dtl_tbl(j).service_ref_line_id);
4744: END IF;
4745: --okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_line_number);
4746: IF (l_debug = 'Y') THEN
4747: okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4748: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4749: okc_util.print_trace(4, 'Service Ref Order Num = '||lx_qte_line_dtl_tbl(j).service_ref_order_number);
4750: okc_util.print_trace(4, 'Service duration = '||lx_qte_line_dtl_tbl(j).service_duration);
4751: okc_util.print_trace(4, 'Service period = '||lx_qte_line_dtl_tbl(j).service_period);
4744: END IF;
4745: --okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_line_number);
4746: IF (l_debug = 'Y') THEN
4747: okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4748: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4749: okc_util.print_trace(4, 'Service Ref Order Num = '||lx_qte_line_dtl_tbl(j).service_ref_order_number);
4750: okc_util.print_trace(4, 'Service duration = '||lx_qte_line_dtl_tbl(j).service_duration);
4751: okc_util.print_trace(4, 'Service period = '||lx_qte_line_dtl_tbl(j).service_period);
4752: END IF;
4745: --okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_line_number);
4746: IF (l_debug = 'Y') THEN
4747: okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4748: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4749: okc_util.print_trace(4, 'Service Ref Order Num = '||lx_qte_line_dtl_tbl(j).service_ref_order_number);
4750: okc_util.print_trace(4, 'Service duration = '||lx_qte_line_dtl_tbl(j).service_duration);
4751: okc_util.print_trace(4, 'Service period = '||lx_qte_line_dtl_tbl(j).service_period);
4752: END IF;
4753:
4746: IF (l_debug = 'Y') THEN
4747: okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4748: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4749: okc_util.print_trace(4, 'Service Ref Order Num = '||lx_qte_line_dtl_tbl(j).service_ref_order_number);
4750: okc_util.print_trace(4, 'Service duration = '||lx_qte_line_dtl_tbl(j).service_duration);
4751: okc_util.print_trace(4, 'Service period = '||lx_qte_line_dtl_tbl(j).service_period);
4752: END IF;
4753:
4754: IF (l_debug = 'Y') THEN
4747: okc_util.print_trace(4, 'Service Ref Line Num = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4748: okc_util.print_trace(4, 'Service Ref Qte Line Idx = '||lx_qte_line_dtl_tbl(j).service_ref_qte_line_index);
4749: okc_util.print_trace(4, 'Service Ref Order Num = '||lx_qte_line_dtl_tbl(j).service_ref_order_number);
4750: okc_util.print_trace(4, 'Service duration = '||lx_qte_line_dtl_tbl(j).service_duration);
4751: okc_util.print_trace(4, 'Service period = '||lx_qte_line_dtl_tbl(j).service_period);
4752: END IF;
4753:
4754: IF (l_debug = 'Y') THEN
4755: okc_util.print_trace(4, 'config_header_id = '||lx_qte_line_dtl_tbl(j).config_header_id);
4751: okc_util.print_trace(4, 'Service period = '||lx_qte_line_dtl_tbl(j).service_period);
4752: END IF;
4753:
4754: IF (l_debug = 'Y') THEN
4755: okc_util.print_trace(4, 'config_header_id = '||lx_qte_line_dtl_tbl(j).config_header_id);
4756: okc_util.print_trace(4, 'config_rev num = '||lx_qte_line_dtl_tbl(j).config_revision_num);
4757: okc_util.print_trace(4, 'config_item_id = '||lx_qte_line_dtl_tbl(j).config_item_id);
4758: okc_util.print_trace(4, 'comp conf flag = '||lx_qte_line_dtl_tbl(j).complete_configuration_flag);
4759: okc_util.print_trace(4, 'valid conf flag = '||lx_qte_line_dtl_tbl(j).valid_configuration_flag);
4752: END IF;
4753:
4754: IF (l_debug = 'Y') THEN
4755: okc_util.print_trace(4, 'config_header_id = '||lx_qte_line_dtl_tbl(j).config_header_id);
4756: okc_util.print_trace(4, 'config_rev num = '||lx_qte_line_dtl_tbl(j).config_revision_num);
4757: okc_util.print_trace(4, 'config_item_id = '||lx_qte_line_dtl_tbl(j).config_item_id);
4758: okc_util.print_trace(4, 'comp conf flag = '||lx_qte_line_dtl_tbl(j).complete_configuration_flag);
4759: okc_util.print_trace(4, 'valid conf flag = '||lx_qte_line_dtl_tbl(j).valid_configuration_flag);
4760: okc_util.print_trace(4, 'component_code = '||lx_qte_line_dtl_tbl(j).component_code);
4753:
4754: IF (l_debug = 'Y') THEN
4755: okc_util.print_trace(4, 'config_header_id = '||lx_qte_line_dtl_tbl(j).config_header_id);
4756: okc_util.print_trace(4, 'config_rev num = '||lx_qte_line_dtl_tbl(j).config_revision_num);
4757: okc_util.print_trace(4, 'config_item_id = '||lx_qte_line_dtl_tbl(j).config_item_id);
4758: okc_util.print_trace(4, 'comp conf flag = '||lx_qte_line_dtl_tbl(j).complete_configuration_flag);
4759: okc_util.print_trace(4, 'valid conf flag = '||lx_qte_line_dtl_tbl(j).valid_configuration_flag);
4760: okc_util.print_trace(4, 'component_code = '||lx_qte_line_dtl_tbl(j).component_code);
4761: END IF;
4754: IF (l_debug = 'Y') THEN
4755: okc_util.print_trace(4, 'config_header_id = '||lx_qte_line_dtl_tbl(j).config_header_id);
4756: okc_util.print_trace(4, 'config_rev num = '||lx_qte_line_dtl_tbl(j).config_revision_num);
4757: okc_util.print_trace(4, 'config_item_id = '||lx_qte_line_dtl_tbl(j).config_item_id);
4758: okc_util.print_trace(4, 'comp conf flag = '||lx_qte_line_dtl_tbl(j).complete_configuration_flag);
4759: okc_util.print_trace(4, 'valid conf flag = '||lx_qte_line_dtl_tbl(j).valid_configuration_flag);
4760: okc_util.print_trace(4, 'component_code = '||lx_qte_line_dtl_tbl(j).component_code);
4761: END IF;
4762:
4755: okc_util.print_trace(4, 'config_header_id = '||lx_qte_line_dtl_tbl(j).config_header_id);
4756: okc_util.print_trace(4, 'config_rev num = '||lx_qte_line_dtl_tbl(j).config_revision_num);
4757: okc_util.print_trace(4, 'config_item_id = '||lx_qte_line_dtl_tbl(j).config_item_id);
4758: okc_util.print_trace(4, 'comp conf flag = '||lx_qte_line_dtl_tbl(j).complete_configuration_flag);
4759: okc_util.print_trace(4, 'valid conf flag = '||lx_qte_line_dtl_tbl(j).valid_configuration_flag);
4760: okc_util.print_trace(4, 'component_code = '||lx_qte_line_dtl_tbl(j).component_code);
4761: END IF;
4762:
4763: IF (l_debug = 'Y') THEN
4756: okc_util.print_trace(4, 'config_rev num = '||lx_qte_line_dtl_tbl(j).config_revision_num);
4757: okc_util.print_trace(4, 'config_item_id = '||lx_qte_line_dtl_tbl(j).config_item_id);
4758: okc_util.print_trace(4, 'comp conf flag = '||lx_qte_line_dtl_tbl(j).complete_configuration_flag);
4759: okc_util.print_trace(4, 'valid conf flag = '||lx_qte_line_dtl_tbl(j).valid_configuration_flag);
4760: okc_util.print_trace(4, 'component_code = '||lx_qte_line_dtl_tbl(j).component_code);
4761: END IF;
4762:
4763: IF (l_debug = 'Y') THEN
4764: okc_util.print_trace(4, '---------------------------------------');
4760: okc_util.print_trace(4, 'component_code = '||lx_qte_line_dtl_tbl(j).component_code);
4761: END IF;
4762:
4763: IF (l_debug = 'Y') THEN
4764: okc_util.print_trace(4, '---------------------------------------');
4765: okc_util.print_trace(4, 'Quote Line Id = '||lx_qte_line_dtl_tbl(j).quote_line_id);
4766: okc_util.print_trace(4, 'Quote Detail Line Id = '||lx_qte_line_dtl_tbl(j).quote_line_detail_id);
4767: okc_util.print_trace(4, ' ');
4768: END IF;
4761: END IF;
4762:
4763: IF (l_debug = 'Y') THEN
4764: okc_util.print_trace(4, '---------------------------------------');
4765: okc_util.print_trace(4, 'Quote Line Id = '||lx_qte_line_dtl_tbl(j).quote_line_id);
4766: okc_util.print_trace(4, 'Quote Detail Line Id = '||lx_qte_line_dtl_tbl(j).quote_line_detail_id);
4767: okc_util.print_trace(4, ' ');
4768: END IF;
4769: END IF;
4762:
4763: IF (l_debug = 'Y') THEN
4764: okc_util.print_trace(4, '---------------------------------------');
4765: okc_util.print_trace(4, 'Quote Line Id = '||lx_qte_line_dtl_tbl(j).quote_line_id);
4766: okc_util.print_trace(4, 'Quote Detail Line Id = '||lx_qte_line_dtl_tbl(j).quote_line_detail_id);
4767: okc_util.print_trace(4, ' ');
4768: END IF;
4769: END IF;
4770: END LOOP;
4763: IF (l_debug = 'Y') THEN
4764: okc_util.print_trace(4, '---------------------------------------');
4765: okc_util.print_trace(4, 'Quote Line Id = '||lx_qte_line_dtl_tbl(j).quote_line_id);
4766: okc_util.print_trace(4, 'Quote Detail Line Id = '||lx_qte_line_dtl_tbl(j).quote_line_detail_id);
4767: okc_util.print_trace(4, ' ');
4768: END IF;
4769: END IF;
4770: END LOOP;
4771: IF l_nb_qte_line_dtl=0 THEN
4769: END IF;
4770: END LOOP;
4771: IF l_nb_qte_line_dtl=0 THEN
4772: IF (l_debug = 'Y') THEN
4773: okc_util.print_trace(4, 'NO Quote Detail Lines');
4774: END IF;
4775: END IF;
4776: ELSE
4777: IF (l_debug = 'Y') THEN
4774: END IF;
4775: END IF;
4776: ELSE
4777: IF (l_debug = 'Y') THEN
4778: okc_util.print_trace(3, ' ');
4779: okc_util.print_trace(3, 'OUTPUT RECORD - Quote Detail Lines:');
4780: okc_util.print_trace(3, '===================================');
4781: okc_util.print_trace(4, 'NO Quote Detail Lines');
4782: END IF;
4775: END IF;
4776: ELSE
4777: IF (l_debug = 'Y') THEN
4778: okc_util.print_trace(3, ' ');
4779: okc_util.print_trace(3, 'OUTPUT RECORD - Quote Detail Lines:');
4780: okc_util.print_trace(3, '===================================');
4781: okc_util.print_trace(4, 'NO Quote Detail Lines');
4782: END IF;
4783: END IF;
4776: ELSE
4777: IF (l_debug = 'Y') THEN
4778: okc_util.print_trace(3, ' ');
4779: okc_util.print_trace(3, 'OUTPUT RECORD - Quote Detail Lines:');
4780: okc_util.print_trace(3, '===================================');
4781: okc_util.print_trace(4, 'NO Quote Detail Lines');
4782: END IF;
4783: END IF;
4784: IF (l_debug = 'Y') THEN
4777: IF (l_debug = 'Y') THEN
4778: okc_util.print_trace(3, ' ');
4779: okc_util.print_trace(3, 'OUTPUT RECORD - Quote Detail Lines:');
4780: okc_util.print_trace(3, '===================================');
4781: okc_util.print_trace(4, 'NO Quote Detail Lines');
4782: END IF;
4783: END IF;
4784: IF (l_debug = 'Y') THEN
4785: okc_util.print_trace(2, ' ');
4781: okc_util.print_trace(4, 'NO Quote Detail Lines');
4782: END IF;
4783: END IF;
4784: IF (l_debug = 'Y') THEN
4785: okc_util.print_trace(2, ' ');
4786: END IF;
4787: END LOOP qteline;
4788: ELSE
4789: IF (l_debug = 'Y') THEN
4786: END IF;
4787: END LOOP qteline;
4788: ELSE
4789: IF (l_debug = 'Y') THEN
4790: okc_util.print_trace(2, 'NO Quote Lines');
4791: END IF;
4792: END IF;
4793: IF (l_debug = 'Y') THEN
4794: okc_util.print_trace(2, ' ');
4790: okc_util.print_trace(2, 'NO Quote Lines');
4791: END IF;
4792: END IF;
4793: IF (l_debug = 'Y') THEN
4794: okc_util.print_trace(2, ' ');
4795: END IF;
4796:
4797: --
4798: -- Contract updating with quote information waiting for
4804: --l_qte_updation_message :=
4805: -- 'An Error occurred while updating a quote' || ' ';
4806: --IF p_trace_mode = okc_api.g_true THEN
4807: -- l_qte_updation_message := l_qte_updation_message ||
4808: -- '- Trace file = '|| okc_util.l_complete_trace_file_name;
4809: --ELSE
4810: -- l_qte_updation_message := l_qte_updation_message ||
4811: -- '- Please try again with trace mode active';
4812: --END IF;
4828: p_token3_value => lx_qte_header_rec.quote_version,
4829: p_token4 => 'EXDATE',
4830: p_token4_value => lx_qte_header_rec.quote_expiration_date,
4831: p_token5 => 'TRACEFILE',
4832: p_token5_value => okc_util.l_complete_trace_file_name2
4833: );
4834: FND_MSG_PUB.Count_And_Get (
4835: p_count => x_msg_count,
4836: p_data => x_msg_data);
4863: END IF;
4864:
4865: --Error messages for the trace file
4866: IF (l_debug = 'Y') THEN
4867: okc_util.print_trace(4, ' ');
4868: okc_util.print_trace(4, '==================================');
4869: okc_util.print_trace(5, 'Error while creating quote:');
4870: okc_util.print_trace(5, 'Return status: '||x_return_status);
4871: okc_util.print_trace(4, '==================================');
4864:
4865: --Error messages for the trace file
4866: IF (l_debug = 'Y') THEN
4867: okc_util.print_trace(4, ' ');
4868: okc_util.print_trace(4, '==================================');
4869: okc_util.print_trace(5, 'Error while creating quote:');
4870: okc_util.print_trace(5, 'Return status: '||x_return_status);
4871: okc_util.print_trace(4, '==================================');
4872: END IF;
4865: --Error messages for the trace file
4866: IF (l_debug = 'Y') THEN
4867: okc_util.print_trace(4, ' ');
4868: okc_util.print_trace(4, '==================================');
4869: okc_util.print_trace(5, 'Error while creating quote:');
4870: okc_util.print_trace(5, 'Return status: '||x_return_status);
4871: okc_util.print_trace(4, '==================================');
4872: END IF;
4873: --Error messages for the output file
4866: IF (l_debug = 'Y') THEN
4867: okc_util.print_trace(4, ' ');
4868: okc_util.print_trace(4, '==================================');
4869: okc_util.print_trace(5, 'Error while creating quote:');
4870: okc_util.print_trace(5, 'Return status: '||x_return_status);
4871: okc_util.print_trace(4, '==================================');
4872: END IF;
4873: --Error messages for the output file
4874: IF okc_util.l_output_flag THEN
4867: okc_util.print_trace(4, ' ');
4868: okc_util.print_trace(4, '==================================');
4869: okc_util.print_trace(5, 'Error while creating quote:');
4870: okc_util.print_trace(5, 'Return status: '||x_return_status);
4871: okc_util.print_trace(4, '==================================');
4872: END IF;
4873: --Error messages for the output file
4874: IF okc_util.l_output_flag THEN
4875: OKC_API.set_message(p_app_name => g_app_name,
4870: okc_util.print_trace(5, 'Return status: '||x_return_status);
4871: okc_util.print_trace(4, '==================================');
4872: END IF;
4873: --Error messages for the output file
4874: IF okc_util.l_output_flag THEN
4875: OKC_API.set_message(p_app_name => g_app_name,
4876: p_msg_name => 'OKC_K2Q_K2QOUTEMSG',
4877: p_token1 => 'CRDATE',
4878: p_token1_value => lx_qte_header_rec.creation_date,
4890:
4891: l_qte_creation_message := x_msg_data;
4892: FND_MSG_PUB.Delete_Msg ( p_msg_index => x_msg_count);
4893:
4894: okc_util.print_output(0, l_qte_creation_message);
4895: END IF;
4896: FND_MSG_PUB.Count_And_Get (
4897: p_count => x_msg_count,
4898: p_data => x_msg_data);
4901: p_encoded => 'F'
4902: );
4903: IF x_msg_data IS NOT NULL THEN
4904: IF (l_debug = 'Y') THEN
4905: okc_util.print_trace(5, 'Message : '||x_msg_data);
4906: okc_util.print_trace(5, ' ');
4907: END IF;
4908: IF okc_util.l_output_flag THEN
4909: okc_util.print_output(0, 'Message : '||x_msg_data);
4902: );
4903: IF x_msg_data IS NOT NULL THEN
4904: IF (l_debug = 'Y') THEN
4905: okc_util.print_trace(5, 'Message : '||x_msg_data);
4906: okc_util.print_trace(5, ' ');
4907: END IF;
4908: IF okc_util.l_output_flag THEN
4909: okc_util.print_output(0, 'Message : '||x_msg_data);
4910: okc_util.print_output(0, ' ');
4904: IF (l_debug = 'Y') THEN
4905: okc_util.print_trace(5, 'Message : '||x_msg_data);
4906: okc_util.print_trace(5, ' ');
4907: END IF;
4908: IF okc_util.l_output_flag THEN
4909: okc_util.print_output(0, 'Message : '||x_msg_data);
4910: okc_util.print_output(0, ' ');
4911: END IF;
4912: END IF;
4905: okc_util.print_trace(5, 'Message : '||x_msg_data);
4906: okc_util.print_trace(5, ' ');
4907: END IF;
4908: IF okc_util.l_output_flag THEN
4909: okc_util.print_output(0, 'Message : '||x_msg_data);
4910: okc_util.print_output(0, ' ');
4911: END IF;
4912: END IF;
4913: END LOOP;
4906: okc_util.print_trace(5, ' ');
4907: END IF;
4908: IF okc_util.l_output_flag THEN
4909: okc_util.print_output(0, 'Message : '||x_msg_data);
4910: okc_util.print_output(0, ' ');
4911: END IF;
4912: END IF;
4913: END LOOP;
4914: IF (l_debug = 'Y') THEN
4911: END IF;
4912: END IF;
4913: END LOOP;
4914: IF (l_debug = 'Y') THEN
4915: okc_util.print_trace(4, '==================================');
4916: END IF;
4917: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4918: IF c_k_header%ISOPEN THEN
4919: CLOSE c_k_header;
4933: END IF;
4934:
4935: --Error messages for the trace file
4936: IF (l_debug = 'Y') THEN
4937: okc_util.print_trace(4, ' ');
4938: okc_util.print_trace(4, '==================================');
4939: okc_util.print_trace(5, 'Error while updating quote:');
4940: okc_util.print_trace(5, 'Return status: '||x_return_status);
4941: okc_util.print_trace(4, '==================================');
4934:
4935: --Error messages for the trace file
4936: IF (l_debug = 'Y') THEN
4937: okc_util.print_trace(4, ' ');
4938: okc_util.print_trace(4, '==================================');
4939: okc_util.print_trace(5, 'Error while updating quote:');
4940: okc_util.print_trace(5, 'Return status: '||x_return_status);
4941: okc_util.print_trace(4, '==================================');
4942: END IF;
4935: --Error messages for the trace file
4936: IF (l_debug = 'Y') THEN
4937: okc_util.print_trace(4, ' ');
4938: okc_util.print_trace(4, '==================================');
4939: okc_util.print_trace(5, 'Error while updating quote:');
4940: okc_util.print_trace(5, 'Return status: '||x_return_status);
4941: okc_util.print_trace(4, '==================================');
4942: END IF;
4943: --Error messages for the output file
4936: IF (l_debug = 'Y') THEN
4937: okc_util.print_trace(4, ' ');
4938: okc_util.print_trace(4, '==================================');
4939: okc_util.print_trace(5, 'Error while updating quote:');
4940: okc_util.print_trace(5, 'Return status: '||x_return_status);
4941: okc_util.print_trace(4, '==================================');
4942: END IF;
4943: --Error messages for the output file
4944: IF okc_util.l_output_flag THEN
4937: okc_util.print_trace(4, ' ');
4938: okc_util.print_trace(4, '==================================');
4939: okc_util.print_trace(5, 'Error while updating quote:');
4940: okc_util.print_trace(5, 'Return status: '||x_return_status);
4941: okc_util.print_trace(4, '==================================');
4942: END IF;
4943: --Error messages for the output file
4944: IF okc_util.l_output_flag THEN
4945: OKC_API.set_message(p_app_name => g_app_name,
4940: okc_util.print_trace(5, 'Return status: '||x_return_status);
4941: okc_util.print_trace(4, '==================================');
4942: END IF;
4943: --Error messages for the output file
4944: IF okc_util.l_output_flag THEN
4945: OKC_API.set_message(p_app_name => g_app_name,
4946: p_msg_name => 'OKC_K2Q_K2QOUTEMSG',
4947: p_token1 => 'CRDATE',
4948: p_token1_value => lx_qte_header_rec.creation_date,
4960:
4961: l_qte_creation_message := x_msg_data;
4962: FND_MSG_PUB.Delete_Msg ( p_msg_index => x_msg_count);
4963:
4964: okc_util.print_output(0, l_qte_creation_message);
4965: END IF;
4966: FND_MSG_PUB.Count_And_Get (
4967: p_count => x_msg_count,
4968: p_data => x_msg_data);
4971: p_encoded => 'F'
4972: );
4973: IF x_msg_data IS NOT NULL THEN
4974: IF (l_debug = 'Y') THEN
4975: okc_util.print_trace(5, 'Message : '||x_msg_data);
4976: okc_util.print_trace(5, ' ');
4977: END IF;
4978: IF okc_util.l_output_flag THEN
4979: okc_util.print_output(0, 'Message : '||x_msg_data);
4972: );
4973: IF x_msg_data IS NOT NULL THEN
4974: IF (l_debug = 'Y') THEN
4975: okc_util.print_trace(5, 'Message : '||x_msg_data);
4976: okc_util.print_trace(5, ' ');
4977: END IF;
4978: IF okc_util.l_output_flag THEN
4979: okc_util.print_output(0, 'Message : '||x_msg_data);
4980: okc_util.print_output(0, ' ');
4974: IF (l_debug = 'Y') THEN
4975: okc_util.print_trace(5, 'Message : '||x_msg_data);
4976: okc_util.print_trace(5, ' ');
4977: END IF;
4978: IF okc_util.l_output_flag THEN
4979: okc_util.print_output(0, 'Message : '||x_msg_data);
4980: okc_util.print_output(0, ' ');
4981: END IF;
4982: END IF;
4975: okc_util.print_trace(5, 'Message : '||x_msg_data);
4976: okc_util.print_trace(5, ' ');
4977: END IF;
4978: IF okc_util.l_output_flag THEN
4979: okc_util.print_output(0, 'Message : '||x_msg_data);
4980: okc_util.print_output(0, ' ');
4981: END IF;
4982: END IF;
4983: END LOOP;
4976: okc_util.print_trace(5, ' ');
4977: END IF;
4978: IF okc_util.l_output_flag THEN
4979: okc_util.print_output(0, 'Message : '||x_msg_data);
4980: okc_util.print_output(0, ' ');
4981: END IF;
4982: END IF;
4983: END LOOP;
4984: IF (l_debug = 'Y') THEN
4981: END IF;
4982: END IF;
4983: END LOOP;
4984: IF (l_debug = 'Y') THEN
4985: okc_util.print_trace(4, '==================================');
4986: END IF;
4987: WHEN OTHERS THEN
4988: --update_k_comments_err;
4989: IF c_k_header%ISOPEN THEN
5004: ,SQLERRM);
5005:
5006: --Error messages for the trace file
5007: IF (l_debug = 'Y') THEN
5008: okc_util.print_trace(4, ' ');
5009: okc_util.print_trace(4, '==================================');
5010: okc_util.print_trace(5, 'Error while updating quote:');
5011: okc_util.print_trace(5, 'Return status: '||x_return_status);
5012: okc_util.print_trace(4, '==================================');
5005:
5006: --Error messages for the trace file
5007: IF (l_debug = 'Y') THEN
5008: okc_util.print_trace(4, ' ');
5009: okc_util.print_trace(4, '==================================');
5010: okc_util.print_trace(5, 'Error while updating quote:');
5011: okc_util.print_trace(5, 'Return status: '||x_return_status);
5012: okc_util.print_trace(4, '==================================');
5013: END IF;
5006: --Error messages for the trace file
5007: IF (l_debug = 'Y') THEN
5008: okc_util.print_trace(4, ' ');
5009: okc_util.print_trace(4, '==================================');
5010: okc_util.print_trace(5, 'Error while updating quote:');
5011: okc_util.print_trace(5, 'Return status: '||x_return_status);
5012: okc_util.print_trace(4, '==================================');
5013: END IF;
5014: --Error messages for the output file
5007: IF (l_debug = 'Y') THEN
5008: okc_util.print_trace(4, ' ');
5009: okc_util.print_trace(4, '==================================');
5010: okc_util.print_trace(5, 'Error while updating quote:');
5011: okc_util.print_trace(5, 'Return status: '||x_return_status);
5012: okc_util.print_trace(4, '==================================');
5013: END IF;
5014: --Error messages for the output file
5015: IF okc_util.l_output_flag THEN
5008: okc_util.print_trace(4, ' ');
5009: okc_util.print_trace(4, '==================================');
5010: okc_util.print_trace(5, 'Error while updating quote:');
5011: okc_util.print_trace(5, 'Return status: '||x_return_status);
5012: okc_util.print_trace(4, '==================================');
5013: END IF;
5014: --Error messages for the output file
5015: IF okc_util.l_output_flag THEN
5016: OKC_API.set_message(p_app_name => g_app_name,
5011: okc_util.print_trace(5, 'Return status: '||x_return_status);
5012: okc_util.print_trace(4, '==================================');
5013: END IF;
5014: --Error messages for the output file
5015: IF okc_util.l_output_flag THEN
5016: OKC_API.set_message(p_app_name => g_app_name,
5017: p_msg_name => 'OKC_K2Q_K2QOUTEMSG',
5018: p_token1 => 'CRDATE',
5019: p_token1_value => lx_qte_header_rec.creation_date,
5031:
5032: l_qte_creation_message := x_msg_data;
5033: FND_MSG_PUB.Delete_Msg ( p_msg_index => x_msg_count);
5034:
5035: okc_util.print_output(0, l_qte_creation_message);
5036: END IF;
5037: FND_MSG_PUB.Count_And_Get (
5038: p_count => x_msg_count,
5039: p_data => x_msg_data);
5042: p_encoded => 'F'
5043: );
5044: IF x_msg_data IS NOT NULL THEN
5045: IF (l_debug = 'Y') THEN
5046: okc_util.print_trace(5, 'Message : '||x_msg_data);
5047: okc_util.print_trace(5, ' ');
5048: END IF;
5049: IF okc_util.l_output_flag THEN
5050: okc_util.print_output(0, 'Message : '||x_msg_data);
5043: );
5044: IF x_msg_data IS NOT NULL THEN
5045: IF (l_debug = 'Y') THEN
5046: okc_util.print_trace(5, 'Message : '||x_msg_data);
5047: okc_util.print_trace(5, ' ');
5048: END IF;
5049: IF okc_util.l_output_flag THEN
5050: okc_util.print_output(0, 'Message : '||x_msg_data);
5051: okc_util.print_output(0, ' ');
5045: IF (l_debug = 'Y') THEN
5046: okc_util.print_trace(5, 'Message : '||x_msg_data);
5047: okc_util.print_trace(5, ' ');
5048: END IF;
5049: IF okc_util.l_output_flag THEN
5050: okc_util.print_output(0, 'Message : '||x_msg_data);
5051: okc_util.print_output(0, ' ');
5052: END IF;
5053: END IF;
5046: okc_util.print_trace(5, 'Message : '||x_msg_data);
5047: okc_util.print_trace(5, ' ');
5048: END IF;
5049: IF okc_util.l_output_flag THEN
5050: okc_util.print_output(0, 'Message : '||x_msg_data);
5051: okc_util.print_output(0, ' ');
5052: END IF;
5053: END IF;
5054: END LOOP;
5047: okc_util.print_trace(5, ' ');
5048: END IF;
5049: IF okc_util.l_output_flag THEN
5050: okc_util.print_output(0, 'Message : '||x_msg_data);
5051: okc_util.print_output(0, ' ');
5052: END IF;
5053: END IF;
5054: END LOOP;
5055: IF (l_debug = 'Y') THEN
5052: END IF;
5053: END IF;
5054: END LOOP;
5055: IF (l_debug = 'Y') THEN
5056: okc_util.print_trace(4, '==================================');
5057: END IF;
5058:
5059: END update_quote_from_k;
5060: --
5063:
5064: BEGIN
5065: --
5066: IF (l_debug = 'Y') THEN
5067: okc_util.print_trace(0,'Starting OKC_OC_INT_KTQ_PVT Initialization');
5068: okc_util.print_trace(0,'==========================================');
5069: END IF;
5070:
5071: -- load the table with the line styles that need to be processed
5064: BEGIN
5065: --
5066: IF (l_debug = 'Y') THEN
5067: okc_util.print_trace(0,'Starting OKC_OC_INT_KTQ_PVT Initialization');
5068: okc_util.print_trace(0,'==========================================');
5069: END IF;
5070:
5071: -- load the table with the line styles that need to be processed
5072: -- in a specific manner while creating a quote or an order