[Home] [Help]
62: DJ.STATUS_TYPE,
63: x_group_id,
64: p_act_close_date
65: FROM ORG_ACCT_PERIODS AP,
66: WIP_DISCRETE_JOBS DJ,
67: WIP_ENTITIES WE
68: WHERE DJ.ORGANIZATION_ID = p_organization_id
69: AND WE.ORGANIZATION_ID = DJ.ORGANIZATION_ID
70: AND AP.ORGANIZATION_ID = DJ.ORGANIZATION_ID
399: --
400: -- The most efficient algorithm is to start deleting all
401: -- invalid records from wip_dj_close_temp collecting the
402: -- wip_entity_ids at the same time. Then use BULK op
403: -- to update wip_discrete_jobs' status for those records.
404: -- bso Sat Jun 17 17:18:45 PDT 2006
405: --
406:
407: DELETE FROM wip_dj_close_temp wdct
408: WHERE wdct.organization_id = p_organization_id AND
409: wdct.group_id = p_group_id AND
410: wdct.actual_close_date <
411: (SELECT wdj.date_released
412: FROM wip_discrete_jobs wdj
413: WHERE wdj.wip_entity_id = wdct.wip_entity_id AND
414: wdj.organization_id = p_organization_id)
415: RETURNING wdct.wip_entity_id
416: BULK COLLECT INTO l_failed_ids;
423: x_returnstatus := FND_API.G_RET_STS_SUCCESS;
424: ELSE
425: --
426: -- Some invalid jobs found. Set expected error flag and
427: -- update wip_discrete_jobs' status_type to fail_close.
428: --
429: x_returnstatus := FND_API.G_RET_STS_ERROR;
430:
431: FORALL i IN l_failed_ids.FIRST .. l_failed_ids.LAST
428: --
429: x_returnstatus := FND_API.G_RET_STS_ERROR;
430:
431: FORALL i IN l_failed_ids.FIRST .. l_failed_ids.LAST
432: UPDATE wip_discrete_jobs
433: SET status_type = WIP_CONSTANTS.FAIL_CLOSE
434: WHERE organization_id = p_organization_id AND
435: wip_entity_id = l_failed_ids(i);
436:
558:
559: EXIT WHEN c_pending_txns%NOTFOUND ;
560: END LOOP ;
561:
562: UPDATE WIP_DISCRETE_JOBS
563: SET STATUS_TYPE = WIP_CONSTANTS.FAIL_CLOSE
564: WHERE WIP_ENTITY_ID IN
565: (SELECT WIP_ENTITY_ID
566: FROM WIP_DJ_CLOSE_TEMP
704: x_returnstatus := FND_API.G_RET_STS_ERROR;
705: END IF;
706: end loop;
707:
708: UPDATE WIP_DISCRETE_JOBS
709: SET STATUS_TYPE = WIP_CONSTANTS.FAIL_CLOSE
710: WHERE WIP_ENTITY_ID IN
711: (SELECT WIP_ENTITY_ID
712: FROM WIP_DJ_CLOSE_TEMP
792: x_returnstatus := FND_API.G_RET_STS_ERROR;
793: END IF;
794: end loop;
795:
796: UPDATE WIP_DISCRETE_JOBS
797: SET STATUS_TYPE = WIP_CONSTANTS.FAIL_CLOSE
798: WHERE WIP_ENTITY_ID IN
799: (SELECT WIP_ENTITY_ID
800: FROM WIP_DJ_CLOSE_TEMP
926: EXIT WHEN c_pending_txns%NOTFOUND ;
927: END LOOP ;
928: fnd_file.put_line(FND_FILE.LOG,'Number of failed jobs because of past close date : '||l_failed_counter);
929:
930: UPDATE WIP_DISCRETE_JOBS
931: SET STATUS_TYPE = WIP_CONSTANTS.FAIL_CLOSE
932: WHERE WIP_ENTITY_ID IN
933: (SELECT WIP_ENTITY_ID
934: FROM WIP_DJ_CLOSE_TEMP
1360:
1361: SELECT COUNT(*)
1362: INTO l_std_asst_jobs
1363: FROM WIP_DJ_CLOSE_TEMP TEMP,
1364: WIP_DISCRETE_JOBS WDJ,
1365: WIP_ACCOUNTING_CLASSES WAC
1366: WHERE WDJ.WIP_ENTITY_ID = TEMP.WIP_ENTITY_ID
1367: AND TEMP.ORGANIZATION_ID = p_organization_id
1368: AND WDJ.ORGANIZATION_ID = TEMP.ORGANIZATION_ID
1378:
1379: SELECT COUNT(*)
1380: INTO l_expense_jobs
1381: FROM WIP_DJ_CLOSE_TEMP TEMP,
1382: WIP_DISCRETE_JOBS WDJ,
1383: WIP_ACCOUNTING_CLASSES WAC
1384: WHERE WDJ.WIP_ENTITY_ID = TEMP.WIP_ENTITY_ID
1385: AND TEMP.ORGANIZATION_ID = p_organization_id
1386: AND WDJ.ORGANIZATION_ID = p_organization_id
1799: RAISE FND_API.G_EXC_ERROR ;
1800: END IF;
1801: /*Bug 6908428*/
1802:
1803: UPDATE wip_discrete_jobs
1804: SET status_type = WIP_CONSTANTS.PEND_CLOSE ,
1805: request_id = fnd_global.conc_request_id ,
1806: last_update_date = sysdate,
1807: last_updated_by = fnd_global.user_id,
2215:
2216: /*Bug 6908428*/
2217:
2218:
2219: UPDATE WIP_DISCRETE_JOBS wdj
2220: SET DATE_CLOSED = (SELECT wdct.ACTUAL_CLOSE_DATE
2221: FROM WIP_DJ_CLOSE_TEMP wdct
2222: WHERE wdct.ORGANIZATION_ID = p_organization_id
2223: AND wdj.ORGANIZATION_ID = p_organization_id
2356:
2357: /*Bug 6908428*/
2358:
2359:
2360: UPDATE WIP_DISCRETE_JOBS wdj
2361: SET LAST_UPDATE_DATE = SYSDATE,
2362: last_updated_by = fnd_global.user_id,
2363: last_update_login = fnd_global.login_id,
2364: STATUS_TYPE = WIP_CONSTANTS.FAIL_CLOSE