79: return v_start_date;
80:
81: EXCEPTION
82: WHEN no_data_found THEN
83: FND_MESSAGE.SET_NAME('MSC', 'MSC_NRA_NO_CALENDAR');
84: FND_MESSAGE.SET_TOKEN('ORG_ID', arg_organization_id);
85: LOG_MESSAGE(FND_MESSAGE.Get);
86:
87: END check_start_date;
80:
81: EXCEPTION
82: WHEN no_data_found THEN
83: FND_MESSAGE.SET_NAME('MSC', 'MSC_NRA_NO_CALENDAR');
84: FND_MESSAGE.SET_TOKEN('ORG_ID', arg_organization_id);
85: LOG_MESSAGE(FND_MESSAGE.Get);
86:
87: END check_start_date;
88:
81: EXCEPTION
82: WHEN no_data_found THEN
83: FND_MESSAGE.SET_NAME('MSC', 'MSC_NRA_NO_CALENDAR');
84: FND_MESSAGE.SET_TOKEN('ORG_ID', arg_organization_id);
85: LOG_MESSAGE(FND_MESSAGE.Get);
86:
87: END check_start_date;
88:
89: FUNCTION check_cutoff_date(arg_organization_id in number,
108: return v_cutoff_date;
109:
110: EXCEPTION
111: WHEN no_data_found THEN
112: FND_MESSAGE.SET_NAME('MSC', 'MSC_NRA_NO_CALENDAR');
113: FND_MESSAGE.SET_TOKEN('ORG_ID', arg_organization_id);
114: LOG_MESSAGE(FND_MESSAGE.Get);
115:
116: END check_cutoff_date;
109:
110: EXCEPTION
111: WHEN no_data_found THEN
112: FND_MESSAGE.SET_NAME('MSC', 'MSC_NRA_NO_CALENDAR');
113: FND_MESSAGE.SET_TOKEN('ORG_ID', arg_organization_id);
114: LOG_MESSAGE(FND_MESSAGE.Get);
115:
116: END check_cutoff_date;
117:
110: EXCEPTION
111: WHEN no_data_found THEN
112: FND_MESSAGE.SET_NAME('MSC', 'MSC_NRA_NO_CALENDAR');
113: FND_MESSAGE.SET_TOKEN('ORG_ID', arg_organization_id);
114: LOG_MESSAGE(FND_MESSAGE.Get);
115:
116: END check_cutoff_date;
117:
118: PROCEDURE update_avail(
1497: -- fix for 2393358 --
1498: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1499:
1500: LOG_MESSAGE('========================================');
1501: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1502: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'POPULATE_ORG_RESOURCES');
1503: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
1504: LOG_MESSAGE(FND_MESSAGE.GET);
1505:
1498: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1499:
1500: LOG_MESSAGE('========================================');
1501: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1502: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'POPULATE_ORG_RESOURCES');
1503: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
1504: LOG_MESSAGE(FND_MESSAGE.GET);
1505:
1506: LOG_MESSAGE(SQLERRM);
1499:
1500: LOG_MESSAGE('========================================');
1501: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1502: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'POPULATE_ORG_RESOURCES');
1503: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
1504: LOG_MESSAGE(FND_MESSAGE.GET);
1505:
1506: LOG_MESSAGE(SQLERRM);
1507:
1500: LOG_MESSAGE('========================================');
1501: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1502: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'POPULATE_ORG_RESOURCES');
1503: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
1504: LOG_MESSAGE(FND_MESSAGE.GET);
1505:
1506: LOG_MESSAGE(SQLERRM);
1507:
1508:
1727: -- fix for 2393358 --
1728: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1729:
1730: LOG_MESSAGE('========================================');
1731: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1732: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'POPULATE_ALL_LINES');
1733: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
1734: LOG_MESSAGE(FND_MESSAGE.GET);
1735:
1728: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1729:
1730: LOG_MESSAGE('========================================');
1731: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1732: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'POPULATE_ALL_LINES');
1733: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
1734: LOG_MESSAGE(FND_MESSAGE.GET);
1735:
1736: LOG_MESSAGE(SQLERRM);
1729:
1730: LOG_MESSAGE('========================================');
1731: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1732: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'POPULATE_ALL_LINES');
1733: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
1734: LOG_MESSAGE(FND_MESSAGE.GET);
1735:
1736: LOG_MESSAGE(SQLERRM);
1737:
1730: LOG_MESSAGE('========================================');
1731: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1732: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'POPULATE_ALL_LINES');
1733: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
1734: LOG_MESSAGE(FND_MESSAGE.GET);
1735:
1736: LOG_MESSAGE(SQLERRM);
1737:
1738:
1807: lv_ret_res_ava:=CALC_RESOURCE_AVAILABILITY(lv_start_date-1,MSC_UTIL.G_ALL_ORGANIZATIONS,TRUE);
1808:
1809:
1810: IF lv_ret_res_ava = 2 THEN
1811: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1812: ERRBUF:= FND_MESSAGE.GET;
1813: RETCODE:= MSC_UTIL.G_WARNING;
1814: ELSIF lv_ret_res_ava <> 0 THEN
1815: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1808:
1809:
1810: IF lv_ret_res_ava = 2 THEN
1811: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1812: ERRBUF:= FND_MESSAGE.GET;
1813: RETCODE:= MSC_UTIL.G_WARNING;
1814: ELSIF lv_ret_res_ava <> 0 THEN
1815: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1816: ERRBUF:= FND_MESSAGE.GET;
1811: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1812: ERRBUF:= FND_MESSAGE.GET;
1813: RETCODE:= MSC_UTIL.G_WARNING;
1814: ELSIF lv_ret_res_ava <> 0 THEN
1815: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1816: ERRBUF:= FND_MESSAGE.GET;
1817: RETCODE:= MSC_UTIL.G_ERROR;
1818:
1819: END IF;
1812: ERRBUF:= FND_MESSAGE.GET;
1813: RETCODE:= MSC_UTIL.G_WARNING;
1814: ELSIF lv_ret_res_ava <> 0 THEN
1815: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1816: ERRBUF:= FND_MESSAGE.GET;
1817: RETCODE:= MSC_UTIL.G_ERROR;
1818:
1819: END IF;
1820:
1829: lv_ret_res_ava:=CALC_RESOURCE_AVAILABILITY(lv_start_date-1,MSC_UTIL.G_ALL_ORGANIZATIONS,TRUE);
1830:
1831:
1832: IF lv_ret_res_ava = 2 THEN
1833: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1834: ERRBUF:= FND_MESSAGE.GET;
1835: RETCODE:= MSC_UTIL.G_WARNING;
1836: ELSIF lv_ret_res_ava <> 0 THEN
1837: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1830:
1831:
1832: IF lv_ret_res_ava = 2 THEN
1833: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1834: ERRBUF:= FND_MESSAGE.GET;
1835: RETCODE:= MSC_UTIL.G_WARNING;
1836: ELSIF lv_ret_res_ava <> 0 THEN
1837: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1838:
1833: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1834: ERRBUF:= FND_MESSAGE.GET;
1835: RETCODE:= MSC_UTIL.G_WARNING;
1836: ELSIF lv_ret_res_ava <> 0 THEN
1837: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1838:
1839: ERRBUF:= FND_MESSAGE.GET;
1840: RETCODE:= MSC_UTIL.G_ERROR;
1841: END IF;
1835: RETCODE:= MSC_UTIL.G_WARNING;
1836: ELSIF lv_ret_res_ava <> 0 THEN
1837: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1838:
1839: ERRBUF:= FND_MESSAGE.GET;
1840: RETCODE:= MSC_UTIL.G_ERROR;
1841: END IF;
1842: ELSE
1843: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'This program can be run only for Instance Type: Discrete.');
1840: RETCODE:= MSC_UTIL.G_ERROR;
1841: END IF;
1842: ELSE
1843: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'This program can be run only for Instance Type: Discrete.');
1844: ERRBUF:= FND_MESSAGE.GET;
1845: RETCODE:= MSC_UTIL.G_ERROR;
1846:
1847: END IF;
1848:
1848:
1849: EXCEPTION
1850: WHEN OTHERS THEN
1851: ROLLBACK;
1852: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_CALC_RES_AVAIL_FAIL');
1853: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1854: RETCODE := MSC_UTIL.G_ERROR;
1855:
1856: END COMPUTE_RES_AVAIL;
1907: /* Resource Start Time changes*/
1908: lv_task_start_time:= pSTART_TIME;
1909: CURR_DATE:= SYSDATE;
1910:
1911: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1912: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'CALC_RESOURCE_AVAILABILITY');
1913: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
1914:
1915: lv_mrp_cutoff_date_offset:= TO_NUMBER(FND_PROFILE.VAlUE('MRP_CUTOFF_DATE_OFFSET'));
1908: lv_task_start_time:= pSTART_TIME;
1909: CURR_DATE:= SYSDATE;
1910:
1911: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1912: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'CALC_RESOURCE_AVAILABILITY');
1913: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
1914:
1915: lv_mrp_cutoff_date_offset:= TO_NUMBER(FND_PROFILE.VAlUE('MRP_CUTOFF_DATE_OFFSET'));
1916: lv_res_avail_before_sysdate := nvl(TO_NUMBER(FND_PROFILE.VAlUE('MSC_RES_AVAIL_BEFORE_SYSDAT')),1);
1909: CURR_DATE:= SYSDATE;
1910:
1911: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1912: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'CALC_RESOURCE_AVAILABILITY');
1913: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
1914:
1915: lv_mrp_cutoff_date_offset:= TO_NUMBER(FND_PROFILE.VAlUE('MRP_CUTOFF_DATE_OFFSET'));
1916: lv_res_avail_before_sysdate := nvl(TO_NUMBER(FND_PROFILE.VAlUE('MSC_RES_AVAIL_BEFORE_SYSDAT')),1);
1917:
2166: COMMIT;
2167:
2168: /* End Bug 3295824 */
2169:
2170: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
2171: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',
2172: TO_CHAR(CEIL((SYSDATE- CURR_DATE)*14400.0)/10));
2173: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2174:
2167:
2168: /* End Bug 3295824 */
2169:
2170: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
2171: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',
2172: TO_CHAR(CEIL((SYSDATE- CURR_DATE)*14400.0)/10));
2173: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2174:
2175:
2169:
2170: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
2171: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',
2172: TO_CHAR(CEIL((SYSDATE- CURR_DATE)*14400.0)/10));
2173: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2174:
2175:
2176:
2177:
2439:
2440: IF SQLCODE IN (-01683,-01653,-01650,-01562) THEN
2441:
2442: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2443: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2444: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2445: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
2446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2447:
2440: IF SQLCODE IN (-01683,-01653,-01650,-01562) THEN
2441:
2442: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2443: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2444: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2445: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
2446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2447:
2448: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2441:
2442: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2443: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2444: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2445: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
2446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2447:
2448: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2449: RAISE;
2442: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2443: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2444: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2445: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
2446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2447:
2448: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2449: RAISE;
2450:
2452:
2453: MSC_CL_COLLECTION.v_warning_flag := MSC_UTIL.SYS_YES;
2454:
2455: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2456: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2457: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2458: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
2459: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2460:
2453: MSC_CL_COLLECTION.v_warning_flag := MSC_UTIL.SYS_YES;
2454:
2455: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2456: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2457: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2458: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
2459: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2460:
2461: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2454:
2455: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2456: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2457: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2458: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
2459: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2460:
2461: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2462: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2455: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2456: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2457: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2458: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
2459: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2460:
2461: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2462: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2463: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec.RESOURCE_ID));
2457: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2458: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
2459: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2460:
2461: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2462: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2463: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec.RESOURCE_ID));
2464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2465:
2458: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RESOURCE_AVAIL');
2459: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2460:
2461: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2462: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2463: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec.RESOURCE_ID));
2464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2465:
2466: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2459: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2460:
2461: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2462: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2463: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec.RESOURCE_ID));
2464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2465:
2466: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2467: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2460:
2461: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2462: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2463: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec.RESOURCE_ID));
2464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2465:
2466: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2467: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2468: FND_MESSAGE.SET_TOKEN('VALUE',
2462: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2463: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec.RESOURCE_ID));
2464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2465:
2466: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2467: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2468: FND_MESSAGE.SET_TOKEN('VALUE',
2469: MSC_GET_NAME.ORG_CODE( c_rec.ORGANIZATION_ID,
2470: MSC_CL_COLLECTION.v_instance_id));
2463: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec.RESOURCE_ID));
2464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2465:
2466: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2467: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2468: FND_MESSAGE.SET_TOKEN('VALUE',
2469: MSC_GET_NAME.ORG_CODE( c_rec.ORGANIZATION_ID,
2470: MSC_CL_COLLECTION.v_instance_id));
2471: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2465:
2466: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2467: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2468: FND_MESSAGE.SET_TOKEN('VALUE',
2469: MSC_GET_NAME.ORG_CODE( c_rec.ORGANIZATION_ID,
2470: MSC_CL_COLLECTION.v_instance_id));
2471: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2472:
2467: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2468: FND_MESSAGE.SET_TOKEN('VALUE',
2469: MSC_GET_NAME.ORG_CODE( c_rec.ORGANIZATION_ID,
2470: MSC_CL_COLLECTION.v_instance_id));
2471: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2472:
2473: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2474: END IF;
2475:
2638:
2639: IF SQLCODE IN (-01683,-01653,-01650,-01562) THEN
2640:
2641: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2642: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2643: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2644: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RES_INST_AVAIL');
2645: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2646:
2639: IF SQLCODE IN (-01683,-01653,-01650,-01562) THEN
2640:
2641: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2642: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2643: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2644: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RES_INST_AVAIL');
2645: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2646:
2647: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2640:
2641: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2642: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2643: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2644: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RES_INST_AVAIL');
2645: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2646:
2647: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2648: RAISE;
2641: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2642: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2643: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2644: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RES_INST_AVAIL');
2645: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2646:
2647: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2648: RAISE;
2649:
2651:
2652: MSC_CL_COLLECTION.v_warning_flag := MSC_UTIL.SYS_YES;
2653:
2654: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2655: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2656: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2657: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RES_INST_AVAIL');
2658: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2659:
2652: MSC_CL_COLLECTION.v_warning_flag := MSC_UTIL.SYS_YES;
2653:
2654: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2655: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2656: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2657: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RES_INST_AVAIL');
2658: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2659:
2660: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2653:
2654: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2655: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2656: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2657: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RES_INST_AVAIL');
2658: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2659:
2660: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2661: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2654: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2655: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2656: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2657: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RES_INST_AVAIL');
2658: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2659:
2660: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2661: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2662: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec_resinst.RESOURCE_ID));
2656: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CALENDAR_DATE');
2657: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RES_INST_AVAIL');
2658: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2659:
2660: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2661: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2662: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec_resinst.RESOURCE_ID));
2663: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2664:
2657: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_NET_RES_INST_AVAIL');
2658: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2659:
2660: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2661: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2662: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec_resinst.RESOURCE_ID));
2663: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2664:
2665: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2658: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2659:
2660: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2661: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2662: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec_resinst.RESOURCE_ID));
2663: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2664:
2665: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2666: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2659:
2660: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2661: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2662: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec_resinst.RESOURCE_ID));
2663: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2664:
2665: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2666: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2667: FND_MESSAGE.SET_TOKEN('VALUE',
2661: FND_MESSAGE.SET_TOKEN('COLUMN', 'RESOURCE_ID');
2662: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec_resinst.RESOURCE_ID));
2663: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2664:
2665: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2666: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2667: FND_MESSAGE.SET_TOKEN('VALUE',
2668: MSC_GET_NAME.ORG_CODE( c_rec_resinst.ORGANIZATION_ID,
2669: MSC_CL_COLLECTION.v_instance_id));
2662: FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(c_rec_resinst.RESOURCE_ID));
2663: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2664:
2665: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2666: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2667: FND_MESSAGE.SET_TOKEN('VALUE',
2668: MSC_GET_NAME.ORG_CODE( c_rec_resinst.ORGANIZATION_ID,
2669: MSC_CL_COLLECTION.v_instance_id));
2670: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2663: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2664:
2665: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2666: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2667: FND_MESSAGE.SET_TOKEN('VALUE',
2668: MSC_GET_NAME.ORG_CODE( c_rec_resinst.ORGANIZATION_ID,
2669: MSC_CL_COLLECTION.v_instance_id));
2670: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2671:
2666: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');
2667: FND_MESSAGE.SET_TOKEN('VALUE',
2668: MSC_GET_NAME.ORG_CODE( c_rec_resinst.ORGANIZATION_ID,
2669: MSC_CL_COLLECTION.v_instance_id));
2670: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2671:
2672: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2673: END IF;
2674: