215:
216: l_debug VARCHAR2(2000);
217:
218: BEGIN
219: -- Standard start of API savepoint
220: SAVEPOINT PROCESS_PC_HEADER_PUB;
221:
222: -- Standard call to check for call compatibility
223: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME)
218: BEGIN
219: -- Standard start of API savepoint
220: SAVEPOINT PROCESS_PC_HEADER_PUB;
221:
222: -- Standard call to check for call compatibility
223: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME)
224: THEN
225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
226: END IF;
341: THEN
342: RAISE FND_API.G_EXC_ERROR;
343: END IF;
344:
345: -- Standard check for p_commit
346: IF FND_API.To_Boolean (p_commit)
347: THEN
348: COMMIT WORK;
349: END IF;
347: THEN
348: COMMIT WORK;
349: END IF;
350:
351: -- Standard call to get message count and if count is 1, get message info
352: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
353: p_data => x_msg_data,
354: p_encoded => fnd_api.g_false );
355: