78: v_ErrorCode NUMBER;
79: v_ErrorText VARCHAR2(200);
80:
81: BEGIN
82: --Standard Savepoint
83: SAVEPOINT validProcedure;
84:
85: -- Standard call to check for call compatibility.
86: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
81: BEGIN
82: --Standard Savepoint
83: SAVEPOINT validProcedure;
84:
85: -- Standard call to check for call compatibility.
86: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
87: p_api_version_number,
88: l_api_name,
89: G_PKG_NAME)
291:
292: logMessage VARCHAR2(2000);
293: -- l_error_text varchar2(2000);
294: BEGIN
295: -- Standard Start of API savepoint
296: SAVEPOINT run_Procedure_PVT;
297:
298: -- Standard call to check for call compatibility.
299: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
294: BEGIN
295: -- Standard Start of API savepoint
296: SAVEPOINT run_Procedure_PVT;
297:
298: -- Standard call to check for call compatibility.
299: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
300: p_api_version_number,
301: l_api_name,
302: G_PKG_NAME)
393: end if;
394:
395: DBMS_SQL.close_cursor(l_Cursor);
396:
397: -- Standard Check Of p_commit.
398: IF FND_API.To_Boolean(p_commit) THEN
399: COMMIT WORK;
400: END IF;
401:
398: IF FND_API.To_Boolean(p_commit) THEN
399: COMMIT WORK;
400: END IF;
401:
402: -- Standard callto get message count and if count is 1, get message info.
403: FND_MSG_PUB.Count_And_Get
404: ( p_count => x_msg_count,
405: p_data => x_msg_data
406: );