653: New_Line;
654:
655: Pkg_End('QP_BUILD_FORMULA_RULES_TMP', 'BODY');
656:
657: FND_MESSAGE.SET_NAME('QP','QP_BUILD_FORMULAS_SUCCESS');
658: err_buff := FND_MESSAGE.GET;
659: PUT_LINE(err_buff);
660: retcode := 0;
661: oe_debug_pub.add('##### ' || err_buff || ' #####');
654:
655: Pkg_End('QP_BUILD_FORMULA_RULES_TMP', 'BODY');
656:
657: FND_MESSAGE.SET_NAME('QP','QP_BUILD_FORMULAS_SUCCESS');
658: err_buff := FND_MESSAGE.GET;
659: PUT_LINE(err_buff);
660: retcode := 0;
661: oe_debug_pub.add('##### ' || err_buff || ' #####');
662: oe_debug_pub.add('##### End Build Formulas #####');
663:
664: EXCEPTION
665:
666: WHEN FND_API.G_EXC_ERROR THEN
667: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_SOURCING_ERROR');
668: FND_MESSAGE.SET_TOKEN('PACKAGE_TYPE','BODY');
669: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','QP_BUILD_FORMULA_RULES');
670: FND_MESSAGE.SET_TOKEN('ERRMSG',substr(SQLERRM,1,150));
671: err_buff := FND_MESSAGE.GET;
664: EXCEPTION
665:
666: WHEN FND_API.G_EXC_ERROR THEN
667: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_SOURCING_ERROR');
668: FND_MESSAGE.SET_TOKEN('PACKAGE_TYPE','BODY');
669: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','QP_BUILD_FORMULA_RULES');
670: FND_MESSAGE.SET_TOKEN('ERRMSG',substr(SQLERRM,1,150));
671: err_buff := FND_MESSAGE.GET;
672: PUT_LINE(err_buff);
665:
666: WHEN FND_API.G_EXC_ERROR THEN
667: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_SOURCING_ERROR');
668: FND_MESSAGE.SET_TOKEN('PACKAGE_TYPE','BODY');
669: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','QP_BUILD_FORMULA_RULES');
670: FND_MESSAGE.SET_TOKEN('ERRMSG',substr(SQLERRM,1,150));
671: err_buff := FND_MESSAGE.GET;
672: PUT_LINE(err_buff);
673: retcode := 2;
666: WHEN FND_API.G_EXC_ERROR THEN
667: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_SOURCING_ERROR');
668: FND_MESSAGE.SET_TOKEN('PACKAGE_TYPE','BODY');
669: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','QP_BUILD_FORMULA_RULES');
670: FND_MESSAGE.SET_TOKEN('ERRMSG',substr(SQLERRM,1,150));
671: err_buff := FND_MESSAGE.GET;
672: PUT_LINE(err_buff);
673: retcode := 2;
674: oe_debug_pub.add('##### ' || err_buff || ' #####');
667: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_SOURCING_ERROR');
668: FND_MESSAGE.SET_TOKEN('PACKAGE_TYPE','BODY');
669: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','QP_BUILD_FORMULA_RULES');
670: FND_MESSAGE.SET_TOKEN('ERRMSG',substr(SQLERRM,1,150));
671: err_buff := FND_MESSAGE.GET;
672: PUT_LINE(err_buff);
673: retcode := 2;
674: oe_debug_pub.add('##### ' || err_buff || ' #####');
675: oe_debug_pub.add('##### End Build Formulas #####');
674: oe_debug_pub.add('##### ' || err_buff || ' #####');
675: oe_debug_pub.add('##### End Build Formulas #####');
676:
677: WHEN OTHERS THEN
678: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_SOURCING_ERROR');
679: FND_MESSAGE.SET_TOKEN('PACKAGE_TYPE','BODY');
680: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','QP_BUILD_FORMULA_RULES');
681: FND_MESSAGE.SET_TOKEN('ERRMSG',substr(SQLERRM,1,150));
682: err_buff := FND_MESSAGE.GET;
675: oe_debug_pub.add('##### End Build Formulas #####');
676:
677: WHEN OTHERS THEN
678: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_SOURCING_ERROR');
679: FND_MESSAGE.SET_TOKEN('PACKAGE_TYPE','BODY');
680: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','QP_BUILD_FORMULA_RULES');
681: FND_MESSAGE.SET_TOKEN('ERRMSG',substr(SQLERRM,1,150));
682: err_buff := FND_MESSAGE.GET;
683: PUT_LINE(err_buff);
676:
677: WHEN OTHERS THEN
678: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_SOURCING_ERROR');
679: FND_MESSAGE.SET_TOKEN('PACKAGE_TYPE','BODY');
680: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','QP_BUILD_FORMULA_RULES');
681: FND_MESSAGE.SET_TOKEN('ERRMSG',substr(SQLERRM,1,150));
682: err_buff := FND_MESSAGE.GET;
683: PUT_LINE(err_buff);
684: retcode := 2;
677: WHEN OTHERS THEN
678: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_SOURCING_ERROR');
679: FND_MESSAGE.SET_TOKEN('PACKAGE_TYPE','BODY');
680: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','QP_BUILD_FORMULA_RULES');
681: FND_MESSAGE.SET_TOKEN('ERRMSG',substr(SQLERRM,1,150));
682: err_buff := FND_MESSAGE.GET;
683: PUT_LINE(err_buff);
684: retcode := 2;
685: oe_debug_pub.add('##### ' || err_buff || ' #####');
678: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_SOURCING_ERROR');
679: FND_MESSAGE.SET_TOKEN('PACKAGE_TYPE','BODY');
680: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','QP_BUILD_FORMULA_RULES');
681: FND_MESSAGE.SET_TOKEN('ERRMSG',substr(SQLERRM,1,150));
682: err_buff := FND_MESSAGE.GET;
683: PUT_LINE(err_buff);
684: retcode := 2;
685: oe_debug_pub.add('##### ' || err_buff || ' #####');
686: oe_debug_pub.add('##### End Build Formulas #####');