DBA Data[Home] [Help]

APPS.PN_LEASE_PUB dependencies on FND_MSG_PUB

Line 56: fnd_msg_pub.initialize;

52: -- Initialize message list if p_init_msg_list is set to TRUE
53: IF fnd_api.to_boolean (p_init_msg_list)
54: THEN
55: ----dbms_output.put_line('Hello:1');
56: fnd_msg_pub.initialize;
57: END IF;
58:
59: -- Standard call to check for call compatibility
60: IF NOT fnd_api.compatible_api_call (l_api_version

Line 80: fnd_msg_pub.ADD;

76: IF NVL (mo_global.check_valid_org (g_org_id), 'N') <> 'Y'
77: THEN
78:
79: fnd_message.set_name ('MO', 'MO_ORG_INVALID');
80: fnd_msg_pub.ADD;
81: RAISE fnd_api.g_exc_error;
82: END IF;
83:
84: /*********************************************/

Line 322: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

318: THEN
319: COMMIT;
320: END IF;
321:
322: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
323: , p_count => x_msg_count
324: , p_data => x_msg_data
325: );
326:

Line 333: fnd_msg_pub.get (p_msg_index => i

329: ----dbms_output.put_line('hello:2');
330: FOR i IN 1..x_msg_count LOOP
331: ----dbms_output.put_line('hello:3');
332: -- Standard call to get message count and if count is 1, get message info
333: fnd_msg_pub.get (p_msg_index => i
334: , p_encoded => 'F'
335: , p_data => x_msg_data
336: , p_msg_index_out => x_msg_count
337: );

Line 347: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

343: --test_lease(1,'In Public:3');
344: EXCEPTION
345: WHEN fnd_api.g_exc_error
346: THEN
347: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
348: , p_count => x_msg_count
349: , p_data => x_msg_data
350: );
351: --ROLLBACK TO update_lease_pub;

Line 357: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

353: ------dbms_output.put_line('In Public:fnd_api.g_exc_error'||x_return_status);
354: --RAISE;
355: WHEN fnd_api.g_exc_unexpected_error
356: THEN
357: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
358: , p_count => x_msg_count
359: , p_data => x_msg_data
360: );
361: --ROLLBACK TO update_lease_pub;

Line 370: fnd_msg_pub.ADD;

366: THEN
367: --ROLLBACK TO update_lease_pub;
368: fnd_message.set_name ('PN', 'PN_API_UNKNOWN_ERROR');
369: fnd_message.set_token ('P_TEXT', SQLERRM);
370: fnd_msg_pub.ADD;
371: x_return_status := fnd_api.g_ret_sts_error;
372: --RAISE;
373: END create_lease;
374:

Line 421: fnd_msg_pub.initialize;

417: --test_lease(1,'In Public-01:'||p_lease_rec.lease_id);
418: -- Initialize message list if p_init_msg_list is set to TRUE
419: IF fnd_api.to_boolean (p_init_msg_list)
420: THEN
421: fnd_msg_pub.initialize;
422: END IF;
423:
424: IF l_debug_mode = 'Y'
425: THEN

Line 459: fnd_msg_pub.ADD;

455: p_lease_rec.lease_id := NULL;
456: fnd_message.set_name ('PN', 'PN_API_ALL_NULL_PARAMETER');
457: fnd_message.set_token ('API_NAME', l_api_name_full);
458: fnd_message.set_token ('NULL_PARAM', 'LEASE NAME:NULL');
459: fnd_msg_pub.ADD;
460: RAISE fnd_api.g_exc_error;
461: WHEN TOO_MANY_ROWS THEN
462: fnd_message.set_name ('PN', 'PN_API_ALL_NULL_PARAMETER');
463: fnd_message.set_token ('API_NAME', l_api_name_full);

Line 465: fnd_msg_pub.ADD;

461: WHEN TOO_MANY_ROWS THEN
462: fnd_message.set_name ('PN', 'PN_API_ALL_NULL_PARAMETER');
463: fnd_message.set_token ('API_NAME', l_api_name_full);
464: fnd_message.set_token ('NULL_PARAM', 'LEASE NAME:NOT UNIQUE');
465: fnd_msg_pub.ADD;
466: RAISE fnd_api.g_exc_error;
467: END;
468: ELSIF(p_lease_rec.lease_num IS NOT NULL AND p_lease_rec.lease_num <> pn_lease_utils.g_pn_miss_char) THEN
469: BEGIN

Line 481: fnd_msg_pub.ADD;

477: p_lease_rec.lease_id := NULL;
478: fnd_message.set_name ('PN', 'PN_API_ALL_NULL_PARAMETER');
479: fnd_message.set_token ('API_NAME', l_api_name_full);
480: fnd_message.set_token ('NULL_PARAM', 'LEASE NAME:NULL');
481: fnd_msg_pub.ADD;
482: RAISE fnd_api.g_exc_error;
483: END;
484: END IF;
485: END IF;

Line 520: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

516: THEN
517: COMMIT;
518: END IF;
519:
520: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
521: , p_count => x_msg_count
522: , p_data => x_msg_data
523: );
524: ----dbms_output.put_line('In Public:AFTER Calling PVT Update:2');--Rupak

Line 528: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

524: ----dbms_output.put_line('In Public:AFTER Calling PVT Update:2');--Rupak
525: EXCEPTION
526: WHEN fnd_api.g_exc_error
527: THEN
528: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
529: , p_count => x_msg_count
530: , p_data => x_msg_data
531: );
532: --ROLLBACK TO update_lease_pub;

Line 538: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

534: ------dbms_output.put_line('In Public:fnd_api.g_exc_error'||x_return_status);
535: --RAISE;
536: WHEN fnd_api.g_exc_unexpected_error
537: THEN
538: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
539: , p_count => x_msg_count
540: , p_data => x_msg_data
541: );
542: --ROLLBACK TO update_lease_pub;

Line 551: fnd_msg_pub.ADD;

547: THEN
548: --ROLLBACK TO update_lease_pub;
549: fnd_message.set_name ('PN', 'PN_API_UNKNOWN_ERROR');
550: fnd_message.set_token ('P_TEXT', SQLERRM);
551: fnd_msg_pub.ADD;
552: x_return_status := fnd_api.g_ret_sts_error;
553: --RAISE;
554: END update_lease;
555:

Line 583: fnd_msg_pub.initialize;

579: BEGIN
580: l_debug_mode := NVL (fnd_profile.VALUE ('PN_DEBUG_MODE'), 'N');
581: IF fnd_api.to_boolean (p_init_msg_list)
582: THEN
583: fnd_msg_pub.initialize;
584: END IF;
585:
586: IF l_debug_mode = 'Y'
587: THEN

Line 622: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

618: COMMIT;
619: END IF;
620: ------dbms_output.put_line (' IN Public :AFTER Call of the Procedure:create_lease');
621:
622: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
623: , p_count => x_msg_count
624: , p_data => x_msg_data
625: );
626:

Line 631: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

627:
628: EXCEPTION
629: WHEN fnd_api.g_exc_error
630: THEN
631: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
632: , p_count => x_msg_count
633: , p_data => x_msg_data
634: );
635: --ROLLBACK TO update_lease_pub;

Line 641: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

637: ------dbms_output.put_line('In Public:fnd_api.g_exc_error'||x_return_status);
638: --RAISE;
639: WHEN fnd_api.g_exc_unexpected_error
640: THEN
641: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
642: , p_count => x_msg_count
643: , p_data => x_msg_data
644: );
645: --ROLLBACK TO update_lease_pub;

Line 652: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

648: --RAISE;
649: WHEN OTHERS THEN
650: x_return_status := fnd_api.g_ret_sts_error;
651:
652: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
653: , p_count => x_msg_count
654: , p_data => x_msg_data
655: );
656:

Line 659: fnd_msg_pub.ADD;

655: );
656:
657: fnd_message.set_name ('PN', 'PN_API_UNKNOWN_ERROR');
658: fnd_message.set_token ('P_TEXT', SQLERRM);
659: fnd_msg_pub.ADD;
660: --RAISE;
661: END create_terms;
662:
663: -- Procedure to update an payment terms

Line 690: fnd_msg_pub.initialize;

686: BEGIN
687: l_debug_mode := NVL (fnd_profile.VALUE ('PN_DEBUG_MODE'), 'N');
688: IF fnd_api.to_boolean (p_init_msg_list)
689: THEN
690: fnd_msg_pub.initialize;
691: END IF;
692:
693: IF l_debug_mode = 'Y'
694: THEN

Line 729: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

725: THEN
726: COMMIT;
727: END IF;
728:
729: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
730: , p_count => x_msg_count
731: , p_data => x_msg_data
732: );
733:

Line 738: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

734: ------dbms_output.put_line (' IN Public :AFTER Call of the Procedure:update_lease');
735: EXCEPTION
736: WHEN fnd_api.g_exc_error
737: THEN
738: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
739: , p_count => x_msg_count
740: , p_data => x_msg_data
741: );
742: --ROLLBACK TO update_lease_pub;

Line 748: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

744: ------dbms_output.put_line('In Public:fnd_api.g_exc_error'||x_return_status);
745: --RAISE;
746: WHEN fnd_api.g_exc_unexpected_error
747: THEN
748: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
749: , p_count => x_msg_count
750: , p_data => x_msg_data
751: );
752: --ROLLBACK TO update_lease_pub;

Line 759: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

755: --RAISE;
756: WHEN OTHERS THEN
757: x_return_status := fnd_api.g_ret_sts_error;
758:
759: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
760: , p_count => x_msg_count
761: , p_data => x_msg_data
762: );
763:

Line 766: fnd_msg_pub.ADD;

762: );
763:
764: fnd_message.set_name ('PN', 'PN_API_UNKNOWN_ERROR');
765: fnd_message.set_token ('P_TEXT', SQLERRM);
766: fnd_msg_pub.ADD;
767: --RAISE;
768: ------dbms_output.put_line (' EXCEPTION:IN Public :update_lease'||SQLERRM);
769: END update_terms;
770:

Line 814: fnd_msg_pub.initialize;

810: THEN
811:
812: pn_lease_pvt.pvt_debug (g_pkg_name||'.'|| g_program_unit || ' - Initializing message list', 3);
813:
814: fnd_msg_pub.initialize;
815: END IF;
816:
817: -- Standard call to check for call compatibility
818: IF NOT fnd_api.compatible_api_call (l_api_version

Line 832: fnd_msg_pub.ADD;

828: IF NVL (mo_global.check_valid_org (g_org_id), 'N') <> 'Y'
829: THEN
830:
831: fnd_message.set_name ('MO', 'MO_ORG_INVALID');
832: fnd_msg_pub.ADD;
833: RAISE fnd_api.g_exc_error;
834: END IF;
835:
836: /*********************************************/

Line 897: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

893: COMMIT;
894: END IF;
895:
896: -- Get the messages and count from the message stack
897: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
898: , p_count => x_msg_count
899: , p_data => x_msg_data
900: );
901:

Line 905: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

901:
902: EXCEPTION
903: WHEN fnd_api.g_exc_error
904: THEN
905: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
906: , p_count => x_msg_count
907: , p_data => x_msg_data
908: );
909: --ROLLBACK TO update_status;

Line 916: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false

912:
913: RAISE;
914: WHEN fnd_api.g_exc_unexpected_error
915: THEN
916: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false
917: , p_count => x_msg_count
918: , p_data => x_msg_data
919: );
920: --ROLLBACK TO update_status;

Line 929: fnd_msg_pub.ADD;

925: THEN
926: --ROLLBACK TO update_status;
927: fnd_message.set_name ('PN', 'PN_API_UNKNOWN_ERROR');
928: fnd_message.set_token ('P_TEXT', SQLERRM);
929: fnd_msg_pub.ADD;
930: x_return_status := fnd_api.g_ret_sts_error;
931: pn_lease_pvt.pvt_debug (g_pkg_name||'.'|| g_program_unit || ' - In public update_status api: unknown error '||x_return_status, 3);
932: RAISE;
933: END update_status;