452: p_procReturnStatus => x_returnStatus,
453: p_msg => l_msg,
454: x_returnStatus => l_return_Status);
455: END IF;
456: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
457: fnd_message.set_token('MESSAGE', l_msg);
458: fnd_msg_pub.add;
459:
460: END populate_close_temp ;
453: p_msg => l_msg,
454: x_returnStatus => l_return_Status);
455: END IF;
456: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
457: fnd_message.set_token('MESSAGE', l_msg);
458: fnd_msg_pub.add;
459:
460: END populate_close_temp ;
461:
626: p_procReturnStatus => x_returnStatus,
627: p_msg => l_msg,
628: x_returnStatus => l_return_Status);
629: END IF;
630: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
631: fnd_message.set_token('MESSAGE', l_msg);
632: fnd_msg_pub.add;
633:
634: END TIME_ZONE_CONVERSIONS;
627: p_msg => l_msg,
628: x_returnStatus => l_return_Status);
629: END IF;
630: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
631: fnd_message.set_token('MESSAGE', l_msg);
632: fnd_msg_pub.add;
633:
634: END TIME_ZONE_CONVERSIONS;
635:
726: p_procReturnStatus => x_returnStatus,
727: p_msg => l_msg,
728: x_returnStatus => l_return_Status);
729: END IF;
730: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
731: fnd_message.set_token('MESSAGE', l_msg);
732: fnd_msg_pub.add;
733:
734: END PRIOR_DATE_RELEASE;
727: p_msg => l_msg,
728: x_returnStatus => l_return_Status);
729: END IF;
730: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
731: fnd_message.set_token('MESSAGE', l_msg);
732: fnd_msg_pub.add;
733:
734: END PRIOR_DATE_RELEASE;
735:
870: p_procReturnStatus => x_returnStatus,
871: p_msg => l_msg,
872: x_returnStatus => l_return_Status);
873: END IF;
874: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
875: fnd_message.set_token('MESSAGE', l_msg);
876: fnd_msg_pub.add;
877: END PENDING_TXNS ;
878:
871: p_msg => l_msg,
872: x_returnStatus => l_return_Status);
873: END IF;
874: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
875: fnd_message.set_token('MESSAGE', l_msg);
876: fnd_msg_pub.add;
877: END PENDING_TXNS ;
878:
879:
1012: p_procReturnStatus => x_returnStatus,
1013: p_msg => l_msg,
1014: x_returnStatus => l_return_Status);
1015: END IF;
1016: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1017: fnd_message.set_token('MESSAGE', l_msg);
1018: fnd_msg_pub.add;
1019:
1020: END PENDING_CLOCKS ;
1013: p_msg => l_msg,
1014: x_returnStatus => l_return_Status);
1015: END IF;
1016: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1017: fnd_message.set_token('MESSAGE', l_msg);
1018: fnd_msg_pub.add;
1019:
1020: END PENDING_CLOCKS ;
1021:
1236: p_procReturnStatus => x_returnStatus,
1237: p_msg => l_msg,
1238: x_returnStatus => l_return_Status);
1239: END IF;
1240: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1241: fnd_message.set_token('MESSAGE', l_msg);
1242: fnd_msg_pub.add;
1243: END PAST_CLOSE_DATE ;
1244:
1237: p_msg => l_msg,
1238: x_returnStatus => l_return_Status);
1239: END IF;
1240: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1241: fnd_message.set_token('MESSAGE', l_msg);
1242: fnd_msg_pub.add;
1243: END PAST_CLOSE_DATE ;
1244:
1245: procedure CHECK_OPEN_PO
1321: fnd_file.put_line(FND_FILE.LOG,'Open PO Exists');
1322: l_failed_counter := l_failed_counter + 1 ;
1323: x_returnStatus := fnd_api.g_ret_sts_error;
1324: fnd_file.put_line(FND_FILE.OUTPUT,to_char(l_failed_jobs));
1325: fnd_message.set_name('WIP', 'WIP_CANCEL_JOB/SCHED_OPEN_PO');
1326: l_msg := fnd_message.get;
1327: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
1328: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
1329: end if ;
1322: l_failed_counter := l_failed_counter + 1 ;
1323: x_returnStatus := fnd_api.g_ret_sts_error;
1324: fnd_file.put_line(FND_FILE.OUTPUT,to_char(l_failed_jobs));
1325: fnd_message.set_name('WIP', 'WIP_CANCEL_JOB/SCHED_OPEN_PO');
1326: l_msg := fnd_message.get;
1327: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
1328: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
1329: end if ;
1330:
1361: p_procReturnStatus => x_returnStatus,
1362: p_msg => l_msg,
1363: x_returnStatus => l_return_Status);
1364: END IF;
1365: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1366: fnd_message.set_token('MESSAGE', l_msg);
1367: fnd_msg_pub.add;
1368:
1369: END CHECK_OPEN_PO ;
1362: p_msg => l_msg,
1363: x_returnStatus => l_return_Status);
1364: END IF;
1365: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1366: fnd_message.set_token('MESSAGE', l_msg);
1367: fnd_msg_pub.add;
1368:
1369: END CHECK_OPEN_PO ;
1370:
1428: fnd_file.put_line(FND_FILE.LOG,'Quantity delivered less than Quantity received');
1429: l_failed_counter := l_failed_counter + 1 ;
1430: x_returnStatus := fnd_api.g_ret_sts_error;
1431: fnd_file.put_line(FND_FILE.OUTPUT,to_char(l_failed_jobs));
1432: fnd_message.set_name('WIP', 'WIP_PO_NOT_DELIVERED'); /*Bug 9877786(FP of 9791544)*/
1433: l_msg := fnd_message.get;
1434: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
1435: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
1436: end if ;
1429: l_failed_counter := l_failed_counter + 1 ;
1430: x_returnStatus := fnd_api.g_ret_sts_error;
1431: fnd_file.put_line(FND_FILE.OUTPUT,to_char(l_failed_jobs));
1432: fnd_message.set_name('WIP', 'WIP_PO_NOT_DELIVERED'); /*Bug 9877786(FP of 9791544)*/
1433: l_msg := fnd_message.get;
1434: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
1435: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
1436: end if ;
1437: /*Bug 13625290*/
1483: p_procReturnStatus => x_returnStatus,
1484: p_msg => l_msg,
1485: x_returnStatus => l_return_Status);
1486: END IF;
1487: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1488: fnd_message.set_token('MESSAGE', l_msg);
1489: fnd_msg_pub.add;
1490:
1491: END CHECK_DELIVERY_QTY ;
1484: p_msg => l_msg,
1485: x_returnStatus => l_return_Status);
1486: END IF;
1487: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1488: fnd_message.set_token('MESSAGE', l_msg);
1489: fnd_msg_pub.add;
1490:
1491: END CHECK_DELIVERY_QTY ;
1492:
1550: p_procReturnStatus => x_returnStatus,
1551: p_msg => l_msg,
1552: x_returnStatus => l_return_Status);
1553: END IF;
1554: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1555: fnd_message.set_token('MESSAGE', l_msg);
1556: fnd_msg_pub.add;
1557:
1558: END LOT_VALIDATE ;
1551: p_msg => l_msg,
1552: x_returnStatus => l_return_Status);
1553: END IF;
1554: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1555: fnd_message.set_token('MESSAGE', l_msg);
1556: fnd_msg_pub.add;
1557:
1558: END LOT_VALIDATE ;
1559:
1660: p_procReturnStatus => x_returnStatus,
1661: p_msg => l_msg,
1662: x_returnStatus => l_return_Status);
1663: END IF;
1664: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1665: fnd_message.set_token('MESSAGE', l_msg);
1666: fnd_msg_pub.add;
1667:
1668: END DELETE_RESERVATIONS ;
1661: p_msg => l_msg,
1662: x_returnStatus => l_return_Status);
1663: END IF;
1664: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
1665: fnd_message.set_token('MESSAGE', l_msg);
1666: fnd_msg_pub.add;
1667:
1668: END DELETE_RESERVATIONS ;
1669:
1922: FND_FILE.PUT_LINE(FND_FILE.LOG,'Costing Report Concurrent Program return code : '||retcode);
1923:
1924: if (retcode <> -1 ) then
1925: FND_FILE.PUT_LINE(FND_FILE.LOG,'Report has errored or has a warning');
1926: errbuf := fnd_message.get;
1927: raise FND_API.G_EXC_ERROR ;
1928: end if;
1929:
1930: END IF ;
1974: FND_FILE.PUT_LINE(FND_FILE.LOG,'Expense report reurn code : '||retcode);
1975:
1976: if (retcode <> -1 ) then
1977: FND_FILE.PUT_LINE(FND_FILE.LOG,'Report has errored or has a warning');
1978: errbuf := fnd_message.get;
1979: raise FND_API.G_EXC_ERROR ;
1980: end if;
1981:
1982: END IF ; -- Expense Reports End
2142:
2143: if ( sysdate > l_act_close_date ) then
2144: fnd_file.put_line(FND_FILE.LOG,'WIP DISCRETE CLOSE');
2145: else
2146: fnd_message.set_name('WIP','CLOSE DATE');
2147: l_msg := fnd_message.get;
2148: l_msg := l_msg || ' ' || l_act_close_date ;
2149: fnd_message.set_name('WIP','WIP_LESS_OR_EQUAL');
2150: fnd_message.set_token('ENTITY1',l_msg);
2143: if ( sysdate > l_act_close_date ) then
2144: fnd_file.put_line(FND_FILE.LOG,'WIP DISCRETE CLOSE');
2145: else
2146: fnd_message.set_name('WIP','CLOSE DATE');
2147: l_msg := fnd_message.get;
2148: l_msg := l_msg || ' ' || l_act_close_date ;
2149: fnd_message.set_name('WIP','WIP_LESS_OR_EQUAL');
2150: fnd_message.set_token('ENTITY1',l_msg);
2151: fnd_message.set_token('ENTITY2', sysdate);
2145: else
2146: fnd_message.set_name('WIP','CLOSE DATE');
2147: l_msg := fnd_message.get;
2148: l_msg := l_msg || ' ' || l_act_close_date ;
2149: fnd_message.set_name('WIP','WIP_LESS_OR_EQUAL');
2150: fnd_message.set_token('ENTITY1',l_msg);
2151: fnd_message.set_token('ENTITY2', sysdate);
2152: l_msg := fnd_message.get;
2153: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2146: fnd_message.set_name('WIP','CLOSE DATE');
2147: l_msg := fnd_message.get;
2148: l_msg := l_msg || ' ' || l_act_close_date ;
2149: fnd_message.set_name('WIP','WIP_LESS_OR_EQUAL');
2150: fnd_message.set_token('ENTITY1',l_msg);
2151: fnd_message.set_token('ENTITY2', sysdate);
2152: l_msg := fnd_message.get;
2153: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2154: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2147: l_msg := fnd_message.get;
2148: l_msg := l_msg || ' ' || l_act_close_date ;
2149: fnd_message.set_name('WIP','WIP_LESS_OR_EQUAL');
2150: fnd_message.set_token('ENTITY1',l_msg);
2151: fnd_message.set_token('ENTITY2', sysdate);
2152: l_msg := fnd_message.get;
2153: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2154: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2155: fnd_file.put_line(FND_FILE.LOG,l_msg);
2148: l_msg := l_msg || ' ' || l_act_close_date ;
2149: fnd_message.set_name('WIP','WIP_LESS_OR_EQUAL');
2150: fnd_message.set_token('ENTITY1',l_msg);
2151: fnd_message.set_token('ENTITY2', sysdate);
2152: l_msg := fnd_message.get;
2153: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2154: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2155: fnd_file.put_line(FND_FILE.LOG,l_msg);
2156: RAISE FND_API.G_EXC_ERROR ;
2172: AND PERIOD_CLOSE_DATE IS NULL;
2173:
2174: EXCEPTION
2175: WHEN NO_DATA_FOUND THEN
2176: fnd_message.set_name('WIP','WIP_CLOSE_CLOSED_PERIOD');
2177: l_msg := fnd_message.get;
2178: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2179: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2180: fnd_file.put_line(FND_FILE.LOG,l_msg) ;
2173:
2174: EXCEPTION
2175: WHEN NO_DATA_FOUND THEN
2176: fnd_message.set_name('WIP','WIP_CLOSE_CLOSED_PERIOD');
2177: l_msg := fnd_message.get;
2178: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2179: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2180: fnd_file.put_line(FND_FILE.LOG,l_msg) ;
2181: RAISE FND_API.G_EXC_ERROR ;
2305: p_organization_id => p_organization_id,
2306: p_group_id => l_group_id);
2307:
2308: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2309: fnd_message.set_name('WIP', 'WIP_PRIOR_DATE_RELEASE');
2310: l_msg := fnd_message.get;
2311: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2312: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2313: x_warning := 1 ;
2306: p_group_id => l_group_id);
2307:
2308: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2309: fnd_message.set_name('WIP', 'WIP_PRIOR_DATE_RELEASE');
2310: l_msg := fnd_message.get;
2311: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2312: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2313: x_warning := 1 ;
2314: --
2347: p_organization_id => p_organization_id,
2348: p_group_id => l_group_id);
2349:
2350: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2351: fnd_message.set_name('WIP', 'WIP_PENDING_CLOCKS');
2352: l_msg := fnd_message.get;
2353: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2354: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2355: x_warning := 1 ;
2348: p_group_id => l_group_id);
2349:
2350: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2351: fnd_message.set_name('WIP', 'WIP_PENDING_CLOCKS');
2352: l_msg := fnd_message.get;
2353: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2354: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2355: x_warning := 1 ;
2356: --
2373: x_returnstatus => l_return_status,
2374: p_organization_id => p_organization_id,
2375: p_group_id => l_group_id);
2376: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2377: fnd_message.set_name('WIP', 'TRANSACTIONS PENDING');
2378: l_msg := fnd_message.get;
2379: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2380: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2381: x_warning := 1 ;
2374: p_organization_id => p_organization_id,
2375: p_group_id => l_group_id);
2376: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2377: fnd_message.set_name('WIP', 'TRANSACTIONS PENDING');
2378: l_msg := fnd_message.get;
2379: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2380: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2381: x_warning := 1 ;
2382: --
2400: p_organization_id => p_organization_id,
2401: p_group_id => l_group_id);
2402:
2403: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2404: fnd_message.set_name('WIP', 'TRANSACTIONS PENDING');
2405: l_msg := fnd_message.get;
2406: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2407: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2408: x_warning := 1 ;
2401: p_group_id => l_group_id);
2402:
2403: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2404: fnd_message.set_name('WIP', 'TRANSACTIONS PENDING');
2405: l_msg := fnd_message.get;
2406: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2407: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2408: x_warning := 1 ;
2409: --
2426: p_organization_id => p_organization_id,
2427: p_group_id => l_group_id);
2428:
2429: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2430: fnd_message.set_name('WIP', 'CLOSE DATE IN PAST');
2431: l_msg := fnd_message.get;
2432: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2433: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2434: x_warning := 1 ;
2427: p_group_id => l_group_id);
2428:
2429: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2430: fnd_message.set_name('WIP', 'CLOSE DATE IN PAST');
2431: l_msg := fnd_message.get;
2432: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2433: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2434: x_warning := 1 ;
2435: --
2456: p_group_id => l_group_id);
2457:
2458: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2459: x_warning := 1 ;
2460: fnd_message.set_name('WIP', 'WIP_CANCEL_JOB/SCHED_OPEN_PO');
2461: l_msg := fnd_message.get;
2462: --
2463: -- Bug 5345660 Added profile check before invoking wip_logger
2464: --
2457:
2458: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2459: x_warning := 1 ;
2460: fnd_message.set_name('WIP', 'WIP_CANCEL_JOB/SCHED_OPEN_PO');
2461: l_msg := fnd_message.get;
2462: --
2463: -- Bug 5345660 Added profile check before invoking wip_logger
2464: --
2465: IF fnd_log.g_current_runtime_level <= wip_constants.trace_logging THEN
2482:
2483: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2484: /*Bug 13625290*/
2485: x_warning := 1 ;
2486: fnd_message.set_name('WIP', 'WIP_PO_NOT_DELIVERED');
2487: l_msg := fnd_message.get;
2488: IF fnd_log.g_current_runtime_level <= wip_constants.trace_logging THEN
2489: wip_logger.log(p_msg => 'CHECK_DELIVERY_QTY procedure failed',
2490: x_returnStatus => l_return_Status);
2483: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2484: /*Bug 13625290*/
2485: x_warning := 1 ;
2486: fnd_message.set_name('WIP', 'WIP_PO_NOT_DELIVERED');
2487: l_msg := fnd_message.get;
2488: IF fnd_log.g_current_runtime_level <= wip_constants.trace_logging THEN
2489: wip_logger.log(p_msg => 'CHECK_DELIVERY_QTY procedure failed',
2490: x_returnStatus => l_return_Status);
2491: END IF;
2800: AND GROUP_ID = l_group_id;
2801:
2802: fnd_file.put_line( FND_FILE.LOG,'Number of jobs Closed '||to_char(l_num_close));
2803: fnd_file.put(FND_FILE.OUTPUT,to_char(l_num_close)||' ');
2804: fnd_message.set_name('WIP','WIP_NUM_CLOSED');
2805: l_msg := fnd_message.get;
2806: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2807: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2808:
2801:
2802: fnd_file.put_line( FND_FILE.LOG,'Number of jobs Closed '||to_char(l_num_close));
2803: fnd_file.put(FND_FILE.OUTPUT,to_char(l_num_close)||' ');
2804: fnd_message.set_name('WIP','WIP_NUM_CLOSED');
2805: l_msg := fnd_message.get;
2806: fnd_file.put_line(FND_FILE.OUTPUT,l_msg);
2807: fnd_file.put_line(FND_FILE.OUTPUT,'*******************');
2808:
2809: