635: x_msg_data OUT NOCOPY VARCHAR2)
636: Is
637: Begin
638:
639: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
640: THEN
641: FND_MSG_PUB.initialize;
642: END IF;
643: x_return_status := FND_API.G_RET_STS_SUCCESS;
639: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
640: THEN
641: FND_MSG_PUB.initialize;
642: END IF;
643: x_return_status := FND_API.G_RET_STS_SUCCESS;
644:
645: update wip_discrete_jobs wdj
646: set wdj.job_note = wdj.job_note || p_msg
647: where wdj.wip_entity_id = p_wip_entity_id;
646: set wdj.job_note = wdj.job_note || p_msg
647: where wdj.wip_entity_id = p_wip_entity_id;
648:
649: exception when others then
650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
651:
652: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
653: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_job_note');
654: END IF;
664: Is
665: job_note clob;
666: Begin
667:
668: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
669: THEN
670: FND_MSG_PUB.initialize;
671: END IF;
672: x_return_status := FND_API.G_RET_STS_SUCCESS;
668: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
669: THEN
670: FND_MSG_PUB.initialize;
671: END IF;
672: x_return_status := FND_API.G_RET_STS_SUCCESS;
673:
674: select wdj.job_note
675: into job_note
676: from wip_discrete_jobs wdj
681:
682: commit;
683:
684: exception when others then
685: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
686:
687: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
688: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_job_note');
689: END IF;
700: l_note CLOB;
701:
702: Begin
703:
704: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
705: THEN
706: FND_MSG_PUB.initialize;
707: END IF;
708: x_return_status := FND_API.G_RET_STS_SUCCESS;
704: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
705: THEN
706: FND_MSG_PUB.initialize;
707: END IF;
708: x_return_status := FND_API.G_RET_STS_SUCCESS;
709:
710: select note into l_note from wip_exceptions
711: where exception_id = p_exception_id;
712:
720: set we.note = l_note
721: where we.exception_id = p_exception_id;
722:
723: exception when others then
724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
725:
726: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
727: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_exception_note');
728: END IF;
1312: release_on_commit => TRUE);
1313: trace_log('get_lock: got lock for lock handle with status ='||x_lock_status);
1314: trace_log('get_lock: Returning from lock_for_match');
1315: EXCEPTION
1316: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
1317: trace_log('get_lock: Exception: Unexpected Error '||sqlerrm);
1318: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
1319:
1320: WHEN OTHERS then
1314: trace_log('get_lock: Returning from lock_for_match');
1315: EXCEPTION
1316: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
1317: trace_log('get_lock: Exception: Unexpected Error '||sqlerrm);
1318: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
1319:
1320: WHEN OTHERS then
1321: trace_log('get_lock: Exception: Others Exception : ' || sqlerrm);
1322: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
1318: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
1319:
1320: WHEN OTHERS then
1321: trace_log('get_lock: Exception: Others Exception : ' || sqlerrm);
1322: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
1323:
1324: END get_lock;
1325:
1326:
1329: x_msg_count OUT NOCOPY NUMBER,
1330: x_msg_data OUT NOCOPY VARCHAR2,
1331: p_org_id IN NUMBER,
1332: p_lock_prefix IN varchar2) IS
1333: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
1334: l_lock_handle VARCHAR2(128);
1335: l_status INTEGER;
1336: l_returnStatus varchar2(1);
1337: BEGIN
1349: --if parameter error or illegal lock handle (internal error)
1350:
1351: if l_status IN (3,5) THEN
1352: trace_log('release_lock: Error releasing lock');
1353: RAISE fnd_api.g_exc_error;
1354: end if;
1355:
1356: x_return_status := l_return_status;
1357:
1357:
1358:
1359: EXCEPTION
1360:
1361: WHEN fnd_api.g_exc_error THEN
1362: trace_log('release_lock: Exception: expected error');
1363: x_return_status := fnd_api.g_ret_sts_error;
1364:
1365: WHEN fnd_api.g_exc_unexpected_error THEN
1359: EXCEPTION
1360:
1361: WHEN fnd_api.g_exc_error THEN
1362: trace_log('release_lock: Exception: expected error');
1363: x_return_status := fnd_api.g_ret_sts_error;
1364:
1365: WHEN fnd_api.g_exc_unexpected_error THEN
1366: trace_log('release_lock: Exception: Unexpected error');
1367: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1361: WHEN fnd_api.g_exc_error THEN
1362: trace_log('release_lock: Exception: expected error');
1363: x_return_status := fnd_api.g_ret_sts_error;
1364:
1365: WHEN fnd_api.g_exc_unexpected_error THEN
1366: trace_log('release_lock: Exception: Unexpected error');
1367: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1368:
1369: WHEN OTHERS THEN
1363: x_return_status := fnd_api.g_ret_sts_error;
1364:
1365: WHEN fnd_api.g_exc_unexpected_error THEN
1366: trace_log('release_lock: Exception: Unexpected error');
1367: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1368:
1369: WHEN OTHERS THEN
1370: trace_log('release_lock: Exception: Others Exception: '||sqlerrm);
1371: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1367: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1368:
1369: WHEN OTHERS THEN
1370: trace_log('release_lock: Exception: Others Exception: '||sqlerrm);
1371: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1372:
1373: END release_lock;
1374:
1375: PROCEDURE trace_log(p_msg IN VARCHAR2) IS