DBA Data[Home] [Help]

APPS.CSC_PLAN_ASSIGNMENT_PKG dependencies on FND_API

Line 72: -- 11-28-2002 bhroy FND_API.G_MISS_XXX defaults removed

68: -- where b.cust_account_id = b.cust_account_id to
69: -- where b.cust_account_id is not null
70: -- 03-15-2002 dejoseph Added the checkfile command
71: -- 11-12-2002 bhroy NOCOPY changes made
72: -- 11-28-2002 bhroy FND_API.G_MISS_XXX defaults removed
73: -- 07-11-2005 tpalaniv Bug 4628149 Changing all the procedures to include
74: -- the bulk limit in the fetch statement
75: -- 07-04-2006 vshastry Bug 5073490 Added loop in all the procedures using bulk collect with limit
76: -- 07-04-2006 vshastry Bug 5073490 closing the cursors out of the loop

Line 1318: x_return_status := FND_API.G_RET_STS_SUCCESS;

1314: L_CUST_ID_DEL_TBL CSC_CUST_ID_TBL_TYPE;
1315: L_DEL_IDX NUMBER := 0; -- index for delete tables
1316:
1317: BEGIN
1318: x_return_status := FND_API.G_RET_STS_SUCCESS;
1319:
1320: FOR i in 1..p_plan_id_tbl.count
1321: LOOP
1322: validate_compare_arguments (

Line 1328: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1324: P_CRITERIA_VALUE_LOW => p_criteria_value_low_tbl(i),
1325: P_CRITERIA_VALUE_HIGH => p_criteria_value_high_tbl(i),
1326: X_RETURN_STATUS => x_return_status );
1327:
1328: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1329: g_mesg := 'Plan criteria not defined correctly for plan_id = ' || p_plan_id_tbl(i);
1330: fnd_file.put_line(fnd_file.log, g_mesg);
1331: end if;
1332:

Line 1333: IF ( x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

1329: g_mesg := 'Plan criteria not defined correctly for plan_id = ' || p_plan_id_tbl(i);
1330: fnd_file.put_line(fnd_file.log, g_mesg);
1331: end if;
1332:
1333: IF ( x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1334: if ( p_relational_operator_tbl(i) = '=' ) then
1335: begin
1336: if ( to_number(p_value_tbl(i)) = to_number(p_criteria_value_low_tbl(i)) ) then
1337: l_assign_plan := 'T';

Line 1490: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1486: P_PARTY_ID_TBL => L_PARTY_ID_DEL_TBL,
1487: P_CUST_ID_TBL => L_CUST_ID_DEL_TBL,
1488: X_RETURN_STATUS => x_return_status );
1489:
1490: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1491: -- generate message in stack.
1492: -- raise exception
1493: g_mesg := 'Delete of customer to plan association failed.';
1494: fnd_file.put_line(fnd_file.log, g_mesg);

Line 1495: -- RAISE FND_API.G_EXC_ERROR;

1491: -- generate message in stack.
1492: -- raise exception
1493: g_mesg := 'Delete of customer to plan association failed.';
1494: fnd_file.put_line(fnd_file.log, g_mesg);
1495: -- RAISE FND_API.G_EXC_ERROR;
1496: end if;
1497:
1498: L_DEL_IDX := 0;
1499: L_PLAN_ID_DEL_TBL.DELETE;

Line 1513: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1509: p_party_id_tbl => L_PARTY_ID_ADD_TBL,
1510: p_cust_id_tbl => L_CUST_ID_ADD_TBL,
1511: x_return_status => x_return_status );
1512:
1513: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1514: -- generate message in stack.
1515: -- raise exception
1516: g_mesg := 'Insert of new customer to plan association failed.';
1517: fnd_file.put_line(fnd_file.log, g_mesg);

Line 1518: -- RAISE FND_API.G_EXC_ERROR;

1514: -- generate message in stack.
1515: -- raise exception
1516: g_mesg := 'Insert of new customer to plan association failed.';
1517: fnd_file.put_line(fnd_file.log, g_mesg);
1518: -- RAISE FND_API.G_EXC_ERROR;
1519: end if;
1520:
1521: L_ADD_IDX := 0;
1522: L_PLAN_ID_ADD_TBL.DELETE;

Line 1528: END IF; -- if x_return_status = FND_API.G_RET_STS_SUCCESS

1524: L_END_DATE_ACTIVE_ADD_TBL.DELETE;
1525: L_PARTY_ID_ADD_TBL.DELETE;
1526: L_CUST_ID_ADD_TBL.DELETE;
1527: END IF; -- if L_add_idx >= g_commit_time
1528: END IF; -- if x_return_status = FND_API.G_RET_STS_SUCCESS
1529: END LOOP; -- for i in 1..l_plan_id_sel_tbl.count
1530:
1531: IF ( L_DEL_IDX > 0 ) THEN
1532: DELETE_CUST_PLANS (

Line 1539: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1535: P_CUST_ID_TBL => L_CUST_ID_DEL_TBL,
1536: X_RETURN_STATUS => x_return_status );
1537:
1538: L_DEL_IDX := 0;
1539: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1540: -- generate message in stack.
1541: -- raise exception
1542: g_mesg := 'Delete of customer to plan association failed.';
1543: fnd_file.put_line(fnd_file.log, g_mesg);

Line 1544: -- RAISE FND_API.G_EXC_ERROR;

1540: -- generate message in stack.
1541: -- raise exception
1542: g_mesg := 'Delete of customer to plan association failed.';
1543: fnd_file.put_line(fnd_file.log, g_mesg);
1544: -- RAISE FND_API.G_EXC_ERROR;
1545: end if;
1546: END IF; -- if g_del_id > 0
1547:
1548: IF ( L_ADD_IDX > 0 ) THEN

Line 1556: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1552: p_end_date_active_tbl => L_END_DATE_ACTIVE_ADD_TBL,
1553: p_party_id_tbl => L_PARTY_ID_ADD_TBL,
1554: p_cust_id_tbl => L_CUST_ID_ADD_TBL,
1555: x_return_status => x_return_status );
1556: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1557: -- generate message in stack.
1558: -- raise exception
1559: g_mesg := 'Insert of new customer to plan association failed.';
1560: fnd_file.put_line(fnd_file.log, g_mesg);

Line 1561: -- RAISE FND_API.G_EXC_ERROR;

1557: -- generate message in stack.
1558: -- raise exception
1559: g_mesg := 'Insert of new customer to plan association failed.';
1560: fnd_file.put_line(fnd_file.log, g_mesg);
1561: -- RAISE FND_API.G_EXC_ERROR;
1562: end if;
1563: END IF; -- if L_add_idx > 0
1564:
1565: END ADD_REMOVE_PLAN_CHECK;

Line 1576: x_return_status := FND_API.G_RET_STS_SUCCESS;

1572: P_CRITERIA_VALUE_HIGH IN VARCHAR2,
1573: X_RETURN_STATUS OUT NOCOPY VARCHAR2 )
1574: IS
1575: BEGIN
1576: x_return_status := FND_API.G_RET_STS_SUCCESS;
1577: IF ( p_relational_operator = '=' OR
1578: p_relational_operator = '<>' OR
1579: p_relational_operator = '>' OR
1580: p_relational_operator = '<' OR

Line 1592: x_return_status := FND_API.G_RET_STS_ERROR;

1588: if ( p_criteria_value_low IS NULL OR p_criteria_value_high IS NOT NULL ) then
1589: g_mesg := 'Invalid arguments. Cannot perform comparison between check results and ' ||
1590: 'plan criteria. Check the relational operator, low value and high value.';
1591: fnd_file.put_line(fnd_file.log, g_mesg);
1592: x_return_status := FND_API.G_RET_STS_ERROR;
1593: end if;
1594: ELSIF ( p_relational_operator = 'BETWEEN' OR
1595: p_relational_operator = 'NOT BETWEEN' )
1596: THEN

Line 1601: x_return_status := FND_API.G_RET_STS_ERROR;

1597: if ( p_criteria_value_low IS NULL OR p_criteria_value_high IS NULL ) then
1598: g_mesg := 'Invalid arguments. Cannot perform comparison between check results and ' ||
1599: 'plan criteria. Check the relational operator, low value and high value.';
1600: fnd_file.put_line(fnd_file.log, g_mesg);
1601: x_return_status := FND_API.G_RET_STS_ERROR;
1602: end if;
1603: ELSIF ( p_relational_operator = 'IS NULL' OR
1604: p_relational_operator = 'IS NOT NULL' )
1605: THEN

Line 1610: x_return_status := FND_API.G_RET_STS_ERROR;

1606: if ( p_criteria_value_low IS NOT NULL OR p_criteria_value_high IS NOT NULL ) then
1607: g_mesg := 'Invalid arguments. Cannot perform comparison between check results and ' ||
1608: 'plan criteria. Check the relational operator, low value and high value.';
1609: fnd_file.put_line(fnd_file.log, g_mesg);
1610: x_return_status := FND_API.G_RET_STS_ERROR;
1611: end if;
1612: END IF;
1613: END VALIDATE_COMPARE_ARGUMENTS;
1614:

Line 1636: x_return_status := FND_API.G_RET_STS_SUCCESS;

1632: -- Standard Start of API savepoint
1633: SAVEPOINT ADD_CUST_PLANS_PVT;
1634:
1635: -- Initialize API return status to SUCCESS
1636: x_return_status := FND_API.G_RET_STS_SUCCESS;
1637:
1638: -- ******************************************************************
1639: -- Validate Environment
1640: -- ******************************************************************

Line 1646: RAISE FND_API.G_EXC_ERROR;

1642: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1643: FND_MESSAGE.Set_Name(CSC_CORE_UTILS_PVT.G_APP_SHORTNAME, 'UT_CANNOT_GET_PROFILE_VALUE');
1644: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
1645: END IF;
1646: RAISE FND_API.G_EXC_ERROR;
1647: END IF;
1648: select sysdate
1649: into l_ins_start_date
1650: from sys.dual;

Line 1749: x_return_status := FND_API.G_RET_STS_SUCCESS;

1745: -- Standard Start of API savepoint
1746: SAVEPOINT DELETE_CUST_PLANS_PVT;
1747:
1748: -- Initialize API return status to SUCCESS
1749: x_return_status := FND_API.G_RET_STS_SUCCESS;
1750:
1751: -- ******************************************************************
1752: -- Validate Environment
1753: -- ******************************************************************

Line 1759: RAISE FND_API.G_EXC_ERROR;

1755: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1756: FND_MESSAGE.Set_Name(CSC_CORE_UTILS_PVT.G_APP_SHORTNAME, 'UT_CANNOT_GET_PROFILE_VALUE');
1757: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
1758: END IF;
1759: RAISE FND_API.G_EXC_ERROR;
1760: END IF;
1761:
1762: FORALL i in 1..P_PLAN_ID_TBL.COUNT
1763: DELETE FROM csc_cust_plans