87: FETCH c_resource INTO l_person_id ;
88: IF c_resource%NOTFOUND THEN
89: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
90: FND_MESSAGE.Set_Token('TEXT', sqlerrm );
91: FND_MSG_PUB.Add;
92: END IF;
93: CLOSE c_resource ;
94: -- Pass the Employee ID to get the Role
95: WF_DIRECTORY.getrolename(
273: --
274: EXCEPTION
275: WHEN ERROR THEN
276: ROLLBACK TO Inccmplete_Claim;
277: FND_MSG_PUB.count_and_get (
278: p_encoded => FND_API.g_false
279: ,p_count => l_msg_count
280: ,p_data => l_msg_data
281: );
759: END IF;
760: --
761: EXCEPTION
762: WHEN ERROR THEN
763: FND_MSG_PUB.count_and_get (
764: p_encoded => FND_API.g_false
765: ,p_count => l_msg_count
766: ,p_data => l_msg_data
767: );
1655: END IF;
1656: --
1657: EXCEPTION
1658: WHEN ERROR THEN
1659: FND_MSG_PUB.count_and_get (
1660: p_encoded => FND_API.g_false
1661: ,p_count => l_msg_count
1662: ,p_data => l_msg_data
1663: );
1812: --
1813: EXCEPTION
1814: WHEN ERROR THEN
1815: ROLLBACK TO Reset_Status;
1816: FND_MSG_PUB.count_and_get (
1817: p_encoded => FND_API.g_false
1818: ,p_count => l_msg_count
1819: ,p_data => l_msg_data
1820: );
2027:
2028: OPEN csr_claim_rec(p_claim_id);
2029: FETCH csr_claim_rec INTO l_claim_rec;
2030: IF csr_claim_rec%NOTFOUND THEN
2031: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2032: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
2033: FND_MSG_PUB.add;
2034: END IF;
2035: CLOSE csr_claim_rec;
2029: FETCH csr_claim_rec INTO l_claim_rec;
2030: IF csr_claim_rec%NOTFOUND THEN
2031: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2032: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
2033: FND_MSG_PUB.add;
2034: END IF;
2035: CLOSE csr_claim_rec;
2036: RAISE FND_API.G_EXC_ERROR;
2037: END IF;
2420: EXCEPTION
2421: WHEN OTHERS THEN
2422: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2423: FND_MESSAGE.Set_Token('TEXT', sqlerrm || l_budget_type);
2424: FND_MSG_PUB.Add;
2425: RAISE FND_API.G_EXC_ERROR;
2426: END;
2427:
2428: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2443: SET cstl_wf_item_key = l_itemkey
2444: WHERE claim_id = p_claim_id;
2445: EXCEPTION
2446: WHEN OTHERS THEN
2447: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2448: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_UPD_CLAM_ERR');
2449: FND_MSG_PUB.add;
2450: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2451: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
2445: EXCEPTION
2446: WHEN OTHERS THEN
2447: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2448: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_UPD_CLAM_ERR');
2449: FND_MSG_PUB.add;
2450: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2451: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
2452: FND_MSG_PUB.Add;
2453: END IF;
2448: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_UPD_CLAM_ERR');
2449: FND_MSG_PUB.add;
2450: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2451: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
2452: FND_MSG_PUB.Add;
2453: END IF;
2454: END;
2455: -------------- start the process ---------------------
2456: WF_ENGINE.StartProcess( itemtype => l_itemtype,
2459: --
2460:
2461: EXCEPTION
2462: WHEN FND_API.G_EXC_ERROR THEN
2463: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2464: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2465: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
2466: FND_MSG_PUB.Add;
2467: END IF;
2462: WHEN FND_API.G_EXC_ERROR THEN
2463: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2464: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2465: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
2466: FND_MSG_PUB.Add;
2467: END IF;
2468: RAISE;
2469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2470: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2466: FND_MSG_PUB.Add;
2467: END IF;
2468: RAISE;
2469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2470: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2471: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2472: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
2473: FND_MSG_PUB.Add;
2474: END IF;
2469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2470: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2471: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2472: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
2473: FND_MSG_PUB.Add;
2474: END IF;
2475: RAISE;
2476: WHEN OTHERS THEN
2477: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2473: FND_MSG_PUB.Add;
2474: END IF;
2475: RAISE;
2476: WHEN OTHERS THEN
2477: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2478: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2479: END IF;
2480: RAISE;
2481: END Start_Settlement;
2474: END IF;
2475: RAISE;
2476: WHEN OTHERS THEN
2477: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2478: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2479: END IF;
2480: RAISE;
2481: END Start_Settlement;
2482:
2667: --
2668: EXCEPTION
2669: WHEN ERROR THEN
2670: ROLLBACK TO Create_GL_Entries;
2671: FND_MSG_PUB.count_and_get (
2672: p_encoded => FND_API.g_false
2673: ,p_count => l_msg_count
2674: ,p_data => l_msg_data
2675: );
2778: --
2779: EXCEPTION
2780: WHEN ERROR THEN
2781: ROLLBACK TO Revert_GL_Entries;
2782: FND_MSG_PUB.count_and_get (
2783: p_encoded => FND_API.g_false
2784: ,p_count => l_msg_count
2785: ,p_data => l_msg_data
2786: );
2969: --
2970: EXCEPTION
2971: WHEN ERROR THEN
2972: ROLLBACK TO create_payment;
2973: FND_MSG_PUB.count_and_get (
2974: p_encoded => FND_API.g_false
2975: ,p_count => l_msg_count
2976: ,p_data => l_msg_data
2977: );
3115: aname => 'OZF_CSETL_ERR_SUBJ',
3116: avalue => l_err_subj );
3117:
3118: FOR i IN 1..p_msg_count LOOP
3119: FND_MSG_PUB.get(
3120: p_msg_index => i,
3121: p_encoded => FND_API.g_false,
3122: p_data => l_msg_data,
3123: p_msg_index_out => l_msg_index