eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKC_OC_INT_KTQ_PVT dependencies on OKC_API

Line 169: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;

165: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXP_ERROR';
166: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLCODE';
167: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLERRM';
168: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_OC_INT_KTQ_PVT';
169: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
170: G_APP_NAME1 CONSTANT VARCHAR2(3) := 'OKO';
171:
172: -- other constants
173: g_okx_system_items_v CONSTANT VARCHAR2(30) := 'OKX_SYSTEM_ITEMS_V';

Line 530: AND krel.object1_id1 = DECODE(NVL(b_qh_id,OKC_API.G_MISS_NUM),OKC_API.G_MISS_NUM, krel.object1_id1, b_qh_id))

526: okc_k_rel_objs krel
527: WHERE
528: krel.chr_id = b_kh_id
529: AND ((krel.cle_id IS NULL AND b_kl_id IS NULL
530: AND krel.object1_id1 = DECODE(NVL(b_qh_id,OKC_API.G_MISS_NUM),OKC_API.G_MISS_NUM, krel.object1_id1, b_qh_id))
531: OR (b_kl_id IS NOT NULL AND krel.cle_id = b_kl_id))
532: AND krel.rty_code = b_rlt_code
533: AND krel.jtot_object1_code = b_rlt_type;
534:

Line 893: OKC_API.set_message(p_app_name => g_app_name1,

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
891: IF r_rule.rule_information_category = g_rd_custacct THEN
892: IF l_rd_custacct_nb = 1 THEN
893: OKC_API.set_message(p_app_name => g_app_name1,
894: p_msg_name => 'OKO_K2Q_RULEOCC',
895: p_token1 => 'RULE',
896: p_token1_value => g_rd_custacct,
897: p_token2 => 'KNUMBER',

Line 899: x_return_status := OKC_API.G_RET_STS_ERROR;

895: p_token1 => 'RULE',
896: p_token1_value => g_rd_custacct,
897: p_token2 => 'KNUMBER',
898: p_token2_value => l_k_nbr);
899: x_return_status := OKC_API.G_RET_STS_ERROR;
900: print_error(4);
901: RAISE e_exit;
902: ELSE
903: l_rd_custacct_nb := l_rd_custacct_nb + 1;

Line 917: OKC_API.set_message(p_app_name => g_app_name1,

913: END IF;
914:
915: IF r_rule.rule_information_category = g_rd_price THEN
916: IF l_rd_price_nb = 1 THEN
917: OKC_API.set_message(p_app_name => g_app_name1,
918: p_msg_name => 'OKO_K2Q_RULEOCC',
919: p_token1 => 'RULE',
920: p_token1_value => g_rd_price,
921: p_token2 => 'KNUMBER',

Line 923: x_return_status := OKC_API.G_RET_STS_ERROR;

919: p_token1 => 'RULE',
920: p_token1_value => g_rd_price,
921: p_token2 => 'KNUMBER',
922: p_token2_value => l_k_nbr);
923: x_return_status := OKC_API.G_RET_STS_ERROR;
924: print_error(4);
925: RAISE e_exit;
926: ELSE
927: l_rd_price_nb := l_rd_price_nb + 1;

Line 941: OKC_API.set_message(p_app_name => g_app_name1,

937:
938:
939: IF r_rule.rule_information_category = g_rd_invrule THEN
940: IF l_rd_invrule_nb = 1 THEN
941: OKC_API.set_message(p_app_name => g_app_name1,
942: p_msg_name => 'OKO_K2Q_RULEOCC',
943: p_token1 => 'RULE',
944: p_token1_value => g_rd_invrule,
945: p_token2 => 'KNUMBER',

Line 947: x_return_status := OKC_API.G_RET_STS_ERROR;

943: p_token1 => 'RULE',
944: p_token1_value => g_rd_invrule,
945: p_token2 => 'KNUMBER',
946: p_token2_value => l_k_nbr);
947: x_return_status := OKC_API.G_RET_STS_ERROR;
948: print_error(4);
949: RAISE e_exit;
950: ELSE
951: l_rd_invrule_nb := l_rd_invrule_nb + 1;

Line 965: OKC_API.set_message(p_app_name => g_app_name1,

961:
962: IF p_cle_id IS NULL THEN
963: IF r_rule.rule_information_category = g_rd_convert THEN
964: IF l_rd_convert_nb = 1 THEN
965: OKC_API.set_message(p_app_name => g_app_name1,
966: p_msg_name => 'OKO_K2Q_RULEOCC',
967: p_token1 => 'RULE',
968: p_token1_value => g_rd_convert,
969: p_token2 => 'KNUMBER',

Line 971: x_return_status := OKC_API.G_RET_STS_ERROR;

967: p_token1 => 'RULE',
968: p_token1_value => g_rd_convert,
969: p_token2 => 'KNUMBER',
970: p_token2_value => l_k_nbr);
971: x_return_status := OKC_API.G_RET_STS_ERROR;
972: print_error(4);
973: RAISE e_exit;
974: ELSE
975: OPEN c_conv_type(r_rule.object1_id1, r_rule.object1_id2);

Line 995: OKC_API.set_message(p_app_name => g_app_name1,

991: END IF;
992:
993: IF r_rule.rule_information_category = g_rd_shipto THEN
994: IF l_rd_shipto_nb = 1 THEN
995: OKC_API.set_message(p_app_name => g_app_name1,
996: p_msg_name => 'OKO_K2Q_RULEOCC',
997: p_token1 => 'RULE',
998: p_token1_value => g_rd_shipto,
999: p_token2 => 'KNUMBER',

Line 1001: x_return_status := OKC_API.G_RET_STS_ERROR;

997: p_token1 => 'RULE',
998: p_token1_value => g_rd_shipto,
999: p_token2 => 'KNUMBER',
1000: p_token2_value => l_k_nbr);
1001: x_return_status := OKC_API.G_RET_STS_ERROR;
1002: print_error(4);
1003: RAISE e_exit;
1004: ELSE
1005: OPEN c_party_site(r_rule.object1_id1, r_rule.object1_id2);

Line 1052: OKC_API.set_message(p_app_name => g_app_name1,

1048: END IF;
1049:
1050: IF r_rule.rule_information_category = g_rd_shipmtd THEN
1051: IF l_rd_shipmtd_nb = 1 THEN
1052: OKC_API.set_message(p_app_name => g_app_name1,
1053: p_msg_name => 'OKO_K2Q_RULEOCC',
1054: p_token1 => 'RULE',
1055: p_token1_value => g_rd_shipmtd,
1056: p_token2 => 'KNUMBER',

Line 1058: x_return_status := OKC_API.G_RET_STS_ERROR;

1054: p_token1 => 'RULE',
1055: p_token1_value => g_rd_shipmtd,
1056: p_token2 => 'KNUMBER',
1057: p_token2_value => l_k_nbr);
1058: x_return_status := OKC_API.G_RET_STS_ERROR;
1059: print_error(4);
1060: RAISE e_exit;
1061: ELSE
1062: l_rd_shipmtd_nb := l_rd_shipmtd_nb + 1;

Line 1069: OKC_API.set_message(p_app_name => g_app_name1,

1065: END IF;
1066:
1067: IF r_rule.rule_information_category = g_rd_billto THEN
1068: IF l_rd_billto_nb = 1 THEN
1069: OKC_API.set_message(p_app_name => g_app_name1,
1070: p_msg_name => 'OKO_K2Q_RULEOCC',
1071: p_token1 => 'RULE',
1072: p_token1_value => g_rd_billto,
1073: p_token2 => 'KNUMBER',

Line 1075: x_return_status := OKC_API.G_RET_STS_ERROR;

1071: p_token1 => 'RULE',
1072: p_token1_value => g_rd_billto,
1073: p_token2 => 'KNUMBER',
1074: p_token2_value => l_k_nbr);
1075: x_return_status := OKC_API.G_RET_STS_ERROR;
1076: print_error(4);
1077: RAISE e_exit;
1078: ELSE
1079: -- need to fix bill to, since ASO wants the party site, not customer acct site

Line 1122: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1118: x_sto_data_rec := l_sto_data_rec;
1119: x_bto_data_rec := l_bto_data_rec;
1120: x_rule_tab := l_k_rule_tab;
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 );

Line 1162: l_retval VARCHAR2(1):= OKC_API.G_FALSE;

1158: -- matches the line style id that is passed
1159:
1160: FUNCTION is_top_line_style_seeded(p_lse_id IN okc_line_styles_b.id%TYPE,
1161: x_index OUT NOCOPY NUMBER) RETURN VARCHAR IS
1162: l_retval VARCHAR2(1):= OKC_API.G_FALSE;
1163:
1164: BEGIN
1165:
1166: IF l_line_style_tab.first IS NOT NULL THEN

Line 1170: l_retval := OKC_API.G_TRUE;

1166: IF l_line_style_tab.first IS NOT NULL THEN
1167: FOR i in l_line_style_tab.first..l_line_style_tab.last LOOP
1168: IF l_line_style_tab(i).lse_id = p_lse_id THEN
1169: x_index := i;
1170: l_retval := OKC_API.G_TRUE;
1171: EXIT;
1172: END IF;
1173: END LOOP;
1174: END IF;

Line 1189: p_index IN NUMBER DEFAULT OKC_API.G_MISS_NUM )

1185: -- In Parameters: p_lse_id
1186: -- Out Parameters: p_index
1187:
1188: FUNCTION is_top_line_with_covered_prod(p_lse_id IN okc_line_styles_b.id%TYPE,
1189: p_index IN NUMBER DEFAULT OKC_API.G_MISS_NUM )
1190: RETURN VARCHAR IS
1191:
1192: l_retval VARCHAR2(1):= OKC_API.G_FALSE;
1193: BEGIN

Line 1192: l_retval VARCHAR2(1):= OKC_API.G_FALSE;

1188: FUNCTION is_top_line_with_covered_prod(p_lse_id IN okc_line_styles_b.id%TYPE,
1189: p_index IN NUMBER DEFAULT OKC_API.G_MISS_NUM )
1190: RETURN VARCHAR IS
1191:
1192: l_retval VARCHAR2(1):= OKC_API.G_FALSE;
1193: BEGIN
1194: -- IF found, set return value to true AND exit loop
1195: -- IF not found, default value of return value is false
1196:

Line 1197: IF NVL(p_index,OKC_API.G_MISS_NUM) <> OKC_API.G_MISS_NUM THEN

1193: BEGIN
1194: -- IF found, set return value to true AND exit loop
1195: -- IF not found, default value of return value is false
1196:
1197: IF NVL(p_index,OKC_API.G_MISS_NUM) <> OKC_API.G_MISS_NUM THEN
1198: IF l_line_style_tab(p_index).object_code = g_okx_service THEN
1199: l_retval := OKC_API.G_TRUE;
1200: END IF;
1201: ELSE

Line 1199: l_retval := OKC_API.G_TRUE;

1195: -- IF not found, default value of return value is false
1196:
1197: IF NVL(p_index,OKC_API.G_MISS_NUM) <> OKC_API.G_MISS_NUM THEN
1198: IF l_line_style_tab(p_index).object_code = g_okx_service THEN
1199: l_retval := OKC_API.G_TRUE;
1200: END IF;
1201: ELSE
1202: IF l_line_style_tab.first IS NOT NULL THEN
1203: FOR i IN l_line_style_tab.first..l_line_style_tab.last LOOP

Line 1206: l_retval := OKC_API.G_TRUE;

1202: IF l_line_style_tab.first IS NOT NULL THEN
1203: FOR i IN l_line_style_tab.first..l_line_style_tab.last LOOP
1204: IF l_line_style_tab(i).lse_id = p_lse_id AND
1205: l_line_style_tab(i).object_code = g_okx_service THEN
1206: l_retval := OKC_API.G_TRUE;
1207: EXIT;
1208: END IF;
1209: END LOOP;
1210: END IF;

Line 1231: l_retval VARCHAR2(1) := OKC_API.G_TRUE;

1227: p_lse_id IN okc_line_styles_b.id%TYPE,
1228: p_index IN NUMBER
1229: ) RETURN VARCHAR IS
1230:
1231: l_retval VARCHAR2(1) := OKC_API.G_TRUE;
1232: i NUMBER;
1233:
1234: BEGIN
1235:

Line 1239: IF NVL(p_index,OKC_API.G_MISS_NUM) <> OKC_API.G_MISS_NUM THEN

1235:
1236: i := p_index;
1237:
1238:
1239: IF NVL(p_index,OKC_API.G_MISS_NUM) <> OKC_API.G_MISS_NUM THEN
1240: IF NOT( p_cust_ord_enabled_flag = 'Y' AND l_line_style_tab(i).priced_yn = 'Y'
1241: AND l_line_style_tab(i).item_to_price_yn = 'Y') THEN
1242:
1243: /* OKC_API.set_message(p_app_name => g_app_name1,

Line 1243: /* OKC_API.set_message(p_app_name => g_app_name1,

1239: IF NVL(p_index,OKC_API.G_MISS_NUM) <> OKC_API.G_MISS_NUM THEN
1240: IF NOT( p_cust_ord_enabled_flag = 'Y' AND l_line_style_tab(i).priced_yn = 'Y'
1241: AND l_line_style_tab(i).item_to_price_yn = 'Y') THEN
1242:
1243: /* OKC_API.set_message(p_app_name => g_app_name1,
1244: p_msg_name => 'OKO_K2Q_TLNOTORDBLITM',
1245: p_token1 => 'CONTRACTNUM',
1246: p_token1_value => l_k_nbr,
1247: p_token2 => 'LINESTYLEID',

Line 1249: l_retval := OKC_API.G_FALSE;

1245: p_token1 => 'CONTRACTNUM',
1246: p_token1_value => l_k_nbr,
1247: p_token2 => 'LINESTYLEID',
1248: p_token2_value => p_lse_id); */
1249: l_retval := OKC_API.G_FALSE;
1250: END IF;
1251: ELSE
1252: FOR i IN l_line_style_tab.first..l_line_style_tab.last LOOP
1253: IF l_line_style_tab(i).lse_id = p_lse_id THEN

Line 1257: /* OKC_API.set_message(p_app_name => g_app_name1,

1253: IF l_line_style_tab(i).lse_id = p_lse_id THEN
1254: IF NOT ( p_cust_ord_enabled_flag = 'Y' AND l_line_style_tab(i).priced_yn = 'Y'
1255: AND l_line_style_tab(i).item_to_price_yn = 'Y') THEN
1256:
1257: /* OKC_API.set_message(p_app_name => g_app_name1,
1258: p_msg_name => 'OKO_K2Q_TLNOTORDBLITM',
1259: p_token1 => 'CONTRACTNUM',
1260: p_token1_value => l_k_nbr,
1261: p_token2 => 'LINESTYLEID',

Line 1264: l_retval := OKC_API.G_FALSE;

1260: p_token1_value => l_k_nbr,
1261: p_token2 => 'LINESTYLEID',
1262: p_token2_value => p_lse_id); */
1263:
1264: l_retval := OKC_API.G_FALSE;
1265: EXIT;
1266: END IF;
1267: END IF;
1268: END LOOP;

Line 1291: l_retval VARCHAR2(1) := OKC_API.G_TRUE;

1287: p_rlt_code IN VARCHAR2,
1288: p_rlt_type IN VARCHAR2
1289: ) RETURN VARCHAR2 IS
1290:
1291: l_retval VARCHAR2(1) := OKC_API.G_TRUE;
1292: l_object_id1 okc_k_rel_objs.object1_id1%TYPE;
1293:
1294: BEGIN
1295: OPEN c_q_k_rel(p_chr_id,p_cle_id,p_qh_id,p_rlt_code,p_rlt_type);

Line 1298: l_retval := OKC_API.G_FALSE;

1294: BEGIN
1295: OPEN c_q_k_rel(p_chr_id,p_cle_id,p_qh_id,p_rlt_code,p_rlt_type);
1296: FETCH c_q_k_rel INTO l_object_id1;
1297: IF c_q_k_rel%NOTFOUND THEN
1298: l_retval := OKC_API.G_FALSE;
1299: END IF;
1300: CLOSE c_q_k_rel;
1301: RETURN l_retval;
1302: END is_kl_linked_to_ql;

Line 1376: OKC_API.set_message(p_app_name => g_app_name1,

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;
1374: IF c_q_k_rel%NOTFOUND OR l_object_id1 IS NULL THEN
1375:
1376: OKC_API.set_message(p_app_name => g_app_name1,
1377: p_msg_name => 'OKO_K2Q_NORELBQK',
1378: p_token1 => 'KNUMBER',
1379: p_token1_value => l_k_nbr,
1380: p_token2 => 'QNUMBER',

Line 1383: x_return_status := OKC_API.G_RET_STS_ERROR;

1379: p_token1_value => l_k_nbr,
1380: p_token2 => 'QNUMBER',
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);

Line 1394: x_return_status := OKC_API.G_RET_STS_SUCCESS;

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;
1397: CLOSE c_q_k_rel;
1398: ELSE

Line 1400: OKC_API.set_message(p_app_name => g_app_name1,

1396: END IF;
1397: CLOSE c_q_k_rel;
1398: ELSE
1399: IF l_object_id1 IS NULL THEN
1400: OKC_API.set_message(p_app_name => g_app_name1,
1401: p_msg_name => 'OKO_K2Q_NORELBQK',
1402: p_token1 => 'KNUMBER',
1403: p_token1_value => l_k_nbr,
1404: p_token2 => 'QNUMBER',

Line 1407: x_return_status := OKC_API.G_RET_STS_ERROR;

1403: p_token1_value => l_k_nbr,
1404: p_token2 => 'QNUMBER',
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);

Line 1418: l_ktq_flag := OKC_API.G_TRUE;

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;
1421: ELSE
1422: OKC_API.set_message(p_app_name => g_app_name1,

Line 1422: OKC_API.set_message(p_app_name => g_app_name1,

1418: l_ktq_flag := OKC_API.G_TRUE;
1419: p_rel_code := g_rlt_code_ktq;
1420: END IF;
1421: ELSE
1422: OKC_API.set_message(p_app_name => g_app_name1,
1423: p_msg_name => 'OKO_K2Q_INVCAT');
1424:
1425: x_return_status := OKC_API.G_RET_STS_ERROR;
1426: IF (l_debug = 'Y') THEN

Line 1425: x_return_status := OKC_API.G_RET_STS_ERROR;

1421: ELSE
1422: OKC_API.set_message(p_app_name => g_app_name1,
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);

Line 1447: OKC_API.set_message(p_app_name => g_app_name1,

1443: OPEN c_qh_expiration(g_quote_id);
1444: FETCH c_qh_expiration INTO l_quot_exp_date;
1445: IF l_quot_exp_date IS NOT NULL AND TRUNC(SYSDATE) > TRUNC(l_quot_exp_date) THEN
1446:
1447: OKC_API.set_message(p_app_name => g_app_name1,
1448: p_msg_name => 'OKO_K2Q_QDATEXP',
1449: p_token1 => 'QNUMBER',
1450: p_token1_value => l_q_nbr,
1451: p_token2 => 'QUOTEXPDATE',

Line 1454: x_return_status := OKC_API.G_RET_STS_ERROR;

1450: p_token1_value => l_q_nbr,
1451: p_token2 => 'QUOTEXPDATE',
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);

Line 1464: x_return_status := OKC_API.G_RET_STS_SUCCESS;

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;
1467:
1468: */

Line 1480: OKC_API.set_message(G_APP_NAME, -- set the err mesg on the stack to be retrieved

1476: IF c_q_k_rel%ISOPEN THEN
1477: CLOSE c_q_k_rel;
1478: END IF;
1479:
1480: OKC_API.set_message(G_APP_NAME, -- set the err mesg on the stack to be retrieved
1481: G_UNEXPECTED_ERROR, -- by the calling routine
1482: G_SQLCODE_TOKEN,
1483: SQLCODE,
1484: G_SQLERRM_TOKEN,

Line 1487: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1483: SQLCODE,
1484: G_SQLERRM_TOKEN,
1485: SQLERRM);
1486: -- notify caller of an UNEXPECTED error
1487: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1488:
1489: END validate_k_eligibility;
1490:
1491: -------------------------------------------------------------------------------

Line 1685: OKC_API.set_message(p_app_name => g_app_name1,

1681: END IF;
1682: END LOOP;
1683:
1684: IF l_nb_parties = 0 THEN
1685: OKC_API.set_message(p_app_name => g_app_name1,
1686: p_msg_name => 'OKO_K2Q_NOCUSTDEF',
1687: p_token1 => 'KNUMBER',
1688: p_token1_value => l_k_nbr);
1689: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 1689: x_return_status := OKC_API.G_RET_STS_ERROR;

1685: OKC_API.set_message(p_app_name => g_app_name1,
1686: p_msg_name => 'OKO_K2Q_NOCUSTDEF',
1687: p_token1 => 'KNUMBER',
1688: p_token1_value => l_k_nbr);
1689: x_return_status := OKC_API.G_RET_STS_ERROR;
1690: print_error(4);
1691: RAISE e_exit;
1692: END IF;
1693: IF l_nb_parties > 2 THEN

Line 1694: OKC_API.set_message(p_app_name => g_app_name1,

1690: print_error(4);
1691: RAISE e_exit;
1692: END IF;
1693: IF l_nb_parties > 2 THEN
1694: OKC_API.set_message(p_app_name => g_app_name1,
1695: p_msg_name => 'OKO_K2Q_PARNUMLIMT',
1696: p_token1 => 'KNUMBER',
1697: p_token1_value => l_k_nbr);
1698: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 1698: x_return_status := OKC_API.G_RET_STS_ERROR;

1694: OKC_API.set_message(p_app_name => g_app_name1,
1695: p_msg_name => 'OKO_K2Q_PARNUMLIMT',
1696: p_token1 => 'KNUMBER',
1697: p_token1_value => l_k_nbr);
1698: x_return_status := OKC_API.G_RET_STS_ERROR;
1699: print_error(4);
1700: RAISE e_exit;
1701: END IF;
1702: IF l_nb_parties < 2 THEN

Line 1703: OKC_API.set_message(p_app_name => g_app_name1,

1699: print_error(4);
1700: RAISE e_exit;
1701: END IF;
1702: IF l_nb_parties < 2 THEN
1703: OKC_API.set_message(p_app_name => g_app_name1,
1704: p_msg_name => 'OKO_K2Q_PARNUMLIMT2',
1705: p_token1 => 'KNUMBER',
1706: p_token1_value => l_k_nbr);
1707: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 1707: x_return_status := OKC_API.G_RET_STS_ERROR;

1703: OKC_API.set_message(p_app_name => g_app_name1,
1704: p_msg_name => 'OKO_K2Q_PARNUMLIMT2',
1705: p_token1 => 'KNUMBER',
1706: p_token1_value => l_k_nbr);
1707: x_return_status := OKC_API.G_RET_STS_ERROR;
1708: print_error(4);
1709: RAISE e_exit;
1710: END IF;
1711: IF l_nb_roles <> 2 THEN

Line 1712: OKC_API.set_message(p_app_name => g_app_name1,

1708: print_error(4);
1709: RAISE e_exit;
1710: END IF;
1711: IF l_nb_roles <> 2 THEN
1712: OKC_API.set_message(p_app_name => g_app_name1,
1713: p_msg_name => 'OKO_K2Q_ROLEDEFN',
1714: p_token1 => 'KNUMBER',
1715: p_token1_value => l_k_nbr);
1716: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 1716: x_return_status := OKC_API.G_RET_STS_ERROR;

1712: OKC_API.set_message(p_app_name => g_app_name1,
1713: p_msg_name => 'OKO_K2Q_ROLEDEFN',
1714: p_token1 => 'KNUMBER',
1715: p_token1_value => l_k_nbr);
1716: x_return_status := OKC_API.G_RET_STS_ERROR;
1717: print_error(4);
1718: RAISE e_exit;
1719: END IF;
1720: IF l_party <> 1 OR l_legentity <> 1 THEN

Line 1721: OKC_API.set_message(p_app_name => g_app_name1,

1717: print_error(4);
1718: RAISE e_exit;
1719: END IF;
1720: IF l_party <> 1 OR l_legentity <> 1 THEN
1721: OKC_API.set_message(p_app_name => g_app_name1,
1722: p_msg_name => 'OKO_K2Q_PTYTYPE_MIS',
1723: p_token1 => 'KNUMBER',
1724: p_token1_value => l_k_nbr);
1725: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 1725: x_return_status := OKC_API.G_RET_STS_ERROR;

1721: OKC_API.set_message(p_app_name => g_app_name1,
1722: p_msg_name => 'OKO_K2Q_PTYTYPE_MIS',
1723: p_token1 => 'KNUMBER',
1724: p_token1_value => l_k_nbr);
1725: x_return_status := OKC_API.G_RET_STS_ERROR;
1726: print_error(4);
1727: RAISE e_exit;
1728: END IF;
1729: l_cust:=l_customer;

Line 1768: IF lx_return_status = OKC_API.G_RET_STS_SUCCESS THEN

1764: x_sto_data_rec => lx_kh_sto_data_rec,
1765: x_return_status => lx_return_status );
1766:
1767:
1768: IF lx_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1769:
1770: IF lx_kh_rule_tab.FIRST IS NOT NULL THEN
1771: l_kh_rule_tab := lx_kh_rule_tab;
1772: END IF;

Line 1824: OKC_API.set_message(

1820: OPEN c_top_cle(p_chr_id, r_cle_i.line_id);
1821: FETCH c_top_cle INTO r_cle;
1822:
1823: IF c_top_cle%NOTFOUND THEN
1824: OKC_API.set_message(
1825: p_app_name => g_app_name1,
1826: p_msg_name => 'OKO_K2Q_LINENOTORDBL1',
1827: p_token1 => 'LINE_NUM',
1828: p_token1_value => r_cle_i.line_number,

Line 1910: IF is_top_line_style_seeded(p_lse_id =>r_cle.lse_id,x_index =>lx_index) = OKC_API.G_TRUE THEN

1906: END IF;
1907:
1908:
1909:
1910: IF is_top_line_style_seeded(p_lse_id =>r_cle.lse_id,x_index =>lx_index) = OKC_API.G_TRUE THEN
1911:
1912: IF is_top_line_with_covered_prod(r_cle.lse_id,lx_index) = OKC_API.G_TRUE THEN
1913:
1914: IF is_top_line_orderable_i(l_customer_order_enabled_flag,r_cle.lse_id,lx_index) = OKC_API.G_TRUE THEN

Line 1912: IF is_top_line_with_covered_prod(r_cle.lse_id,lx_index) = OKC_API.G_TRUE THEN

1908:
1909:
1910: IF is_top_line_style_seeded(p_lse_id =>r_cle.lse_id,x_index =>lx_index) = OKC_API.G_TRUE THEN
1911:
1912: IF is_top_line_with_covered_prod(r_cle.lse_id,lx_index) = OKC_API.G_TRUE THEN
1913:
1914: IF is_top_line_orderable_i(l_customer_order_enabled_flag,r_cle.lse_id,lx_index) = OKC_API.G_TRUE THEN
1915:
1916: l_idx := l_idx + 1;

Line 1914: IF is_top_line_orderable_i(l_customer_order_enabled_flag,r_cle.lse_id,lx_index) = OKC_API.G_TRUE THEN

1910: IF is_top_line_style_seeded(p_lse_id =>r_cle.lse_id,x_index =>lx_index) = OKC_API.G_TRUE THEN
1911:
1912: IF is_top_line_with_covered_prod(r_cle.lse_id,lx_index) = OKC_API.G_TRUE THEN
1913:
1914: IF is_top_line_orderable_i(l_customer_order_enabled_flag,r_cle.lse_id,lx_index) = OKC_API.G_TRUE THEN
1915:
1916: l_idx := l_idx + 1;
1917:
1918: l_line_info_tab(l_idx) := r_cle;

Line 1997: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1993: --
1994: okc_time_util_pub.get_duration(r_cle.start_date,r_cle.end_date,
1995: l_svc_duration,l_svc_period,x_return_status);
1996:
1997: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1998: okc_api.set_message(OKC_API.G_APP_NAME,'OKC_GET_DURATION_ERROR');
1999: print_error(3);
2000: RAISE e_exit;
2001: END IF;

Line 1998: okc_api.set_message(OKC_API.G_APP_NAME,'OKC_GET_DURATION_ERROR');

1994: okc_time_util_pub.get_duration(r_cle.start_date,r_cle.end_date,
1995: l_svc_duration,l_svc_period,x_return_status);
1996:
1997: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1998: okc_api.set_message(OKC_API.G_APP_NAME,'OKC_GET_DURATION_ERROR');
1999: print_error(3);
2000: RAISE e_exit;
2001: END IF;
2002:

Line 2033: IF lx_return_status = OKC_API.G_RET_STS_SUCCESS THEN

2029: x_bto_data_rec => lx_kl_bto_data_rec,
2030: x_sto_data_rec => lx_kl_sto_data_rec,
2031: x_return_status => lx_return_status );
2032:
2033: IF lx_return_status = OKC_API.G_RET_STS_SUCCESS THEN
2034:
2035: IF lx_kl_rule_tab.FIRST IS NOT NULL THEN
2036: FOR i IN lx_kl_rule_tab.FIRST..lx_kl_rule_tab.LAST LOOP
2037: l_kl_rule_tab(l_kl_rule_tab.COUNT+1) := lx_kl_rule_tab(i);

Line 2071: OKC_API.set_message( -- Set the error message

2067:
2068: l_cp_ctr:=l_cp_ctr+1;
2069:
2070: IF l_cp_ctr > 1 THEN -- more than one cp line for this service line
2071: OKC_API.set_message( -- Set the error message
2072: p_app_name => g_app_name1,
2073: p_msg_name => 'OKO_K2Q_LINENOTORDBL2',
2074: p_token1 => 'LINE_NUM',
2075: p_token1_value => r_cle.line_number,

Line 2175: p_rlt_type => g_rlt_typ_ql) = OKC_API.G_TRUE THEN

2171: IF is_kl_linked_to_ql(p_chr_id => p_chr_id,
2172: p_cle_id => r_cle.line_id,
2173: p_qh_id => g_quote_id,
2174: p_rlt_code => p_rel_code,
2175: p_rlt_type => g_rlt_typ_ql) = OKC_API.G_TRUE THEN
2176:
2177: OKC_API.set_message( -- Set the error message
2178: p_app_name => g_app_name1,
2179: p_msg_name => 'OKO_K2Q_LINENOTORDBL3',

Line 2177: OKC_API.set_message( -- Set the error message

2173: p_qh_id => g_quote_id,
2174: p_rlt_code => p_rel_code,
2175: p_rlt_type => g_rlt_typ_ql) = OKC_API.G_TRUE THEN
2176:
2177: OKC_API.set_message( -- Set the error message
2178: p_app_name => g_app_name1,
2179: p_msg_name => 'OKO_K2Q_LINENOTORDBL3',
2180: p_token1 => 'LINE_NUM',
2181: p_token1_value => r_cle.line_number,

Line 2193: OKC_API.set_message( -- Set the error message

2189: RAISE e_exit;
2190:
2191: ELSE -- Contract line not linked to quote line
2192:
2193: OKC_API.set_message( -- Set the error message
2194: p_app_name => g_app_name1,
2195: p_msg_name => 'OKO_K2Q_LINENOTORDBL4',
2196: p_token1 => 'LINE_NUM',
2197: p_token1_value => r_cle.line_number,

Line 2211: IF is_top_line_orderable_i(l_customer_order_enabled_flag,r_cle.lse_id,lx_index) = OKC_API.G_TRUE THEN

2207:
2208: ELSE -- is_top_line_with_covered_prod
2209:
2210:
2211: IF is_top_line_orderable_i(l_customer_order_enabled_flag,r_cle.lse_id,lx_index) = OKC_API.G_TRUE THEN
2212:
2213: l_idx := l_idx + 1;
2214: l_line_info_tab(l_idx) := r_cle;
2215:

Line 2284: IF lx_return_status = OKC_API.G_RET_STS_SUCCESS THEN

2280: x_bto_data_rec => lx_kl_bto_data_rec,
2281: x_sto_data_rec => lx_kl_sto_data_rec,
2282: x_return_status => lx_return_status );
2283:
2284: IF lx_return_status = OKC_API.G_RET_STS_SUCCESS THEN
2285:
2286: IF lx_kl_rule_tab.FIRST IS NOT NULL THEN
2287: FOR i IN lx_kl_rule_tab.FIRST..lx_kl_rule_tab.LAST LOOP
2288: l_kl_rule_tab(l_kl_rule_tab.COUNT+1) := lx_kl_rule_tab(i);

Line 2335: p_rlt_type => g_rlt_typ_ql) = OKC_API.G_TRUE THEN

2331: IF is_kl_linked_to_ql(p_chr_id => p_chr_id,
2332: p_cle_id => r_cle.line_id,
2333: p_qh_id => g_quote_id,
2334: p_rlt_code => p_rel_code,
2335: p_rlt_type => g_rlt_typ_ql) = OKC_API.G_TRUE THEN
2336:
2337: OKC_API.set_message( -- Set the error message
2338: p_app_name => g_app_name1,
2339: p_msg_name => 'OKO_K2Q_LINENOTORDBL5',

Line 2337: OKC_API.set_message( -- Set the error message

2333: p_qh_id => g_quote_id,
2334: p_rlt_code => p_rel_code,
2335: p_rlt_type => g_rlt_typ_ql) = OKC_API.G_TRUE THEN
2336:
2337: OKC_API.set_message( -- Set the error message
2338: p_app_name => g_app_name1,
2339: p_msg_name => 'OKO_K2Q_LINENOTORDBL5',
2340: p_token1 => 'LINE_NUM',
2341: p_token1_value => r_cle.line_number,

Line 2353: OKC_API.set_message( -- Set the error message

2349: RAISE e_exit;
2350:
2351: ELSE -- Contract line not linked to quote line
2352:
2353: OKC_API.set_message( -- Set the error message
2354: p_app_name => g_app_name1,
2355: p_msg_name => 'OKO_K2Q_LINENOTORDBL6',
2356: p_token1 => 'LINE_NUM',
2357: p_token1_value => r_cle.line_number,

Line 2380: p_rlt_type => g_rlt_typ_ql) = OKC_API.G_TRUE THEN

2376: IF is_kl_linked_to_ql(p_chr_id => p_chr_id,
2377: p_cle_id => r_cle.line_id,
2378: p_qh_id => g_quote_id,
2379: p_rlt_code => p_rel_code,
2380: p_rlt_type => g_rlt_typ_ql) = OKC_API.G_TRUE THEN
2381:
2382: OKC_API.set_message( -- Set the error message
2383: p_app_name => g_app_name1,
2384: p_msg_name => 'OKO_K2Q_LINENOTORDBL7',

Line 2382: OKC_API.set_message( -- Set the error message

2378: p_qh_id => g_quote_id,
2379: p_rlt_code => p_rel_code,
2380: p_rlt_type => g_rlt_typ_ql) = OKC_API.G_TRUE THEN
2381:
2382: OKC_API.set_message( -- Set the error message
2383: p_app_name => g_app_name1,
2384: p_msg_name => 'OKO_K2Q_LINENOTORDBL7',
2385: p_token1 => 'LINE_NUM',
2386: p_token1_value => r_cle.line_number,

Line 2398: OKC_API.set_message( -- Set the error message

2394: RAISE e_exit;
2395:
2396: ELSE -- Contract line not linked to quote line
2397:
2398: OKC_API.set_message( -- Set the error message
2399: p_app_name => g_app_name1,
2400: p_msg_name => 'OKO_K2Q_LINENOTORDBL8',
2401: p_token1 => 'LINE_NUM',
2402: p_token1_value => r_cle.line_number,

Line 2427: okc_api.set_message(G_APP_NAME1,

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',
2430: l_k_nbr);
2431: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 2431: x_return_status := OKC_API.G_RET_STS_ERROR;

2427: okc_api.set_message(G_APP_NAME1,
2428: 'OKO_K2Q_NOLINESFORUPDT',
2429: 'KNUMBER',
2430: l_k_nbr);
2431: x_return_status := OKC_API.G_RET_STS_ERROR;
2432: print_error(4);
2433: RAISE e_exit;
2434: END IF;
2435: IF l_idx = 0 THEN

Line 2442: okc_api.set_message(G_APP_NAME1,

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',
2445: l_k_nbr);
2446: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 2446: x_return_status := OKC_API.G_RET_STS_ERROR;

2442: okc_api.set_message(G_APP_NAME1,
2443: 'OKO_K2Q_NOORDLNFORUPDT',
2444: 'KNUMBER',
2445: l_k_nbr);
2446: x_return_status := OKC_API.G_RET_STS_ERROR;
2447: print_error(4);
2448: RAISE e_exit;
2449: END IF;
2450:

Line 2451: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2447: print_error(4);
2448: RAISE e_exit;
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, ' 2454: END IF;
2455: EXCEPTION

Line 2488: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

2484: END IF;
2485: IF c_cp%ISOPEN THEN
2486: CLOSE c_cp;
2487: END IF;
2488: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2489: -- notify caller of an UNEXPECTED error
2490: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2491: --RAISE;
2492: END build_k_structures;

Line 2490: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2486: CLOSE c_cp;
2487: END IF;
2488: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2489: -- notify caller of an UNEXPECTED error
2490: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2491: --RAISE;
2492: END build_k_structures;
2493:
2494:

Line 2761: x_return_status := OKC_API.G_RET_STS_SUCCESS;

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
2763: okc_util.print_trace(1, ' 2764: END IF;
2765: EXCEPTION

Line 2770: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

2766: WHEN e_exit THEN
2767: -- nothing more to do
2768: null;
2769: WHEN OTHERS THEN
2770: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2771: -- notify caller of an UNEXPECTED error
2772: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2773: --RAISE;
2774: END build_qte_hdr;

Line 2772: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2768: null;
2769: WHEN OTHERS THEN
2770: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2771: -- notify caller of an UNEXPECTED error
2772: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2773: --RAISE;
2774: END build_qte_hdr;
2775:
2776: -------------------------------------------------------------------------------

Line 2901: IF c=1 AND is_top_line_with_covered_prod(l_line_info_tab(i).lse_id) = OKC_API.G_TRUE THEN

2897: -- the quote detail line of the quote line for the support line
2898: --
2899: FOR i IN l_line_info_tab.first..l_line_info_tab.last LOOP
2900: l_continue:=TRUE;
2901: IF c=1 AND is_top_line_with_covered_prod(l_line_info_tab(i).lse_id) = OKC_API.G_TRUE THEN
2902: l_continue:=FALSE;
2903: ELSIF c=2 AND NOT is_top_line_with_covered_prod(l_line_info_tab(i).lse_id) = OKC_API.G_TRUE THEN
2904: l_continue:=FALSE;
2905: END IF;

Line 2903: ELSIF c=2 AND NOT is_top_line_with_covered_prod(l_line_info_tab(i).lse_id) = OKC_API.G_TRUE THEN

2899: FOR i IN l_line_info_tab.first..l_line_info_tab.last LOOP
2900: l_continue:=TRUE;
2901: IF c=1 AND is_top_line_with_covered_prod(l_line_info_tab(i).lse_id) = OKC_API.G_TRUE THEN
2902: l_continue:=FALSE;
2903: ELSIF c=2 AND NOT is_top_line_with_covered_prod(l_line_info_tab(i).lse_id) = OKC_API.G_TRUE THEN
2904: l_continue:=FALSE;
2905: END IF;
2906:
2907: IF l_continue THEN

Line 2926: IF l_ktq_flag = OKC_API.G_TRUE THEN

2922:
2923: -- Open the c_q_k_rel cursor to check the existence of the related quote line
2924: -- to create the operation code.(Create,Update or Delete ).
2925:
2926: IF l_ktq_flag = OKC_API.G_TRUE THEN
2927: OPEN c_q_k_rel(p_contract_id,l_line_info_tab(i).line_id,g_quote_id,g_rlt_code_ktq,g_rlt_typ_ql);
2928: ELSE
2929: OPEN c_q_k_rel(p_contract_id,l_line_info_tab(i).line_id,g_quote_id,g_rlt_code_knq,g_rlt_typ_ql);
2930: END IF;

Line 3701: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

3697: x_return_status
3698: );
3699:
3700:
3701: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
3702:
3703: print_error(3);
3704:
3705: RAISE e_exit;

Line 3763: okc_api.set_message(G_APP_NAME1,

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',
3766: l_chr.contract_number);
3767: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 3767: x_return_status := OKC_API.G_RET_STS_ERROR;

3763: okc_api.set_message(G_APP_NAME1,
3764: 'OKO_K2Q_NOORDLINES',
3765: 'KNUMBER',
3766: l_chr.contract_number);
3767: x_return_status := OKC_API.G_RET_STS_ERROR;
3768: print_error(4);
3769: --RAISE e_exit;
3770: ELSE
3771: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 3771: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3767: x_return_status := OKC_API.G_RET_STS_ERROR;
3768: print_error(4);
3769: --RAISE e_exit;
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, '=====================================');

Line 3902: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3898: okc_util.print_trace(2, ' ');
3899: okc_util.print_trace(1, ' 3900: END IF;
3901:
3902: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3903:
3904: EXCEPTION
3905: WHEN e_exit THEN
3906: -- IF c_price%ISOPEN THEN

Line 3914: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

3910: WHEN OTHERS THEN
3911: -- IF c_price%ISOPEN THEN
3912: -- CLOSE c_price;
3913: -- END IF;
3914: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3915: -- notify caller of an UNEXPECTED error
3916: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3917: --RAISE;
3918: END build_qte_line;

Line 3916: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3912: -- CLOSE c_price;
3913: -- END IF;
3914: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3915: -- notify caller of an UNEXPECTED error
3916: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3917: --RAISE;
3918: END build_qte_line;
3919:
3920: -------------------------------------------------------------------------------

Line 3946: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

3942:
3943: -- standard api variables
3944: l_api_version CONSTANT NUMBER := 1;
3945: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_Q_FROM_K';
3946: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3947: l_return_status2 VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3948: l_msg_count NUMBER := 0;
3949: l_msg_data VARCHAR2(1000);
3950:

Line 3947: l_return_status2 VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

3943: -- standard api variables
3944: l_api_version CONSTANT NUMBER := 1;
3945: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_Q_FROM_K';
3946: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3947: l_return_status2 VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3948: l_msg_count NUMBER := 0;
3949: l_msg_data VARCHAR2(1000);
3950:
3951: -- miscellaneous variables

Line 4089: okc_api.init_msg_list(p_init_msg_list => p_init_msg_list);

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

Line 4106: okc_api.set_message(G_APP_NAME1,'OKO_K2Q_NOKHDRUPDT');

4102: OPEN c_chr(p_contract_id);
4103: FETCH c_chr INTO l_chr;
4104: IF c_chr%NOTFOUND THEN
4105: -- no contract header is a fatal error
4106: okc_api.set_message(G_APP_NAME1,'OKO_K2Q_NOKHDRUPDT');
4107: CLOSE c_chr;
4108: x_return_status := OKC_API.G_RET_STS_ERROR;
4109: print_error(2);
4110: CLOSE c_chr;

Line 4108: x_return_status := OKC_API.G_RET_STS_ERROR;

4104: IF c_chr%NOTFOUND THEN
4105: -- no contract header is a fatal error
4106: okc_api.set_message(G_APP_NAME1,'OKO_K2Q_NOKHDRUPDT');
4107: CLOSE c_chr;
4108: x_return_status := OKC_API.G_RET_STS_ERROR;
4109: print_error(2);
4110: CLOSE c_chr;
4111: RAISE OKC_API.G_EXCEPTION_ERROR;
4112: END IF;

Line 4111: RAISE OKC_API.G_EXCEPTION_ERROR;

4107: CLOSE c_chr;
4108: x_return_status := OKC_API.G_RET_STS_ERROR;
4109: print_error(2);
4110: CLOSE c_chr;
4111: RAISE OKC_API.G_EXCEPTION_ERROR;
4112: END IF;
4113: CLOSE c_chr;
4114:
4115: -- need this for error messages

Line 4139: p_init_msg_list => OKC_API.G_FALSE,

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 (
4138: p_api_version => 1,
4139: p_init_msg_list => OKC_API.G_FALSE,
4140: x_return_status => l_return_status,
4141: x_msg_count => l_msg_count,
4142: x_msg_data => l_msg_data,
4143: p_chrv_rec => l_chrv_rec);

Line 4145: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR

4141: x_msg_count => l_msg_count,
4142: x_msg_data => l_msg_data,
4143: p_chrv_rec => l_chrv_rec);
4144:
4145: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
4146: l_return_status = OKC_API.G_RET_STS_ERROR THEN
4147: OKC_API.set_message(p_app_name => g_app_name,
4148: p_msg_name => 'OKC_K2Q_KLOCKED',
4149: p_token1 => 'NUMBER',

Line 4146: l_return_status = OKC_API.G_RET_STS_ERROR THEN

4142: x_msg_data => l_msg_data,
4143: p_chrv_rec => l_chrv_rec);
4144:
4145: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
4146: l_return_status = OKC_API.G_RET_STS_ERROR THEN
4147: OKC_API.set_message(p_app_name => g_app_name,
4148: p_msg_name => 'OKC_K2Q_KLOCKED',
4149: p_token1 => 'NUMBER',
4150: p_token1_value => l_k_nbr);

Line 4147: OKC_API.set_message(p_app_name => g_app_name,

4143: p_chrv_rec => l_chrv_rec);
4144:
4145: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
4146: l_return_status = OKC_API.G_RET_STS_ERROR THEN
4147: OKC_API.set_message(p_app_name => g_app_name,
4148: p_msg_name => 'OKC_K2Q_KLOCKED',
4149: p_token1 => 'NUMBER',
4150: p_token1_value => l_k_nbr);
4151: print_error(2);

Line 4152: END IF; -- IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR

4148: p_msg_name => 'OKC_K2Q_KLOCKED',
4149: p_token1 => 'NUMBER',
4150: p_token1_value => l_k_nbr);
4151: print_error(2);
4152: END IF; -- IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
4153:
4154: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4155: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4156: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

Line 4154: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

4150: p_token1_value => l_k_nbr);
4151: print_error(2);
4152: END IF; -- IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
4153:
4154: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4155: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4156: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4157: RAISE OKC_API.G_EXCEPTION_ERROR;
4158: END IF;

Line 4155: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4151: print_error(2);
4152: END IF; -- IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
4153:
4154: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4155: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4156: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4157: RAISE OKC_API.G_EXCEPTION_ERROR;
4158: END IF;
4159:

Line 4156: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

4152: END IF; -- IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
4153:
4154: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4155: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4156: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4157: RAISE OKC_API.G_EXCEPTION_ERROR;
4158: END IF;
4159:
4160: --

Line 4157: RAISE OKC_API.G_EXCEPTION_ERROR;

4153:
4154: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4155: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4156: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4157: RAISE OKC_API.G_EXCEPTION_ERROR;
4158: END IF;
4159:
4160: --
4161: -- set organization context

Line 4168: OKC_API.set_message(p_app_name => g_app_name,

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;

Line 4171: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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;

Line 4174: IF p_trace_mode = okc_api.g_true AND okc_util.l_trace_flag THEN

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;

Line 4179: 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',
4182: p_token1 => 'TRACEFILE',
4183: p_token1_value => okc_util.l_complete_trace_file_name2);

Line 4180: OKC_API.set_message(p_app_name => g_app_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);
4184: END IF;

Line 4213: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

4209: p_quote_id,
4210: l_return_status
4211: );
4212:
4213: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4214: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4215: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4216: RAISE OKC_API.G_EXCEPTION_ERROR;
4217: END IF;

Line 4214: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4210: l_return_status
4211: );
4212:
4213: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4214: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4215: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4216: RAISE OKC_API.G_EXCEPTION_ERROR;
4217: END IF;
4218:

Line 4215: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

4211: );
4212:
4213: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4214: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4215: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4216: RAISE OKC_API.G_EXCEPTION_ERROR;
4217: END IF;
4218:
4219:

Line 4216: RAISE OKC_API.G_EXCEPTION_ERROR;

4212:
4213: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4214: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4215: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4216: RAISE OKC_API.G_EXCEPTION_ERROR;
4217: END IF;
4218:
4219:
4220: --

Line 4236: okc_api.set_message(G_APP_NAME1,'OKO_K2Q_NOQHDRUPDT');

4232: FETCH c_qhr INTO l_qhr;
4233:
4234: IF c_qhr%NOTFOUND THEN
4235: -- no quote header is a fatal error
4236: okc_api.set_message(G_APP_NAME1,'OKO_K2Q_NOQHDRUPDT');
4237: CLOSE c_qhr;
4238: x_return_status := OKC_API.G_RET_STS_ERROR;
4239: print_error(2);
4240: CLOSE c_qhr;

Line 4238: x_return_status := OKC_API.G_RET_STS_ERROR;

4234: IF c_qhr%NOTFOUND THEN
4235: -- no quote header is a fatal error
4236: okc_api.set_message(G_APP_NAME1,'OKO_K2Q_NOQHDRUPDT');
4237: CLOSE c_qhr;
4238: x_return_status := OKC_API.G_RET_STS_ERROR;
4239: print_error(2);
4240: CLOSE c_qhr;
4241: RAISE OKC_API.G_EXCEPTION_ERROR;
4242: END IF;

Line 4241: RAISE OKC_API.G_EXCEPTION_ERROR;

4237: CLOSE c_qhr;
4238: x_return_status := OKC_API.G_RET_STS_ERROR;
4239: print_error(2);
4240: CLOSE c_qhr;
4241: RAISE OKC_API.G_EXCEPTION_ERROR;
4242: END IF;
4243: CLOSE c_qhr;
4244:
4245: -- need this for error messages

Line 4281: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

4277: p_rel_code,
4278: l_k_header_rec,
4279: l_return_status );
4280:
4281: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4282: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4283: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4284: RAISE OKC_API.G_EXCEPTION_ERROR;
4285: END IF;

Line 4282: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4278: l_k_header_rec,
4279: l_return_status );
4280:
4281: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4282: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4283: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4284: RAISE OKC_API.G_EXCEPTION_ERROR;
4285: END IF;
4286:

Line 4283: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

4279: l_return_status );
4280:
4281: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4282: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4283: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4284: RAISE OKC_API.G_EXCEPTION_ERROR;
4285: END IF;
4286:
4287: --

Line 4284: RAISE OKC_API.G_EXCEPTION_ERROR;

4280:
4281: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4282: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4283: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4284: RAISE OKC_API.G_EXCEPTION_ERROR;
4285: END IF;
4286:
4287: --
4288: -- populate quote header record

Line 4306: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

4302: -- p_quote_id,
4303: p_rel_code,
4304: l_return_status);
4305:
4306: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4307: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4308: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4309: RAISE OKC_API.G_EXCEPTION_ERROR;
4310: END IF;

Line 4307: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4303: p_rel_code,
4304: l_return_status);
4305:
4306: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4307: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4308: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4309: RAISE OKC_API.G_EXCEPTION_ERROR;
4310: END IF;
4311:

Line 4308: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

4304: l_return_status);
4305:
4306: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4307: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4308: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4309: RAISE OKC_API.G_EXCEPTION_ERROR;
4310: END IF;
4311:
4312:

Line 4309: RAISE OKC_API.G_EXCEPTION_ERROR;

4305:
4306: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4307: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4308: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4309: RAISE OKC_API.G_EXCEPTION_ERROR;
4310: END IF;
4311:
4312:
4313: --

Line 4338: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

4334: ,x_line_rltship_tab
4335: ,l_return_status);
4336:
4337:
4338: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4339: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4340: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4341: RAISE OKC_API.G_EXCEPTION_ERROR;
4342: END IF;

Line 4339: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4335: ,l_return_status);
4336:
4337:
4338: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4339: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4340: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4341: RAISE OKC_API.G_EXCEPTION_ERROR;
4342: END IF;
4343:

Line 4340: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

4336:
4337:
4338: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4339: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4340: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4341: RAISE OKC_API.G_EXCEPTION_ERROR;
4342: END IF;
4343:
4344: -- l_quote_header_rec.total_quote_price := x_total_price;

Line 4341: RAISE OKC_API.G_EXCEPTION_ERROR;

4337:
4338: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4339: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4340: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4341: RAISE OKC_API.G_EXCEPTION_ERROR;
4342: END IF;
4343:
4344: -- l_quote_header_rec.total_quote_price := x_total_price;
4345:

Line 4398: p_q_flag =>OKC_API.G_TRUE,

4394:
4395: OKC_OC_INT_PRICING_PVT.build_pricing_from_k(p_chr_id =>p_contract_id,
4396: p_kl_rel_tab =>l_k2q_line_rel_tab,
4397: --
4398: p_q_flag =>OKC_API.G_TRUE,
4399: p_qhr_id =>g_quote_id,
4400: p_qle_tab =>l_quote_line_tab,
4401: p_qle_shipment_tab =>l_quote_ln_shipment_tab,
4402: --

Line 4417: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

4413: x_ln_price_adj_rltship_tab =>l_qt_ln_price_adj_rltship_tab,
4414: --
4415: x_return_status => l_return_status );
4416:
4417: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4418: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4419: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4420: RAISE OKC_API.G_EXCEPTION_ERROR;
4421: END IF;

Line 4418: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4414: --
4415: x_return_status => l_return_status );
4416:
4417: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4418: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4419: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4420: RAISE OKC_API.G_EXCEPTION_ERROR;
4421: END IF;
4422:

Line 4419: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

4415: x_return_status => l_return_status );
4416:
4417: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4418: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4419: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4420: RAISE OKC_API.G_EXCEPTION_ERROR;
4421: END IF;
4422:
4423: IF (l_debug = 'Y') THEN

Line 4420: RAISE OKC_API.G_EXCEPTION_ERROR;

4416:
4417: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4418: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4419: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
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);

Line 4525: p_q_flag =>OKC_API.G_TRUE,

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,
4524: --
4525: p_q_flag =>OKC_API.G_TRUE,
4526: p_qhr_id =>g_quote_id,
4527: p_qle_tab =>l_quote_line_tab,
4528: --
4529: x_hd_sales_credit_tab =>l_quote_hd_sales_credit_tab,

Line 4534: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

4530: x_ln_sales_credit_tab =>l_quote_ln_sales_credit_tab,
4531: --
4532: x_return_status => l_return_status );
4533:
4534: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4535: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4536: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4537: RAISE OKC_API.G_EXCEPTION_ERROR;
4538: END IF;

Line 4535: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4531: --
4532: x_return_status => l_return_status );
4533:
4534: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4535: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4536: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4537: RAISE OKC_API.G_EXCEPTION_ERROR;
4538: END IF;
4539:

Line 4536: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

4532: x_return_status => l_return_status );
4533:
4534: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4535: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4536: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4537: RAISE OKC_API.G_EXCEPTION_ERROR;
4538: END IF;
4539:
4540: --

Line 4537: RAISE OKC_API.G_EXCEPTION_ERROR;

4533:
4534: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4535: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4536: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4537: RAISE OKC_API.G_EXCEPTION_ERROR;
4538: END IF;
4539:
4540: --
4541: -- set control record, need to set additional attributes

Line 4633: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

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:
4635: FND_MSG_PUB.Count_And_Get (
4636: p_count => x_msg_count,
4637: p_data => x_msg_data);

Line 4802: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR

4798: -- Contract updating with quote information waiting for
4799: -- a specific notification creation
4800: --
4801:
4802: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
4803: l_return_status = OKC_API.G_RET_STS_ERROR THEN
4804: --l_qte_updation_message :=
4805: -- 'An Error occurred while updating a quote' || ' ';
4806: --IF p_trace_mode = okc_api.g_true THEN

Line 4803: l_return_status = OKC_API.G_RET_STS_ERROR THEN

4799: -- a specific notification creation
4800: --
4801:
4802: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
4803: l_return_status = OKC_API.G_RET_STS_ERROR THEN
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 ||

Line 4806: --IF p_trace_mode = okc_api.g_true THEN

4802: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
4803: l_return_status = OKC_API.G_RET_STS_ERROR THEN
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 ||

Line 4821: OKC_API.set_message(p_app_name => g_app_name,

4817: -- lx_qte_header_rec.creation_date)
4818: --INTO lx_qte_header_rec.creation_date
4819: --FROM DUAL;
4820:
4821: OKC_API.set_message(p_app_name => g_app_name,
4822: p_msg_name => 'OKC_K2Q_K2QCOMMENTS',
4823: p_token1 => 'CRDATE',
4824: p_token1_value => lx_qte_header_rec.creation_date,
4825: p_token2 => 'NUMBER',

Line 4846: WHEN OKC_API.G_EXCEPTION_ERROR THEN

4842: FND_MSG_PUB.Delete_Msg ( p_msg_index => x_msg_count);
4843:
4844: END IF;
4845: EXCEPTION
4846: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4847: --update_k_comments_err;
4848: IF c_k_header%ISOPEN THEN
4849: CLOSE c_k_header;
4850: END IF;

Line 4857: x_return_status := OKC_API.G_RET_STS_ERROR;

4853: END IF;
4854: IF c_hdr_subject_to%ISOPEN THEN
4855: CLOSE c_hdr_subject_to;
4856: END IF;
4857: x_return_status := OKC_API.G_RET_STS_ERROR;
4858: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
4859: fnd_msg_pub.add_exc_msg(p_pkg_name => g_pkg_name
4860: ,p_procedure_name => l_api_name
4861: ,p_error_text => 'Encountered error condition'

Line 4875: OKC_API.set_message(p_app_name => g_app_name,

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,
4879: p_token2 => 'KNUMBER',

Line 4917: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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;
4920: END IF;
4921: IF c_k_header_tl%ISOPEN THEN

Line 4927: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4923: END IF;
4924: IF c_hdr_subject_to%ISOPEN THEN
4925: CLOSE c_hdr_subject_to;
4926: END IF;
4927: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4928: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
4929: fnd_msg_pub.add_exc_msg(p_pkg_name => g_pkg_name
4930: ,p_procedure_name => l_api_name
4931: ,p_error_text => 'Encountered unexpected error'

Line 4945: OKC_API.set_message(p_app_name => g_app_name,

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,
4949: p_token2 => 'KNUMBER',

Line 4998: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4994: END IF;
4995: IF c_hdr_subject_to%ISOPEN THEN
4996: CLOSE c_hdr_subject_to;
4997: END IF;
4998: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4999: OKC_API.set_message(G_APP_NAME
5000: ,G_UNEXPECTED_ERROR
5001: ,G_SQLCODE_TOKEN
5002: ,SQLCODE

Line 4999: OKC_API.set_message(G_APP_NAME

4995: IF c_hdr_subject_to%ISOPEN THEN
4996: CLOSE c_hdr_subject_to;
4997: END IF;
4998: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4999: OKC_API.set_message(G_APP_NAME
5000: ,G_UNEXPECTED_ERROR
5001: ,G_SQLCODE_TOKEN
5002: ,SQLCODE
5003: ,G_SQLERRM_TOKEN

Line 5016: OKC_API.set_message(p_app_name => g_app_name,

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,
5020: p_token2 => 'KNUMBER',