DBA Data[Home] [Help]

APPS.PO_DOCUMENT_CHECKS_GRP dependencies on PO_CORE_S

Line 145: PO_CORE_S.get_document_ids(

141: THEN
142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
143: END IF;
144:
145: PO_CORE_S.get_document_ids(
146: p_doc_type => p_document_type
147: , p_doc_level => p_document_level
148: , p_doc_level_id_tbl => po_tbl_number( p_document_level_id )
149: , x_doc_id_tbl => l_document_id_tbl

Line 1284: -- PO_CORE_S.G_PARAMETER_YES means that the price update is coming from a

1280: -- API version expected by the caller
1281: --p_po_line_id
1282: -- ID of a Standard PO line
1283: --p_from_price_break
1284: -- PO_CORE_S.G_PARAMETER_YES means that the price update is coming from a
1285: -- price break;
1286: -- PO_CORE_S.G_PARAMETER_NO means that the price update is coming from the user.
1287: --p_add_reasons_to_msg_list
1288: -- (Only applies if x_price_updateable = PO_CORE_S.G_PARAMETER_NO.)

Line 1286: -- PO_CORE_S.G_PARAMETER_NO means that the price update is coming from the user.

1282: -- ID of a Standard PO line
1283: --p_from_price_break
1284: -- PO_CORE_S.G_PARAMETER_YES means that the price update is coming from a
1285: -- price break;
1286: -- PO_CORE_S.G_PARAMETER_NO means that the price update is coming from the user.
1287: --p_add_reasons_to_msg_list
1288: -- (Only applies if x_price_updateable = PO_CORE_S.G_PARAMETER_NO.)
1289: -- If PO_CORE_S.G_PARAMETER_YES, the API will add the reasons why price updates
1290: -- are not allowed to the standard API message list; otherwise, the API will not

Line 1288: -- (Only applies if x_price_updateable = PO_CORE_S.G_PARAMETER_NO.)

1284: -- PO_CORE_S.G_PARAMETER_YES means that the price update is coming from a
1285: -- price break;
1286: -- PO_CORE_S.G_PARAMETER_NO means that the price update is coming from the user.
1287: --p_add_reasons_to_msg_list
1288: -- (Only applies if x_price_updateable = PO_CORE_S.G_PARAMETER_NO.)
1289: -- If PO_CORE_S.G_PARAMETER_YES, the API will add the reasons why price updates
1290: -- are not allowed to the standard API message list; otherwise, the API will not
1291: -- add the reasons to the message list.
1292: --OUT:

Line 1289: -- If PO_CORE_S.G_PARAMETER_YES, the API will add the reasons why price updates

1285: -- price break;
1286: -- PO_CORE_S.G_PARAMETER_NO means that the price update is coming from the user.
1287: --p_add_reasons_to_msg_list
1288: -- (Only applies if x_price_updateable = PO_CORE_S.G_PARAMETER_NO.)
1289: -- If PO_CORE_S.G_PARAMETER_YES, the API will add the reasons why price updates
1290: -- are not allowed to the standard API message list; otherwise, the API will not
1291: -- add the reasons to the message list.
1292: --OUT:
1293: --x_return_status

Line 1298: -- PO_CORE_S.G_PARAMETER_YES if price updates are allowed on this shipment,

1294: -- FND_API.G_RET_STS_SUCCESS if the API completed successfully.
1295: -- FND_API.G_RET_STS_ERROR if there was an error.
1296: -- FND_API.G_RET_STS_UNEXP_ERROR if there was an unexpected error.
1297: --x_price_updateable
1298: -- PO_CORE_S.G_PARAMETER_YES if price updates are allowed on this shipment,
1299: -- PO_CORE_S.G_PARAMETER_NO otherwise
1300: --x_retroactive_price_change
1301: -- PO_CORE_S.G_PARAMETER_YES if a price update on this PO line would be
1302: -- considered a retroactive price change, PO_CORE_S.G_PARAMETER_NO otherwise.

Line 1299: -- PO_CORE_S.G_PARAMETER_NO otherwise

1295: -- FND_API.G_RET_STS_ERROR if there was an error.
1296: -- FND_API.G_RET_STS_UNEXP_ERROR if there was an unexpected error.
1297: --x_price_updateable
1298: -- PO_CORE_S.G_PARAMETER_YES if price updates are allowed on this shipment,
1299: -- PO_CORE_S.G_PARAMETER_NO otherwise
1300: --x_retroactive_price_change
1301: -- PO_CORE_S.G_PARAMETER_YES if a price update on this PO line would be
1302: -- considered a retroactive price change, PO_CORE_S.G_PARAMETER_NO otherwise.
1303: --End of Comments

Line 1301: -- PO_CORE_S.G_PARAMETER_YES if a price update on this PO line would be

1297: --x_price_updateable
1298: -- PO_CORE_S.G_PARAMETER_YES if price updates are allowed on this shipment,
1299: -- PO_CORE_S.G_PARAMETER_NO otherwise
1300: --x_retroactive_price_change
1301: -- PO_CORE_S.G_PARAMETER_YES if a price update on this PO line would be
1302: -- considered a retroactive price change, PO_CORE_S.G_PARAMETER_NO otherwise.
1303: --End of Comments
1304: -------------------------------------------------------------------------------
1305: PROCEDURE check_std_po_price_updateable (

Line 1302: -- considered a retroactive price change, PO_CORE_S.G_PARAMETER_NO otherwise.

1298: -- PO_CORE_S.G_PARAMETER_YES if price updates are allowed on this shipment,
1299: -- PO_CORE_S.G_PARAMETER_NO otherwise
1300: --x_retroactive_price_change
1301: -- PO_CORE_S.G_PARAMETER_YES if a price update on this PO line would be
1302: -- considered a retroactive price change, PO_CORE_S.G_PARAMETER_NO otherwise.
1303: --End of Comments
1304: -------------------------------------------------------------------------------
1305: PROCEDURE check_std_po_price_updateable (
1306: p_api_version IN NUMBER,

Line 1347: x_price_updateable := PO_CORE_S.G_PARAMETER_YES;

1343: END IF;
1344: x_return_status := FND_API.G_RET_STS_SUCCESS;
1345:
1346: -- Default: price updates allowed, no retroactive price change.
1347: x_price_updateable := PO_CORE_S.G_PARAMETER_YES;
1348: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;
1349:
1350: l_progress := '010';
1351:

Line 1348: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;

1344: x_return_status := FND_API.G_RET_STS_SUCCESS;
1345:
1346: -- Default: price updates allowed, no retroactive price change.
1347: x_price_updateable := PO_CORE_S.G_PARAMETER_YES;
1348: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;
1349:
1350: l_progress := '010';
1351:
1352: --

Line 1397: not (PO_CORE_S.is_encumbrance_on(p_doc_type => 'PO',

1393: ----------------------------------------------------------------------------
1394: l_progress := '020';
1395: IF (PO_RETROACTIVE_PRICING_PVT.get_retro_mode() = 'ALL_RELEASES') AND
1396: (l_archive_mode_std_po = 'APPROVE' ) AND
1397: not (PO_CORE_S.is_encumbrance_on(p_doc_type => 'PO',
1398: p_org_id => l_current_org_id)) AND
1399: -- Bug 3231062
1400: (PO_RETROACTIVE_PRICING_PVT.Is_Retro_Project_Allowed(
1401: p_std_po_price_change => 'Y',

Line 1406: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_YES;

1402: p_po_line_id => p_po_line_id,
1403: p_po_line_loc_id => null ) = 'Y')
1404: THEN
1405: -- Allow price updates. Remember this as a retroactive price change.
1406: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_YES;
1407:
1408: -- Bug 3339149
1409: IF (PO_RETROACTIVE_PRICING_PVT.Is_Adjustment_Account_Valid(
1410: p_std_po_price_change => 'Y',

Line 1415: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;

1411: p_po_line_id => p_po_line_id,
1412: p_po_line_loc_id => null ) = 'N')
1413: THEN
1414:
1415: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1416: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;
1417:
1418: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1419: FND_MESSAGE.set_name('PO','PO_RETRO_PRICING_NOT_ALLOWED');

Line 1416: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;

1412: p_po_line_loc_id => null ) = 'N')
1413: THEN
1414:
1415: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1416: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;
1417:
1418: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1419: FND_MESSAGE.set_name('PO','PO_RETRO_PRICING_NOT_ALLOWED');
1420: FND_MSG_PUB.add;

Line 1418: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN

1414:
1415: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1416: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;
1417:
1418: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1419: FND_MESSAGE.set_name('PO','PO_RETRO_PRICING_NOT_ALLOWED');
1420: FND_MSG_PUB.add;
1421: END IF;
1422: END IF;

Line 1435: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;

1431: AND ((NVL(quantity_received,0) > 0 AND accrue_on_receipt_flag = 'Y')
1432: OR (NVL(quantity_billed,0) > 0));
1433:
1434: IF (l_accrue_invoice_count > 0) THEN
1435: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1436: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1437: FND_MESSAGE.set_name('PO','PO_CHNG_PRICE_RESTRICTED');
1438: FND_MSG_PUB.add;
1439: END IF;

Line 1436: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN

1432: OR (NVL(quantity_billed,0) > 0));
1433:
1434: IF (l_accrue_invoice_count > 0) THEN
1435: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1436: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1437: FND_MESSAGE.set_name('PO','PO_CHNG_PRICE_RESTRICTED');
1438: FND_MSG_PUB.add;
1439: END IF;
1440: END IF;

Line 1450: AND (NVL(p_from_price_break, PO_CORE_S.G_PARAMETER_NO)

1446: -- Allow Price Override set to No.
1447: ----------------------------------------------------------------------------
1448: l_progress := '030';
1449: IF (l_has_ga_ref = 'Y')
1450: AND (NVL(p_from_price_break, PO_CORE_S.G_PARAMETER_NO)
1451: = PO_CORE_S.G_PARAMETER_NO)
1452: AND (l_allow_price_override = 'N') THEN
1453: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1454: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN

Line 1451: = PO_CORE_S.G_PARAMETER_NO)

1447: ----------------------------------------------------------------------------
1448: l_progress := '030';
1449: IF (l_has_ga_ref = 'Y')
1450: AND (NVL(p_from_price_break, PO_CORE_S.G_PARAMETER_NO)
1451: = PO_CORE_S.G_PARAMETER_NO)
1452: AND (l_allow_price_override = 'N') THEN
1453: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1454: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1455: FND_MESSAGE.set_name('PO','PO_CHNG_GA_NO_PRICE_OVERRIDE');

Line 1453: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;

1449: IF (l_has_ga_ref = 'Y')
1450: AND (NVL(p_from_price_break, PO_CORE_S.G_PARAMETER_NO)
1451: = PO_CORE_S.G_PARAMETER_NO)
1452: AND (l_allow_price_override = 'N') THEN
1453: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1454: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1455: FND_MESSAGE.set_name('PO','PO_CHNG_GA_NO_PRICE_OVERRIDE');
1456: FND_MSG_PUB.add;
1457: END IF;

Line 1454: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN

1450: AND (NVL(p_from_price_break, PO_CORE_S.G_PARAMETER_NO)
1451: = PO_CORE_S.G_PARAMETER_NO)
1452: AND (l_allow_price_override = 'N') THEN
1453: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1454: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1455: FND_MESSAGE.set_name('PO','PO_CHNG_GA_NO_PRICE_OVERRIDE');
1456: FND_MSG_PUB.add;
1457: END IF;
1458: END IF; -- l_has_ga_ref

Line 1479: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;

1475: OR NVL(quantity_billed,0) > 0
1476: );
1477:
1478: IF (l_accrue_invoice_count > 0) THEN
1479: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1480: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1481: FND_MESSAGE.set_name('PO','PO_CHNG_PRICE_RESTRICTED');
1482: FND_MSG_PUB.add;
1483: END IF;

Line 1480: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN

1476: );
1477:
1478: IF (l_accrue_invoice_count > 0) THEN
1479: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1480: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1481: FND_MESSAGE.set_name('PO','PO_CHNG_PRICE_RESTRICTED');
1482: FND_MSG_PUB.add;
1483: END IF;
1484: END IF;

Line 1509: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;

1505: AND RTI.po_line_location_id = PLL.line_location_id -- JOIN
1506: AND RTI.transaction_status_code = 'PENDING' );
1507:
1508: IF (l_pending_rcv_transactions > 0) THEN
1509: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1510: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1511: FND_MESSAGE.set_name('PO','PO_RCV_TRANSACTION_PENDING');
1512: FND_MSG_PUB.add;
1513: END IF;

