47: p_pkg_name => G_PKG_NAME,
48: p_procedure_name => l_api_name
49: );
50:
51: RAISE Fnd_Api.G_Exc_Unexpected_Error;
52:
53: END Check_Lock;
54:
55: ---------------------------------------------------------------------------
163: p_pkg_name => G_PKG_NAME,
164: p_procedure_name => l_api_name
165: );
166:
167: RAISE Fnd_Api.G_Exc_Unexpected_Error;
168:
169: END Validate_Project_Task;
170:
171: ---------------------------------------------------------------------------
171: ---------------------------------------------------------------------------
172:
173: PROCEDURE Create_Project_Funding
174: (
175: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_False,
176: p_validate_only IN VARCHAR2 := Fnd_Api.G_False,
177: p_commit IN VARCHAR2 := Fnd_Api.G_False,
178: x_rowid OUT NOCOPY VARCHAR2,
179: x_proposal_funding_id OUT NOCOPY NUMBER,
172:
173: PROCEDURE Create_Project_Funding
174: (
175: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_False,
176: p_validate_only IN VARCHAR2 := Fnd_Api.G_False,
177: p_commit IN VARCHAR2 := Fnd_Api.G_False,
178: x_rowid OUT NOCOPY VARCHAR2,
179: x_proposal_funding_id OUT NOCOPY NUMBER,
180: p_proposal_installment_id IN NUMBER,
173: PROCEDURE Create_Project_Funding
174: (
175: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_False,
176: p_validate_only IN VARCHAR2 := Fnd_Api.G_False,
177: p_commit IN VARCHAR2 := Fnd_Api.G_False,
178: x_rowid OUT NOCOPY VARCHAR2,
179: x_proposal_funding_id OUT NOCOPY NUMBER,
180: p_proposal_installment_id IN NUMBER,
181: p_project_number IN VARCHAR2,
209: /*
210: ** Initialize
211: */
212:
213: x_return_status := Fnd_Api.G_Ret_Sts_Success;
214:
215: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
216:
217: Fnd_Msg_Pub.Initialize;
211: */
212:
213: x_return_status := Fnd_Api.G_Ret_Sts_Success;
214:
215: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
216:
217: Fnd_Msg_Pub.Initialize;
218:
219: END IF;
236: */
237:
238: IF Fnd_Msg_Pub.Count_Msg > 0 THEN
239:
240: RAISE Fnd_Api.G_Exc_Error;
241:
242: END IF;
243:
244: SELECT count(1)
252: IF l_count > 0 THEN
253:
254: Fnd_Message.Set_Name('IGW','IGW_SS_PROJECT_FUNDING_LEVEL');
255: Fnd_Msg_Pub.Add;
256: RAISE Fnd_Api.G_Exc_Error;
257:
258: END IF;
259:
260:
261: /*
262: ** Discontinue processing if API invoked in validation mode
263: */
264:
265: IF Fnd_Api.To_Boolean(p_validate_only) THEN
266:
267: RETURN;
268:
269: END IF;
287: /*
288: ** Commit data if API invoked in commit mode
289: */
290:
291: IF Fnd_Api.To_Boolean(p_commit) THEN
292:
293: COMMIT;
294:
295: END IF;
296:
297:
298: EXCEPTION
299:
300: WHEN Fnd_Api.G_Exc_Error THEN
301:
302: ROLLBACK TO Create_Project_Funding_Pvt;
303:
304: x_return_status := Fnd_Api.G_Ret_Sts_Error;
300: WHEN Fnd_Api.G_Exc_Error THEN
301:
302: ROLLBACK TO Create_Project_Funding_Pvt;
303:
304: x_return_status := Fnd_Api.G_Ret_Sts_Error;
305:
306: Fnd_Msg_Pub.Count_And_Get
307: (
308: p_count => x_msg_count,
308: p_count => x_msg_count,
309: p_data => x_msg_data
310: );
311:
312: WHEN Fnd_Api.G_Exc_Unexpected_Error THEN
313:
314: ROLLBACK TO Create_Project_Funding_Pvt;
315:
316: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;
312: WHEN Fnd_Api.G_Exc_Unexpected_Error THEN
313:
314: ROLLBACK TO Create_Project_Funding_Pvt;
315:
316: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;
317:
318: Fnd_Msg_Pub.Count_And_Get
319: (
320: p_count => x_msg_count,
324: WHEN others THEN
325:
326: ROLLBACK TO Create_Project_Funding_Pvt;
327:
328: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;
329:
330: Fnd_Msg_Pub.Add_Exc_Msg
331: (
332: p_pkg_name => G_PKG_NAME,
344: ---------------------------------------------------------------------------
345:
346: PROCEDURE Update_Project_Funding
347: (
348: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_False,
349: p_validate_only IN VARCHAR2 := Fnd_Api.G_False,
350: p_commit IN VARCHAR2 := Fnd_Api.G_False,
351: p_rowid IN VARCHAR2,
352: p_proposal_funding_id IN NUMBER,
345:
346: PROCEDURE Update_Project_Funding
347: (
348: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_False,
349: p_validate_only IN VARCHAR2 := Fnd_Api.G_False,
350: p_commit IN VARCHAR2 := Fnd_Api.G_False,
351: p_rowid IN VARCHAR2,
352: p_proposal_funding_id IN NUMBER,
353: p_record_version_number IN NUMBER,
346: PROCEDURE Update_Project_Funding
347: (
348: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_False,
349: p_validate_only IN VARCHAR2 := Fnd_Api.G_False,
350: p_commit IN VARCHAR2 := Fnd_Api.G_False,
351: p_rowid IN VARCHAR2,
352: p_proposal_funding_id IN NUMBER,
353: p_record_version_number IN NUMBER,
354: p_proposal_installment_id IN NUMBER,
383: /*
384: ** Initialize
385: */
386:
387: x_return_status := Fnd_Api.G_Ret_Sts_Success;
388:
389: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
390:
391: Fnd_Msg_Pub.Initialize;
385: */
386:
387: x_return_status := Fnd_Api.G_Ret_Sts_Success;
388:
389: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
390:
391: Fnd_Msg_Pub.Initialize;
392:
393: END IF;
404: );
405:
406: IF Fnd_Msg_Pub.Count_Msg > 0 THEN
407:
408: RAISE Fnd_Api.G_Exc_Error;
409:
410: END IF;
411:
412: SELECT count(1)
421: IF l_count > 0 THEN
422:
423: Fnd_Message.Set_Name('IGW','IGW_SS_PROJECT_FUNDING_LEVEL');
424: Fnd_Msg_Pub.Add;
425: RAISE Fnd_Api.G_Exc_Error;
426:
427: END IF;
428:
429: /*
444:
445:
446: IF Fnd_Msg_Pub.Count_Msg > 0 THEN
447:
448: RAISE Fnd_Api.G_Exc_Error;
449:
450: END IF;
451:
452:
453: /*
454: ** Discontinue processing if API invoked in validation mode
455: */
456:
457: IF Fnd_Api.To_Boolean(p_validate_only) THEN
458:
459: RETURN;
460:
461: END IF;
481: /*
482: ** Commit data if API invoked in commit mode
483: */
484:
485: IF Fnd_Api.To_Boolean(p_commit) THEN
486:
487: COMMIT;
488:
489: END IF;
490:
491:
492: EXCEPTION
493:
494: WHEN Fnd_Api.G_Exc_Error THEN
495:
496: ROLLBACK TO Update_Project_Funding_Pvt;
497:
498: x_return_status := Fnd_Api.G_Ret_Sts_Error;
494: WHEN Fnd_Api.G_Exc_Error THEN
495:
496: ROLLBACK TO Update_Project_Funding_Pvt;
497:
498: x_return_status := Fnd_Api.G_Ret_Sts_Error;
499:
500: Fnd_Msg_Pub.Count_And_Get
501: (
502: p_count => x_msg_count,
502: p_count => x_msg_count,
503: p_data => x_msg_data
504: );
505:
506: WHEN Fnd_Api.G_Exc_Unexpected_Error THEN
507:
508: ROLLBACK TO Update_Project_Funding_Pvt;
509:
510: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;
506: WHEN Fnd_Api.G_Exc_Unexpected_Error THEN
507:
508: ROLLBACK TO Update_Project_Funding_Pvt;
509:
510: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;
511:
512: Fnd_Msg_Pub.Count_And_Get
513: (
514: p_count => x_msg_count,
518: WHEN others THEN
519:
520: ROLLBACK TO Update_Project_Funding_Pvt;
521:
522: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;
523:
524: Fnd_Msg_Pub.Add_Exc_Msg
525: (
526: p_pkg_name => G_PKG_NAME,
538: ---------------------------------------------------------------------------
539:
540: PROCEDURE Delete_Project_Funding
541: (
542: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_False,
543: p_validate_only IN VARCHAR2 := Fnd_Api.G_False,
544: p_commit IN VARCHAR2 := Fnd_Api.G_False,
545: p_rowid IN VARCHAR2,
546: p_record_version_number IN NUMBER,
539:
540: PROCEDURE Delete_Project_Funding
541: (
542: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_False,
543: p_validate_only IN VARCHAR2 := Fnd_Api.G_False,
544: p_commit IN VARCHAR2 := Fnd_Api.G_False,
545: p_rowid IN VARCHAR2,
546: p_record_version_number IN NUMBER,
547: x_return_status OUT NOCOPY VARCHAR2,
540: PROCEDURE Delete_Project_Funding
541: (
542: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_False,
543: p_validate_only IN VARCHAR2 := Fnd_Api.G_False,
544: p_commit IN VARCHAR2 := Fnd_Api.G_False,
545: p_rowid IN VARCHAR2,
546: p_record_version_number IN NUMBER,
547: x_return_status OUT NOCOPY VARCHAR2,
548: x_msg_count OUT NOCOPY NUMBER,
565: /*
566: ** Initialize
567: */
568:
569: x_return_status := Fnd_Api.G_Ret_Sts_Success;
570:
571: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
572:
573: Fnd_Msg_Pub.Initialize;
567: */
568:
569: x_return_status := Fnd_Api.G_Ret_Sts_Success;
570:
571: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
572:
573: Fnd_Msg_Pub.Initialize;
574:
575: END IF;
591: */
592:
593: IF Fnd_Msg_Pub.Count_Msg > 0 THEN
594:
595: RAISE Fnd_Api.G_Exc_Error;
596:
597: END IF;
598:
599:
600: /*
601: ** Discontinue processing if API invoked in validation mode
602: */
603:
604: IF Fnd_Api.To_Boolean(p_validate_only) THEN
605:
606: RETURN;
607:
608: END IF;
622: /*
623: ** Commit data if API invoked in commit mode
624: */
625:
626: IF Fnd_Api.To_Boolean(p_commit) THEN
627:
628: COMMIT;
629:
630: END IF;
631:
632:
633: EXCEPTION
634:
635: WHEN Fnd_Api.G_Exc_Error THEN
636:
637: ROLLBACK TO Delete_Project_Funding_Pvt;
638:
639: x_return_status := Fnd_Api.G_Ret_Sts_Error;
635: WHEN Fnd_Api.G_Exc_Error THEN
636:
637: ROLLBACK TO Delete_Project_Funding_Pvt;
638:
639: x_return_status := Fnd_Api.G_Ret_Sts_Error;
640:
641: Fnd_Msg_Pub.Count_And_Get
642: (
643: p_count => x_msg_count,
643: p_count => x_msg_count,
644: p_data => x_msg_data
645: );
646:
647: WHEN Fnd_Api.G_Exc_Unexpected_Error THEN
648:
649: ROLLBACK TO Delete_Project_Funding_Pvt;
650:
651: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;
647: WHEN Fnd_Api.G_Exc_Unexpected_Error THEN
648:
649: ROLLBACK TO Delete_Project_Funding_Pvt;
650:
651: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;
652:
653: Fnd_Msg_Pub.Count_And_Get
654: (
655: p_count => x_msg_count,
659: WHEN others THEN
660:
661: ROLLBACK TO Delete_Project_Funding_Pvt;
662:
663: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;
664:
665: Fnd_Msg_Pub.Add_Exc_Msg
666: (
667: p_pkg_name => G_PKG_NAME,