DBA Data[Home] [Help]

APPS.MSC_RESOURCE_AVAILABILITY dependencies on MSC_UTIL

Line 206: MSC_UTIL.MSC_DEBUG('Org: ' || to_char(var_organization_id));

202: var_transaction_id number;
203:
204: BEGIN
205:
206: MSC_UTIL.MSC_DEBUG('Org: ' || to_char(var_organization_id));
207: MSC_UTIL.MSC_DEBUG('Instance: ' || to_char(var_sr_instance_id));
208: MSC_UTIL.MSC_DEBUG('Sim Set: ' || var_simulation_set);
209: MSC_UTIL.MSC_DEBUG('Dept: ' || to_char(var_department_id));
210: MSC_UTIL.MSC_DEBUG('Resource: ' || to_char(var_resource_id));

Line 207: MSC_UTIL.MSC_DEBUG('Instance: ' || to_char(var_sr_instance_id));

203:
204: BEGIN
205:
206: MSC_UTIL.MSC_DEBUG('Org: ' || to_char(var_organization_id));
207: MSC_UTIL.MSC_DEBUG('Instance: ' || to_char(var_sr_instance_id));
208: MSC_UTIL.MSC_DEBUG('Sim Set: ' || var_simulation_set);
209: MSC_UTIL.MSC_DEBUG('Dept: ' || to_char(var_department_id));
210: MSC_UTIL.MSC_DEBUG('Resource: ' || to_char(var_resource_id));
211:

Line 208: MSC_UTIL.MSC_DEBUG('Sim Set: ' || var_simulation_set);

204: BEGIN
205:
206: MSC_UTIL.MSC_DEBUG('Org: ' || to_char(var_organization_id));
207: MSC_UTIL.MSC_DEBUG('Instance: ' || to_char(var_sr_instance_id));
208: MSC_UTIL.MSC_DEBUG('Sim Set: ' || var_simulation_set);
209: MSC_UTIL.MSC_DEBUG('Dept: ' || to_char(var_department_id));
210: MSC_UTIL.MSC_DEBUG('Resource: ' || to_char(var_resource_id));
211:
212: var_time1 := check_24(var_from_time);

Line 209: MSC_UTIL.MSC_DEBUG('Dept: ' || to_char(var_department_id));

205:
206: MSC_UTIL.MSC_DEBUG('Org: ' || to_char(var_organization_id));
207: MSC_UTIL.MSC_DEBUG('Instance: ' || to_char(var_sr_instance_id));
208: MSC_UTIL.MSC_DEBUG('Sim Set: ' || var_simulation_set);
209: MSC_UTIL.MSC_DEBUG('Dept: ' || to_char(var_department_id));
210: MSC_UTIL.MSC_DEBUG('Resource: ' || to_char(var_resource_id));
211:
212: var_time1 := check_24(var_from_time);
213: var_time2 := check_24(var_to_time);

Line 210: MSC_UTIL.MSC_DEBUG('Resource: ' || to_char(var_resource_id));

206: MSC_UTIL.MSC_DEBUG('Org: ' || to_char(var_organization_id));
207: MSC_UTIL.MSC_DEBUG('Instance: ' || to_char(var_sr_instance_id));
208: MSC_UTIL.MSC_DEBUG('Sim Set: ' || var_simulation_set);
209: MSC_UTIL.MSC_DEBUG('Dept: ' || to_char(var_department_id));
210: MSC_UTIL.MSC_DEBUG('Resource: ' || to_char(var_resource_id));
211:
212: var_time1 := check_24(var_from_time);
213: var_time2 := check_24(var_to_time);
214:

Line 1407: MSC_UTIL.MSC_DEBUG('Creating resource for all simulation set ....');

1403: LOG_MESSAGE('========================================================');
1404: LOG_MESSAGE('Populating Org Resources for the Org: '|| arg_organization_id);
1405: LOG_MESSAGE('========================================================');
1406:
1407: MSC_UTIL.MSC_DEBUG('Creating resource for all simulation set ....');
1408: MSC_UTIL.MSC_DEBUG('Org Id:' || to_char(arg_organization_id));
1409: MSC_UTIL.MSC_DEBUG('Instance:' || to_char(arg_sr_instance_id));
1410:
1411: -- For complete refresh, the collection program will handle deleting all

Line 1408: MSC_UTIL.MSC_DEBUG('Org Id:' || to_char(arg_organization_id));

1404: LOG_MESSAGE('Populating Org Resources for the Org: '|| arg_organization_id);
1405: LOG_MESSAGE('========================================================');
1406:
1407: MSC_UTIL.MSC_DEBUG('Creating resource for all simulation set ....');
1408: MSC_UTIL.MSC_DEBUG('Org Id:' || to_char(arg_organization_id));
1409: MSC_UTIL.MSC_DEBUG('Instance:' || to_char(arg_sr_instance_id));
1410:
1411: -- For complete refresh, the collection program will handle deleting all
1412: -- resource avail.

Line 1409: MSC_UTIL.MSC_DEBUG('Instance:' || to_char(arg_sr_instance_id));

1405: LOG_MESSAGE('========================================================');
1406:
1407: MSC_UTIL.MSC_DEBUG('Creating resource for all simulation set ....');
1408: MSC_UTIL.MSC_DEBUG('Org Id:' || to_char(arg_organization_id));
1409: MSC_UTIL.MSC_DEBUG('Instance:' || to_char(arg_sr_instance_id));
1410:
1411: -- For complete refresh, the collection program will handle deleting all
1412: -- resource avail.
1413: -- For net change, refresh_flag = 2, delete resourse availability of

Line 1557: MSC_UTIL.MSC_DEBUG('Creating resource for all lines....');

1553: else
1554: v_cutoff_date := arg_cutoff_date;
1555: end if;
1556:
1557: MSC_UTIL.MSC_DEBUG('Creating resource for all lines....');
1558: MSC_UTIL.MSC_DEBUG('Org Id:' || to_char(arg_organization_id));
1559: MSC_UTIL.MSC_DEBUG('Instance:' || to_char(arg_sr_instance_id));
1560: MSC_UTIL.MSC_DEBUG('Start Date:' || to_char(v_start_date,'YYYY/MM/DD HH24:MI:SS'));
1561: MSC_UTIL.MSC_DEBUG('Cutoff Date:' || to_char(v_cutoff_date,'YYYY/MM/DD HH24:MI:SS'));

Line 1558: MSC_UTIL.MSC_DEBUG('Org Id:' || to_char(arg_organization_id));

1554: v_cutoff_date := arg_cutoff_date;
1555: end if;
1556:
1557: MSC_UTIL.MSC_DEBUG('Creating resource for all lines....');
1558: MSC_UTIL.MSC_DEBUG('Org Id:' || to_char(arg_organization_id));
1559: MSC_UTIL.MSC_DEBUG('Instance:' || to_char(arg_sr_instance_id));
1560: MSC_UTIL.MSC_DEBUG('Start Date:' || to_char(v_start_date,'YYYY/MM/DD HH24:MI:SS'));
1561: MSC_UTIL.MSC_DEBUG('Cutoff Date:' || to_char(v_cutoff_date,'YYYY/MM/DD HH24:MI:SS'));
1562:

Line 1559: MSC_UTIL.MSC_DEBUG('Instance:' || to_char(arg_sr_instance_id));

1555: end if;
1556:
1557: MSC_UTIL.MSC_DEBUG('Creating resource for all lines....');
1558: MSC_UTIL.MSC_DEBUG('Org Id:' || to_char(arg_organization_id));
1559: MSC_UTIL.MSC_DEBUG('Instance:' || to_char(arg_sr_instance_id));
1560: MSC_UTIL.MSC_DEBUG('Start Date:' || to_char(v_start_date,'YYYY/MM/DD HH24:MI:SS'));
1561: MSC_UTIL.MSC_DEBUG('Cutoff Date:' || to_char(v_cutoff_date,'YYYY/MM/DD HH24:MI:SS'));
1562:
1563: -- For complete refresh, the collection program will handle deleting all

Line 1560: MSC_UTIL.MSC_DEBUG('Start Date:' || to_char(v_start_date,'YYYY/MM/DD HH24:MI:SS'));

1556:
1557: MSC_UTIL.MSC_DEBUG('Creating resource for all lines....');
1558: MSC_UTIL.MSC_DEBUG('Org Id:' || to_char(arg_organization_id));
1559: MSC_UTIL.MSC_DEBUG('Instance:' || to_char(arg_sr_instance_id));
1560: MSC_UTIL.MSC_DEBUG('Start Date:' || to_char(v_start_date,'YYYY/MM/DD HH24:MI:SS'));
1561: MSC_UTIL.MSC_DEBUG('Cutoff Date:' || to_char(v_cutoff_date,'YYYY/MM/DD HH24:MI:SS'));
1562:
1563: -- For complete refresh, the collection program will handle deleting all
1564: -- resource avail.

