48: BEGIN
49: /* Set return status to success initially */
50: x_return_status := fnd_api.g_ret_sts_success;
51:
52: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
53: gme_debug.put_line ( 'Check if flexfield is enabled : '
54: || desc_flex_name);
55: END IF;
56:
49: /* Set return status to success initially */
50: x_return_status := fnd_api.g_ret_sts_success;
51:
52: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
53: gme_debug.put_line ( 'Check if flexfield is enabled : '
54: || desc_flex_name);
55: END IF;
56:
57: OPEN cur_get_appl_id;
61:
62: CLOSE cur_get_appl_id;
63:
64: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
65: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
66: gme_debug.put_line
67: ('Flexfield is not enabled, No validation required.');
68: END IF;
69:
62: CLOSE cur_get_appl_id;
63:
64: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
65: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
66: gme_debug.put_line
67: ('Flexfield is not enabled, No validation required.');
68: END IF;
69:
70: RETURN;
73: /* Bug 3575735 - Do not run this validation if it is set to N. */
74: /* It should only be set to N if it is a value set flexfield */
75: /* with a where clause using block fields from the form. */
76: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
77: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
78: gme_debug.put_line
79: ('GME Flexfield is not enabled, No validation required.');
80: END IF;
81:
74: /* It should only be set to N if it is a value set flexfield */
75: /* with a where clause using block fields from the form. */
76: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
77: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
78: gme_debug.put_line
79: ('GME Flexfield is not enabled, No validation required.');
80: END IF;
81:
82: RETURN;
86: ,l_batch_header_row) THEN
87: RAISE header_fetch_error;
88: END IF;
89:
90: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
91: gme_debug.put_line ( 'Validation of the Flex field : '
92: || desc_flex_name);
93: gme_debug.put_line
94: ('Assignment of the attribute Category And Attribute Values to Local Variables');
87: RAISE header_fetch_error;
88: END IF;
89:
90: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
91: gme_debug.put_line ( 'Validation of the Flex field : '
92: || desc_flex_name);
93: gme_debug.put_line
94: ('Assignment of the attribute Category And Attribute Values to Local Variables');
95: END IF;
89:
90: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
91: gme_debug.put_line ( 'Validation of the Flex field : '
92: || desc_flex_name);
93: gme_debug.put_line
94: ('Assignment of the attribute Category And Attribute Values to Local Variables');
95: END IF;
96:
97: l_attribute_category := p_batch_header.attribute_category;
102: ELSIF p_batch_header.attribute_category = fnd_api.g_miss_char THEN
103: l_attribute_category := '';
104: END IF;
105:
106: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
107: gme_debug.put_line
108: ('setting set column values for the context value,for Global Data Elements and for context code.');
109: END IF;
110:
103: l_attribute_category := '';
104: END IF;
105:
106: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
107: gme_debug.put_line
108: ('setting set column values for the context value,for Global Data Elements and for context code.');
109: END IF;
110:
111: fnd_flex_descval.set_context_value (l_attribute_category);
589: fnd_flex_descval.set_column_value ('ATTRIBUTE40'
590: ,p_batch_header.attribute40);
591: END IF;
592:
593: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
594: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
595: END IF;
596:
597: IF fnd_flex_descval.validate_desccols
590: ,p_batch_header.attribute40);
591: END IF;
592:
593: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
594: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
595: END IF;
596:
597: IF fnd_flex_descval.validate_desccols
598: (appl_short_name => appl_short_name
599: ,desc_flex_name => desc_flex_name
600: ,values_or_ids => values_or_ids
601: ,validation_date => validation_date) THEN
602: --SUCCESS
603: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
604: gme_debug.put_line ('Validation Success. ');
605: END IF;
606:
607: x_return_status := fnd_api.g_ret_sts_success;
600: ,values_or_ids => values_or_ids
601: ,validation_date => validation_date) THEN
602: --SUCCESS
603: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
604: gme_debug.put_line ('Validation Success. ');
605: END IF;
606:
607: x_return_status := fnd_api.g_ret_sts_success;
608: n := fnd_flex_descval.segment_count;
697: END LOOP;
698: ELSE
699: error_msg := fnd_flex_descval.error_message;
700:
701: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
702: gme_debug.put_line ('Validation Ends With Error(s) :');
703: gme_debug.put_line ('Error :' || error_msg);
704: END IF;
705:
698: ELSE
699: error_msg := fnd_flex_descval.error_message;
700:
701: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
702: gme_debug.put_line ('Validation Ends With Error(s) :');
703: gme_debug.put_line ('Error :' || error_msg);
704: END IF;
705:
706: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
699: error_msg := fnd_flex_descval.error_message;
700:
701: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
702: gme_debug.put_line ('Validation Ends With Error(s) :');
703: gme_debug.put_line ('Error :' || error_msg);
704: END IF;
705:
706: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
707: ,'MSG'
708: ,error_msg);
709: RAISE validation_error;
710: END IF;
711:
712: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
713: gme_debug.put_line ( 'Validation completed for the Flex field : '
714: || desc_flex_name);
715: END IF;
716: EXCEPTION
709: RAISE validation_error;
710: END IF;
711:
712: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
713: gme_debug.put_line ( 'Validation completed for the Flex field : '
714: || desc_flex_name);
715: END IF;
716: EXCEPTION
717: WHEN validation_error THEN
714: || desc_flex_name);
715: END IF;
716: EXCEPTION
717: WHEN validation_error THEN
718: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
719: gme_debug.put_line
720: ( 'Validation completed with errors for the Flex field : '
721: || desc_flex_name);
722: END IF;
715: END IF;
716: EXCEPTION
717: WHEN validation_error THEN
718: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
719: gme_debug.put_line
720: ( 'Validation completed with errors for the Flex field : '
721: || desc_flex_name);
722: END IF;
723:
724: x_return_status := fnd_api.g_ret_sts_error;
725: WHEN header_fetch_error THEN
726: x_return_status := fnd_api.g_ret_sts_error;
727: WHEN OTHERS THEN
728: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
729: gme_debug.put_line ( g_pkg_name
730: || '.'
731: || desc_flex_name
732: || ': '
725: WHEN header_fetch_error THEN
726: x_return_status := fnd_api.g_ret_sts_error;
727: WHEN OTHERS THEN
728: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
729: gme_debug.put_line ( g_pkg_name
730: || '.'
731: || desc_flex_name
732: || ': '
733: || 'in unexpected error');
797: BEGIN
798: /* Set return status to success initially */
799: x_return_status := fnd_api.g_ret_sts_success;
800:
801: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
802: gme_debug.put_line ( 'Check if flexfield is enabled : '
803: || desc_flex_name);
804: END IF;
805:
798: /* Set return status to success initially */
799: x_return_status := fnd_api.g_ret_sts_success;
800:
801: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
802: gme_debug.put_line ( 'Check if flexfield is enabled : '
803: || desc_flex_name);
804: END IF;
805:
806: OPEN cur_get_appl_id;
810:
811: CLOSE cur_get_appl_id;
812:
813: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
814: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
815: gme_debug.put_line
816: ('Flexfield is not enabled, No validation required.');
817: END IF;
818:
811: CLOSE cur_get_appl_id;
812:
813: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
814: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
815: gme_debug.put_line
816: ('Flexfield is not enabled, No validation required.');
817: END IF;
818:
819: RETURN;
833: END IF;
834:
835: CLOSE cur_record_exists;
836:
837: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
838: gme_debug.put_line ( 'Validation of the Flex field : '
839: || desc_flex_name);
840: gme_debug.put_line
841: ('Assignment of the attribute Category And Attribute Values to Local Variables');
834:
835: CLOSE cur_record_exists;
836:
837: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
838: gme_debug.put_line ( 'Validation of the Flex field : '
839: || desc_flex_name);
840: gme_debug.put_line
841: ('Assignment of the attribute Category And Attribute Values to Local Variables');
842: END IF;
836:
837: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
838: gme_debug.put_line ( 'Validation of the Flex field : '
839: || desc_flex_name);
840: gme_debug.put_line
841: ('Assignment of the attribute Category And Attribute Values to Local Variables');
842: END IF;
843:
844: /* Bug 3649415 - Retain all current flexfield values in l_batch_step_row. */
853: ELSE
854: l_attribute_category := p_batch_step.attribute_category;
855: END IF;
856:
857: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
858: gme_debug.put_line
859: ('setting set column values for the context value,for Global Data Elements and for context code.');
860: END IF;
861:
854: l_attribute_category := p_batch_step.attribute_category;
855: END IF;
856:
857: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
858: gme_debug.put_line
859: ('setting set column values for the context value,for Global Data Elements and for context code.');
860: END IF;
861:
862: fnd_flex_descval.set_context_value (l_attribute_category);
1286: /* It should only be set to N if it is a value set flexfield */
1287: /* with a where clause using block fields from the form. */
1288: /* Pass back all flexfield values w/ no validation. */
1289: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
1290: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1291: gme_debug.put_line
1292: ('GME Flexfield is not enabled, No validation required.');
1293: END IF;
1294:
1287: /* with a where clause using block fields from the form. */
1288: /* Pass back all flexfield values w/ no validation. */
1289: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
1290: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1291: gme_debug.put_line
1292: ('GME Flexfield is not enabled, No validation required.');
1293: END IF;
1294:
1295: /* Bug 3681718 - Only update flex field columns in x_ OUT parameter. */
1327: x_batch_step.attribute30 := l_batch_step_row.attribute30;
1328: RETURN;
1329: END IF;
1330:
1331: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1332: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
1333: END IF;
1334:
1335: IF fnd_flex_descval.validate_desccols
1328: RETURN;
1329: END IF;
1330:
1331: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1332: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
1333: END IF;
1334:
1335: IF fnd_flex_descval.validate_desccols
1336: (appl_short_name => appl_short_name
1337: ,desc_flex_name => desc_flex_name
1338: ,values_or_ids => values_or_ids
1339: ,validation_date => validation_date) THEN
1340: --SUCCESS
1341: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1342: gme_debug.put_line ('Validation Success ');
1343: END IF;
1344:
1345: x_return_status := fnd_api.g_ret_sts_success;
1338: ,values_or_ids => values_or_ids
1339: ,validation_date => validation_date) THEN
1340: --SUCCESS
1341: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1342: gme_debug.put_line ('Validation Success ');
1343: END IF;
1344:
1345: x_return_status := fnd_api.g_ret_sts_success;
1346: n := fnd_flex_descval.segment_count;
1415: END LOOP;
1416: ELSE
1417: error_msg := fnd_flex_descval.error_message;
1418:
1419: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1420: gme_debug.put_line ('Validation Ends With Error(s) :');
1421: gme_debug.put_line ('Error :' || error_msg);
1422: END IF;
1423:
1416: ELSE
1417: error_msg := fnd_flex_descval.error_message;
1418:
1419: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1420: gme_debug.put_line ('Validation Ends With Error(s) :');
1421: gme_debug.put_line ('Error :' || error_msg);
1422: END IF;
1423:
1424: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
1417: error_msg := fnd_flex_descval.error_message;
1418:
1419: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1420: gme_debug.put_line ('Validation Ends With Error(s) :');
1421: gme_debug.put_line ('Error :' || error_msg);
1422: END IF;
1423:
1424: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
1425: ,'MSG'
1426: ,error_msg);
1427: RAISE validation_error;
1428: END IF;
1429:
1430: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1431: gme_debug.put_line ( 'Validation completed for the Flex field : '
1432: || desc_flex_name);
1433: END IF;
1434: EXCEPTION
1427: RAISE validation_error;
1428: END IF;
1429:
1430: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1431: gme_debug.put_line ( 'Validation completed for the Flex field : '
1432: || desc_flex_name);
1433: END IF;
1434: EXCEPTION
1435: WHEN validation_error THEN
1432: || desc_flex_name);
1433: END IF;
1434: EXCEPTION
1435: WHEN validation_error THEN
1436: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1437: gme_debug.put_line
1438: ( 'Validation completed with errors for the Flex field : '
1439: || desc_flex_name);
1440: END IF;
1433: END IF;
1434: EXCEPTION
1435: WHEN validation_error THEN
1436: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1437: gme_debug.put_line
1438: ( 'Validation completed with errors for the Flex field : '
1439: || desc_flex_name);
1440: END IF;
1441:
1442: x_return_status := fnd_api.g_ret_sts_error;
1443: WHEN step_fetch_error THEN
1444: x_return_status := fnd_api.g_ret_sts_error;
1445: WHEN OTHERS THEN
1446: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1447: gme_debug.put_line ( g_pkg_name
1448: || '.'
1449: || desc_flex_name
1450: || ': '
1443: WHEN step_fetch_error THEN
1444: x_return_status := fnd_api.g_ret_sts_error;
1445: WHEN OTHERS THEN
1446: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1447: gme_debug.put_line ( g_pkg_name
1448: || '.'
1449: || desc_flex_name
1450: || ': '
1451: || 'in unexpected error');
1516: BEGIN
1517: /* Set return status to success initially */
1518: x_return_status := fnd_api.g_ret_sts_success;
1519:
1520: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1521: gme_debug.put_line ( 'Check if flexfield is enabled : '
1522: || desc_flex_name);
1523: END IF;
1524:
1517: /* Set return status to success initially */
1518: x_return_status := fnd_api.g_ret_sts_success;
1519:
1520: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1521: gme_debug.put_line ( 'Check if flexfield is enabled : '
1522: || desc_flex_name);
1523: END IF;
1524:
1525: OPEN cur_get_appl_id;
1529:
1530: CLOSE cur_get_appl_id;
1531:
1532: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
1533: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1534: gme_debug.put_line
1535: ('Flexfield is not enabled, No validation required.');
1536: END IF;
1537:
1530: CLOSE cur_get_appl_id;
1531:
1532: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
1533: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1534: gme_debug.put_line
1535: ('Flexfield is not enabled, No validation required.');
1536: END IF;
1537:
1538: RETURN;
1553: END IF;
1554:
1555: CLOSE cur_record_exists;
1556:
1557: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1558: gme_debug.put_line ( 'Validation of the Flex field : '
1559: || desc_flex_name);
1560: gme_debug.put_line
1561: ('Assignment of the attribute Category And Attribute Values to Local Variables');
1554:
1555: CLOSE cur_record_exists;
1556:
1557: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1558: gme_debug.put_line ( 'Validation of the Flex field : '
1559: || desc_flex_name);
1560: gme_debug.put_line
1561: ('Assignment of the attribute Category And Attribute Values to Local Variables');
1562: END IF;
1556:
1557: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1558: gme_debug.put_line ( 'Validation of the Flex field : '
1559: || desc_flex_name);
1560: gme_debug.put_line
1561: ('Assignment of the attribute Category And Attribute Values to Local Variables');
1562: END IF;
1563:
1564: /* Bug 3649415 - Retain all current flexfield values in l_step_activities_row.*/
1573: ELSE
1574: l_attribute_category := p_step_activities.attribute_category;
1575: END IF;
1576:
1577: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1578: gme_debug.put_line
1579: ('setting set column values for the context value,for Global Data Elements and for context code.');
1580: END IF;
1581:
1574: l_attribute_category := p_step_activities.attribute_category;
1575: END IF;
1576:
1577: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1578: gme_debug.put_line
1579: ('setting set column values for the context value,for Global Data Elements and for context code.');
1580: END IF;
1581:
1582: fnd_flex_descval.set_context_value (l_attribute_category);
2006: /* It should only be set to N if it is a value set flexfield */
2007: /* with a where clause using block fields from the form. */
2008: /* Pass back all flexfield values w/ no validation. */
2009: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
2010: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2011: gme_debug.put_line
2012: ('GME Flexfield is not enabled, No validation required.');
2013: END IF;
2014:
2007: /* with a where clause using block fields from the form. */
2008: /* Pass back all flexfield values w/ no validation. */
2009: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
2010: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2011: gme_debug.put_line
2012: ('GME Flexfield is not enabled, No validation required.');
2013: END IF;
2014:
2015: /* Bug 3681718 - Only update flex field columns in x_ OUT parameter. */
2047: x_step_activities.attribute30 := l_step_activities_row.attribute30;
2048: RETURN;
2049: END IF;
2050:
2051: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2052: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
2053: END IF;
2054:
2055: IF fnd_flex_descval.validate_desccols
2048: RETURN;
2049: END IF;
2050:
2051: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2052: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
2053: END IF;
2054:
2055: IF fnd_flex_descval.validate_desccols
2056: (appl_short_name => appl_short_name
2057: ,desc_flex_name => desc_flex_name
2058: ,values_or_ids => values_or_ids
2059: ,validation_date => validation_date) THEN
2060: --SUCCESS
2061: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2062: gme_debug.put_line ('Validation Success ');
2063: END IF;
2064:
2065: x_return_status := fnd_api.g_ret_sts_success;
2058: ,values_or_ids => values_or_ids
2059: ,validation_date => validation_date) THEN
2060: --SUCCESS
2061: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2062: gme_debug.put_line ('Validation Success ');
2063: END IF;
2064:
2065: x_return_status := fnd_api.g_ret_sts_success;
2066: n := fnd_flex_descval.segment_count;
2165: END LOOP;
2166: ELSE
2167: error_msg := fnd_flex_descval.error_message;
2168:
2169: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2170: gme_debug.put_line ('Validation Ends With Error(s) :');
2171: gme_debug.put_line ('Error :' || error_msg);
2172: END IF;
2173:
2166: ELSE
2167: error_msg := fnd_flex_descval.error_message;
2168:
2169: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2170: gme_debug.put_line ('Validation Ends With Error(s) :');
2171: gme_debug.put_line ('Error :' || error_msg);
2172: END IF;
2173:
2174: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
2167: error_msg := fnd_flex_descval.error_message;
2168:
2169: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2170: gme_debug.put_line ('Validation Ends With Error(s) :');
2171: gme_debug.put_line ('Error :' || error_msg);
2172: END IF;
2173:
2174: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
2175: ,'MSG'
2176: ,error_msg);
2177: RAISE validation_error;
2178: END IF;
2179:
2180: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2181: gme_debug.put_line ( 'Validation completed for the Flex field : '
2182: || desc_flex_name);
2183: END IF;
2184: EXCEPTION
2177: RAISE validation_error;
2178: END IF;
2179:
2180: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2181: gme_debug.put_line ( 'Validation completed for the Flex field : '
2182: || desc_flex_name);
2183: END IF;
2184: EXCEPTION
2185: WHEN validation_error THEN
2182: || desc_flex_name);
2183: END IF;
2184: EXCEPTION
2185: WHEN validation_error THEN
2186: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2187: gme_debug.put_line
2188: ( 'Validation completed with errors for the Flex field : '
2189: || desc_flex_name);
2190: END IF;
2183: END IF;
2184: EXCEPTION
2185: WHEN validation_error THEN
2186: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2187: gme_debug.put_line
2188: ( 'Validation completed with errors for the Flex field : '
2189: || desc_flex_name);
2190: END IF;
2191:
2192: x_return_status := fnd_api.g_ret_sts_error;
2193: WHEN step_fetch_error THEN
2194: x_return_status := fnd_api.g_ret_sts_error;
2195: WHEN OTHERS THEN
2196: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2197: gme_debug.put_line ( g_pkg_name
2198: || '.'
2199: || desc_flex_name
2200: || ': '
2193: WHEN step_fetch_error THEN
2194: x_return_status := fnd_api.g_ret_sts_error;
2195: WHEN OTHERS THEN
2196: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2197: gme_debug.put_line ( g_pkg_name
2198: || '.'
2199: || desc_flex_name
2200: || ': '
2201: || 'in unexpected error');
2267: BEGIN
2268: /* Set return status to success initially */
2269: x_return_status := fnd_api.g_ret_sts_success;
2270:
2271: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2272: gme_debug.put_line ( 'Check if flexfield is enabled : '
2273: || desc_flex_name);
2274: END IF;
2275:
2268: /* Set return status to success initially */
2269: x_return_status := fnd_api.g_ret_sts_success;
2270:
2271: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2272: gme_debug.put_line ( 'Check if flexfield is enabled : '
2273: || desc_flex_name);
2274: END IF;
2275:
2276: OPEN cur_get_appl_id;
2280:
2281: CLOSE cur_get_appl_id;
2282:
2283: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
2284: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2285: gme_debug.put_line
2286: ('Flexfield is not enabled, No validation required.');
2287: END IF;
2288:
2281: CLOSE cur_get_appl_id;
2282:
2283: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
2284: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2285: gme_debug.put_line
2286: ('Flexfield is not enabled, No validation required.');
2287: END IF;
2288:
2289: RETURN;
2304: END IF;
2305:
2306: CLOSE cur_record_exists;
2307:
2308: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2309: gme_debug.put_line ( 'Validation of the Flex field : '
2310: || desc_flex_name);
2311: gme_debug.put_line
2312: ('Assignment of the attribute Category And Attribute Values to Local Variables');
2305:
2306: CLOSE cur_record_exists;
2307:
2308: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2309: gme_debug.put_line ( 'Validation of the Flex field : '
2310: || desc_flex_name);
2311: gme_debug.put_line
2312: ('Assignment of the attribute Category And Attribute Values to Local Variables');
2313: END IF;
2307:
2308: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2309: gme_debug.put_line ( 'Validation of the Flex field : '
2310: || desc_flex_name);
2311: gme_debug.put_line
2312: ('Assignment of the attribute Category And Attribute Values to Local Variables');
2313: END IF;
2314:
2315: x_step_resources := p_step_resources;
2326: ELSE
2327: l_attribute_category := p_step_resources.attribute_category;
2328: END IF;
2329:
2330: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2331: gme_debug.put_line
2332: ('setting set column values for the context value,for Global Data Elements and for context code.');
2333: END IF;
2334:
2327: l_attribute_category := p_step_resources.attribute_category;
2328: END IF;
2329:
2330: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2331: gme_debug.put_line
2332: ('setting set column values for the context value,for Global Data Elements and for context code.');
2333: END IF;
2334:
2335: fnd_flex_descval.set_context_value (l_attribute_category);
2759: /* It should only be set to N if it is a value set flexfield */
2760: /* with a where clause using block fields from the form. */
2761: /* Pass back all flexfield values w/ no validation. */
2762: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
2763: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2764: gme_debug.put_line
2765: ('GME Flexfield is not enabled, No validation required.');
2766: END IF;
2767:
2760: /* with a where clause using block fields from the form. */
2761: /* Pass back all flexfield values w/ no validation. */
2762: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
2763: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2764: gme_debug.put_line
2765: ('GME Flexfield is not enabled, No validation required.');
2766: END IF;
2767:
2768: /* Bug 3681718 - Only update flex field columns in x_ OUT parameter. */
2800: x_step_resources.attribute30 := l_step_resource_row.attribute30;
2801: RETURN;
2802: END IF;
2803:
2804: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2805: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
2806: END IF;
2807:
2808: IF fnd_flex_descval.validate_desccols
2801: RETURN;
2802: END IF;
2803:
2804: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2805: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
2806: END IF;
2807:
2808: IF fnd_flex_descval.validate_desccols
2809: (appl_short_name => appl_short_name
2810: ,desc_flex_name => desc_flex_name
2811: ,values_or_ids => values_or_ids
2812: ,validation_date => validation_date) THEN
2813: --SUCCESS
2814: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2815: gme_debug.put_line ('Validation Success ');
2816: END IF;
2817:
2818: x_return_status := fnd_api.g_ret_sts_success;
2811: ,values_or_ids => values_or_ids
2812: ,validation_date => validation_date) THEN
2813: --SUCCESS
2814: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2815: gme_debug.put_line ('Validation Success ');
2816: END IF;
2817:
2818: x_return_status := fnd_api.g_ret_sts_success;
2819: n := fnd_flex_descval.segment_count;
2909: END LOOP;
2910: ELSE
2911: error_msg := fnd_flex_descval.error_message;
2912:
2913: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2914: gme_debug.put_line ('Validation Ends With Error(s) :');
2915: gme_debug.put_line ('Error :' || error_msg);
2916: END IF;
2917:
2910: ELSE
2911: error_msg := fnd_flex_descval.error_message;
2912:
2913: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2914: gme_debug.put_line ('Validation Ends With Error(s) :');
2915: gme_debug.put_line ('Error :' || error_msg);
2916: END IF;
2917:
2918: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
2911: error_msg := fnd_flex_descval.error_message;
2912:
2913: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2914: gme_debug.put_line ('Validation Ends With Error(s) :');
2915: gme_debug.put_line ('Error :' || error_msg);
2916: END IF;
2917:
2918: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
2919: ,'MSG'
2920: ,error_msg);
2921: RAISE validation_error;
2922: END IF;
2923:
2924: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2925: gme_debug.put_line ( 'Validation completed for the Flex field : '
2926: || desc_flex_name);
2927: END IF;
2928: EXCEPTION
2921: RAISE validation_error;
2922: END IF;
2923:
2924: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2925: gme_debug.put_line ( 'Validation completed for the Flex field : '
2926: || desc_flex_name);
2927: END IF;
2928: EXCEPTION
2929: WHEN validation_error THEN
2926: || desc_flex_name);
2927: END IF;
2928: EXCEPTION
2929: WHEN validation_error THEN
2930: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2931: gme_debug.put_line
2932: ( 'Validation completed with errors for the Flex field : '
2933: || desc_flex_name);
2934: END IF;
2927: END IF;
2928: EXCEPTION
2929: WHEN validation_error THEN
2930: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2931: gme_debug.put_line
2932: ( 'Validation completed with errors for the Flex field : '
2933: || desc_flex_name);
2934: END IF;
2935:
2936: x_return_status := fnd_api.g_ret_sts_error;
2937: WHEN step_fetch_error THEN
2938: x_return_status := fnd_api.g_ret_sts_error;
2939: WHEN OTHERS THEN
2940: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2941: gme_debug.put_line ( g_pkg_name
2942: || '.'
2943: || desc_flex_name
2944: || ': '
2937: WHEN step_fetch_error THEN
2938: x_return_status := fnd_api.g_ret_sts_error;
2939: WHEN OTHERS THEN
2940: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2941: gme_debug.put_line ( g_pkg_name
2942: || '.'
2943: || desc_flex_name
2944: || ': '
2945: || 'in unexpected error');
2995: BEGIN
2996: /* Set return status to success initially */
2997: x_return_status := fnd_api.g_ret_sts_success;
2998:
2999: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3000: gme_debug.put_line ( 'Check if flexfield is enabled : '
3001: || desc_flex_name);
3002: END IF;
3003:
2996: /* Set return status to success initially */
2997: x_return_status := fnd_api.g_ret_sts_success;
2998:
2999: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3000: gme_debug.put_line ( 'Check if flexfield is enabled : '
3001: || desc_flex_name);
3002: END IF;
3003:
3004: OPEN cur_get_appl_id;
3008:
3009: CLOSE cur_get_appl_id;
3010:
3011: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
3012: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3013: gme_debug.put_line
3014: ('Flexfield is not enabled, No validation required.');
3015: END IF;
3016:
3009: CLOSE cur_get_appl_id;
3010:
3011: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
3012: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3013: gme_debug.put_line
3014: ('Flexfield is not enabled, No validation required.');
3015: END IF;
3016:
3017: RETURN;
3031: END IF;
3032:
3033: CLOSE cur_record_exists;
3034:
3035: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3036: gme_debug.put_line ( 'Validation of the Flex field : '
3037: || desc_flex_name);
3038: gme_debug.put_line
3039: ('Assignment of the attribute Category And Attribute Values to Local Variables');
3032:
3033: CLOSE cur_record_exists;
3034:
3035: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3036: gme_debug.put_line ( 'Validation of the Flex field : '
3037: || desc_flex_name);
3038: gme_debug.put_line
3039: ('Assignment of the attribute Category And Attribute Values to Local Variables');
3040: END IF;
3034:
3035: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3036: gme_debug.put_line ( 'Validation of the Flex field : '
3037: || desc_flex_name);
3038: gme_debug.put_line
3039: ('Assignment of the attribute Category And Attribute Values to Local Variables');
3040: END IF;
3041:
3042: IF p_resource_txn_rec.attribute_category IS NULL THEN
3047: l_attribute_category := p_resource_txn_rec.attribute_category;
3048: END IF;
3049:
3050: /* end */
3051: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3052: gme_debug.put_line
3053: ('setting set column values for the context value,for Global Data Elements and for context code.');
3054: END IF;
3055:
3048: END IF;
3049:
3050: /* end */
3051: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3052: gme_debug.put_line
3053: ('setting set column values for the context value,for Global Data Elements and for context code.');
3054: END IF;
3055:
3056: fnd_flex_descval.set_context_value (l_attribute_category);
3417: END IF;
3418:
3419: --FPBug#4395561 modified following if condition to consider global flex field validate flag
3420: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
3421: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3422: gme_debug.put_line
3423: ('GME Flexfield is not enabled, No validation required.');
3424: END IF;
3425:
3418:
3419: --FPBug#4395561 modified following if condition to consider global flex field validate flag
3420: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
3421: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3422: gme_debug.put_line
3423: ('GME Flexfield is not enabled, No validation required.');
3424: END IF;
3425:
3426: x_resource_txn_rec.attribute_category :=
3457: x_resource_txn_rec.attribute30 := l_resource_txn_rec.attribute30;
3458: RETURN;
3459: END IF;
3460:
3461: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3462: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
3463: END IF;
3464:
3465: IF fnd_flex_descval.validate_desccols
3458: RETURN;
3459: END IF;
3460:
3461: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3462: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
3463: END IF;
3464:
3465: IF fnd_flex_descval.validate_desccols
3466: (appl_short_name => appl_short_name
3467: ,desc_flex_name => desc_flex_name
3468: ,values_or_ids => values_or_ids
3469: ,validation_date => validation_date) THEN
3470: --SUCCESS
3471: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3472: gme_debug.put_line ('Validation Success ');
3473: END IF;
3474:
3475: x_return_status := fnd_api.g_ret_sts_success;
3468: ,values_or_ids => values_or_ids
3469: ,validation_date => validation_date) THEN
3470: --SUCCESS
3471: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3472: gme_debug.put_line ('Validation Success ');
3473: END IF;
3474:
3475: x_return_status := fnd_api.g_ret_sts_success;
3476: n := fnd_flex_descval.segment_count;
3575: END LOOP;
3576: ELSE
3577: error_msg := fnd_flex_descval.error_message;
3578:
3579: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3580: gme_debug.put_line ('Validation Ends With Error(s) :');
3581: gme_debug.put_line ('Error :' || error_msg);
3582: END IF;
3583:
3576: ELSE
3577: error_msg := fnd_flex_descval.error_message;
3578:
3579: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3580: gme_debug.put_line ('Validation Ends With Error(s) :');
3581: gme_debug.put_line ('Error :' || error_msg);
3582: END IF;
3583:
3584: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
3577: error_msg := fnd_flex_descval.error_message;
3578:
3579: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3580: gme_debug.put_line ('Validation Ends With Error(s) :');
3581: gme_debug.put_line ('Error :' || error_msg);
3582: END IF;
3583:
3584: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
3585: ,'MSG'
3586: ,error_msg);
3587: RAISE validation_error;
3588: END IF;
3589:
3590: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3591: gme_debug.put_line ( 'Validation completed for the Flex field : '
3592: || desc_flex_name);
3593: END IF;
3594: EXCEPTION
3587: RAISE validation_error;
3588: END IF;
3589:
3590: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3591: gme_debug.put_line ( 'Validation completed for the Flex field : '
3592: || desc_flex_name);
3593: END IF;
3594: EXCEPTION
3595: WHEN validation_error THEN
3592: || desc_flex_name);
3593: END IF;
3594: EXCEPTION
3595: WHEN validation_error THEN
3596: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3597: gme_debug.put_line
3598: ( 'Validation completed with errors for the Flex field : '
3599: || desc_flex_name);
3600: END IF;
3593: END IF;
3594: EXCEPTION
3595: WHEN validation_error THEN
3596: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3597: gme_debug.put_line
3598: ( 'Validation completed with errors for the Flex field : '
3599: || desc_flex_name);
3600: END IF;
3601:
3602: x_return_status := fnd_api.g_ret_sts_error;
3603: WHEN step_fetch_error THEN
3604: x_return_status := fnd_api.g_ret_sts_error;
3605: WHEN OTHERS THEN
3606: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3607: gme_debug.put_line ( g_pkg_name
3608: || '.'
3609: || desc_flex_name
3610: || ': '
3603: WHEN step_fetch_error THEN
3604: x_return_status := fnd_api.g_ret_sts_error;
3605: WHEN OTHERS THEN
3606: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3607: gme_debug.put_line ( g_pkg_name
3608: || '.'
3609: || desc_flex_name
3610: || ': '
3611: || 'in unexpected error');
3657: BEGIN
3658: /* Set return status to success initially */
3659: x_return_status := fnd_api.g_ret_sts_success;
3660:
3661: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3662: gme_debug.put_line ( 'Check if flexfield is enabled : '
3663: || desc_flex_name);
3664: END IF;
3665:
3658: /* Set return status to success initially */
3659: x_return_status := fnd_api.g_ret_sts_success;
3660:
3661: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3662: gme_debug.put_line ( 'Check if flexfield is enabled : '
3663: || desc_flex_name);
3664: END IF;
3665:
3666: OPEN cur_get_appl_id;
3670:
3671: CLOSE cur_get_appl_id;
3672:
3673: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
3674: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3675: gme_debug.put_line
3676: ('Flexfield is not enabled, No validation required.');
3677: END IF;
3678:
3671: CLOSE cur_get_appl_id;
3672:
3673: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
3674: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3675: gme_debug.put_line
3676: ('Flexfield is not enabled, No validation required.');
3677: END IF;
3678:
3679: RETURN;
3686: ELSE
3687: l_material_detail_rec := p_material_detail_rec;
3688: END IF;
3689:
3690: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3691: gme_debug.put_line ( 'Validation of the Flex field : '
3692: || desc_flex_name);
3693: gme_debug.put_line
3694: ('Assignment of the attribute Category And Attribute Values to Local Variables');
3687: l_material_detail_rec := p_material_detail_rec;
3688: END IF;
3689:
3690: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3691: gme_debug.put_line ( 'Validation of the Flex field : '
3692: || desc_flex_name);
3693: gme_debug.put_line
3694: ('Assignment of the attribute Category And Attribute Values to Local Variables');
3695: END IF;
3689:
3690: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3691: gme_debug.put_line ( 'Validation of the Flex field : '
3692: || desc_flex_name);
3693: gme_debug.put_line
3694: ('Assignment of the attribute Category And Attribute Values to Local Variables');
3695: END IF;
3696:
3697: IF p_material_detail_rec.attribute_category IS NULL THEN
3702: ELSE
3703: l_attribute_category := p_material_detail_rec.attribute_category;
3704: END IF;
3705:
3706: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3707: gme_debug.put_line
3708: ('setting set column values for the context value,for Global Data Elements and for context code.');
3709: END IF;
3710:
3703: l_attribute_category := p_material_detail_rec.attribute_category;
3704: END IF;
3705:
3706: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
3707: gme_debug.put_line
3708: ('setting set column values for the context value,for Global Data Elements and for context code.');
3709: END IF;
3710:
3711: fnd_flex_descval.set_context_value (l_attribute_category);
4133:
4134: /* if gme_common_pvt.g_flex_validate_prof is 0 then no validation required so
4135: copy values back */
4136: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
4137: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4138: gme_debug.put_line
4139: ('GME Flexfield is not enabled, No validation required.');
4140: END IF;
4141:
4134: /* if gme_common_pvt.g_flex_validate_prof is 0 then no validation required so
4135: copy values back */
4136: IF gme_common_pvt.g_flex_validate_prof = 0 THEN
4137: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4138: gme_debug.put_line
4139: ('GME Flexfield is not enabled, No validation required.');
4140: END IF;
4141:
4142: /* only flex field values will be copied back */
4174: x_material_detail_rec.attribute30 := l_material_detail_rec.attribute30;
4175: RETURN;
4176: END IF;
4177:
4178: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4179: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
4180: END IF;
4181:
4182: IF fnd_flex_descval.validate_desccols
4175: RETURN;
4176: END IF;
4177:
4178: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4179: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
4180: END IF;
4181:
4182: IF fnd_flex_descval.validate_desccols
4183: (appl_short_name => appl_short_name
4184: ,desc_flex_name => desc_flex_name
4185: ,values_or_ids => values_or_ids
4186: ,validation_date => validation_date) THEN
4187: --SUCCESS
4188: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4189: gme_debug.put_line ('Validation Success ');
4190: END IF;
4191:
4192: x_return_status := fnd_api.g_ret_sts_success;
4185: ,values_or_ids => values_or_ids
4186: ,validation_date => validation_date) THEN
4187: --SUCCESS
4188: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4189: gme_debug.put_line ('Validation Success ');
4190: END IF;
4191:
4192: x_return_status := fnd_api.g_ret_sts_success;
4193: n := fnd_flex_descval.segment_count;
4292: END LOOP;
4293: ELSE
4294: error_msg := fnd_flex_descval.error_message;
4295:
4296: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4297: gme_debug.put_line ('Validation Ends With Error(s) :');
4298: gme_debug.put_line ('Error :' || error_msg);
4299: END IF;
4300:
4293: ELSE
4294: error_msg := fnd_flex_descval.error_message;
4295:
4296: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4297: gme_debug.put_line ('Validation Ends With Error(s) :');
4298: gme_debug.put_line ('Error :' || error_msg);
4299: END IF;
4300:
4301: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
4294: error_msg := fnd_flex_descval.error_message;
4295:
4296: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4297: gme_debug.put_line ('Validation Ends With Error(s) :');
4298: gme_debug.put_line ('Error :' || error_msg);
4299: END IF;
4300:
4301: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
4302: ,'MSG'
4303: ,error_msg);
4304: RAISE validation_error;
4305: END IF;
4306:
4307: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4308: gme_debug.put_line ( 'Validation completed for the Flex field : '
4309: || desc_flex_name);
4310: END IF;
4311: EXCEPTION
4304: RAISE validation_error;
4305: END IF;
4306:
4307: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4308: gme_debug.put_line ( 'Validation completed for the Flex field : '
4309: || desc_flex_name);
4310: END IF;
4311: EXCEPTION
4312: WHEN validation_error THEN
4309: || desc_flex_name);
4310: END IF;
4311: EXCEPTION
4312: WHEN validation_error THEN
4313: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4314: gme_debug.put_line
4315: ( 'Validation completed with errors for the Flex field : '
4316: || desc_flex_name);
4317: END IF;
4310: END IF;
4311: EXCEPTION
4312: WHEN validation_error THEN
4313: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4314: gme_debug.put_line
4315: ( 'Validation completed with errors for the Flex field : '
4316: || desc_flex_name);
4317: END IF;
4318:
4319: x_return_status := fnd_api.g_ret_sts_error;
4320: WHEN material_fetch_err THEN
4321: x_return_status := fnd_api.g_ret_sts_error;
4322: WHEN OTHERS THEN
4323: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4324: gme_debug.put_line ( g_pkg_name
4325: || '.'
4326: || desc_flex_name
4327: || ': '
4320: WHEN material_fetch_err THEN
4321: x_return_status := fnd_api.g_ret_sts_error;
4322: WHEN OTHERS THEN
4323: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4324: gme_debug.put_line ( g_pkg_name
4325: || '.'
4326: || desc_flex_name
4327: || ': '
4328: || 'in unexpected error');
4393: BEGIN
4394: /* Set return status to success initially */
4395: x_return_status := fnd_api.g_ret_sts_success;
4396:
4397: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4398: gme_debug.put_line ( 'Check if flexfield is enabled : '
4399: || desc_flex_name);
4400: END IF;
4401:
4394: /* Set return status to success initially */
4395: x_return_status := fnd_api.g_ret_sts_success;
4396:
4397: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4398: gme_debug.put_line ( 'Check if flexfield is enabled : '
4399: || desc_flex_name);
4400: END IF;
4401:
4402: OPEN cur_get_appl_id;
4406:
4407: CLOSE cur_get_appl_id;
4408:
4409: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
4410: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4411: gme_debug.put_line
4412: ('Flexfield is not enabled, No validation required.');
4413: END IF;
4414:
4407: CLOSE cur_get_appl_id;
4408:
4409: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
4410: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4411: gme_debug.put_line
4412: ('Flexfield is not enabled, No validation required.');
4413: END IF;
4414:
4415: RETURN;
4430: END IF;
4431:
4432: CLOSE cur_record_exists;
4433:
4434: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4435: gme_debug.put_line ( 'Validation of the Flex field : '
4436: || desc_flex_name);
4437: gme_debug.put_line
4438: ('Assignment of the attribute Category And Attribute Values to Local Variables');
4431:
4432: CLOSE cur_record_exists;
4433:
4434: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4435: gme_debug.put_line ( 'Validation of the Flex field : '
4436: || desc_flex_name);
4437: gme_debug.put_line
4438: ('Assignment of the attribute Category And Attribute Values to Local Variables');
4439: END IF;
4433:
4434: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4435: gme_debug.put_line ( 'Validation of the Flex field : '
4436: || desc_flex_name);
4437: gme_debug.put_line
4438: ('Assignment of the attribute Category And Attribute Values to Local Variables');
4439: END IF;
4440:
4441: /* Bug 3649415 - Retain all current flexfield values in l_process_param_rec. */
4450: ELSE
4451: l_attribute_category := p_process_param_rec.attribute_category;
4452: END IF;
4453:
4454: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4455: gme_debug.put_line
4456: ('setting set column values for the context value,for Global Data Elements and for context code.');
4457: END IF;
4458:
4451: l_attribute_category := p_process_param_rec.attribute_category;
4452: END IF;
4453:
4454: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4455: gme_debug.put_line
4456: ('setting set column values for the context value,for Global Data Elements and for context code.');
4457: END IF;
4458:
4459: fnd_flex_descval.set_context_value (l_attribute_category);
4885: /* Pass back all flexfield values w/ no validation. */
4886:
4887: /* Nsinha changed the condition IF g_flex_validate_prof = 0 THEN as part of GME_Process_Parameter_APIs_TD */
4888: IF p_validate_flexfields = fnd_api.g_false THEN
4889: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4890: gme_debug.put_line
4891: ('GME Flexfield is not enabled, No validation required.');
4892: END IF;
4893:
4886:
4887: /* Nsinha changed the condition IF g_flex_validate_prof = 0 THEN as part of GME_Process_Parameter_APIs_TD */
4888: IF p_validate_flexfields = fnd_api.g_false THEN
4889: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4890: gme_debug.put_line
4891: ('GME Flexfield is not enabled, No validation required.');
4892: END IF;
4893:
4894: /* Only update flex field columns in x_out parameter. */
4926: x_process_param_rec.attribute30 := l_process_param_rec.attribute30;
4927: RETURN;
4928: END IF;
4929:
4930: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4931: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
4932: END IF;
4933:
4934: IF fnd_flex_descval.validate_desccols
4927: RETURN;
4928: END IF;
4929:
4930: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4931: gme_debug.put_line ('Calling FND_FLEX_DESCVAL.validate_desccols ');
4932: END IF;
4933:
4934: IF fnd_flex_descval.validate_desccols
4935: (appl_short_name => appl_short_name
4936: ,desc_flex_name => desc_flex_name
4937: ,values_or_ids => values_or_ids
4938: ,validation_date => validation_date) THEN
4939: --SUCCESS
4940: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4941: gme_debug.put_line ('Validation Success ');
4942: END IF;
4943:
4944: x_return_status := fnd_api.g_ret_sts_success;
4937: ,values_or_ids => values_or_ids
4938: ,validation_date => validation_date) THEN
4939: --SUCCESS
4940: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
4941: gme_debug.put_line ('Validation Success ');
4942: END IF;
4943:
4944: x_return_status := fnd_api.g_ret_sts_success;
4945: n := fnd_flex_descval.segment_count;
5044: END LOOP;
5045: ELSE
5046: error_msg := fnd_flex_descval.error_message;
5047:
5048: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
5049: gme_debug.put_line ('Validation Ends With Error(s) :');
5050: gme_debug.put_line ('Error :' || error_msg);
5051: END IF;
5052:
5045: ELSE
5046: error_msg := fnd_flex_descval.error_message;
5047:
5048: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
5049: gme_debug.put_line ('Validation Ends With Error(s) :');
5050: gme_debug.put_line ('Error :' || error_msg);
5051: END IF;
5052:
5053: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
5046: error_msg := fnd_flex_descval.error_message;
5047:
5048: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
5049: gme_debug.put_line ('Validation Ends With Error(s) :');
5050: gme_debug.put_line ('Error :' || error_msg);
5051: END IF;
5052:
5053: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR'
5054: ,'MSG'
5055: ,error_msg);
5056: RAISE validation_error;
5057: END IF;
5058:
5059: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
5060: gme_debug.put_line ( 'Validation completed for the Flex field : '
5061: || desc_flex_name);
5062: END IF;
5063: EXCEPTION
5056: RAISE validation_error;
5057: END IF;
5058:
5059: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
5060: gme_debug.put_line ( 'Validation completed for the Flex field : '
5061: || desc_flex_name);
5062: END IF;
5063: EXCEPTION
5064: WHEN validation_error THEN
5061: || desc_flex_name);
5062: END IF;
5063: EXCEPTION
5064: WHEN validation_error THEN
5065: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
5066: gme_debug.put_line
5067: ( 'Validation completed with errors for the Flex field : '
5068: || desc_flex_name);
5069: END IF;
5062: END IF;
5063: EXCEPTION
5064: WHEN validation_error THEN
5065: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
5066: gme_debug.put_line
5067: ( 'Validation completed with errors for the Flex field : '
5068: || desc_flex_name);
5069: END IF;
5070:
5071: x_return_status := fnd_api.g_ret_sts_error;
5072: WHEN process_param_fetch_error THEN
5073: x_return_status := fnd_api.g_ret_sts_error;
5074: WHEN OTHERS THEN
5075: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
5076: gme_debug.put_line ( g_pkg_name
5077: || '.'
5078: || desc_flex_name
5079: || ': '
5072: WHEN process_param_fetch_error THEN
5073: x_return_status := fnd_api.g_ret_sts_error;
5074: WHEN OTHERS THEN
5075: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
5076: gme_debug.put_line ( g_pkg_name
5077: || '.'
5078: || desc_flex_name
5079: || ': '
5080: || 'in unexpected error');
5123: /* Set return status to success initially */
5124: x_return_status := FND_API.G_RET_STS_SUCCESS;
5125: x_batch_header := p_batch_header;
5126:
5127: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5128: gme_debug.put_line (
5129: 'Entered into the procedure create_flex_batch_header');
5130: END IF;
5131: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5124: x_return_status := FND_API.G_RET_STS_SUCCESS;
5125: x_batch_header := p_batch_header;
5126:
5127: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5128: gme_debug.put_line (
5129: 'Entered into the procedure create_flex_batch_header');
5130: END IF;
5131: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5132: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
5127: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5128: gme_debug.put_line (
5129: 'Entered into the procedure create_flex_batch_header');
5130: END IF;
5131: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5132: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
5133: END IF;
5134:
5135: OPEN cur_get_appl_id;
5128: gme_debug.put_line (
5129: 'Entered into the procedure create_flex_batch_header');
5130: END IF;
5131: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5132: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
5133: END IF;
5134:
5135: OPEN cur_get_appl_id;
5136: FETCH cur_get_appl_id INTO pkg_application_id;
5136: FETCH cur_get_appl_id INTO pkg_application_id;
5137: CLOSE cur_get_appl_id;
5138:
5139: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
5140: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5141: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
5142: END IF;
5143: RETURN;
5144: END IF;
5137: CLOSE cur_get_appl_id;
5138:
5139: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
5140: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5141: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
5142: END IF;
5143: RETURN;
5144: END IF;
5145: l_attribute_category := NVL(x_batch_header.attribute_category, '');
5272: values_or_ids => values_or_ids,
5273: validation_date => validation_date
5274: ) THEN
5275: --SUCCESS
5276: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5277: gme_debug.put_line ('Defaulting Success. ');
5278: END IF;
5279: x_return_status := FND_API.G_RET_STS_SUCCESS;
5280: n := fnd_flex_descval.segment_count;
5273: validation_date => validation_date
5274: ) THEN
5275: --SUCCESS
5276: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5277: gme_debug.put_line ('Defaulting Success. ');
5278: END IF;
5279: x_return_status := FND_API.G_RET_STS_SUCCESS;
5280: n := fnd_flex_descval.segment_count;
5281: /*Now let us copy back the default values returned from the above call */
5366: END IF;
5367: END LOOP;
5368: ELSE
5369: error_msg := fnd_flex_descval.error_message;
5370: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5371: gme_debug.put_line ('Defaulting Ends With Error(s) :');
5372: gme_debug.put_line ('Error :' || error_msg);
5373: END IF;
5374:
5367: END LOOP;
5368: ELSE
5369: error_msg := fnd_flex_descval.error_message;
5370: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5371: gme_debug.put_line ('Defaulting Ends With Error(s) :');
5372: gme_debug.put_line ('Error :' || error_msg);
5373: END IF;
5374:
5375: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5368: ELSE
5369: error_msg := fnd_flex_descval.error_message;
5370: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5371: gme_debug.put_line ('Defaulting Ends With Error(s) :');
5372: gme_debug.put_line ('Error :' || error_msg);
5373: END IF;
5374:
5375: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5376: /* error out based on global validate flag */
5374:
5375: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5376: /* error out based on global validate flag */
5377: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
5378: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5379: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
5380: END IF;
5381: RAISE defaulting_error;
5382: END IF;
5375: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5376: /* error out based on global validate flag */
5377: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
5378: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5379: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
5380: END IF;
5381: RAISE defaulting_error;
5382: END IF;
5383: END IF;
5381: RAISE defaulting_error;
5382: END IF;
5383: END IF;
5384:
5385: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5386: gme_debug.put_line (
5387: 'Defaulting completed for the Flex field : ' || desc_flex_name);
5388: END IF;
5389: EXCEPTION
5382: END IF;
5383: END IF;
5384:
5385: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5386: gme_debug.put_line (
5387: 'Defaulting completed for the Flex field : ' || desc_flex_name);
5388: END IF;
5389: EXCEPTION
5390: WHEN defaulting_error THEN
5387: 'Defaulting completed for the Flex field : ' || desc_flex_name);
5388: END IF;
5389: EXCEPTION
5390: WHEN defaulting_error THEN
5391: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5392: gme_debug.put_line (
5393: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
5394: END IF;
5395: x_return_status := FND_API.G_RET_STS_ERROR;
5388: END IF;
5389: EXCEPTION
5390: WHEN defaulting_error THEN
5391: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5392: gme_debug.put_line (
5393: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
5394: END IF;
5395: x_return_status := FND_API.G_RET_STS_ERROR;
5396: WHEN OTHERS THEN
5393: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
5394: END IF;
5395: x_return_status := FND_API.G_RET_STS_ERROR;
5396: WHEN OTHERS THEN
5397: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
5398: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
5399: END IF;
5400: x_return_status := FND_API.g_ret_sts_unexp_error;
5401: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
5394: END IF;
5395: x_return_status := FND_API.G_RET_STS_ERROR;
5396: WHEN OTHERS THEN
5397: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
5398: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
5399: END IF;
5400: x_return_status := FND_API.g_ret_sts_unexp_error;
5401: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
5402: END create_flex_batch_header;
5437: /* Set return status to success initially */
5438: x_return_status := FND_API.G_RET_STS_SUCCESS;
5439: x_batch_step := p_batch_step;
5440:
5441: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5442: gme_debug.put_line (
5443: 'Entered into the procedure create_flex_batch_step');
5444: END IF;
5445:
5438: x_return_status := FND_API.G_RET_STS_SUCCESS;
5439: x_batch_step := p_batch_step;
5440:
5441: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5442: gme_debug.put_line (
5443: 'Entered into the procedure create_flex_batch_step');
5444: END IF;
5445:
5446: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5442: gme_debug.put_line (
5443: 'Entered into the procedure create_flex_batch_step');
5444: END IF;
5445:
5446: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5447: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
5448: END IF;
5449:
5450: OPEN cur_get_appl_id;
5443: 'Entered into the procedure create_flex_batch_step');
5444: END IF;
5445:
5446: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5447: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
5448: END IF;
5449:
5450: OPEN cur_get_appl_id;
5451: FETCH cur_get_appl_id INTO pkg_application_id;
5451: FETCH cur_get_appl_id INTO pkg_application_id;
5452: CLOSE cur_get_appl_id;
5453:
5454: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
5455: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5456: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
5457: END IF;
5458: RETURN;
5459: END IF;
5452: CLOSE cur_get_appl_id;
5453:
5454: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
5455: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5456: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
5457: END IF;
5458: RETURN;
5459: END IF;
5460:
5556: values_or_ids => values_or_ids,
5557: validation_date => validation_date
5558: ) THEN
5559: --SUCCESS
5560: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5561: gme_debug.put_line ('Defaulting Success. ');
5562: END IF;
5563:
5564: x_return_status := FND_API.G_RET_STS_SUCCESS;
5557: validation_date => validation_date
5558: ) THEN
5559: --SUCCESS
5560: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5561: gme_debug.put_line ('Defaulting Success. ');
5562: END IF;
5563:
5564: x_return_status := FND_API.G_RET_STS_SUCCESS;
5565: n := fnd_flex_descval.segment_count;
5631: END IF;
5632: END LOOP;
5633: ELSE
5634: error_msg := fnd_flex_descval.error_message;
5635: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5636: gme_debug.put_line ('Defaulting Ends With Error(s) :');
5637: gme_debug.put_line ('Error :' || error_msg);
5638: END IF;
5639: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5632: END LOOP;
5633: ELSE
5634: error_msg := fnd_flex_descval.error_message;
5635: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5636: gme_debug.put_line ('Defaulting Ends With Error(s) :');
5637: gme_debug.put_line ('Error :' || error_msg);
5638: END IF;
5639: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5640: /* error out based on value global validate flag */
5633: ELSE
5634: error_msg := fnd_flex_descval.error_message;
5635: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5636: gme_debug.put_line ('Defaulting Ends With Error(s) :');
5637: gme_debug.put_line ('Error :' || error_msg);
5638: END IF;
5639: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5640: /* error out based on value global validate flag */
5641: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
5638: END IF;
5639: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5640: /* error out based on value global validate flag */
5641: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
5642: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5643: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
5644: END IF;
5645: RAISE defaulting_error;
5646: END IF;
5639: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5640: /* error out based on value global validate flag */
5641: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
5642: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5643: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
5644: END IF;
5645: RAISE defaulting_error;
5646: END IF;
5647: END IF;
5644: END IF;
5645: RAISE defaulting_error;
5646: END IF;
5647: END IF;
5648: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5649: gme_debug.put_line (
5650: 'Defaulting completed for the Flex field : ' || desc_flex_name);
5651: END IF;
5652:
5645: RAISE defaulting_error;
5646: END IF;
5647: END IF;
5648: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5649: gme_debug.put_line (
5650: 'Defaulting completed for the Flex field : ' || desc_flex_name);
5651: END IF;
5652:
5653: EXCEPTION
5651: END IF;
5652:
5653: EXCEPTION
5654: WHEN defaulting_error THEN
5655: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5656: gme_debug.put_line (
5657: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
5658: END IF;
5659: x_return_status := FND_API.G_RET_STS_ERROR;
5652:
5653: EXCEPTION
5654: WHEN defaulting_error THEN
5655: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5656: gme_debug.put_line (
5657: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
5658: END IF;
5659: x_return_status := FND_API.G_RET_STS_ERROR;
5660: WHEN OTHERS THEN
5657: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
5658: END IF;
5659: x_return_status := FND_API.G_RET_STS_ERROR;
5660: WHEN OTHERS THEN
5661: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
5662: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
5663: END IF;
5664: x_return_status := FND_API.g_ret_sts_unexp_error;
5665: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
5658: END IF;
5659: x_return_status := FND_API.G_RET_STS_ERROR;
5660: WHEN OTHERS THEN
5661: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
5662: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
5663: END IF;
5664: x_return_status := FND_API.g_ret_sts_unexp_error;
5665: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
5666: END create_flex_batch_step;
5700: /* Set return status to success initially */
5701: x_return_status := FND_API.G_RET_STS_SUCCESS;
5702: x_step_activities := p_step_activities;
5703:
5704: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5705: gme_debug.put_line (
5706: 'Entered into the procedure create_flex_step_activities');
5707: END IF;
5708:
5701: x_return_status := FND_API.G_RET_STS_SUCCESS;
5702: x_step_activities := p_step_activities;
5703:
5704: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5705: gme_debug.put_line (
5706: 'Entered into the procedure create_flex_step_activities');
5707: END IF;
5708:
5709: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5705: gme_debug.put_line (
5706: 'Entered into the procedure create_flex_step_activities');
5707: END IF;
5708:
5709: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5710: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
5711: END IF;
5712:
5713: OPEN cur_get_appl_id;
5706: 'Entered into the procedure create_flex_step_activities');
5707: END IF;
5708:
5709: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5710: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
5711: END IF;
5712:
5713: OPEN cur_get_appl_id;
5714: FETCH cur_get_appl_id INTO pkg_application_id;
5714: FETCH cur_get_appl_id INTO pkg_application_id;
5715: CLOSE cur_get_appl_id;
5716:
5717: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
5718: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5719: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
5720: END IF;
5721: RETURN;
5722: END IF;
5715: CLOSE cur_get_appl_id;
5716:
5717: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
5718: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5719: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
5720: END IF;
5721: RETURN;
5722: END IF;
5723: l_attribute_category := NVL (x_step_activities.attribute_category, '');
5818: values_or_ids => values_or_ids,
5819: validation_date => validation_date
5820: ) THEN
5821: --SUCCESS
5822: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5823: gme_debug.put_line ('Defaulting Success. ');
5824: END IF;
5825:
5826: x_return_status := FND_API.G_RET_STS_SUCCESS;
5819: validation_date => validation_date
5820: ) THEN
5821: --SUCCESS
5822: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5823: gme_debug.put_line ('Defaulting Success. ');
5824: END IF;
5825:
5826: x_return_status := FND_API.G_RET_STS_SUCCESS;
5827: n := fnd_flex_descval.segment_count;
5893: END IF;
5894: END LOOP;
5895: ELSE
5896: error_msg := fnd_flex_descval.error_message;
5897: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5898: gme_debug.put_line ('Defaulting Ends With Error(s) :');
5899: gme_debug.put_line ('Error :' || error_msg);
5900: END IF;
5901: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5894: END LOOP;
5895: ELSE
5896: error_msg := fnd_flex_descval.error_message;
5897: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5898: gme_debug.put_line ('Defaulting Ends With Error(s) :');
5899: gme_debug.put_line ('Error :' || error_msg);
5900: END IF;
5901: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5902: /* error out based on global validate flag*/
5895: ELSE
5896: error_msg := fnd_flex_descval.error_message;
5897: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5898: gme_debug.put_line ('Defaulting Ends With Error(s) :');
5899: gme_debug.put_line ('Error :' || error_msg);
5900: END IF;
5901: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5902: /* error out based on global validate flag*/
5903: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
5900: END IF;
5901: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5902: /* error out based on global validate flag*/
5903: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
5904: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5905: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
5906: END IF;
5907: RAISE defaulting_error;
5908: END IF;
5901: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
5902: /* error out based on global validate flag*/
5903: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
5904: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5905: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
5906: END IF;
5907: RAISE defaulting_error;
5908: END IF;
5909: END IF;
5907: RAISE defaulting_error;
5908: END IF;
5909: END IF;
5910:
5911: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5912: gme_debug.put_line (
5913: 'Defaulting completed for the Flex field : ' || desc_flex_name);
5914: END IF;
5915: EXCEPTION
5908: END IF;
5909: END IF;
5910:
5911: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5912: gme_debug.put_line (
5913: 'Defaulting completed for the Flex field : ' || desc_flex_name);
5914: END IF;
5915: EXCEPTION
5916: WHEN defaulting_error THEN
5913: 'Defaulting completed for the Flex field : ' || desc_flex_name);
5914: END IF;
5915: EXCEPTION
5916: WHEN defaulting_error THEN
5917: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5918: gme_debug.put_line (
5919: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
5920: END IF;
5921: x_return_status := FND_API.G_RET_STS_ERROR;
5914: END IF;
5915: EXCEPTION
5916: WHEN defaulting_error THEN
5917: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5918: gme_debug.put_line (
5919: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
5920: END IF;
5921: x_return_status := FND_API.G_RET_STS_ERROR;
5922: WHEN OTHERS THEN
5919: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
5920: END IF;
5921: x_return_status := FND_API.G_RET_STS_ERROR;
5922: WHEN OTHERS THEN
5923: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
5924: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
5925: END IF;
5926: x_return_status := FND_API.g_ret_sts_unexp_error;
5927: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
5920: END IF;
5921: x_return_status := FND_API.G_RET_STS_ERROR;
5922: WHEN OTHERS THEN
5923: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
5924: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
5925: END IF;
5926: x_return_status := FND_API.g_ret_sts_unexp_error;
5927: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
5928: END create_flex_step_activities;
5963: /* Set return status to success initially */
5964: x_return_status := FND_API.G_RET_STS_SUCCESS;
5965: x_step_resources := p_step_resources;
5966:
5967: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5968: gme_debug.put_line (
5969: 'Entered into the procedure create_flex_step_resources');
5970: END IF;
5971:
5964: x_return_status := FND_API.G_RET_STS_SUCCESS;
5965: x_step_resources := p_step_resources;
5966:
5967: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5968: gme_debug.put_line (
5969: 'Entered into the procedure create_flex_step_resources');
5970: END IF;
5971:
5972: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5968: gme_debug.put_line (
5969: 'Entered into the procedure create_flex_step_resources');
5970: END IF;
5971:
5972: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5973: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
5974: END IF;
5975:
5976: OPEN cur_get_appl_id;
5969: 'Entered into the procedure create_flex_step_resources');
5970: END IF;
5971:
5972: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5973: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
5974: END IF;
5975:
5976: OPEN cur_get_appl_id;
5977: FETCH cur_get_appl_id INTO pkg_application_id;
5977: FETCH cur_get_appl_id INTO pkg_application_id;
5978: CLOSE cur_get_appl_id;
5979:
5980: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
5981: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5982: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
5983: END IF;
5984: RETURN;
5985: END IF;
5978: CLOSE cur_get_appl_id;
5979:
5980: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
5981: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
5982: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
5983: END IF;
5984: RETURN;
5985: END IF;
5986: l_attribute_category := NVL (x_step_resources.attribute_category, '');
6083: values_or_ids => values_or_ids,
6084: validation_date => validation_date
6085: ) THEN
6086: --SUCCESS
6087: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6088: gme_debug.put_line ('Defaulting Success. ');
6089: END IF;
6090:
6091: x_return_status := FND_API.G_RET_STS_SUCCESS;
6084: validation_date => validation_date
6085: ) THEN
6086: --SUCCESS
6087: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6088: gme_debug.put_line ('Defaulting Success. ');
6089: END IF;
6090:
6091: x_return_status := FND_API.G_RET_STS_SUCCESS;
6092: n := fnd_flex_descval.segment_count;
6158: END IF;
6159: END LOOP;
6160: ELSE
6161: error_msg := fnd_flex_descval.error_message;
6162: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6163: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6164: gme_debug.put_line ('Error :' || error_msg);
6165: END IF;
6166: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6159: END LOOP;
6160: ELSE
6161: error_msg := fnd_flex_descval.error_message;
6162: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6163: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6164: gme_debug.put_line ('Error :' || error_msg);
6165: END IF;
6166: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6167: /* error out based on global validate flag */
6160: ELSE
6161: error_msg := fnd_flex_descval.error_message;
6162: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6163: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6164: gme_debug.put_line ('Error :' || error_msg);
6165: END IF;
6166: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6167: /* error out based on global validate flag */
6168: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6165: END IF;
6166: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6167: /* error out based on global validate flag */
6168: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6169: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6170: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
6171: END IF;
6172: RAISE defaulting_error;
6173: END IF;
6166: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6167: /* error out based on global validate flag */
6168: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6169: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6170: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
6171: END IF;
6172: RAISE defaulting_error;
6173: END IF;
6174: END IF;
6172: RAISE defaulting_error;
6173: END IF;
6174: END IF;
6175:
6176: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6177: gme_debug.put_line (
6178: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6179: END IF;
6180: EXCEPTION
6173: END IF;
6174: END IF;
6175:
6176: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6177: gme_debug.put_line (
6178: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6179: END IF;
6180: EXCEPTION
6181: WHEN defaulting_error THEN
6178: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6179: END IF;
6180: EXCEPTION
6181: WHEN defaulting_error THEN
6182: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6183: gme_debug.put_line (
6184: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6185: END IF;
6186: x_return_status := FND_API.G_RET_STS_ERROR;
6179: END IF;
6180: EXCEPTION
6181: WHEN defaulting_error THEN
6182: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6183: gme_debug.put_line (
6184: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6185: END IF;
6186: x_return_status := FND_API.G_RET_STS_ERROR;
6187: WHEN OTHERS THEN
6184: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6185: END IF;
6186: x_return_status := FND_API.G_RET_STS_ERROR;
6187: WHEN OTHERS THEN
6188: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
6189: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
6190: END IF;
6191: x_return_status := FND_API.g_ret_sts_unexp_error;
6192: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
6185: END IF;
6186: x_return_status := FND_API.G_RET_STS_ERROR;
6187: WHEN OTHERS THEN
6188: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
6189: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
6190: END IF;
6191: x_return_status := FND_API.g_ret_sts_unexp_error;
6192: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
6193: END create_flex_step_resources;
6227: /* Set return status to success initially */
6228: x_return_status := FND_API.G_RET_STS_SUCCESS;
6229: x_process_param_rec := p_process_param_rec;
6230:
6231: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6232: gme_debug.put_line (
6233: 'Entered into the procedure create_flex_process_param');
6234: END IF;
6235:
6228: x_return_status := FND_API.G_RET_STS_SUCCESS;
6229: x_process_param_rec := p_process_param_rec;
6230:
6231: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6232: gme_debug.put_line (
6233: 'Entered into the procedure create_flex_process_param');
6234: END IF;
6235:
6236: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6232: gme_debug.put_line (
6233: 'Entered into the procedure create_flex_process_param');
6234: END IF;
6235:
6236: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6237: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
6238: END IF;
6239:
6240: OPEN cur_get_appl_id;
6233: 'Entered into the procedure create_flex_process_param');
6234: END IF;
6235:
6236: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6237: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
6238: END IF;
6239:
6240: OPEN cur_get_appl_id;
6241: FETCH cur_get_appl_id INTO pkg_application_id;
6241: FETCH cur_get_appl_id INTO pkg_application_id;
6242: CLOSE cur_get_appl_id;
6243:
6244: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
6245: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6246: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
6247: END IF;
6248: RETURN;
6249: END IF;
6242: CLOSE cur_get_appl_id;
6243:
6244: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
6245: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6246: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
6247: END IF;
6248: RETURN;
6249: END IF;
6250: l_attribute_category := NVL (x_process_param_rec.attribute_category, '');
6347: values_or_ids => values_or_ids,
6348: validation_date => validation_date
6349: ) THEN
6350: --SUCCESS
6351: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6352: gme_debug.put_line ('Defaulting Success. ');
6353: END IF;
6354:
6355: x_return_status := FND_API.G_RET_STS_SUCCESS;
6348: validation_date => validation_date
6349: ) THEN
6350: --SUCCESS
6351: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6352: gme_debug.put_line ('Defaulting Success. ');
6353: END IF;
6354:
6355: x_return_status := FND_API.G_RET_STS_SUCCESS;
6356: n := fnd_flex_descval.segment_count;
6422: END IF;
6423: END LOOP;
6424: ELSE
6425: error_msg := fnd_flex_descval.error_message;
6426: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6427: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6428: gme_debug.put_line ('Error :' || error_msg);
6429: END IF;
6430: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6423: END LOOP;
6424: ELSE
6425: error_msg := fnd_flex_descval.error_message;
6426: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6427: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6428: gme_debug.put_line ('Error :' || error_msg);
6429: END IF;
6430: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6431: /* error out based on global validate flag */
6424: ELSE
6425: error_msg := fnd_flex_descval.error_message;
6426: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6427: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6428: gme_debug.put_line ('Error :' || error_msg);
6429: END IF;
6430: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6431: /* error out based on global validate flag */
6432: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6429: END IF;
6430: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6431: /* error out based on global validate flag */
6432: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6433: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6434: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
6435: END IF;
6436: RAISE defaulting_error;
6437: END IF;
6430: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6431: /* error out based on global validate flag */
6432: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6433: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6434: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
6435: END IF;
6436: RAISE defaulting_error;
6437: END IF;
6438: END IF;
6435: END IF;
6436: RAISE defaulting_error;
6437: END IF;
6438: END IF;
6439: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6440: gme_debug.put_line (
6441: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6442: END IF;
6443: EXCEPTION
6436: RAISE defaulting_error;
6437: END IF;
6438: END IF;
6439: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6440: gme_debug.put_line (
6441: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6442: END IF;
6443: EXCEPTION
6444: WHEN defaulting_error THEN
6441: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6442: END IF;
6443: EXCEPTION
6444: WHEN defaulting_error THEN
6445: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6446: gme_debug.put_line (
6447: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6448: END IF;
6449: x_return_status := FND_API.G_RET_STS_ERROR;
6442: END IF;
6443: EXCEPTION
6444: WHEN defaulting_error THEN
6445: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6446: gme_debug.put_line (
6447: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6448: END IF;
6449: x_return_status := FND_API.G_RET_STS_ERROR;
6450: WHEN OTHERS THEN
6447: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6448: END IF;
6449: x_return_status := FND_API.G_RET_STS_ERROR;
6450: WHEN OTHERS THEN
6451: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
6452: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
6453: END IF;
6454: x_return_status := FND_API.g_ret_sts_unexp_error;
6455: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
6448: END IF;
6449: x_return_status := FND_API.G_RET_STS_ERROR;
6450: WHEN OTHERS THEN
6451: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
6452: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
6453: END IF;
6454: x_return_status := FND_API.g_ret_sts_unexp_error;
6455: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
6456: END create_flex_process_param;
6493: /* Set return status to success initially */
6494: x_return_status := FND_API.G_RET_STS_SUCCESS;
6495: x_material_detail := p_material_detail;
6496:
6497: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6498: gme_debug.put_line (
6499: 'Entered into the procedure create_flex_material_details');
6500: END IF;
6501:
6494: x_return_status := FND_API.G_RET_STS_SUCCESS;
6495: x_material_detail := p_material_detail;
6496:
6497: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6498: gme_debug.put_line (
6499: 'Entered into the procedure create_flex_material_details');
6500: END IF;
6501:
6502: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6498: gme_debug.put_line (
6499: 'Entered into the procedure create_flex_material_details');
6500: END IF;
6501:
6502: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6503: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
6504: END IF;
6505:
6506: OPEN cur_get_appl_id;
6499: 'Entered into the procedure create_flex_material_details');
6500: END IF;
6501:
6502: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6503: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
6504: END IF;
6505:
6506: OPEN cur_get_appl_id;
6507: FETCH cur_get_appl_id INTO pkg_application_id;
6507: FETCH cur_get_appl_id INTO pkg_application_id;
6508: CLOSE cur_get_appl_id;
6509:
6510: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
6511: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6512: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
6513: END IF;
6514: RETURN;
6515: END IF;
6508: CLOSE cur_get_appl_id;
6509:
6510: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
6511: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6512: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
6513: END IF;
6514: RETURN;
6515: END IF;
6516: l_attribute_category := NVL (x_material_detail.attribute_category, '');
6611: values_or_ids => values_or_ids,
6612: validation_date => validation_date
6613: ) THEN
6614: --SUCCESS
6615: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6616: gme_debug.put_line ('Defaulting Success. ');
6617: END IF;
6618:
6619: x_return_status := FND_API.G_RET_STS_SUCCESS;
6612: validation_date => validation_date
6613: ) THEN
6614: --SUCCESS
6615: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6616: gme_debug.put_line ('Defaulting Success. ');
6617: END IF;
6618:
6619: x_return_status := FND_API.G_RET_STS_SUCCESS;
6620: n := fnd_flex_descval.segment_count;
6686: END IF;
6687: END LOOP;
6688: ELSE
6689: error_msg := fnd_flex_descval.error_message;
6690: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6691: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6692: gme_debug.put_line ('Error :' || error_msg);
6693: END IF;
6694: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6687: END LOOP;
6688: ELSE
6689: error_msg := fnd_flex_descval.error_message;
6690: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6691: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6692: gme_debug.put_line ('Error :' || error_msg);
6693: END IF;
6694: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6695: /* error out based on global validate flag */
6688: ELSE
6689: error_msg := fnd_flex_descval.error_message;
6690: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6691: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6692: gme_debug.put_line ('Error :' || error_msg);
6693: END IF;
6694: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6695: /* error out based on global validate flag */
6696: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6693: END IF;
6694: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6695: /* error out based on global validate flag */
6696: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6697: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6698: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
6699: END IF;
6700: RAISE defaulting_error;
6701: END IF;
6694: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6695: /* error out based on global validate flag */
6696: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6697: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6698: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
6699: END IF;
6700: RAISE defaulting_error;
6701: END IF;
6702: END IF;
6699: END IF;
6700: RAISE defaulting_error;
6701: END IF;
6702: END IF;
6703: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6704: gme_debug.put_line (
6705: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6706: END IF;
6707: EXCEPTION
6700: RAISE defaulting_error;
6701: END IF;
6702: END IF;
6703: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6704: gme_debug.put_line (
6705: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6706: END IF;
6707: EXCEPTION
6708: WHEN defaulting_error THEN
6705: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6706: END IF;
6707: EXCEPTION
6708: WHEN defaulting_error THEN
6709: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6710: gme_debug.put_line (
6711: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6712: END IF;
6713: x_return_status := FND_API.G_RET_STS_ERROR;
6706: END IF;
6707: EXCEPTION
6708: WHEN defaulting_error THEN
6709: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6710: gme_debug.put_line (
6711: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6712: END IF;
6713: x_return_status := FND_API.G_RET_STS_ERROR;
6714: WHEN OTHERS THEN
6711: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6712: END IF;
6713: x_return_status := FND_API.G_RET_STS_ERROR;
6714: WHEN OTHERS THEN
6715: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
6716: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
6717: END IF;
6718: x_return_status := FND_API.g_ret_sts_unexp_error;
6719: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
6712: END IF;
6713: x_return_status := FND_API.G_RET_STS_ERROR;
6714: WHEN OTHERS THEN
6715: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
6716: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
6717: END IF;
6718: x_return_status := FND_API.g_ret_sts_unexp_error;
6719: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
6720: END create_flex_material_details;
6752: /* Set return status to success initially */
6753: x_return_status := FND_API.G_RET_STS_SUCCESS;
6754: x_resource_txns := p_resource_txns;
6755:
6756: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6757: gme_debug.put_line (
6758: 'Entered into the procedure create_flex_material_details');
6759: END IF;
6760:
6753: x_return_status := FND_API.G_RET_STS_SUCCESS;
6754: x_resource_txns := p_resource_txns;
6755:
6756: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6757: gme_debug.put_line (
6758: 'Entered into the procedure create_flex_material_details');
6759: END IF;
6760:
6761: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6757: gme_debug.put_line (
6758: 'Entered into the procedure create_flex_material_details');
6759: END IF;
6760:
6761: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6762: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
6763: END IF;
6764:
6765: OPEN cur_get_appl_id;
6758: 'Entered into the procedure create_flex_material_details');
6759: END IF;
6760:
6761: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6762: gme_debug.put_line ('Check if flexfield is enabled : ' ||desc_flex_name);
6763: END IF;
6764:
6765: OPEN cur_get_appl_id;
6766: FETCH cur_get_appl_id INTO pkg_application_id;
6766: FETCH cur_get_appl_id INTO pkg_application_id;
6767: CLOSE cur_get_appl_id;
6768:
6769: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
6770: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6771: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
6772: END IF;
6773: RETURN;
6774: END IF;
6767: CLOSE cur_get_appl_id;
6768:
6769: IF NOT fnd_flex_apis.is_descr_setup (pkg_application_id, desc_flex_name) THEN
6770: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6771: gme_debug.put_line ('Flexfield is not enabled, No validation required.');
6772: END IF;
6773: RETURN;
6774: END IF;
6775: l_attribute_category := NVL (x_resource_txns.attribute_category, '');
6871: values_or_ids => values_or_ids,
6872: validation_date => validation_date
6873: ) THEN
6874: --SUCCESS
6875: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6876: gme_debug.put_line ('Defaulting Success. ');
6877: END IF;
6878:
6879: x_return_status := FND_API.G_RET_STS_SUCCESS;
6872: validation_date => validation_date
6873: ) THEN
6874: --SUCCESS
6875: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6876: gme_debug.put_line ('Defaulting Success. ');
6877: END IF;
6878:
6879: x_return_status := FND_API.G_RET_STS_SUCCESS;
6880: n := fnd_flex_descval.segment_count;
6946: END IF;
6947: END LOOP;
6948: ELSE
6949: error_msg := fnd_flex_descval.error_message;
6950: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6951: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6952: gme_debug.put_line ('Error :' || error_msg);
6953: END IF;
6954: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6947: END LOOP;
6948: ELSE
6949: error_msg := fnd_flex_descval.error_message;
6950: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6951: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6952: gme_debug.put_line ('Error :' || error_msg);
6953: END IF;
6954: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6955: /* error out based on global validate flag */
6948: ELSE
6949: error_msg := fnd_flex_descval.error_message;
6950: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6951: gme_debug.put_line ('Defaulting Ends With Error(s) :');
6952: gme_debug.put_line ('Error :' || error_msg);
6953: END IF;
6954: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6955: /* error out based on global validate flag */
6956: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6953: END IF;
6954: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6955: /* error out based on global validate flag */
6956: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6957: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6958: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
6959: END IF;
6960: RAISE defaulting_error;
6961: END IF;
6954: gme_common_pvt.log_message ('FLEX-USER DEFINED ERROR', 'MSG', error_msg);
6955: /* error out based on global validate flag */
6956: IF gme_common_pvt.g_flex_validate_prof = 1 THEN
6957: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6958: gme_debug.put_line ('GME Flexfield is enabled, Give the Error.');
6959: END IF;
6960: RAISE defaulting_error;
6961: END IF;
6962: END IF;
6959: END IF;
6960: RAISE defaulting_error;
6961: END IF;
6962: END IF;
6963: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6964: gme_debug.put_line (
6965: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6966: END IF;
6967: EXCEPTION
6960: RAISE defaulting_error;
6961: END IF;
6962: END IF;
6963: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6964: gme_debug.put_line (
6965: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6966: END IF;
6967: EXCEPTION
6968: WHEN defaulting_error THEN
6965: 'Defaulting completed for the Flex field : ' || desc_flex_name);
6966: END IF;
6967: EXCEPTION
6968: WHEN defaulting_error THEN
6969: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6970: gme_debug.put_line (
6971: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6972: END IF;
6973: x_return_status := FND_API.G_RET_STS_ERROR;
6966: END IF;
6967: EXCEPTION
6968: WHEN defaulting_error THEN
6969: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
6970: gme_debug.put_line (
6971: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6972: END IF;
6973: x_return_status := FND_API.G_RET_STS_ERROR;
6974: WHEN OTHERS THEN
6971: 'Defaulting completed with errors for the Flex field : ' ||desc_flex_name);
6972: END IF;
6973: x_return_status := FND_API.G_RET_STS_ERROR;
6974: WHEN OTHERS THEN
6975: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
6976: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
6977: END IF;
6978: x_return_status := FND_API.g_ret_sts_unexp_error;
6979: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
6972: END IF;
6973: x_return_status := FND_API.G_RET_STS_ERROR;
6974: WHEN OTHERS THEN
6975: IF ( NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT ) THEN
6976: gme_debug.put_line (g_pkg_name||'.'||desc_flex_name||': '||'in unexpected error');
6977: END IF;
6978: x_return_status := FND_API.g_ret_sts_unexp_error;
6979: fnd_msg_pub.add_exc_msg (g_pkg_name, desc_flex_name);
6980: END create_flex_resource_txns;