Line 1510: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN

1506: AND RTI.transaction_status_code = 'PENDING' );
1507:
1508: IF (l_pending_rcv_transactions > 0) THEN
1509: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1510: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1511: FND_MESSAGE.set_name('PO','PO_RCV_TRANSACTION_PENDING');
1512: FND_MSG_PUB.add;
1513: END IF;
1514: END IF;

Line 1556: -- PO_CORE_S.G_PARAMETER_YES means that the price update is coming from a

1552: -- API version expected by the caller
1553: --p_line_location_id
1554: -- ID of a release shipment
1555: --p_from_price_break
1556: -- PO_CORE_S.G_PARAMETER_YES means that the price update is coming from a
1557: -- price break;
1558: -- PO_CORE_S.G_PARAMETER_NO means that the price update is coming from the user.
1559: --p_add_reasons_to_msg_list
1560: -- (Only applies if x_price_updateable = PO_CORE_S.G_PARAMETER_NO.)

Line 1558: -- PO_CORE_S.G_PARAMETER_NO means that the price update is coming from the user.

1554: -- ID of a release shipment
1555: --p_from_price_break
1556: -- PO_CORE_S.G_PARAMETER_YES means that the price update is coming from a
1557: -- price break;
1558: -- PO_CORE_S.G_PARAMETER_NO means that the price update is coming from the user.
1559: --p_add_reasons_to_msg_list
1560: -- (Only applies if x_price_updateable = PO_CORE_S.G_PARAMETER_NO.)
1561: -- If PO_CORE_S.G_PARAMETER_YES, the API will add the reasons why price updates
1562: -- are not allowed to the standard API message list; otherwise, the API will not

Line 1560: -- (Only applies if x_price_updateable = PO_CORE_S.G_PARAMETER_NO.)

1556: -- PO_CORE_S.G_PARAMETER_YES means that the price update is coming from a
1557: -- price break;
1558: -- PO_CORE_S.G_PARAMETER_NO means that the price update is coming from the user.
1559: --p_add_reasons_to_msg_list
1560: -- (Only applies if x_price_updateable = PO_CORE_S.G_PARAMETER_NO.)
1561: -- If PO_CORE_S.G_PARAMETER_YES, the API will add the reasons why price updates
1562: -- are not allowed to the standard API message list; otherwise, the API will not
1563: -- add the reasons to the message list.
1564: --OUT:

Line 1561: -- If PO_CORE_S.G_PARAMETER_YES, the API will add the reasons why price updates

1557: -- price break;
1558: -- PO_CORE_S.G_PARAMETER_NO means that the price update is coming from the user.
1559: --p_add_reasons_to_msg_list
1560: -- (Only applies if x_price_updateable = PO_CORE_S.G_PARAMETER_NO.)
1561: -- If PO_CORE_S.G_PARAMETER_YES, the API will add the reasons why price updates
1562: -- are not allowed to the standard API message list; otherwise, the API will not
1563: -- add the reasons to the message list.
1564: --OUT:
1565: --x_return_status

Line 1570: -- PO_CORE_S.G_PARAMETER_YES if price updates are allowed on this shipment,

1566: -- FND_API.G_RET_STS_SUCCESS if the API completed successfully.
1567: -- FND_API.G_RET_STS_ERROR if there was an error.
1568: -- FND_API.G_RET_STS_UNEXP_ERROR if there was an unexpected error.
1569: --x_price_updateable
1570: -- PO_CORE_S.G_PARAMETER_YES if price updates are allowed on this shipment,
1571: -- PO_CORE_S.G_PARAMETER_NO otherwise
1572: --x_retroactive_price_change
1573: -- PO_CORE_S.G_PARAMETER_YES if a price update on this release shipment would
1574: -- be considered a retroactive price change, PO_CORE_S.G_PARAMETER_NO otherwise.

Line 1571: -- PO_CORE_S.G_PARAMETER_NO otherwise

1567: -- FND_API.G_RET_STS_ERROR if there was an error.
1568: -- FND_API.G_RET_STS_UNEXP_ERROR if there was an unexpected error.
1569: --x_price_updateable
1570: -- PO_CORE_S.G_PARAMETER_YES if price updates are allowed on this shipment,
1571: -- PO_CORE_S.G_PARAMETER_NO otherwise
1572: --x_retroactive_price_change
1573: -- PO_CORE_S.G_PARAMETER_YES if a price update on this release shipment would
1574: -- be considered a retroactive price change, PO_CORE_S.G_PARAMETER_NO otherwise.
1575: --End of Comments

Line 1573: -- PO_CORE_S.G_PARAMETER_YES if a price update on this release shipment would

1569: --x_price_updateable
1570: -- PO_CORE_S.G_PARAMETER_YES if price updates are allowed on this shipment,
1571: -- PO_CORE_S.G_PARAMETER_NO otherwise
1572: --x_retroactive_price_change
1573: -- PO_CORE_S.G_PARAMETER_YES if a price update on this release shipment would
1574: -- be considered a retroactive price change, PO_CORE_S.G_PARAMETER_NO otherwise.
1575: --End of Comments
1576: -------------------------------------------------------------------------------
1577: PROCEDURE check_rel_price_updateable (

Line 1574: -- be considered a retroactive price change, PO_CORE_S.G_PARAMETER_NO otherwise.

1570: -- PO_CORE_S.G_PARAMETER_YES if price updates are allowed on this shipment,
1571: -- PO_CORE_S.G_PARAMETER_NO otherwise
1572: --x_retroactive_price_change
1573: -- PO_CORE_S.G_PARAMETER_YES if a price update on this release shipment would
1574: -- be considered a retroactive price change, PO_CORE_S.G_PARAMETER_NO otherwise.
1575: --End of Comments
1576: -------------------------------------------------------------------------------
1577: PROCEDURE check_rel_price_updateable (
1578: p_api_version IN NUMBER,

Line 1617: x_price_updateable := PO_CORE_S.G_PARAMETER_YES;

1613: END IF;
1614: x_return_status := FND_API.G_RET_STS_SUCCESS;
1615:
1616: -- Default: price updates allowed, no retroactive price change.
1617: x_price_updateable := PO_CORE_S.G_PARAMETER_YES;
1618: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;
1619:
1620: l_progress := '010';
1621:

Line 1618: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;

1614: x_return_status := FND_API.G_RET_STS_SUCCESS;
1615:
1616: -- Default: price updates allowed, no retroactive price change.
1617: x_price_updateable := PO_CORE_S.G_PARAMETER_YES;
1618: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;
1619:
1620: l_progress := '010';
1621:
1622: -- SQL What: Retrieve the GA flag and the Allow Price Override flag

Line 1656: not (PO_CORE_S.is_encumbrance_on(p_doc_type => 'RELEASE',

1652: ----------------------------------------------------------------------------
1653: l_progress := '020';
1654: IF (PO_RETROACTIVE_PRICING_PVT.get_retro_mode() = 'ALL_RELEASES') AND
1655: (l_archive_mode_rel = 'APPROVE') AND
1656: not (PO_CORE_S.is_encumbrance_on(p_doc_type => 'RELEASE',
1657: p_org_id => l_current_org_id)) AND
1658: -- Bug 3231062
1659: (PO_RETROACTIVE_PRICING_PVT.Is_Retro_Project_Allowed(
1660: p_std_po_price_change => 'N',

Line 1665: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_YES;

1661: p_po_line_id => null,
1662: p_po_line_loc_id => p_line_location_id ) = 'Y')
1663: THEN
1664: -- Allow price updates. Remember this as a retroactive price change.
1665: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_YES;
1666:
1667: -- Bug 3339149
1668: IF (PO_RETROACTIVE_PRICING_PVT.Is_Adjustment_Account_Valid(
1669: p_std_po_price_change => 'N',

Line 1674: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;

1670: p_po_line_id => null,
1671: p_po_line_loc_id => p_line_location_id ) = 'N')
1672: THEN
1673:
1674: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1675: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;
1676:
1677: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1678: FND_MESSAGE.set_name('PO','PO_RETRO_PRICING_NOT_ALLOWED');

Line 1675: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;

1671: p_po_line_loc_id => p_line_location_id ) = 'N')
1672: THEN
1673:
1674: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1675: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;
1676:
1677: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1678: FND_MESSAGE.set_name('PO','PO_RETRO_PRICING_NOT_ALLOWED');
1679: FND_MSG_PUB.add;

Line 1677: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN

1673:
1674: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1675: x_retroactive_price_change := PO_CORE_S.G_PARAMETER_NO;
1676:
1677: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1678: FND_MESSAGE.set_name('PO','PO_RETRO_PRICING_NOT_ALLOWED');
1679: FND_MSG_PUB.add;
1680: END IF;
1681: END IF;

Line 1686: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;

1682:
1683: ELSE
1684: IF ((l_qty_received > 0) AND (l_accrue_flag = 'Y'))
1685: OR (l_qty_billed > 0) THEN
1686: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1687: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1688: FND_MESSAGE.set_name('PO','PO_CHNG_PRICE_RESTRICTED');
1689: FND_MSG_PUB.add;
1690: END IF;

Line 1687: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN

1683: ELSE
1684: IF ((l_qty_received > 0) AND (l_accrue_flag = 'Y'))
1685: OR (l_qty_billed > 0) THEN
1686: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1687: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1688: FND_MESSAGE.set_name('PO','PO_CHNG_PRICE_RESTRICTED');
1689: FND_MSG_PUB.add;
1690: END IF;
1691: END IF;

Line 1699: IF (NVL(p_from_price_break, PO_CORE_S.G_PARAMETER_NO)

1695: -- Check: Do not allow shipment price changes (except those from price breaks)
1696: -- if the blanket line has Allow Price Override set to No.
1697: ----------------------------------------------------------------------------
1698: l_progress := '030';
1699: IF (NVL(p_from_price_break, PO_CORE_S.G_PARAMETER_NO)
1700: = PO_CORE_S.G_PARAMETER_NO)
1701: AND (l_allow_price_override = 'N') THEN
1702: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1703: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN

Line 1700: = PO_CORE_S.G_PARAMETER_NO)

1696: -- if the blanket line has Allow Price Override set to No.
1697: ----------------------------------------------------------------------------
1698: l_progress := '030';
1699: IF (NVL(p_from_price_break, PO_CORE_S.G_PARAMETER_NO)
1700: = PO_CORE_S.G_PARAMETER_NO)
1701: AND (l_allow_price_override = 'N') THEN
1702: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1703: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1704: FND_MESSAGE.set_name('PO','PO_CHNG_NO_PRICE_OVERRIDE');

Line 1702: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;

1698: l_progress := '030';
1699: IF (NVL(p_from_price_break, PO_CORE_S.G_PARAMETER_NO)
1700: = PO_CORE_S.G_PARAMETER_NO)
1701: AND (l_allow_price_override = 'N') THEN
1702: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1703: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1704: FND_MESSAGE.set_name('PO','PO_CHNG_NO_PRICE_OVERRIDE');
1705: FND_MSG_PUB.add;
1706: END IF;

Line 1703: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN

1699: IF (NVL(p_from_price_break, PO_CORE_S.G_PARAMETER_NO)
1700: = PO_CORE_S.G_PARAMETER_NO)
1701: AND (l_allow_price_override = 'N') THEN
1702: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1703: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1704: FND_MESSAGE.set_name('PO','PO_CHNG_NO_PRICE_OVERRIDE');
1705: FND_MSG_PUB.add;
1706: END IF;
1707: END IF;

Line 1728: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;

1724: WHERE RTI.po_line_location_id = p_line_location_id
1725: AND RTI.transaction_status_code = 'PENDING' );
1726:
1727: IF (l_pending_rcv_transactions > 0) THEN
1728: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1729: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1730: FND_MESSAGE.set_name('PO','PO_RCV_TRANSACTION_PENDING');
1731: FND_MSG_PUB.add;
1732: END IF;

Line 1729: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN

1725: AND RTI.transaction_status_code = 'PENDING' );
1726:
1727: IF (l_pending_rcv_transactions > 0) THEN
1728: x_price_updateable := PO_CORE_S.G_PARAMETER_NO;
1729: IF (p_add_reasons_to_msg_list = PO_CORE_S.G_PARAMETER_YES) THEN
1730: FND_MESSAGE.set_name('PO','PO_RCV_TRANSACTION_PENDING');
1731: FND_MSG_PUB.add;
1732: END IF;
1733: END IF;

Line 1792: x_price_updateable := PO_CORE_S.g_parameter_yes;

1788:
1789: d_progress := 20;
1790:
1791: IF (l_is_price_updateable) THEN
1792: x_price_updateable := PO_CORE_S.g_parameter_yes;
1793: ELSE
1794: x_price_updateable := PO_CORE_S.g_parameter_no;
1795: END IF;
1796:

Line 1794: x_price_updateable := PO_CORE_S.g_parameter_no;

1790:
1791: IF (l_is_price_updateable) THEN
1792: x_price_updateable := PO_CORE_S.g_parameter_yes;
1793: ELSE
1794: x_price_updateable := PO_CORE_S.g_parameter_no;
1795: END IF;
1796:
1797: d_progress := 30;
1798:

Line 1812: x_price_updateable := PO_CORE_S.g_parameter_no;

1808: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
1809: PO_LOG.proc_end(d_module);
1810: END IF;
1811: x_return_status := FND_API.g_ret_sts_unexp_error;
1812: x_price_updateable := PO_CORE_S.g_parameter_no;
1813: END;
1814: --
1815:
1816: -- Bug 5560980 START