Line 1561: MSC_UTIL.MSC_DEBUG('Cutoff Date:' || to_char(v_cutoff_date,'YYYY/MM/DD HH24:MI:SS'));

1557: MSC_UTIL.MSC_DEBUG('Creating resource for all lines....');
1558: MSC_UTIL.MSC_DEBUG('Org Id:' || to_char(arg_organization_id));
1559: MSC_UTIL.MSC_DEBUG('Instance:' || to_char(arg_sr_instance_id));
1560: MSC_UTIL.MSC_DEBUG('Start Date:' || to_char(v_start_date,'YYYY/MM/DD HH24:MI:SS'));
1561: MSC_UTIL.MSC_DEBUG('Cutoff Date:' || to_char(v_cutoff_date,'YYYY/MM/DD HH24:MI:SS'));
1562:
1563: -- For complete refresh, the collection program will handle deleting all
1564: -- resource avail.
1565: -- For net change, refresh_flag = 2, delete resourse availability of

Line 1792: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' Start date : '|| lv_start_date);

1788: MSC_CL_COLLECTION.v_is_partial_refresh := FALSE;
1789:
1790: MSC_CL_COLLECTION.v_instance_id := pINSTANCE_ID;
1791:
1792: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' Start date : '|| lv_start_date);
1793:
1794: lv_where_clause := ' AND ORGANIZATION_ID IN ( SELECT SR_TP_ID FROM MSC_TRADING_PARTNERS WHERE '||
1795: ' SR_INSTANCE_ID = '||MSC_CL_COLLECTION.v_instance_id ||
1796: ' AND ORGANIZATION_TYPE =1 ) ';

Line 1799: IF MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_DISCRETE OR MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_OTHER THEN

1795: ' SR_INSTANCE_ID = '||MSC_CL_COLLECTION.v_instance_id ||
1796: ' AND ORGANIZATION_TYPE =1 ) ';
1797:
1798: -- log_debug('before delete of MSC_NET_RESOURCE_AVAIL debug0 ');
1799: IF MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_DISCRETE OR MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_OTHER THEN
1800: -- log_debug('before delete of MSC_NET_RESOURCE_AVAIL ');
1801: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RESOURCE_AVAIL', MSC_CL_COLLECTION.v_instance_id, -1);
1802: COMMIT;
1803: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RES_INST_AVAIL', MSC_CL_COLLECTION.v_instance_id, -1);

Line 1807: lv_ret_res_ava:=CALC_RESOURCE_AVAILABILITY(lv_start_date-1,MSC_UTIL.G_ALL_ORGANIZATIONS,TRUE);

1803: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RES_INST_AVAIL', MSC_CL_COLLECTION.v_instance_id, -1);
1804: COMMIT;
1805:
1806: /* call the function to calc. resource avail */
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');

Line 1813: RETCODE:= MSC_UTIL.G_WARNING;

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;
1817: RETCODE:= MSC_UTIL.G_ERROR;

Line 1817: RETCODE:= MSC_UTIL.G_ERROR;

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:
1821: ELSIF MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_MIXED THEN

Line 1821: ELSIF MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_MIXED THEN

1817: RETCODE:= MSC_UTIL.G_ERROR;
1818:
1819: END IF;
1820:
1821: ELSIF MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_MIXED THEN
1822: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'debug-07');
1823: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RESOURCE_AVAIL', MSC_CL_COLLECTION.v_instance_id, -1,lv_where_clause);
1824: COMMIT;
1825: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RES_INST_AVAIL', MSC_CL_COLLECTION.v_instance_id, -1,lv_where_clause);

Line 1822: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'debug-07');

1818:
1819: END IF;
1820:
1821: ELSIF MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_MIXED THEN
1822: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'debug-07');
1823: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RESOURCE_AVAIL', MSC_CL_COLLECTION.v_instance_id, -1,lv_where_clause);
1824: COMMIT;
1825: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RES_INST_AVAIL', MSC_CL_COLLECTION.v_instance_id, -1,lv_where_clause);
1826: COMMIT;

Line 1829: lv_ret_res_ava:=CALC_RESOURCE_AVAILABILITY(lv_start_date-1,MSC_UTIL.G_ALL_ORGANIZATIONS,TRUE);

