[Home] [Help]
964: l_disp_warning VARCHAR2(1) ;
965:
966: Begin
967:
968: fnd_msg_pub.initialize;
969: IF NOT header_lines_tbl.COUNT=0 THEN
970:
971:
972: i:=header_lines_tbl.FIRST;
1135: ,x_flag => l_flag);
1136:
1137: -- Bug 5227077 --
1138: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1139: FOR i in 1..fnd_msg_pub.count_msg
1140: Loop
1141: fnd_msg_pub.get
1142: (
1143: p_msg_index => i,
1137: -- Bug 5227077 --
1138: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1139: FOR i in 1..fnd_msg_pub.count_msg
1140: Loop
1141: fnd_msg_pub.get
1142: (
1143: p_msg_index => i,
1144: p_encoded => 'F',
1145: p_data => l_msg_data,
1152: End Loop;
1153: Raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1154: Else
1155: If l_flag <> TRUE then
1156: fnd_msg_pub.initialize;
1157:
1158: OKC_API.SET_MESSAGE(
1159: p_app_name => 'OKS', --G_APP_NAME_OKS,
1160: p_msg_name => 'OKS_BA_UPDATE_NOT_ALLOWED',
1160: p_msg_name => 'OKS_BA_UPDATE_NOT_ALLOWED',
1161: p_token1 => 'Line No ',
1162: p_token1_value => l_line_number);
1163:
1164: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1165: p_encoded => fnd_api.g_false);
1166: x_msg_tbl(l_tot_msg_count).status := 'E';
1167: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1168: l_tot_msg_count := l_tot_msg_count + 1;
1199: ||':'|| header_dates_rec.start_date
1200: ||':'|| header_dates_rec.end_date,1,450);
1201:
1202: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1203: fnd_msg_pub.initialize;
1204: OKC_API.SET_MESSAGE(
1205: p_app_name => G_APP_NAME_OKS,
1206: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1207: p_token1 => 'ATTRIBUTE',
1206: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1207: p_token1 => 'ATTRIBUTE',
1208: p_token1_value => 'Invoicing Text');
1209:
1210: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1211: p_encoded => fnd_api.g_false);
1212:
1213: x_msg_tbl(l_tot_msg_count).status := 'S';
1214: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1237: l_clev_tbl_in(1).bill_to_site_use_id := l_okc_headers_rec.bill_to_site_use_id;
1238: l_clev_tbl_in(1).cust_acct_id := l_head_cust_acct;
1239:
1240: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1241: fnd_msg_pub.initialize;
1242: OKC_API.SET_MESSAGE(
1243: p_app_name => G_APP_NAME_OKS,
1244: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1245: p_token1 => 'ATTRIBUTE',
1244: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1245: p_token1 => 'ATTRIBUTE',
1246: p_token1_value => 'Bill To Address');
1247:
1248: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1249: p_encoded => fnd_api.g_false);
1250:
1251: x_msg_tbl(l_tot_msg_count).status := 'S';
1252: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1256: END IF;
1257: -- IKON ENHANCEMENT
1258: /* ElsIf l_head_cust_acct <> l_line_cust_acct and
1259: l_line_cust_acct is not NULL and l_head_cust_acct is not NULL Then
1260: fnd_msg_pub.initialize;
1261:
1262: OKC_API.SET_MESSAGE(
1263: p_app_name => G_APP_NAME_OKS,
1264: p_msg_name => 'OKS_CASCADE_ACCOUNT_MISMATCH',
1264: p_msg_name => 'OKS_CASCADE_ACCOUNT_MISMATCH',
1265: p_token1 => 'Line No ',
1266: p_token1_value => l_line_number);
1267:
1268: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1269: p_encoded => fnd_api.g_false);
1270:
1271: x_msg_tbl(l_tot_msg_count).status := 'E';
1272: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1301: l_clev_tbl_in(1).id := l_cle_id;
1302: l_clev_tbl_in(1).ship_to_site_use_id := l_okc_headers_rec.ship_to_site_use_id;
1303:
1304: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1305: fnd_msg_pub.initialize;
1306: OKC_API.SET_MESSAGE(
1307: p_app_name => G_APP_NAME_OKS,
1308: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1309: p_token1 => 'ATTRIBUTE',
1308: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1309: p_token1 => 'ATTRIBUTE',
1310: p_token1_value => 'Ship To Address');
1311:
1312: -- fnd_msg_pub.initialize;
1313: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1314: p_encoded => fnd_api.g_false);
1315: x_msg_tbl(l_tot_msg_count).status := 'S';
1316: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1309: p_token1 => 'ATTRIBUTE',
1310: p_token1_value => 'Ship To Address');
1311:
1312: -- fnd_msg_pub.initialize;
1313: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1314: p_encoded => fnd_api.g_false);
1315: x_msg_tbl(l_tot_msg_count).status := 'S';
1316: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1317: l_tot_msg_count := l_tot_msg_count + 1;
1360: l_oks_header_id := 1;
1361:
1362: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1363: IF l_line_cust_acct IS NULL THEN
1364: fnd_msg_pub.initialize;
1365: OKC_API.SET_MESSAGE(
1366: p_app_name => G_APP_NAME_OKS,
1367: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1368: p_token1 => 'ATTRIBUTE',
1367: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1368: p_token1 => 'ATTRIBUTE',
1369: p_token1_value => 'Bill To Address');
1370:
1371: -- fnd_msg_pub.initialize;
1372: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1373: p_encoded => fnd_api.g_false);
1374: x_msg_tbl(l_tot_msg_count).status := 'S';
1375: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1368: p_token1 => 'ATTRIBUTE',
1369: p_token1_value => 'Bill To Address');
1370:
1371: -- fnd_msg_pub.initialize;
1372: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1373: p_encoded => fnd_api.g_false);
1374: x_msg_tbl(l_tot_msg_count).status := 'S';
1375: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1376: l_tot_msg_count := l_tot_msg_count + 1;
1378: END IF;
1379:
1380:
1381:
1382: fnd_msg_pub.initialize;
1383: OKC_API.SET_MESSAGE(
1384: p_app_name => G_APP_NAME_OKS, -- bug 5468539 G_APP_NAME,
1385: p_msg_name =>'OKS_DEFAULT_ATTR_SUCCESS_NEW',
1386: p_token1 => 'TOKEN1' , -- bug 5468539 'RULE',
1385: p_msg_name =>'OKS_DEFAULT_ATTR_SUCCESS_NEW',
1386: p_token1 => 'TOKEN1' , -- bug 5468539 'RULE',
1387: p_token1_value => FND_MESSAGE.GET_STRING('OKS','OKS_BILL_TO_CUSTOMER_ACCOUNT'));
1388:
1389: -- fnd_msg_pub.initialize;
1390: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1391: p_encoded => fnd_api.g_false);
1392: x_msg_tbl(l_tot_msg_count).status := 'S';
1393: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1386: p_token1 => 'TOKEN1' , -- bug 5468539 'RULE',
1387: p_token1_value => FND_MESSAGE.GET_STRING('OKS','OKS_BILL_TO_CUSTOMER_ACCOUNT'));
1388:
1389: -- fnd_msg_pub.initialize;
1390: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1391: p_encoded => fnd_api.g_false);
1392: x_msg_tbl(l_tot_msg_count).status := 'S';
1393: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1394: l_tot_msg_count := l_tot_msg_count + 1;
1416: l_klnv_tbl_in(1).CLE_ID := l_cle_id;
1417: l_oks_header_id := 1;
1418: -- Display a message --
1419: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1420: fnd_msg_pub.initialize;
1421: OKC_API.SET_MESSAGE(
1422: p_app_name => G_APP_NAME,
1423: p_msg_name =>'OKS_CASCADE_DELETE_EXEMPTION',
1424: p_token1 =>'TOKEN1' ,
1426: p_token2 => 'TOKEN2',
1427: p_token2_value => l_temp_party_name,
1428: p_token3 => 'TOKEN3',
1429: p_token3_value => l_temp_line_number);
1430: -- fnd_msg_pub.initialize;
1431: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1432: p_encoded => fnd_api.g_false);
1433: x_msg_tbl(l_tot_msg_count).status := 'S';
1434: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1427: p_token2_value => l_temp_party_name,
1428: p_token3 => 'TOKEN3',
1429: p_token3_value => l_temp_line_number);
1430: -- fnd_msg_pub.initialize;
1431: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1432: p_encoded => fnd_api.g_false);
1433: x_msg_tbl(l_tot_msg_count).status := 'S';
1434: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1435: l_tot_msg_count := l_tot_msg_count + 1;
1446: l_klnv_tbl_in(1).commitment_id := NULL ;
1447: l_klnv_tbl_in(1).payment_type := NULL ;
1448: -- Display a message --
1449: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1450: fnd_msg_pub.initialize;
1451: OKC_API.SET_MESSAGE(
1452: p_app_name => G_APP_NAME,
1453: p_msg_name =>'OKS_CASCADE_DELETE_COMMITMENT',
1454: p_token1 =>'TOKEN1' ,
1456: p_token2 => 'TOKEN2',
1457: p_token2_value => l_temp_party_name,
1458: p_token3 => 'TOKEN3',
1459: p_token3_value => l_temp_line_number);
1460: -- fnd_msg_pub.initialize;
1461: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1462: p_encoded => fnd_api.g_false);
1463: x_msg_tbl(l_tot_msg_count).status := 'S';
1464: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1457: p_token2_value => l_temp_party_name,
1458: p_token3 => 'TOKEN3',
1459: p_token3_value => l_temp_line_number);
1460: -- fnd_msg_pub.initialize;
1461: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1462: p_encoded => fnd_api.g_false);
1463: x_msg_tbl(l_tot_msg_count).status := 'S';
1464: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1465: l_tot_msg_count := l_tot_msg_count + 1;
1558: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1559: Open cur_get_line_number(l_cle_id, l_chr_id);
1560: fetch cur_get_line_number into l_temp_line_number;
1561: close cur_get_line_number;
1562: fnd_msg_pub.initialize;
1563: OKC_API.SET_MESSAGE(
1564: p_app_name => G_APP_NAME,
1565: p_msg_name =>'OKS_CASCADE_CHANGE_ACCOUNT',
1566: p_token1 =>'TOKEN1' ,
1568: p_token2 => 'TOKEN2',
1569: p_token2_value => l_temp_party_name,
1570: p_token3 => 'TOKEN3',
1571: p_token3_value => l_temp_line_number);
1572: -- fnd_msg_pub.initialize;
1573: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1574: p_encoded => fnd_api.g_false);
1575: x_msg_tbl(l_tot_msg_count).status := 'S';
1576: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1569: p_token2_value => l_temp_party_name,
1570: p_token3 => 'TOKEN3',
1571: p_token3_value => l_temp_line_number);
1572: -- fnd_msg_pub.initialize;
1573: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1574: p_encoded => fnd_api.g_false);
1575: x_msg_tbl(l_tot_msg_count).status := 'S';
1576: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1577: l_tot_msg_count := l_tot_msg_count + 1;
1581: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1582: Open cur_get_line_number(l_cle_id, l_chr_id);
1583: fetch cur_get_line_number into l_temp_line_number;
1584: close cur_get_line_number;
1585: fnd_msg_pub.initialize;
1586: OKC_API.SET_MESSAGE(
1587: p_app_name => G_APP_NAME,
1588: p_msg_name =>'OKS_CASCADE_CHANGE_ACCOUNT',
1589: p_token1 =>'TOKEN1' ,
1591: p_token2 => 'TOKEN2',
1592: p_token2_value => l_temp_party_name,
1593: p_token3 => 'TOKEN3',
1594: p_token3_value => l_temp_line_number);
1595: -- fnd_msg_pub.initialize;
1596: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1597: p_encoded => fnd_api.g_false);
1598: x_msg_tbl(l_tot_msg_count).status := 'S';
1599: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1592: p_token2_value => l_temp_party_name,
1593: p_token3 => 'TOKEN3',
1594: p_token3_value => l_temp_line_number);
1595: -- fnd_msg_pub.initialize;
1596: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1597: p_encoded => fnd_api.g_false);
1598: x_msg_tbl(l_tot_msg_count).status := 'S';
1599: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1600: l_tot_msg_count := l_tot_msg_count + 1;
1603:
1604: END IF; -- IF nvl(l_temp_contact_id,0) = 0 THEN
1605: -- Bug 5227077 --
1606: ELSIF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1607: FOR i in 1..fnd_msg_pub.count_msg
1608: Loop
1609: fnd_msg_pub.get
1610: (
1611: p_msg_index => i,
1605: -- Bug 5227077 --
1606: ELSIF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1607: FOR i in 1..fnd_msg_pub.count_msg
1608: Loop
1609: fnd_msg_pub.get
1610: (
1611: p_msg_index => i,
1612: p_encoded => 'F',
1613: p_data => l_msg_data,
1661: l_clev_tbl_in(1).ship_to_site_use_id := l_okc_headers_rec.ship_to_site_use_id;
1662: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1663:
1664: IF l_line_cust_acct IS NULL THEN
1665: fnd_msg_pub.initialize;
1666: OKC_API.SET_MESSAGE(
1667: p_app_name => G_APP_NAME_OKS,
1668: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1669: p_token1 => 'ATTRIBUTE',
1668: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1669: p_token1 => 'ATTRIBUTE',
1670: p_token1_value => 'Ship To Address');
1671:
1672: -- fnd_msg_pub.initialize;
1673: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1674: p_encoded => fnd_api.g_false);
1675: x_msg_tbl(l_tot_msg_count).status := 'S';
1676: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1669: p_token1 => 'ATTRIBUTE',
1670: p_token1_value => 'Ship To Address');
1671:
1672: -- fnd_msg_pub.initialize;
1673: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1674: p_encoded => fnd_api.g_false);
1675: x_msg_tbl(l_tot_msg_count).status := 'S';
1676: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1677: l_tot_msg_count := l_tot_msg_count + 1;
1677: l_tot_msg_count := l_tot_msg_count + 1;
1678: l_msg_data := NULL;
1679: END IF;
1680:
1681: fnd_msg_pub.initialize;
1682: OKC_API.SET_MESSAGE(
1683: p_app_name => G_APP_NAME_OKS, -- bug 5468539 G_APP_NAME,
1684: p_msg_name =>'OKS_DEFAULT_ATTR_SUCCESS_NEW',
1685: p_token1 => 'TOKEN1', -- bug 5468539 'RULE',
1684: p_msg_name =>'OKS_DEFAULT_ATTR_SUCCESS_NEW',
1685: p_token1 => 'TOKEN1', -- bug 5468539 'RULE',
1686: p_token1_value => FND_MESSAGE.GET_STRING('OKS','OKS_SHIP_TO_CUSTOMER_ACCOUNT'));
1687:
1688: -- fnd_msg_pub.initialize;
1689: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1690: p_encoded => fnd_api.g_false);
1691: x_msg_tbl(l_tot_msg_count).status := 'S';
1692: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1685: p_token1 => 'TOKEN1', -- bug 5468539 'RULE',
1686: p_token1_value => FND_MESSAGE.GET_STRING('OKS','OKS_SHIP_TO_CUSTOMER_ACCOUNT'));
1687:
1688: -- fnd_msg_pub.initialize;
1689: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1690: p_encoded => fnd_api.g_false);
1691: x_msg_tbl(l_tot_msg_count).status := 'S';
1692: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1693: l_tot_msg_count := l_tot_msg_count + 1;
1791: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1792: Open cur_get_line_number(l_cle_id, l_chr_id);
1793: fetch cur_get_line_number into l_temp_line_number;
1794: close cur_get_line_number;
1795: fnd_msg_pub.initialize;
1796: OKC_API.SET_MESSAGE(
1797: p_app_name => G_APP_NAME,
1798: p_msg_name =>'OKS_CASCADE_CHANGE_ACCOUNT',
1799: p_token1 =>'TOKEN1' ,
1801: p_token2 => 'TOKEN2',
1802: p_token2_value => l_temp_party_name,
1803: p_token3 => 'TOKEN3',
1804: p_token3_value => l_temp_line_number);
1805: -- fnd_msg_pub.initialize;
1806: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1807: p_encoded => fnd_api.g_false);
1808: x_msg_tbl(l_tot_msg_count).status := 'S';
1809: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1802: p_token2_value => l_temp_party_name,
1803: p_token3 => 'TOKEN3',
1804: p_token3_value => l_temp_line_number);
1805: -- fnd_msg_pub.initialize;
1806: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1807: p_encoded => fnd_api.g_false);
1808: x_msg_tbl(l_tot_msg_count).status := 'S';
1809: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1810: l_tot_msg_count := l_tot_msg_count + 1;
1814: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1815: Open cur_get_line_number(l_cle_id, l_chr_id);
1816: fetch cur_get_line_number into l_temp_line_number;
1817: close cur_get_line_number;
1818: fnd_msg_pub.initialize;
1819: OKC_API.SET_MESSAGE(
1820: p_app_name => G_APP_NAME,
1821: p_msg_name =>'OKS_CASCADE_CHANGE_ACCOUNT',
1822: p_token1 =>'TOKEN1' ,
1824: p_token2 => 'TOKEN2',
1825: p_token2_value => l_temp_party_name,
1826: p_token3 => 'TOKEN3',
1827: p_token3_value => l_temp_line_number);
1828: -- fnd_msg_pub.initialize;
1829: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1830: p_encoded => fnd_api.g_false);
1831: x_msg_tbl(l_tot_msg_count).status := 'S';
1832: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1825: p_token2_value => l_temp_party_name,
1826: p_token3 => 'TOKEN3',
1827: p_token3_value => l_temp_line_number);
1828: -- fnd_msg_pub.initialize;
1829: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1830: p_encoded => fnd_api.g_false);
1831: x_msg_tbl(l_tot_msg_count).status := 'S';
1832: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1833: l_tot_msg_count := l_tot_msg_count + 1;
1837: END IF; -- IF nvl(l_temp_contact_id,0) = 0 THEN
1838: -- Bug 5227077 --
1839: ELSIF l_return_status <> OKC_API.G_RET_STS_SUCCESS
1840: THEN
1841: FOR i in 1..fnd_msg_pub.count_msg
1842: Loop
1843: fnd_msg_pub.get
1844: (
1845: p_msg_index => i,
1839: ELSIF l_return_status <> OKC_API.G_RET_STS_SUCCESS
1840: THEN
1841: FOR i in 1..fnd_msg_pub.count_msg
1842: Loop
1843: fnd_msg_pub.get
1844: (
1845: p_msg_index => i,
1846: p_encoded => 'F',
1847: p_data => l_msg_data,
1907: -- Bug 5219132 --
1908:
1909: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS)
1910: THEN
1911: FOR i in 1..fnd_msg_pub.count_msg
1912: Loop
1913: fnd_msg_pub.get
1914: (
1915: p_msg_index => i,
1909: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS)
1910: THEN
1911: FOR i in 1..fnd_msg_pub.count_msg
1912: Loop
1913: fnd_msg_pub.get
1914: (
1915: p_msg_index => i,
1916: p_encoded => 'F',
1917: p_data => l_msg_data,
1952:
1953:
1954: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1955: -- Bug 5227077 --
1956: FOR i in 1..fnd_msg_pub.count_msg
1957: Loop
1958: fnd_msg_pub.get
1959: (
1960: p_msg_index => i,
1954: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1955: -- Bug 5227077 --
1956: FOR i in 1..fnd_msg_pub.count_msg
1957: Loop
1958: fnd_msg_pub.get
1959: (
1960: p_msg_index => i,
1961: p_encoded => 'F',
1962: p_data => l_msg_data,
1969: End Loop;
1970: -- Bug 5227077 --
1971: Raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1972: ELSE
1973: fnd_msg_pub.initialize;
1974: OKC_API.SET_MESSAGE(
1975: p_app_name => G_APP_NAME_OKS,
1976: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1977: p_token1 => 'ATTRIBUTE',
1975: p_app_name => G_APP_NAME_OKS,
1976: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
1977: p_token1 => 'ATTRIBUTE',
1978: p_token1_value => 'Bill To Contact');
1979: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
1980: p_encoded => fnd_api.g_false);
1981: x_msg_tbl(l_tot_msg_count).status := 'S';
1982: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
1983: l_tot_msg_count := l_tot_msg_count + 1;
1997: x_ctcv_tbl => l_ctcv_tbl_out);
1998:
1999: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2000: -- Bug 5227077 --
2001: FOR i in 1..fnd_msg_pub.count_msg
2002: Loop
2003: fnd_msg_pub.get
2004: (
2005: p_msg_index => i,
1999: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2000: -- Bug 5227077 --
2001: FOR i in 1..fnd_msg_pub.count_msg
2002: Loop
2003: fnd_msg_pub.get
2004: (
2005: p_msg_index => i,
2006: p_encoded => 'F',
2007: p_data => l_msg_data,
2014: End Loop;
2015: -- Bug 5227077 --
2016: Raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2017: ELSE
2018: fnd_msg_pub.initialize;
2019: OKC_API.SET_MESSAGE(
2020: p_app_name => G_APP_NAME_OKS,
2021: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2022: p_token1 => 'ATTRIBUTE',
2020: p_app_name => G_APP_NAME_OKS,
2021: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2022: p_token1 => 'ATTRIBUTE',
2023: p_token1_value => 'Bill To Contact');
2024: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2025: p_encoded => fnd_api.g_false);
2026: x_msg_tbl(l_tot_msg_count).status := 'S';
2027: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2028: l_tot_msg_count := l_tot_msg_count + 1;
2034: END IF; --End GC-01
2035:
2036: ELSIF(l_header_cust_acct <> l_line_cust_acct)
2037: THEN
2038: fnd_msg_pub.initialize;
2039: OKC_API.SET_MESSAGE(
2040: p_app_name => G_APP_NAME,
2041: p_msg_name => 'OKS_CASCADE_BTOACCT_MISMATCH',
2042: p_token1 => 'Line No ',
2041: p_msg_name => 'OKS_CASCADE_BTOACCT_MISMATCH',
2042: p_token1 => 'Line No ',
2043: p_token1_value => l_line_number);
2044:
2045: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2046: p_encoded => fnd_api.g_false);
2047:
2048: x_msg_tbl(l_tot_msg_count).status := 'W'; -- Bug 5219132
2049: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2212: --assigning tax exemption id
2213: l_klnv_tbl_in(1).tax_exemption_id := l_oks_headers_rec.tax_exemption_id;
2214: */
2215: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2216: fnd_msg_pub.initialize;
2217: OKC_API.SET_MESSAGE(
2218: p_app_name => G_APP_NAME_OKS,
2219: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2220: p_token1 => 'ATTRIBUTE',
2218: p_app_name => G_APP_NAME_OKS,
2219: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2220: p_token1 => 'ATTRIBUTE',
2221: p_token1_value => 'Tax');
2222: --fnd_msg_pub.initialize;
2223: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2224: p_encoded => fnd_api.g_false);
2225: x_msg_tbl(l_tot_msg_count).status := 'S';
2226: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2219: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2220: p_token1 => 'ATTRIBUTE',
2221: p_token1_value => 'Tax');
2222: --fnd_msg_pub.initialize;
2223: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2224: p_encoded => fnd_api.g_false);
2225: x_msg_tbl(l_tot_msg_count).status := 'S';
2226: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2227: l_tot_msg_count := l_tot_msg_count + 1;
2268: l_klnv_tbl_in(1).tax_classification_code := l_header_tax_cls_code;
2269: -- Ebtax --
2270:
2271: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2272: fnd_msg_pub.initialize;
2273: OKC_API.SET_MESSAGE(
2274: p_app_name => G_APP_NAME_OKS,
2275: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2276: p_token1 => 'ATTRIBUTE',
2274: p_app_name => G_APP_NAME_OKS,
2275: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2276: p_token1 => 'ATTRIBUTE',
2277: p_token1_value => 'Tax Code');
2278: --fnd_msg_pub.initialize;
2279: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2280: p_encoded => fnd_api.g_false);
2281: x_msg_tbl(l_tot_msg_count).status := 'S';
2282: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2275: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2276: p_token1 => 'ATTRIBUTE',
2277: p_token1_value => 'Tax Code');
2278: --fnd_msg_pub.initialize;
2279: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2280: p_encoded => fnd_api.g_false);
2281: x_msg_tbl(l_tot_msg_count).status := 'S';
2282: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2283: l_tot_msg_count := l_tot_msg_count + 1;
2308: If l_usage_type in ('VRT','QTY') then
2309: IF l_bpf_invoice_rule_id = -2 THEN
2310: l_token1_value := fnd_meaning(l_usage_type,'OKS_USAGE_TYPE');
2311:
2312: fnd_msg_pub.initialize;
2313: OKC_API.SET_MESSAGE
2314: (
2315: p_app_name => G_APP_NAME_OKS,
2316: p_msg_name => 'OKS_USAGE_ATTR_CHECK',
2319: p_token2 => 'Line No ',
2320: p_token2_value => l_line_number
2321: );
2322:
2323: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2324: p_encoded => fnd_api.g_false);
2325: x_msg_tbl(l_tot_msg_count).status := 'E';
2326: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2327: l_tot_msg_count := l_tot_msg_count + 1;
2364: x_msg_data => l_msg_data);
2365:
2366: -- Bug 5227077 --
2367: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2368: FOR i in 1..fnd_msg_pub.count_msg
2369: Loop
2370: fnd_msg_pub.get
2371: (
2372: p_msg_index => i,
2366: -- Bug 5227077 --
2367: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2368: FOR i in 1..fnd_msg_pub.count_msg
2369: Loop
2370: fnd_msg_pub.get
2371: (
2372: p_msg_index => i,
2373: p_encoded => 'F',
2374: p_data => l_msg_data,
2396: );
2397:
2398: -- Bug 5227077 --
2399: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2400: FOR i in 1..fnd_msg_pub.count_msg
2401: Loop
2402: fnd_msg_pub.get
2403: (
2404: p_msg_index => i,
2398: -- Bug 5227077 --
2399: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2400: FOR i in 1..fnd_msg_pub.count_msg
2401: Loop
2402: fnd_msg_pub.get
2403: (
2404: p_msg_index => i,
2405: p_encoded => 'F',
2406: p_data => l_msg_data,
2445: ,x_return_status => l_return_status
2446: );
2447:
2448: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2449: FOR i in 1..fnd_msg_pub.count_msg
2450: Loop
2451: fnd_msg_pub.get
2452: (
2453: p_msg_index => i,
2447:
2448: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2449: FOR i in 1..fnd_msg_pub.count_msg
2450: Loop
2451: fnd_msg_pub.get
2452: (
2453: p_msg_index => i,
2454: p_encoded => 'F',
2455: p_data => l_msg_data,
2461: l_msg_data := NULL;
2462: End Loop;
2463: Raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2464: ELSE
2465: fnd_msg_pub.initialize;
2466: OKC_API.SET_MESSAGE(
2467: p_app_name => G_APP_NAME_OKS,
2468: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2469: p_token1 => 'ATTRIBUTE',
2467: p_app_name => G_APP_NAME_OKS,
2468: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2469: p_token1 => 'ATTRIBUTE',
2470: p_token1_value => 'Billing Schedule');
2471: --fnd_msg_pub.initialize;
2472: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2473: p_encoded => fnd_api.g_false);
2474: x_msg_tbl(l_tot_msg_count).status := 'S';
2475: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2468: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2469: p_token1 => 'ATTRIBUTE',
2470: p_token1_value => 'Billing Schedule');
2471: --fnd_msg_pub.initialize;
2472: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2473: p_encoded => fnd_api.g_false);
2474: x_msg_tbl(l_tot_msg_count).status := 'S';
2475: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2476: l_tot_msg_count := l_tot_msg_count + 1;
2499: l_clev_tbl_in(1).id := l_cle_id;
2500: l_clev_tbl_in(1).bill_to_site_use_id := l_okc_headers_rec.bill_to_site_use_id;
2501:
2502: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2503: fnd_msg_pub.initialize;
2504: OKC_API.SET_MESSAGE(
2505: p_app_name => G_APP_NAME_OKS,
2506: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2507: p_token1 => 'ATTRIBUTE',
2505: p_app_name => G_APP_NAME_OKS,
2506: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2507: p_token1 => 'ATTRIBUTE',
2508: p_token1_value => 'Bill To Address');
2509: --fnd_msg_pub.initialize;
2510: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2511: p_encoded => fnd_api.g_false);
2512: x_msg_tbl(l_tot_msg_count).status := 'S';
2513: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2506: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2507: p_token1 => 'ATTRIBUTE',
2508: p_token1_value => 'Bill To Address');
2509: --fnd_msg_pub.initialize;
2510: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2511: p_encoded => fnd_api.g_false);
2512: x_msg_tbl(l_tot_msg_count).status := 'S';
2513: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2514: l_tot_msg_count := l_tot_msg_count + 1;
2518: END IF;
2519: END IF;
2520: Elsif l_billing_profile_id is NULL then
2521: --Display error message, saying required value missing.
2522: fnd_msg_pub.initialize;
2523: OKC_API.SET_MESSAGE(
2524: p_app_name => G_APP_NAME_OKS,
2525: p_msg_name => 'OKS_CASCADE_MISSING_REQD_ATTR',
2526: p_token1 => 'ATTRIBUTE',
2525: p_msg_name => 'OKS_CASCADE_MISSING_REQD_ATTR',
2526: p_token1 => 'ATTRIBUTE',
2527: p_token1_value => 'Billing Profile');
2528:
2529: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2530: p_encoded => fnd_api.g_false);
2531: x_msg_tbl(l_tot_msg_count).status := 'E';
2532: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2533: l_tot_msg_count := l_tot_msg_count + 1;
2547: END IF;
2548: l_klnv_tbl_in(1).ID := l_oks_lines_rec.ID;
2549:
2550: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2551: fnd_msg_pub.initialize;
2552: OKC_API.SET_MESSAGE(
2553: p_app_name => G_APP_NAME_OKS,
2554: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2555: p_token1 => 'ATTRIBUTE',
2554: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2555: p_token1 => 'ATTRIBUTE',
2556: p_token1_value => 'Accounting Rule');
2557:
2558: --fnd_msg_pub.initialize;
2559: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2560: p_encoded => fnd_api.g_false);
2561: x_msg_tbl(l_tot_msg_count).status := 'S';
2562: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2555: p_token1 => 'ATTRIBUTE',
2556: p_token1_value => 'Accounting Rule');
2557:
2558: --fnd_msg_pub.initialize;
2559: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2560: p_encoded => fnd_api.g_false);
2561: x_msg_tbl(l_tot_msg_count).status := 'S';
2562: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2563: l_tot_msg_count := l_tot_msg_count + 1;
2577: If l_usage_type in ('VRT','QTY') then
2578: IF l_bpf_invoice_rule_id = -2 THEN
2579: l_token1_value := fnd_meaning(l_usage_type,'OKS_USAGE_TYPE');
2580:
2581: fnd_msg_pub.initialize;
2582: OKC_API.SET_MESSAGE
2583: (
2584: p_app_name => G_APP_NAME_OKS,
2585: p_msg_name => 'OKS_USAGE_ATTR_CHECK',
2588: p_token2 => 'Line No ',
2589: p_token2_value => l_line_number
2590: );
2591:
2592: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2593: p_encoded => fnd_api.g_false);
2594: x_msg_tbl(l_tot_msg_count).status := 'E';
2595: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2596: l_tot_msg_count := l_tot_msg_count + 1;
2604: l_klnv_tbl_in(1).ID := l_oks_lines_rec.ID;
2605: l_klnv_tbl_in(1).acct_rule_id := l_bpf_acct_rule_id;
2606:
2607: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2608: fnd_msg_pub.initialize;
2609: OKC_API.SET_MESSAGE(
2610: p_app_name => G_APP_NAME_OKS,
2611: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2612: p_token1 => 'ATTRIBUTE',
2611: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2612: p_token1 => 'ATTRIBUTE',
2613: p_token1_value => 'Accounting Rule');
2614:
2615: --fnd_msg_pub.initialize;
2616: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2617: p_encoded => fnd_api.g_false);
2618: x_msg_tbl(l_tot_msg_count).status := 'S';
2619: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2612: p_token1 => 'ATTRIBUTE',
2613: p_token1_value => 'Accounting Rule');
2614:
2615: --fnd_msg_pub.initialize;
2616: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2617: p_encoded => fnd_api.g_false);
2618: x_msg_tbl(l_tot_msg_count).status := 'S';
2619: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2620: l_tot_msg_count := l_tot_msg_count + 1;
2641: If l_usage_type in ('VRT','QTY') then
2642: If l_clev_tbl_in(1).inv_rule_id = -2 then
2643: l_token1_value := fnd_meaning(l_usage_type,'OKS_USAGE_TYPE');
2644:
2645: fnd_msg_pub.initialize;
2646: OKC_API.SET_MESSAGE
2647: (
2648: p_app_name => G_APP_NAME_OKS,
2649: p_msg_name => 'OKS_USAGE_ATTR_CHECK',
2652: p_token2 => 'Line No ',
2653: p_token2_value => l_line_number
2654: );
2655:
2656: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2657: p_encoded => fnd_api.g_false);
2658: x_msg_tbl(l_tot_msg_count).status := 'E';
2659: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2660: l_tot_msg_count := l_tot_msg_count + 1;
2676: x_msg_data => l_msg_data
2677: );
2678:
2679: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2680: fnd_msg_pub.initialize;
2681: OKC_API.SET_MESSAGE(
2682: p_app_name => G_APP_NAME_OKS,
2683: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2684: p_token1 => 'ATTRIBUTE',
2683: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2684: p_token1 => 'ATTRIBUTE',
2685: p_token1_value => 'Invoicing Rule');
2686:
2687: --fnd_msg_pub.initialize;
2688: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2689: p_encoded => fnd_api.g_false);
2690: x_msg_tbl(l_tot_msg_count).status := 'S';
2691: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2684: p_token1 => 'ATTRIBUTE',
2685: p_token1_value => 'Invoicing Rule');
2686:
2687: --fnd_msg_pub.initialize;
2688: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2689: p_encoded => fnd_api.g_false);
2690: x_msg_tbl(l_tot_msg_count).status := 'S';
2691: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2692: l_tot_msg_count := l_tot_msg_count + 1;
2692: l_tot_msg_count := l_tot_msg_count + 1;
2693: l_msg_data := NULL;
2694: -- Bug 5227077 --
2695: Elsif NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2696: FOR i in 1..fnd_msg_pub.count_msg
2697: Loop
2698: fnd_msg_pub.get
2699: (
2700: p_msg_index => i,
2694: -- Bug 5227077 --
2695: Elsif NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2696: FOR i in 1..fnd_msg_pub.count_msg
2697: Loop
2698: fnd_msg_pub.get
2699: (
2700: p_msg_index => i,
2701: p_encoded => 'F',
2702: p_data => l_msg_data,
2721:
2722: If l_usage_type in ('VRT','QTY') then
2723: IF l_bpf_invoice_rule_id = -2 THEN
2724: l_token1_value := fnd_meaning(l_usage_type,'OKS_USAGE_TYPE');
2725: fnd_msg_pub.initialize;
2726: OKC_API.SET_MESSAGE
2727: (
2728: p_app_name => G_APP_NAME_OKS,
2729: p_msg_name => 'OKS_USAGE_ATTR_CHECK',
2731: p_token1_value => l_token1_value,
2732: p_token2 => 'Line No ',
2733: p_token2_value => l_line_number
2734: );
2735: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2736: p_encoded => fnd_api.g_false);
2737: x_msg_tbl(l_tot_msg_count).status := 'E';
2738: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2739: l_tot_msg_count := l_tot_msg_count + 1;
2758: x_msg_count => l_msg_count,
2759: x_msg_data => l_msg_data
2760: );
2761: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2762: FOR i in 1..fnd_msg_pub.count_msg
2763: Loop
2764: fnd_msg_pub.get
2765: (
2766: p_msg_index => i,
2760: );
2761: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2762: FOR i in 1..fnd_msg_pub.count_msg
2763: Loop
2764: fnd_msg_pub.get
2765: (
2766: p_msg_index => i,
2767: p_encoded => 'F',
2768: p_data => l_msg_data,
2775: End Loop;
2776: Raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2777:
2778: ELSE
2779: fnd_msg_pub.initialize;
2780: OKC_API.SET_MESSAGE(
2781: p_app_name => G_APP_NAME_OKS,
2782: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2783: p_token1 => 'ATTRIBUTE',
2782: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2783: p_token1 => 'ATTRIBUTE',
2784: p_token1_value => 'Invoicing Rule');
2785:
2786: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2787: p_encoded => fnd_api.g_false);
2788: x_msg_tbl(l_tot_msg_count).status := 'S';
2789: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2790: l_tot_msg_count := l_tot_msg_count + 1;
2819: x_msg_data => l_msg_data,
2820: p_scrv_tbl => l_scrv_tbl_in);
2821: -- Bug 527077 --
2822: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2823: FOR i in 1..fnd_msg_pub.count_msg
2824: Loop
2825: fnd_msg_pub.get
2826: (
2827: p_msg_index => i,
2821: -- Bug 527077 --
2822: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2823: FOR i in 1..fnd_msg_pub.count_msg
2824: Loop
2825: fnd_msg_pub.get
2826: (
2827: p_msg_index => i,
2828: p_encoded => 'F',
2829: p_data => l_msg_data,
2848: );
2849:
2850:
2851: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2852: fnd_msg_pub.initialize;
2853: OKC_API.SET_MESSAGE(
2854: p_app_name => G_APP_NAME_OKS,
2855: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2856: p_token1 => 'ATTRIBUTE',
2855: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
2856: p_token1 => 'ATTRIBUTE',
2857: p_token1_value => 'Sales Credit');
2858:
2859: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
2860: p_encoded => fnd_api.g_false);
2861: x_msg_tbl(l_tot_msg_count).status := 'S';
2862: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
2863: l_tot_msg_count := l_tot_msg_count + 1;
2863: l_tot_msg_count := l_tot_msg_count + 1;
2864: l_msg_data := NULL;
2865: -- Bug 5227077 --
2866: Elsif not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2867: FOR i in 1..fnd_msg_pub.count_msg
2868: Loop
2869: fnd_msg_pub.get
2870: (
2871: p_msg_index => i,
2865: -- Bug 5227077 --
2866: Elsif not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2867: FOR i in 1..fnd_msg_pub.count_msg
2868: Loop
2869: fnd_msg_pub.get
2870: (
2871: p_msg_index => i,
2872: p_encoded => 'F',
2873: p_data => l_msg_data,
2945: x_return_status => l_return_status,
2946: x_msg_data => l_msg_data );
2947: -- Bug 5227077 --
2948: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2949: FOR i in 1..fnd_msg_pub.count_msg
2950: Loop
2951: fnd_msg_pub.get
2952: (
2953: p_msg_index => i,
2947: -- Bug 5227077 --
2948: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2949: FOR i in 1..fnd_msg_pub.count_msg
2950: Loop
2951: fnd_msg_pub.get
2952: (
2953: p_msg_index => i,
2954: p_encoded => 'F',
2955: p_data => l_msg_data,
2988: x_msg_data => l_msg_data );
2989:
2990: -- Bug 5227077 --
2991: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2992: FOR i in 1..fnd_msg_pub.count_msg
2993: Loop
2994: fnd_msg_pub.get
2995: (
2996: p_msg_index => i,
2990: -- Bug 5227077 --
2991: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2992: FOR i in 1..fnd_msg_pub.count_msg
2993: Loop
2994: fnd_msg_pub.get
2995: (
2996: p_msg_index => i,
2997: p_encoded => 'F',
2998: p_data => l_msg_data,
3044: x_msg_data => l_msg_data );
3045:
3046: -- Bug 5227077 --
3047: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3048: FOR i in 1..fnd_msg_pub.count_msg
3049: Loop
3050: fnd_msg_pub.get
3051: (
3052: p_msg_index => i,
3046: -- Bug 5227077 --
3047: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3048: FOR i in 1..fnd_msg_pub.count_msg
3049: Loop
3050: fnd_msg_pub.get
3051: (
3052: p_msg_index => i,
3053: p_encoded => 'F',
3054: p_data => l_msg_data,
3090: x_return_status => l_return_status,
3091: x_msg_data => l_msg_data );
3092: -- Bug 5227077 --
3093: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3094: FOR i in 1..fnd_msg_pub.count_msg
3095: Loop
3096: fnd_msg_pub.get
3097: (
3098: p_msg_index => i,
3092: -- Bug 5227077 --
3093: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3094: FOR i in 1..fnd_msg_pub.count_msg
3095: Loop
3096: fnd_msg_pub.get
3097: (
3098: p_msg_index => i,
3099: p_encoded => 'F',
3100: p_data => l_msg_data,
3122: x_msg_data => l_msg_data);
3123:
3124: -- Bug 5227077 --
3125: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3126: FOR i in 1..fnd_msg_pub.count_msg
3127: Loop
3128: fnd_msg_pub.get
3129: (
3130: p_msg_index => i,
3124: -- Bug 5227077 --
3125: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3126: FOR i in 1..fnd_msg_pub.count_msg
3127: Loop
3128: fnd_msg_pub.get
3129: (
3130: p_msg_index => i,
3131: p_encoded => 'F',
3132: p_data => l_msg_data,
3182: x_msg_data => l_msg_data );
3183:
3184: -- Bug 5227077 --
3185: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3186: FOR i in 1..fnd_msg_pub.count_msg
3187: Loop
3188: fnd_msg_pub.get
3189: (
3190: p_msg_index => i,
3184: -- Bug 5227077 --
3185: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3186: FOR i in 1..fnd_msg_pub.count_msg
3187: Loop
3188: fnd_msg_pub.get
3189: (
3190: p_msg_index => i,
3191: p_encoded => 'F',
3192: p_data => l_msg_data,
3211:
3212: IF l_payment_method_com = 1 OR l_cust_po_flag = 0 OR l_payment_method_ccr = 1 THEN
3213: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
3214:
3215: fnd_msg_pub.initialize;
3216: OKC_API.SET_MESSAGE(
3217: p_app_name => G_APP_NAME_OKS,
3218: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
3219: p_token1 => 'ATTRIBUTE',
3218: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
3219: p_token1 => 'ATTRIBUTE',
3220: p_token1_value => 'Payment Method');
3221:
3222: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
3223: p_encoded => fnd_api.g_false);
3224: x_msg_tbl(l_tot_msg_count).status := 'S';
3225: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3226: l_tot_msg_count := l_tot_msg_count + 1;
3237:
3238: l_klnv_tbl_in(1).ID := l_oks_lines_rec.ID;
3239: l_klnv_tbl_in(1).price_uom := l_oks_headers_rec.price_uom;
3240: ----errorout('UOM-'||l_klnv_tbl_in(1).price_uom);
3241: fnd_msg_pub.initialize;
3242: OKC_API.SET_MESSAGE(
3243: p_app_name => G_APP_NAME_OKS,
3244: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
3245: p_token1 => 'ATTRIBUTE',
3244: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
3245: p_token1 => 'ATTRIBUTE',
3246: p_token1_value => 'Price UOM');
3247:
3248: l_msg_data := fnd_msg_pub.get( p_msg_index => fnd_msg_pub.g_first,
3249: p_encoded => fnd_api.g_false);
3250:
3251: x_msg_tbl(l_tot_msg_count).status := 'S';
3252: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3267: ,l_pricing_effective_date => l_pricing_effective_date
3268: ,l_validate_result => l_validate_result);
3269:
3270: IF NVL(l_validate_result,'N') IN ('U' ,'N') then -- Unexpected Error
3271: fnd_msg_pub.initialize;
3272: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,p_encoded => fnd_api.g_false);
3273: OKC_API.SET_MESSAGE(
3274: p_app_name => 'OKS', --G_APP_NAME_OKS,
3275: p_msg_name => 'OKS_INVALID_PRICE_LIST');
3268: ,l_validate_result => l_validate_result);
3269:
3270: IF NVL(l_validate_result,'N') IN ('U' ,'N') then -- Unexpected Error
3271: fnd_msg_pub.initialize;
3272: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,p_encoded => fnd_api.g_false);
3273: OKC_API.SET_MESSAGE(
3274: p_app_name => 'OKS', --G_APP_NAME_OKS,
3275: p_msg_name => 'OKS_INVALID_PRICE_LIST');
3276: x_msg_tbl(l_tot_msg_count).status := 'E';
3299: l_msg_count,
3300: l_msg_data);
3301: -- Bug 5227077 --
3302: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3303: FOR i in 1..fnd_msg_pub.count_msg
3304: Loop
3305: fnd_msg_pub.get
3306: (
3307: p_msg_index => i,
3301: -- Bug 5227077 --
3302: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3303: FOR i in 1..fnd_msg_pub.count_msg
3304: Loop
3305: fnd_msg_pub.get
3306: (
3307: p_msg_index => i,
3308: p_encoded => 'F',
3309: p_data => l_msg_data,
3324: l_klnv_tbl_in(1).locked_price_list_id := null;
3325: l_klnv_tbl_in(1).locked_price_list_line_id := null;
3326:
3327:
3328: fnd_msg_pub.initialize;
3329: OKC_API.SET_MESSAGE(
3330: p_app_name => G_APP_NAME_OKS,
3331: p_msg_name => 'OKS_HEADER_CASCADE_WARNING',
3332: p_token1 => 'ATTRIBUTE',
3331: p_msg_name => 'OKS_HEADER_CASCADE_WARNING',
3332: p_token1 => 'ATTRIBUTE',
3333: p_token1_value => 'Price List');
3334:
3335: l_msg_data := fnd_msg_pub.get( p_msg_index => fnd_msg_pub.g_first,
3336: p_encoded => fnd_api.g_false);
3337: x_msg_tbl(l_tot_msg_count).status := 'S';
3338: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3339: l_tot_msg_count := l_tot_msg_count + 1;
3340: l_msg_data := NULL;
3341: ELSE
3342: -- To display the Cascade Message when
3343: -- Usage lines is not locked and the cascade take place --
3344: fnd_msg_pub.initialize;
3345: OKC_API.SET_MESSAGE(
3346: p_app_name => G_APP_NAME_OKS,
3347: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
3348: p_token1 => 'ATTRIBUTE',
3347: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
3348: p_token1 => 'ATTRIBUTE',
3349: p_token1_value => 'Price List');
3350:
3351: l_msg_data := fnd_msg_pub.get( p_msg_index => fnd_msg_pub.g_first,
3352: p_encoded => fnd_api.g_false);
3353: x_msg_tbl(l_tot_msg_count).status := 'S';
3354: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3355: l_tot_msg_count := l_tot_msg_count + 1;
3356: l_msg_data := NULL;
3357:
3358: END IF;
3359: Else
3360: fnd_msg_pub.initialize;
3361: OKC_API.SET_MESSAGE(
3362: p_app_name => G_APP_NAME_OKS,
3363: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
3364: p_token1 => 'ATTRIBUTE',
3363: p_msg_name => 'OKS_HEADER_CASCADE_SUCCESS',
3364: p_token1 => 'ATTRIBUTE',
3365: p_token1_value => 'Price List');
3366:
3367: l_msg_data := fnd_msg_pub.get( p_msg_index => fnd_msg_pub.g_first,
3368: p_encoded => fnd_api.g_false);
3369: x_msg_tbl(l_tot_msg_count).status := 'S';
3370: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3371: l_tot_msg_count := l_tot_msg_count + 1;
3414: );
3415: --errorout('Return status -'||l_return_status);
3416: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3417:
3418: FOR i in 1..fnd_msg_pub.count_msg
3419: Loop
3420: fnd_msg_pub.get
3421: (
3422: p_msg_index => i,
3416: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3417:
3418: FOR i in 1..fnd_msg_pub.count_msg
3419: Loop
3420: fnd_msg_pub.get
3421: (
3422: p_msg_index => i,
3423: p_encoded => 'F',
3424: p_data => l_msg_data,
3463:
3464:
3465: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3466:
3467: FOR i in 1..fnd_msg_pub.count_msg
3468: Loop
3469: fnd_msg_pub.get
3470: (
3471: p_msg_index => i,
3465: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3466:
3467: FOR i in 1..fnd_msg_pub.count_msg
3468: Loop
3469: fnd_msg_pub.get
3470: (
3471: p_msg_index => i,
3472: p_encoded => 'F',
3473: p_data => l_msg_data,
3525: End Loop;
3526: end if;
3527: -- Bug 5381082 --
3528: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
3529: FOR i in 1..fnd_msg_pub.count_msg
3530: Loop
3531: fnd_msg_pub.get
3532: (
3533: p_msg_index => i,
3527: -- Bug 5381082 --
3528: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
3529: FOR i in 1..fnd_msg_pub.count_msg
3530: Loop
3531: fnd_msg_pub.get
3532: (
3533: p_msg_index => i,
3534: p_encoded => 'F',
3535: p_data => l_msg_data,
3568: p_New_End_Date => header_dates_rec.end_date );
3569:
3570: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3571:
3572: FOR i in 1..fnd_msg_pub.count_msg
3573: Loop
3574: fnd_msg_pub.get
3575: (
3576: p_msg_index => i,
3570: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3571:
3572: FOR i in 1..fnd_msg_pub.count_msg
3573: Loop
3574: fnd_msg_pub.get
3575: (
3576: p_msg_index => i,
3577: p_encoded => 'F',
3578: p_data => l_msg_data,
3589: ELSE
3590: -- Bug 5191587 --
3591: If l_okc_lines_rec.lse_id in ('1','14', '19') and l_sr_number IS NOT NULL
3592: then
3593: fnd_msg_pub.initialize;
3594:
3595: OKC_API.SET_MESSAGE(
3596: p_app_name => G_APP_NAME_OKS,
3597: p_msg_name => 'OKS_HEADER_CASCADE_SR_SUCCESS',
3600: p_token2 => 'Line No ',
3601: p_token2_value => l_line_number
3602: );
3603:
3604: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
3605: p_encoded => fnd_api.g_false);
3606: x_msg_tbl(l_tot_msg_count).status := 'W';
3607: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3608: l_tot_msg_count := l_tot_msg_count + 1;
3607: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3608: l_tot_msg_count := l_tot_msg_count + 1;
3609: l_msg_data := NULL;
3610:
3611: fnd_msg_pub.initialize;
3612:
3613: -- Issue a warning message if dates are cascaded from header to lines for a fully billed contract.
3614: IF(l_disp_warning ='Y') THEN
3615:
3627: p_token1_value => 'Date');
3628: x_msg_tbl(l_tot_msg_count).status := 'S';
3629: END IF;
3630:
3631: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
3632: p_encoded => fnd_api.g_false);
3633: -- x_msg_tbl(l_tot_msg_count).status := 'S';
3634: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3635: l_tot_msg_count := l_tot_msg_count + 1;
3635: l_tot_msg_count := l_tot_msg_count + 1;
3636: l_msg_data := NULL;
3637:
3638: Else
3639: fnd_msg_pub.initialize;
3640:
3641: -- Issue a warning message if dates are cascaded from header to lines for a fully billed contract.
3642: IF(l_disp_warning ='Y') THEN
3643:
3653: p_token1 => 'ATTRIBUTE',
3654: p_token1_value => 'Date');
3655: x_msg_tbl(l_tot_msg_count).status := 'S';
3656: END IF;
3657: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
3658: p_encoded => fnd_api.g_false);
3659: -- x_msg_tbl(l_tot_msg_count).status := 'S';
3660: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3661: l_tot_msg_count := l_tot_msg_count + 1;
3664: End If;
3665: END IF;
3666:
3667: Else --LineCov_cur% not Found Then
3668: fnd_msg_pub.initialize;
3669: OKC_API.SET_MESSAGE
3670: (
3671: p_app_name => G_APP_NAME_OKS,
3672: p_msg_name => 'OKS_CASCADE_COV_NOT_FOUND',
3673: p_token2 => 'Line No ',
3674: p_token2_value => l_line_number
3675: );
3676:
3677: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
3678: p_encoded => fnd_api.g_false);
3679: x_msg_tbl(l_tot_msg_count).status := 'E';
3680: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3681: l_tot_msg_count := l_tot_msg_count + 1;
3698: x_msg_data => l_msg_data
3699: );
3700: -- Bug 5227077 --
3701: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3702: FOR i in 1..fnd_msg_pub.count_msg
3703: Loop
3704: fnd_msg_pub.get
3705: (
3706: p_msg_index => i,
3700: -- Bug 5227077 --
3701: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3702: FOR i in 1..fnd_msg_pub.count_msg
3703: Loop
3704: fnd_msg_pub.get
3705: (
3706: p_msg_index => i,
3707: p_encoded => 'F',
3708: p_data => l_msg_data,
3734: x_msg_data => l_msg_data
3735: );
3736: -- Bug 5227077 --
3737: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3738: FOR i in 1..fnd_msg_pub.count_msg
3739: Loop
3740: fnd_msg_pub.get
3741: (
3742: p_msg_index => i,
3736: -- Bug 5227077 --
3737: if not(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3738: FOR i in 1..fnd_msg_pub.count_msg
3739: Loop
3740: fnd_msg_pub.get
3741: (
3742: p_msg_index => i,
3743: p_encoded => 'F',
3744: p_data => l_msg_data,
3754:
3755: /*added for bug 10132468*/
3756:
3757: If l_sr_number IS NOT NULL then
3758: fnd_msg_pub.initialize;
3759: OKC_API.SET_MESSAGE(
3760: p_app_name => G_APP_NAME_OKS,
3761: p_msg_name => 'OKS_HEADER_CASCADE_SR_SUCCESS',
3762: p_token1 => 'SR#',
3764: p_token2 => 'Line No ',
3765: p_token2_value => l_line_number
3766: );
3767:
3768: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
3769: p_encoded => fnd_api.g_false);
3770: x_msg_tbl(l_tot_msg_count).status := 'W';
3771: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3772: l_tot_msg_count := l_tot_msg_count + 1;
3771: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3772: l_tot_msg_count := l_tot_msg_count + 1;
3773: l_msg_data := NULL;
3774:
3775: fnd_msg_pub.initialize;
3776: -- Issue a warning message if dates are cascaded from header to lines for a fully billed contract.
3777: IF(l_disp_warning ='Y') THEN
3778:
3779: OKC_API.SET_MESSAGE(
3790: p_token1_value => 'Date');
3791: x_msg_tbl(l_tot_msg_count).status := 'S';
3792: END IF;
3793:
3794: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
3795: p_encoded => fnd_api.g_false);
3796: -- x_msg_tbl(l_tot_msg_count).status := 'S';
3797: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3798: l_tot_msg_count := l_tot_msg_count + 1;
3798: l_tot_msg_count := l_tot_msg_count + 1;
3799: l_msg_data := NULL;
3800:
3801: Else
3802: fnd_msg_pub.initialize;
3803:
3804: -- Issue a warning message if dates are cascaded from header to lines for a fully billed contract.
3805: IF(l_disp_warning ='Y') THEN
3806:
3818: p_token1_value => 'Date');
3819: x_msg_tbl(l_tot_msg_count).status := 'S';
3820:
3821: END IF;
3822: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
3823: p_encoded => fnd_api.g_false);
3824: --x_msg_tbl(l_tot_msg_count).status := 'S';
3825: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3826: l_tot_msg_count := l_tot_msg_count + 1;
3828:
3829: End If;
3830: -- Bug 5191587 --
3831: Else --lse_id = 46
3832: fnd_msg_pub.initialize;
3833:
3834: -- Issue a warning message if dates are cascaded from header to lines for a fully billed contract.
3835: IF(l_disp_warning ='Y') THEN
3836:
3847: p_token1 => 'ATTRIBUTE',
3848: p_token1_value => 'Date');
3849: x_msg_tbl(l_tot_msg_count).status := 'S';
3850: END IF;
3851: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
3852: p_encoded => fnd_api.g_false);
3853: --x_msg_tbl(l_tot_msg_count).status := 'S';
3854: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3855: l_tot_msg_count := l_tot_msg_count + 1;
3884: x_return_status => l_return_status
3885: );
3886:
3887: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
3888: FOR i in 1..fnd_msg_pub.count_msg
3889: Loop
3890: fnd_msg_pub.get
3891: (
3892: p_msg_index => i,
3886:
3887: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
3888: FOR i in 1..fnd_msg_pub.count_msg
3889: Loop
3890: fnd_msg_pub.get
3891: (
3892: p_msg_index => i,
3893: p_encoded => 'F',
3894: p_data => l_msg_data,
3956: );
3957:
3958:
3959: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
3960: FOR i in 1..fnd_msg_pub.count_msg
3961: Loop
3962: fnd_msg_pub.get
3963: (
3964: p_msg_index => i,
3958:
3959: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
3960: FOR i in 1..fnd_msg_pub.count_msg
3961: Loop
3962: fnd_msg_pub.get
3963: (
3964: p_msg_index => i,
3965: p_encoded => 'F',
3966: p_data => l_msg_data,
3975: Raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3976: End If;
3977: /*
3978: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
3979: fnd_msg_pub.initialize;
3980: OKC_API.SET_MESSAGE(
3981: p_app_name => G_APP_NAME_OKS,
3982: p_msg_name => 'OKS_RECALCULATE_TAX_SUCCESS',
3983: p_token1 => 'ATTRIBUTE',
3982: p_msg_name => 'OKS_RECALCULATE_TAX_SUCCESS',
3983: p_token1 => 'ATTRIBUTE',
3984: p_token1_value => 'Recalculate Tax');
3985:
3986: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
3987: p_encoded => fnd_api.g_false);
3988: x_msg_tbl(l_tot_msg_count).status := 'S';
3989: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
3990: l_tot_msg_count := l_tot_msg_count + 1;
4023: p_validate_yn => 'N'
4024: );
4025: -- Bug 5227077 --
4026: If (l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4027: FOR i in 1..fnd_msg_pub.count_msg
4028: Loop
4029: fnd_msg_pub.get
4030: (
4031: p_msg_index => i,
4025: -- Bug 5227077 --
4026: If (l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4027: FOR i in 1..fnd_msg_pub.count_msg
4028: Loop
4029: fnd_msg_pub.get
4030: (
4031: p_msg_index => i,
4032: p_encoded => 'F',
4033: p_data => l_msg_data,
4054: x_return_status => l_return_status
4055: );
4056: -- Bug 5227077 --
4057: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4058: FOR i in 1..fnd_msg_pub.count_msg
4059: Loop
4060: fnd_msg_pub.get
4061: (
4062: p_msg_index => i,
4056: -- Bug 5227077 --
4057: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4058: FOR i in 1..fnd_msg_pub.count_msg
4059: Loop
4060: fnd_msg_pub.get
4061: (
4062: p_msg_index => i,
4063: p_encoded => 'F',
4064: p_data => l_msg_data,
4108: );
4109:
4110:
4111: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4112: FOR i in 1..fnd_msg_pub.count_msg
4113: Loop
4114: fnd_msg_pub.get
4115: (
4116: p_msg_index => i,
4110:
4111: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4112: FOR i in 1..fnd_msg_pub.count_msg
4113: Loop
4114: fnd_msg_pub.get
4115: (
4116: p_msg_index => i,
4117: p_encoded => 'F',
4118: p_data => l_msg_data,
4126: Raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4127: End If;
4128: /*
4129: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
4130: fnd_msg_pub.initialize;
4131: OKC_API.SET_MESSAGE(
4132: p_app_name => G_APP_NAME_OKS,
4133: p_msg_name => 'OKS_RECALCULATE_TAX_SUCCESS',
4134: p_token1 => 'ATTRIBUTE',
4133: p_msg_name => 'OKS_RECALCULATE_TAX_SUCCESS',
4134: p_token1 => 'ATTRIBUTE',
4135: p_token1_value => 'Recalculate Tax');
4136:
4137: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
4138: p_encoded => fnd_api.g_false);
4139: x_msg_tbl(l_tot_msg_count).status := 'S';
4140: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4141: l_tot_msg_count := l_tot_msg_count + 1;
4165: p_khrv_tbl => l_khrv_tbl_type_in,
4166: x_khrv_tbl => l_khrv_tbl_type_out,
4167: p_validate_yn => 'N');
4168: If (l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4169: FOR i in 1..fnd_msg_pub.count_msg
4170: Loop
4171: fnd_msg_pub.get
4172: (
4173: p_msg_index => i,
4167: p_validate_yn => 'N');
4168: If (l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4169: FOR i in 1..fnd_msg_pub.count_msg
4170: Loop
4171: fnd_msg_pub.get
4172: (
4173: p_msg_index => i,
4174: p_encoded => 'F',
4175: p_data => l_msg_data,
4185: -- Bug 5227077 --
4186:
4187:
4188: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
4189: fnd_msg_pub.initialize;
4190: OKC_API.SET_MESSAGE(
4191: p_app_name => G_APP_NAME_OKS,
4192: p_msg_name => 'OKS_RECALCULATE_TAX_SUCCESS',
4193: p_token1 => 'ATTRIBUTE',
4192: p_msg_name => 'OKS_RECALCULATE_TAX_SUCCESS',
4193: p_token1 => 'ATTRIBUTE',
4194: p_token1_value => 'Recalculate Tax');
4195:
4196: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
4197: p_encoded => fnd_api.g_false);
4198: x_msg_tbl(l_tot_msg_count).status := 'S';
4199: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4200: l_tot_msg_count := l_tot_msg_count + 1;
4213: x_msg_count => l_msg_count,
4214: x_msg_data => l_msg_data);
4215: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4216:
4217: FOR i in 1..fnd_msg_pub.count_msg
4218: Loop
4219: fnd_msg_pub.get
4220: (
4221: p_msg_index => i,
4215: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4216:
4217: FOR i in 1..fnd_msg_pub.count_msg
4218: Loop
4219: fnd_msg_pub.get
4220: (
4221: p_msg_index => i,
4222: p_encoded => 'F',
4223: p_data => l_msg_data,
4238: exit when i=header_lines_tbl.last;
4239: i:=header_lines_tbl.next(i);
4240: END LOOP;
4241:
4242: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
4243: p_encoded => fnd_api.g_false);
4244:
4245: /*
4246: If l_okc_lines_rec.lse_id <> '14' then
4254: END IF;
4255: x_msg_tbl(l_tot_msg_count).status := l_return_status;
4256: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4257:
4258: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_next,
4259: p_encoded => fnd_api.g_false
4260: );
4261: END LOOP;
4262: End If;
4432: p_msg_name => 'OKS_LINE_CASCADE_SUCCESS',
4433: p_token1 => 'ATTRIBUTE',
4434: p_token1_value => 'Invoicing Text');
4435:
4436: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
4437: p_encoded => fnd_api.g_false);
4438: x_msg_tbl(l_tot_msg_count).status := 'S';
4439: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4440: l_tot_msg_count := l_tot_msg_count + 1;
4438: x_msg_tbl(l_tot_msg_count).status := 'S';
4439: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4440: l_tot_msg_count := l_tot_msg_count + 1;
4441: l_msg_data := NULL;
4442: fnd_msg_pub.initialize;
4443:
4444: END IF;
4445:
4446: END IF;
4457: p_msg_name => 'OKS_LINE_CASCADE_SUCCESS',
4458: p_token1 => 'ATTRIBUTE',
4459: p_token1_value => 'Renewal');
4460:
4461: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
4462: p_encoded => fnd_api.g_false);
4463: x_msg_tbl(l_tot_msg_count).status := 'S';
4464: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4465: l_tot_msg_count := l_tot_msg_count + 1;
4463: x_msg_tbl(l_tot_msg_count).status := 'S';
4464: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4465: l_tot_msg_count := l_tot_msg_count + 1;
4466: l_msg_data := NULL;
4467: fnd_msg_pub.initialize;
4468:
4469:
4470:
4471: END IF;
4481: p_chr_id => null,
4482: p_cle_id => l_cle_id,
4483: p_lse_id => line_dates_rec.lse_id,
4484: p_end_date => null) Then
4485: fnd_msg_pub.initialize;
4486: validate_date
4487:
4488: (p_api_version => l_api_version
4489: ,p_init_msg_list => l_init_msg_list
4496: ,x_flag => l_flag);
4497:
4498:
4499: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
4500: FOR i in 1..fnd_msg_pub.count_msg
4501: Loop
4502: fnd_msg_pub.get
4503: (
4504: p_msg_index => i,
4498:
4499: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
4500: FOR i in 1..fnd_msg_pub.count_msg
4501: Loop
4502: fnd_msg_pub.get
4503: (
4504: p_msg_index => i,
4505: p_encoded => 'F',
4506: p_data => l_msg_data,
4513: End Loop;
4514: Raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4515: Else
4516: If l_flag <> TRUE then
4517: fnd_msg_pub.initialize;
4518: OKC_API.SET_MESSAGE(
4519: p_app_name => 'OKS', --G_APP_NAME_OKS,
4520: p_msg_name => 'OKS_BA_UPDATE_NOT_ALLOWED',
4521: p_token1 => 'Sub Line No ',
4521: p_token1 => 'Sub Line No ',
4522: p_token1_value => l_sub_line_seq_number);
4523:
4524:
4525: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
4526: p_encoded => fnd_api.g_false);
4527: x_msg_tbl(l_tot_msg_count).status := 'E';
4528: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4529: l_tot_msg_count := l_tot_msg_count + 1;
4527: x_msg_tbl(l_tot_msg_count).status := 'E';
4528: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4529: l_tot_msg_count := l_tot_msg_count + 1;
4530: l_msg_data := NULL;
4531: fnd_msg_pub.initialize;
4532: Raise G_EXCEPTION_HALT_VALIDATION;
4533:
4534: End If;
4535: End If;
4576:
4577: END IF;
4578: END IF;
4579: ----new
4580: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
4581: p_encoded => fnd_api.g_false);
4582: -- x_msg_tbl(l_tot_msg_count).status := 'S';
4583: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4584: l_tot_msg_count := l_tot_msg_count + 1;
4582: -- x_msg_tbl(l_tot_msg_count).status := 'S';
4583: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4584: l_tot_msg_count := l_tot_msg_count + 1;
4585: l_msg_data := NULL;
4586: fnd_msg_pub.initialize;
4587: ----new
4588: -- Added for Bug#15936043
4589: l_klnv_tbl_in(1).ID := l_oks_sub_lines_rec.id;
4590: l_klnv_tbl_in(1).invoice_text :=
4601: p_msg_name => 'OKS_LINE_CASCADE_SUCCESS',
4602: p_token1 => 'ATTRIBUTE',
4603: p_token1_value => 'Subline Invoicing Text');
4604:
4605: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
4606: p_encoded => fnd_api.g_false);
4607: x_msg_tbl(l_tot_msg_count).status := 'S';
4608: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4609: l_tot_msg_count := l_tot_msg_count + 1;
4607: x_msg_tbl(l_tot_msg_count).status := 'S';
4608: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4609: l_tot_msg_count := l_tot_msg_count + 1;
4610: l_msg_data := NULL;
4611: fnd_msg_pub.initialize;
4612:
4613: END IF;
4614: -- End of Code added for Bug#15936043
4615:
4629: p_token1_value => 'Invoicing Print Flag');
4630: END IF;
4631:
4632: ----new
4633: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
4634: p_encoded => fnd_api.g_false);
4635: x_msg_tbl(l_tot_msg_count).status := 'S';
4636: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4637: l_tot_msg_count := l_tot_msg_count + 1;
4635: x_msg_tbl(l_tot_msg_count).status := 'S';
4636: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4637: l_tot_msg_count := l_tot_msg_count + 1;
4638: l_msg_data := NULL;
4639: fnd_msg_pub.initialize;
4640: ----new
4641:
4642:
4643:
4667: p_msg_name => 'OKS_LINE_CASCADE_SUCCESS',
4668: p_token1 => 'ATTRIBUTE',
4669: p_token1_value => 'Price UOM');
4670:
4671: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
4672: p_encoded => fnd_api.g_false);
4673: x_msg_tbl(l_tot_msg_count).status := 'S';
4674: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4675: l_tot_msg_count := l_tot_msg_count + 1;
4673: x_msg_tbl(l_tot_msg_count).status := 'S';
4674: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4675: l_tot_msg_count := l_tot_msg_count + 1;
4676: l_msg_data := NULL;
4677: fnd_msg_pub.initialize;
4678: END IF;
4679: Else
4680: /* OKC_API.SET_MESSAGE(
4681: p_app_name => G_APP_NAME_OKS,
4682: p_msg_name => 'OKS_LINE_CASCADE_ERROR',
4683: p_token1 => 'ATTRIBUTE',
4684: p_token1_value => 'Price UOM');
4685:
4686: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
4687: p_encoded => fnd_api.g_false);
4688: ----errorout_gsi('Subline_common_attribute UOM msg '||l_msg_data);
4689: x_msg_tbl(l_tot_msg_count).status := 'E';
4690: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4689: x_msg_tbl(l_tot_msg_count).status := 'E';
4690: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
4691: l_tot_msg_count := l_tot_msg_count + 1;
4692: l_msg_data := NULL;
4693: fnd_msg_pub.initialize; */
4694: null;
4695: End If;
4696: END IF;
4697: --new
4708:
4709: END sublines_common_attributes;
4710:
4711: Begin
4712: fnd_msg_pub.initialize;
4713:
4714: IF NOT lines_sublines_tbl.COUNT=0 THEN
4715: i:=lines_sublines_tbl.FIRST;
4716: -- GCHADHA --
4788: p_New_Start_Date => line_dates_rec.start_date,
4789: p_New_End_Date => line_dates_rec.end_date );
4790:
4791: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4792: FOR i in 1..fnd_msg_pub.count_msg
4793: Loop
4794: fnd_msg_pub.get
4795: (
4796: p_msg_index => i,
4790:
4791: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4792: FOR i in 1..fnd_msg_pub.count_msg
4793: Loop
4794: fnd_msg_pub.get
4795: (
4796: p_msg_index => i,
4797: p_encoded => 'F',
4798: p_data => l_msg_data,
4874: --errorout_gsi('After oks_contract_line_pub.update_line Message '||l_msg_data);
4875:
4876: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4877:
4878: FOR i in 1..fnd_msg_pub.count_msg
4879: Loop
4880: fnd_msg_pub.get
4881: (
4882: p_msg_index => i,
4876: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4877:
4878: FOR i in 1..fnd_msg_pub.count_msg
4879: Loop
4880: fnd_msg_pub.get
4881: (
4882: p_msg_index => i,
4883: p_encoded => 'F',
4884: p_data => l_msg_data,
4908: x_msg_data => l_msg_data
4909: );
4910:
4911: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4912: FOR i in 1..fnd_msg_pub.count_msg
4913: Loop
4914: fnd_msg_pub.get
4915: (
4916: p_msg_index => i,
4910:
4911: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
4912: FOR i in 1..fnd_msg_pub.count_msg
4913: Loop
4914: fnd_msg_pub.get
4915: (
4916: p_msg_index => i,
4917: p_encoded => 'F',
4918: p_data => l_msg_data,
4967: ,p_price_uom => l_line_price_uom -- 8/23/05 hkamdar R12 Partial Period
4968: ,x_return_status => l_return_status
4969: );
4970: --- errorout_vg('After sublines_common_attributes second status '||l_return_status);
4971: FOR i in 1..fnd_msg_pub.count_msg
4972: Loop
4973: fnd_msg_pub.get
4974: (
4975: p_msg_index => i,
4969: );
4970: --- errorout_vg('After sublines_common_attributes second status '||l_return_status);
4971: FOR i in 1..fnd_msg_pub.count_msg
4972: Loop
4973: fnd_msg_pub.get
4974: (
4975: p_msg_index => i,
4976: p_encoded => 'F',
4977: p_data => l_msg_data,
4998: ,p_price_uom => l_line_price_uom -- 8/23/05 hkamdar R12 Partial Period
4999: ,x_return_status => l_return_status
5000: );
5001: -- errorout_vg('After sublines_common_attributes Third status '||l_return_status);
5002: FOR i in 1..fnd_msg_pub.count_msg
5003: Loop
5004: fnd_msg_pub.get
5005: (
5006: p_msg_index => i,
5000: );
5001: -- errorout_vg('After sublines_common_attributes Third status '||l_return_status);
5002: FOR i in 1..fnd_msg_pub.count_msg
5003: Loop
5004: fnd_msg_pub.get
5005: (
5006: p_msg_index => i,
5007: p_encoded => 'F',
5008: p_data => l_msg_data,
5039: p_validate_yn => 'N'
5040: );
5041:
5042: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
5043: FOR i in 1..fnd_msg_pub.count_msg
5044: Loop
5045: fnd_msg_pub.get
5046: (
5047: p_msg_index => i,
5041:
5042: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
5043: FOR i in 1..fnd_msg_pub.count_msg
5044: Loop
5045: fnd_msg_pub.get
5046: (
5047: p_msg_index => i,
5048: p_encoded => 'F',
5049: p_data => l_msg_data,
5074: x_msg_count => l_msg_count,
5075: x_msg_data => l_msg_data
5076: );
5077: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
5078: FOR i in 1..fnd_msg_pub.count_msg
5079: Loop
5080: fnd_msg_pub.get
5081: (
5082: p_msg_index => i,
5076: );
5077: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
5078: FOR i in 1..fnd_msg_pub.count_msg
5079: Loop
5080: fnd_msg_pub.get
5081: (
5082: p_msg_index => i,
5083: p_encoded => 'F',
5084: p_data => l_msg_data,
5135: End Loop;
5136: END IF;
5137: -- Bug 5381082 --
5138: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
5139: FOR i in 1..fnd_msg_pub.count_msg
5140: Loop
5141: fnd_msg_pub.get
5142: (
5143: p_msg_index => i,
5137: -- Bug 5381082 --
5138: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
5139: FOR i in 1..fnd_msg_pub.count_msg
5140: Loop
5141: fnd_msg_pub.get
5142: (
5143: p_msg_index => i,
5144: p_encoded => 'F',
5145: p_data => l_msg_data,
5205: End Loop;
5206: END IF;
5207: -- Bug 5381082 --
5208: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
5209: FOR i in 1..fnd_msg_pub.count_msg
5210: Loop
5211: fnd_msg_pub.get
5212: (
5213: p_msg_index => i,
5207: -- Bug 5381082 --
5208: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
5209: FOR i in 1..fnd_msg_pub.count_msg
5210: Loop
5211: fnd_msg_pub.get
5212: (
5213: p_msg_index => i,
5214: p_encoded => 'F',
5215: p_data => l_msg_data,
5241: x_msg_count => l_msg_count,
5242: x_msg_data => l_msg_data);
5243: --errorout_gsi('After OKS_BILL_SCH.Cascade_Dates_SLL status '||l_return_status);
5244: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
5245: FOR i in 1..fnd_msg_pub.count_msg
5246: Loop
5247: fnd_msg_pub.get
5248: (
5249: p_msg_index => i,
5243: --errorout_gsi('After OKS_BILL_SCH.Cascade_Dates_SLL status '||l_return_status);
5244: If ( l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
5245: FOR i in 1..fnd_msg_pub.count_msg
5246: Loop
5247: fnd_msg_pub.get
5248: (
5249: p_msg_index => i,
5250: p_encoded => 'F',
5251: p_data => l_msg_data,
5264: END IF;
5265:
5266: -- END GCHADHA --
5267:
5268: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_first,
5269: p_encoded => fnd_api.g_false);
5270: WHILE l_msg_data IS NOT NULL
5271: LOOP
5272: IF x_msg_tbl.count=0 THEN
5279:
5280: x_msg_tbl(l_tot_msg_count).status := l_return_status;
5281: x_msg_tbl(l_tot_msg_count).description := l_msg_data;
5282:
5283: l_msg_data := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_next,
5284: p_encoded => fnd_api.g_false);
5285: END LOOP;
5286:
5287: END IF;