99: l_user_id fnd_user.user_id%TYPE;
100:
101: BEGIN
102:
103: -- Standard Start OF API savepoint
104: SAVEPOINT Inventory_Posting;
105: -- Standard call to check for call compatibility.
106: IF NOT FND_API.Compatible_API_CALL ( l_api_version
107: , p_api_version
101: BEGIN
102:
103: -- Standard Start OF API savepoint
104: SAVEPOINT Inventory_Posting;
105: -- Standard call to check for call compatibility.
106: IF NOT FND_API.Compatible_API_CALL ( l_api_version
107: , p_api_version
108: , l_api_name
109: , G_PKG_NAME
380: END LOOP;
381:
382: -- END of API Body
383:
384: -- Standard Check of p_commit.
385: IF FND_API.to_boolean(p_commit)
386: THEN
387: COMMIT WORK;
388: END IF;
407: FND_MESSAGE.SET_TOKEN('ITEM_NO',p_trans_rec.item_no);
408: FND_MESSAGE.SET_TOKEN('LOT_NO',p_trans_rec.lot_no);
409: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',p_trans_rec.sublot_no);
410: FND_MSG_PUB.Add;
411: -- Standard Call to get message count and if count is 1,
412: -- get message info.
413:
414: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
415: , p_count => x_msg_count