1825: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RES_INST_AVAIL', MSC_CL_COLLECTION.v_instance_id, -1,lv_where_clause);
1826: COMMIT;
1827:
1828:
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');

Line 1835: RETCODE:= MSC_UTIL.G_WARNING;

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:
1839: ERRBUF:= FND_MESSAGE.GET;

Line 1840: RETCODE:= MSC_UTIL.G_ERROR;

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.');
1844: ERRBUF:= FND_MESSAGE.GET;

Line 1843: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'This program can be run only for Instance Type: Discrete.');

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.');
1844: ERRBUF:= FND_MESSAGE.GET;
1845: RETCODE:= MSC_UTIL.G_ERROR;
1846:
1847: END IF;

Line 1845: 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:
1849: EXCEPTION

Line 1853: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

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;
1857:

Line 1854: RETCODE := MSC_UTIL.G_ERROR;

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;
1857:
1858: --==============================================================

Line 1887: AND ins_org.ENABLED_FLAG= MSC_UTIL.SYS_YES

1883: MSC_TRADING_PARTNERS mtp
1884: WHERE tp.SR_INSTANCE_ID= MSC_CL_COLLECTION.v_instance_id
1885: AND ins_org.SR_INSTANCE_ID=tp.SR_INSTANCE_ID
1886: AND ins_org.Organization_ID=tp.ORGANIZATION_ID
1887: AND ins_org.ENABLED_FLAG= MSC_UTIL.SYS_YES
1888: AND ((pORG_GROUP = MSC_UTIL.G_ALL_ORGANIZATIONS ) OR (ins_org.ORG_GROUP=pORG_GROUP))
1889: AND mtp.sr_instance_id = MSC_CL_COLLECTION.v_instance_id
1890: AND mtp.sr_tp_id = tp.organization_id
1891: AND mtp.partner_type = 3

Line 1888: AND ((pORG_GROUP = MSC_UTIL.G_ALL_ORGANIZATIONS ) OR (ins_org.ORG_GROUP=pORG_GROUP))

1884: WHERE tp.SR_INSTANCE_ID= MSC_CL_COLLECTION.v_instance_id
1885: AND ins_org.SR_INSTANCE_ID=tp.SR_INSTANCE_ID
1886: AND ins_org.Organization_ID=tp.ORGANIZATION_ID
1887: AND ins_org.ENABLED_FLAG= MSC_UTIL.SYS_YES
1888: AND ((pORG_GROUP = MSC_UTIL.G_ALL_ORGANIZATIONS ) OR (ins_org.ORG_GROUP=pORG_GROUP))
1889: AND mtp.sr_instance_id = MSC_CL_COLLECTION.v_instance_id
1890: AND mtp.sr_tp_id = tp.organization_id
1891: AND mtp.partner_type = 3
1892: AND mtp.organization_type = 1; -- Discrete Mfg.

Line 1913: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);

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:

Line 1924: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_mrp_cutoff_date_offset:'||lv_mrp_cutoff_date_offset);

1920: ELSE
1921: lv_task_end_time := ADD_MONTHS(lv_task_start_time,lv_mrp_cutoff_date_offset) + lv_res_avail_before_sysdate;
1922: END IF;
1923:
1924: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_mrp_cutoff_date_offset:'||lv_mrp_cutoff_date_offset);
1925: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_res_avail_before_sysdate:'||lv_res_avail_before_sysdate);
1926: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_task_end_time:'||lv_task_end_time);
1927: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_task_start_time:' ||lv_task_start_time);
1928: --- PREPLACE CHANGE START ---

Line 1925: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_res_avail_before_sysdate:'||lv_res_avail_before_sysdate);

