[Home] [Help]
206:
207:
208: BEGIN
209: l_return_status := fnd_api.g_ret_sts_success;
210: -- Standard start of API savepoint
211: SAVEPOINT Get_ReceivingUnitPrice_GRP;
212:
213: l_stmt_num := 0;
214:
216: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,G_LOG_HEAD || '.'||l_api_name||'.begin'
217: ,'Get_ReceivingUnitPrice <<');
218: END IF;
219:
220: -- Standard call to check for call compatibility
221: IF NOT FND_API.Compatible_API_Call (
222: l_api_version,
223: p_api_version,
224: l_api_name,
555: END IF; -- l_po_org_id <> l_rcv_org_id
556: ELSE
557: -- Transaction was done after Patchset J and it relates to global procurement
558: -- RAE.unit_price can be used.
559: -- A sum is necessary here since in the case of a standard receipt,
560: -- you could have multiple events - one for each distribution. */
561: -- Added organization check so adjust events in global procurement
562: -- scenarios would get excluded.
563:
717: ,l_api_message);
718: END IF;
719:
720:
721: --- Standard check of p_commit
722: IF FND_API.to_Boolean(p_commit) THEN
723: COMMIT WORK;
724: END IF;
725:
723: COMMIT WORK;
724: END IF;
725:
726:
727: -- Standard Call to get message count and if count = 1, get message info
728: FND_MSG_PUB.Count_And_Get (
729: p_count => x_msg_count,
730: p_data => x_msg_data );
731:
816: BEGIN
817: -- Establish API Savepoint
818: SAVEPOINT Validate_PO_Purge;
819:
820: -- Standard call to check for call compatibility
821: l_stmt_num := 10;
822: IF NOT FND_API.Compatible_API_Call ( l_api_version,
823: p_api_version,
824: l_api_name,
847: EXIT WHEN l_index = p_purge_in_rec.entity_ids.LAST;
848: l_index := p_purge_in_rec.entity_ids.NEXT(l_index);
849: END LOOP;
850:
851: --- Standard check of p_commit
852: IF FND_API.to_Boolean(p_commit) THEN
853: COMMIT WORK;
854: END IF;
855:
913: BEGIN
914: -- Establish API Savepoint
915: SAVEPOINT Purge;
916:
917: -- Standard call to check for call compatibility
918: l_stmt_num := 10;
919: IF NOT FND_API.Compatible_API_Call ( l_api_version,
920: p_api_version,
921: l_api_name,
951: EXCEPTION
952: WHEN OTHERS THEN
953: RAISE DELETE_FAILED;
954: END;
955: --- Standard check of p_commit
956: IF FND_API.to_Boolean(p_commit) THEN
957: COMMIT WORK;
958: END IF;
959: