[Home] [Help]
22: )
23: IS
24: l_looped VARCHAR2(1);
25: Begin
26: pa_debug.set_err_stack('CHECK_LOOPED_PROJECT');
27:
28: --Block to check if this project is looped.
29: Begin
30: --check if it is looped
82:
83: x_msg_count := 0;
84: x_msg_data := null;
85:
86: pa_debug.reset_err_stack;
87: EXCEPTION
88: When OTHERS Then
89: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
90: RAISE;
185: -- Bug5589038 connect by PRIOR object_id_from2 = object_id_to1;
186: connect by PRIOR object_id_from2 = object_id_to2;
187:
188: Begin
189: pa_debug.set_err_stack('CHECK_MERGED_PROJECT');
190: --Block to check if this project is linked.
191: Begin
192: OPEN get_same_project(p_task_id, to_char(p_project_id));
193: FETCH get_same_project into l_exist;
221: END;
222:
223: x_msg_count := 0;
224: x_msg_data := null;
225: pa_debug.reset_err_stack;
226: EXCEPTION
227: When OTHERS Then
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
229: RAISE;
241: msg_count NUMBER;
242: msg_data VARCHAR2(2000);
243: ret_status VARCHAR2(10);
244: BEGIN
245: pa_debug.set_err_stack('CHECK_PROJECT_CONTRACT_EXISTS');
246: retval := FND_API.G_RET_STS_SUCCESS;
247:
248: /*
249: -- Old code
267: retval := FND_API.G_RET_STS_SUCCESS;
268: END IF;
269:
270:
271: pa_debug.reset_err_stack;
272: return retval;
273: EXCEPTION
274: When OTHERS Then
275: return FND_API.G_RET_STS_UNEXP_ERROR;
287: msg_count NUMBER;
288: msg_data VARCHAR2(2000);
289: ret_status VARCHAR2(10);
290: BEGIN
291: pa_debug.set_err_stack('CHECK_TASK_CONTRACT_EXISTS');
292: retval := FND_API.G_RET_STS_SUCCESS;
293:
294: /*
295: -- Old code
311: -- no association exists, return success
312: retval := FND_API.G_RET_STS_SUCCESS;
313: END IF;
314:
315: pa_debug.reset_err_stack;
316: return retval;
317: EXCEPTION
318: When OTHERS Then
319: return FND_API.G_RET_STS_UNEXP_ERROR;