1921: lv_task_end_time := ADD_MONTHS(lv_task_start_time,lv_mrp_cutoff_date_offset) + lv_res_avail_before_sysdate;
1922: END IF;
1923:
1924: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_mrp_cutoff_date_offset:'||lv_mrp_cutoff_date_offset);
1925: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_res_avail_before_sysdate:'||lv_res_avail_before_sysdate);
1926: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_task_end_time:'||lv_task_end_time);
1927: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_task_start_time:' ||lv_task_start_time);
1928: --- PREPLACE CHANGE START ---
1929: /*

Line 1926: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_task_end_time:'||lv_task_end_time);

1922: END IF;
1923:
1924: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_mrp_cutoff_date_offset:'||lv_mrp_cutoff_date_offset);
1925: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_res_avail_before_sysdate:'||lv_res_avail_before_sysdate);
1926: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_task_end_time:'||lv_task_end_time);
1927: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_task_start_time:' ||lv_task_start_time);
1928: --- PREPLACE CHANGE START ---
1929: /*
1930: IF v_is_complete_refresh THEN

Line 1927: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_task_start_time:' ||lv_task_start_time);

1923:
1924: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_mrp_cutoff_date_offset:'||lv_mrp_cutoff_date_offset);
1925: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_res_avail_before_sysdate:'||lv_res_avail_before_sysdate);
1926: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_task_end_time:'||lv_task_end_time);
1927: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'lv_task_start_time:' ||lv_task_start_time);
1928: --- PREPLACE CHANGE START ---
1929: /*
1930: IF v_is_complete_refresh THEN
1931: lv_refresh_flag:= 1;

Line 1949: IF MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_OTHER THEN

1945: /************** LEGACY_CHANGE_START*************************/
1946: -- Calling the program as complete refresh for legacy so that new
1947: -- records coming in are considered
1948:
1949: IF MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_OTHER THEN
1950: lv_refresh_flag := 1;
1951: END IF;
1952: /*****************LEGACY_CHANGE_ENDS************************/
1953:

Line 1962: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ORG_RESOURCES');

1958: SAVEPOINT SP1;
1959:
1960: FOR c_rec IN c1 LOOP
1961:
1962: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ORG_RESOURCES');
1963:
1964: POPULATE_ORG_RESOURCES
1965: ( lv_ret_code,
1966: lv_refresh_flag,

Line 1973: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'RET_CODE: ' ||lv_ret_code);

1969: MSC_CL_COLLECTION.v_instance_id,
1970: lv_task_start_time,
1971: lv_task_end_time);
1972:
1973: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'RET_CODE: ' ||lv_ret_code);
1974:
1975: IF lv_ret_code <> 0 THEN
1976: ROLLBACK WORK TO SAVEPOINT SP1;
1977: IF lv_ret_code IN (-01653,-01650,-01562,-01683) THEN

Line 1988: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ALL_LINES');

1984: COMMIT;
1985: SAVEPOINT SP1;
1986: END IF;
1987:
1988: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ALL_LINES');
1989:
1990: POPULATE_ALL_LINES
1991: ( lv_ret_code,
1992: lv_refresh_flag,

Line 1999: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'RET_CODE: ' ||lv_ret_code);

1995: MSC_CL_COLLECTION.v_instance_id,
1996: lv_task_start_time,
1997: lv_task_end_time);
1998:
1999: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'RET_CODE: ' ||lv_ret_code);
2000:
2001: IF lv_ret_code <> 0 THEN
2002: ROLLBACK WORK TO SAVEPOINT SP1;
2003: IF lv_ret_code IN (-01653,-01650,-01562,-01683) THEN

Line 2018: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ORG_RES_INSTANCES');

2014: /* yvon: resource instanc eavail changes start */
2015: -----------------------------------------------------
2016: -- populate resource instance availability
2017: -----------------------------------------------------
2018: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ORG_RES_INSTANCES');
2019:
2020: MSC_NET_RES_INST_AVAILABILITY.POPULATE_ORG_RES_INSTANCES
2021: ( lv_ret_code,
2022: lv_refresh_flag,

Line 2029: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'RET_CODE: ' ||lv_ret_code);

2025: MSC_CL_COLLECTION.v_instance_id,
2026: lv_task_start_time,
2027: lv_task_end_time);
2028:
2029: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'RET_CODE: ' ||lv_ret_code);
2030:
2031: IF lv_ret_code <> 0 THEN
2032: ROLLBACK WORK TO SAVEPOINT SP1;
2033: IF lv_ret_code IN (-01653,-01650,-01562,-01683) THEN

Line 2053: IF MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_OTHER THEN

2049: -- This is to enable resource changes to be
2050: -- considered for legacy. Both, the resource information and
2051: -- resource changes may come in at the same time for legacy.
2052:
2053: IF MSC_CL_COLLECTION.v_instance_type = MSC_UTIL.G_INS_OTHER THEN
2054:
2055: OPEN C2;
2056: FETCH C2 INTO lv_changes_exists;
2057: CLOSE C2;

Line 2069: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ORG_RESOURCES');

2065: SAVEPOINT SP1;
2066:
2067: FOR c_rec IN c1 LOOP
2068:
2069: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ORG_RESOURCES');
2070:
2071: POPULATE_ORG_RESOURCES
2072: ( lv_ret_code,
2073: lv_refresh_flag,

Line 2093: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ALL_LINES');

2089: COMMIT;
2090: SAVEPOINT SP1;
2091: END IF;
2092:
2093: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ALL_LINES');
2094:
2095: POPULATE_ALL_LINES
2096: ( lv_ret_code,
2097: lv_refresh_flag,

Line 2121: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ORG_RES_INSTANCES');

2117: /* yvon: resource instanc eavail changes start */
2118: -----------------------------------------------------
2119: -- populate resource instance availability
2120: -----------------------------------------------------
2121: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'CALLING POPULATE_ORG_RES_INSTANCES');
2122:
2123: MSC_NET_RES_INST_AVAILABILITY.POPULATE_ORG_RES_INSTANCES
2124: ( lv_ret_code,
2125: lv_refresh_flag,

Line 2132: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'RET_CODE: ' ||lv_ret_code);

2128: MSC_CL_COLLECTION.v_instance_id,
2129: lv_task_start_time,
2130: lv_task_end_time);
2131:
2132: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'RET_CODE: ' ||lv_ret_code);
2133:
2134: IF lv_ret_code <> 0 THEN
2135: ROLLBACK WORK TO SAVEPOINT SP1;
2136: IF lv_ret_code IN (-01653,-01650,-01562,-01683) THEN

Line 2150: END IF; -- MSC_UTIL.G_INS_OTHER

2146: /* yvon: resource instanc eavail changes end */
2147:
2148: END LOOP;
2149: END IF; -- lv_changes_exists
2150: END IF; -- MSC_UTIL.G_INS_OTHER
2151:
2152: /************** LEGACY_CHANGE_ENDS*************************/
2153:
2154: /* Bug 3295824 - We need to set the capacity units to 0 of any records

Line 2173: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);

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:

Line 2188: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2184: EXCEPTION
2185:
2186: WHEN OTHERS THEN
2187:
2188: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2189:
2190: IF (lv_temp_ret_flag=1 ) THEN
2191: return lv_temp_ret_flag;
2192: else

Line 2259: ((MSC_CL_COLLECTION.v_coll_prec.org_group_flag = MSC_UTIL.G_ALL_ORGANIZATIONS ) or (mio.org_group = MSC_CL_COLLECTION.v_coll_prec.org_group_flag)) and

2255: from msc_instance_orgs mio,
2256: msc_trading_partners mtp
2257: where mio.sr_instance_id= MSC_CL_COLLECTION.v_instance_id and
2258: mio.enabled_flag= 1 and
2259: ((MSC_CL_COLLECTION.v_coll_prec.org_group_flag = MSC_UTIL.G_ALL_ORGANIZATIONS ) or (mio.org_group = MSC_CL_COLLECTION.v_coll_prec.org_group_flag)) and
2260: mio.sr_instance_id=mtp.sr_instance_id and
2261: mio.organization_id=mtp.sr_tp_id and
2262: mtp.partner_type=3 and
2263: mtp.organization_type=2;

Line 2266: lv_res_avail NUMBER := MSC_UTIL.SYS_NO;

2262: mtp.partner_type=3 and
2263: mtp.organization_type=2;
2264:
2265: c_count NUMBER:= 0;
2266: lv_res_avail NUMBER := MSC_UTIL.SYS_NO;
2267: lv_res_inst_avail NUMBER := MSC_UTIL.SYS_NO;
2268: lv_sql_stmt VARCHAR2(2048);
2269:
2270: BEGIN

Line 2267: lv_res_inst_avail NUMBER := MSC_UTIL.SYS_NO;

2263: mtp.organization_type=2;
2264:
2265: c_count NUMBER:= 0;
2266: lv_res_avail NUMBER := MSC_UTIL.SYS_NO;
2267: lv_res_inst_avail NUMBER := MSC_UTIL.SYS_NO;
2268: lv_sql_stmt VARCHAR2(2048);
2269:
2270: BEGIN
2271:

Line 2272: IF MSC_CL_COLLECTION.v_recalc_nra= MSC_UTIL.SYS_YES THEN

2268: lv_sql_stmt VARCHAR2(2048);
2269:
2270: BEGIN
2271:
2272: IF MSC_CL_COLLECTION.v_recalc_nra= MSC_UTIL.SYS_YES THEN
2273:
2274: /*IF (v_is_complete_refresh OR (v_is_partial_refresh AND MSC_CL_COLLECTION.v_coll_prec.resource_nra_flag = MSC_CL_COLLECTION.SYS_YES)) THEN
2275: -- We want to delete all NRA related data and get new stuff.
2276:

Line 2281: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'debug-00');

2277: --MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RESOURCE_AVAIL', v_instance_id, -1);
2278: --MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RES_INST_AVAIL', v_instance_id, -1);
2279:
2280: IF MSC_CL_COLLECTION.v_coll_prec.org_group_flag = MSC_CL_COLLECTION.G_ALL_ORGANIZATIONS THEN
2281: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'debug-00');
2282: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RESOURCE_AVAIL', v_instance_id, -1);
2283: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RES_INST_AVAIL', v_instance_id, -1);
2284: ELSE
2285: v_sub_str :=' AND ORGANIZATION_ID '||v_in_org_str;

Line 2286: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'debug-01');

2282: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RESOURCE_AVAIL', v_instance_id, -1);
2283: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RES_INST_AVAIL', v_instance_id, -1);
2284: ELSE
2285: v_sub_str :=' AND ORGANIZATION_ID '||v_in_org_str;
2286: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'debug-01');
2287: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RESOURCE_AVAIL', v_instance_id, -1,v_sub_str);
2288: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RES_INST_AVAIL', v_instance_id, -1,v_sub_str);
2289: END IF;
2290:

Line 2295: IF MSC_CL_COLLECTION.v_process_flag = MSC_UTIL.SYS_YES THEN

2291: END IF;*/
2292:
2293: -- process mfg only. move the rows for the st table to the msc table
2294: -- for net resource avail
2295: IF MSC_CL_COLLECTION.v_process_flag = MSC_UTIL.SYS_YES THEN
2296:
2297: /*
2298: We will do a bulk insert of res avail for OPM orgs. If this fails,
2299: then we will switch to old, row by row processing.

Line 2309: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Loading res avail for OPM orgs : ' || c_rec1.organization_id);

2305: BEGIN
2306:
2307: SAVEPOINT LOAD_RES_AVAIL_SP;
2308:
2309: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Loading res avail for OPM orgs : ' || c_rec1.organization_id);
2310:
2311: lv_sql_stmt:=
2312: ' INSERT into MSC_net_resource_avail '
2313: ||' ( transaction_id,'

Line 2368: lv_res_avail:=MSC_UTIL.SYS_YES;

2364: MSC_CL_COLLECTION.v_last_collection_id;
2365:
2366: COMMIT;
2367:
2368: lv_res_avail:=MSC_UTIL.SYS_YES;
2369:
2370: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Loaded res avail for OPM orgs : ' || c_rec1.organization_id);
2371:
2372: EXCEPTION

Line 2370: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Loaded res avail for OPM orgs : ' || c_rec1.organization_id);

2366: COMMIT;
2367:
2368: lv_res_avail:=MSC_UTIL.SYS_YES;
2369:
2370: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Loaded res avail for OPM orgs : ' || c_rec1.organization_id);
2371:
2372: EXCEPTION
2373: WHEN OTHERS THEN
2374:

Line 2375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '<>');

2371:
2372: EXCEPTION
2373: WHEN OTHERS THEN
2374:
2375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '<>');
2376: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2377: ROLLBACK WORK TO SAVEPOINT LOAD_RES_AVAIL_SP;
2378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Switching to Row-By-Row processing for org : ' || c_rec1.organization_id);
2379: END;

Line 2376: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2372: EXCEPTION
2373: WHEN OTHERS THEN
2374:
2375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '<>');
2376: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2377: ROLLBACK WORK TO SAVEPOINT LOAD_RES_AVAIL_SP;
2378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Switching to Row-By-Row processing for org : ' || c_rec1.organization_id);
2379: END;
2380:

Line 2378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Switching to Row-By-Row processing for org : ' || c_rec1.organization_id);

2374:
2375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '<>');
2376: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2377: ROLLBACK WORK TO SAVEPOINT LOAD_RES_AVAIL_SP;
2378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Switching to Row-By-Row processing for org : ' || c_rec1.organization_id);
2379: END;
2380:
2381: IF lv_res_avail = MSC_UTIL.SYS_NO THEN
2382: c_count:= 0;

Line 2381: IF lv_res_avail = MSC_UTIL.SYS_NO THEN

2377: ROLLBACK WORK TO SAVEPOINT LOAD_RES_AVAIL_SP;
2378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Switching to Row-By-Row processing for org : ' || c_rec1.organization_id);
2379: END;
2380:
2381: IF lv_res_avail = MSC_UTIL.SYS_NO THEN
2382: c_count:= 0;
2383:
2384: FOR c_rec IN c11(c_rec1.organization_id) LOOP
2385:

Line 2442: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');

2438: WHEN OTHERS THEN
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);

Line 2446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);

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:

Line 2448: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

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:
2451: ELSE
2452:

Line 2453: MSC_CL_COLLECTION.v_warning_flag := MSC_UTIL.SYS_YES;

2449: RAISE;
2450:
2451: ELSE
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');

Line 2455: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');

2451: ELSE
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);

Line 2459: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);

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));

Line 2464: 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');
2468: FND_MESSAGE.SET_TOKEN('VALUE',

Line 2471: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);

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:

Line 2473: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

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:
2476: END;
2477:

Line 2491: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Loading res instance avail for OPM orgs : ' || c_rec1.organization_id);

2487: BEGIN
2488:
2489: SAVEPOINT LOAD_RES_INST_AVAIL_SP;
2490:
2491: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Loading res instance avail for OPM orgs : ' || c_rec1.organization_id);
2492:
2493: lv_sql_stmt:=
2494: ' INSERT into MSC_net_res_inst_avail '
2495: ||' ( inst_transaction_id,'

Line 2559: lv_res_inst_avail:=MSC_UTIL.SYS_YES;

2555: MSC_CL_COLLECTION.v_last_collection_id;
2556:
2557: COMMIT;
2558:
2559: lv_res_inst_avail:=MSC_UTIL.SYS_YES;
2560:
2561: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Loaded res instance avail for OPM orgs : ' || c_rec1.organization_id);
2562:
2563: EXCEPTION

Line 2561: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Loaded res instance avail for OPM orgs : ' || c_rec1.organization_id);

2557: COMMIT;
2558:
2559: lv_res_inst_avail:=MSC_UTIL.SYS_YES;
2560:
2561: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Loaded res instance avail for OPM orgs : ' || c_rec1.organization_id);
2562:
2563: EXCEPTION
2564: WHEN OTHERS THEN
2565:

Line 2566: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '<>');

2562:
2563: EXCEPTION
2564: WHEN OTHERS THEN
2565:
2566: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '<>');
2567: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2568: ROLLBACK WORK TO SAVEPOINT LOAD_RES_INST_AVAIL_SP;
2569: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Switching to Row-By-Row processing for org ' || c_rec1.organization_id);
2570: END;

Line 2567: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2563: EXCEPTION
2564: WHEN OTHERS THEN
2565:
2566: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '<>');
2567: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2568: ROLLBACK WORK TO SAVEPOINT LOAD_RES_INST_AVAIL_SP;
2569: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Switching to Row-By-Row processing for org ' || c_rec1.organization_id);
2570: END;
2571:

Line 2569: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Switching to Row-By-Row processing for org ' || c_rec1.organization_id);

2565:
2566: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '<>');
2567: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2568: ROLLBACK WORK TO SAVEPOINT LOAD_RES_INST_AVAIL_SP;
2569: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Switching to Row-By-Row processing for org ' || c_rec1.organization_id);
2570: END;
2571:
2572: IF lv_res_inst_avail = MSC_UTIL.SYS_NO THEN
2573:

Line 2572: IF lv_res_inst_avail = MSC_UTIL.SYS_NO THEN

2568: ROLLBACK WORK TO SAVEPOINT LOAD_RES_INST_AVAIL_SP;
2569: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Switching to Row-By-Row processing for org ' || c_rec1.organization_id);
2570: END;
2571:
2572: IF lv_res_inst_avail = MSC_UTIL.SYS_NO THEN
2573:
2574: c_count:= 0;
2575:
2576: FOR c_rec_resinst IN c_res_inst(c_rec1.organization_id) LOOP

Line 2641: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');

2637: WHEN OTHERS THEN
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);

Line 2645: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);

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:

Line 2647: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

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:
2650: ELSE
2651:

Line 2652: MSC_CL_COLLECTION.v_warning_flag := MSC_UTIL.SYS_YES;

2648: RAISE;
2649:
2650: ELSE
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');

Line 2654: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');

2650: ELSE
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);

Line 2658: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);

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));

Line 2663: 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');
2667: FND_MESSAGE.SET_TOKEN('VALUE',

Line 2670: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);

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:

Line 2672: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

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:
2675: END;
2676: