105:
106: x_job_return_status VARCHAR2(1);
107: l_mr_asso_tbl AHL_PRD_NONROUTINE_PVT.MR_Association_tbl_type;
108: BEGIN
109: -- Standard start of API savepoint
110: SAVEPOINT CREATE_NON_ROUTINE_SP;
111:
112: -- Initialize return status to success before any code logic/validation
113: x_return_status:= FND_API.G_RET_STS_SUCCESS;
111:
112: -- Initialize return status to success before any code logic/validation
113: x_return_status:= FND_API.G_RET_STS_SUCCESS;
114:
115: -- Standard call to check for call compatibility
116: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
117: THEN
118: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
119: END IF;
262: COMMIT WORK;
263: END IF;
264: END IF;
265:
266: -- Standard check of p_commit
267: IF FND_API.TO_BOOLEAN(p_commit) THEN
268: COMMIT WORK;
269: END IF;
270: