85: BEGIN
86: OPEN c_resource ;
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 ;
86: OPEN c_resource ;
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
536: aname => 'OZF_NEXT_STATUS_MEANING',
537: avalue => l_next_status_meaning
538: );
539:
540: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_REC_ROLE_ERR');
541: l_csetl_err_msg := FND_MESSAGE.get;
542:
543: WF_ENGINE.SetItemAttrText( itemtype => itemtype,
544: itemkey => itemkey,
537: avalue => l_next_status_meaning
538: );
539:
540: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_REC_ROLE_ERR');
541: l_csetl_err_msg := FND_MESSAGE.get;
542:
543: WF_ENGINE.SetItemAttrText( itemtype => itemtype,
544: itemkey => itemkey,
545: aname => 'OZF_CSETL_ERR_MSG',
602: || FND_GLOBAL.local_chr(10), 1, 2000);
603: END LOOP;
604: END IF;
605:
606: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_SPLT_DETLS');
607: FND_MESSAGE.set_token('OZF_SETL_WF_SPLT_DETLS', l_split_msg, false);
608: l_split_str := FND_MESSAGE.get;
609:
610: /* ========================================= */
603: END LOOP;
604: END IF;
605:
606: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_SPLT_DETLS');
607: FND_MESSAGE.set_token('OZF_SETL_WF_SPLT_DETLS', l_split_msg, false);
608: l_split_str := FND_MESSAGE.get;
609:
610: /* ========================================= */
611:
604: END IF;
605:
606: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_SPLT_DETLS');
607: FND_MESSAGE.set_token('OZF_SETL_WF_SPLT_DETLS', l_split_msg, false);
608: l_split_str := FND_MESSAGE.get;
609:
610: /* ========================================= */
611:
612: /* == Set Vendor Information in case of Contra Charge settlement == */
618: OPEN csr_vendor_site(l_vendor_site_id);
619: FETCH csr_vendor_site INTO l_vendor_site;
620: CLOSE csr_vendor_site;
621:
622: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_VENDOR_INFO');
623: FND_MESSAGE.set_token('VENDOR_NAME', l_vendor_name, false);
624: FND_MESSAGE.set_token('VENDOR_SITE', l_vendor_site, false);
625: l_vendor_info_str := FND_MESSAGE.get;
626: END IF;
619: FETCH csr_vendor_site INTO l_vendor_site;
620: CLOSE csr_vendor_site;
621:
622: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_VENDOR_INFO');
623: FND_MESSAGE.set_token('VENDOR_NAME', l_vendor_name, false);
624: FND_MESSAGE.set_token('VENDOR_SITE', l_vendor_site, false);
625: l_vendor_info_str := FND_MESSAGE.get;
626: END IF;
627:
620: CLOSE csr_vendor_site;
621:
622: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_VENDOR_INFO');
623: FND_MESSAGE.set_token('VENDOR_NAME', l_vendor_name, false);
624: FND_MESSAGE.set_token('VENDOR_SITE', l_vendor_site, false);
625: l_vendor_info_str := FND_MESSAGE.get;
626: END IF;
627:
628: /* ========================================= */
621:
622: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_VENDOR_INFO');
623: FND_MESSAGE.set_token('VENDOR_NAME', l_vendor_name, false);
624: FND_MESSAGE.set_token('VENDOR_SITE', l_vendor_site, false);
625: l_vendor_info_str := FND_MESSAGE.get;
626: END IF;
627:
628: /* ========================================= */
629:
707: FND_GLOBAL.local_chr(10), 1, 2000);
708: END LOOP;
709: END IF;
710:
711: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_LINE_DETLS');
712: FND_MESSAGE.set_token('OZF_SETL_WF_LINE_DETLS', l_line_detail_msg, false);
713: l_line_detail_str := FND_MESSAGE.get;
714: /* ========================================= */
715:
708: END LOOP;
709: END IF;
710:
711: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_LINE_DETLS');
712: FND_MESSAGE.set_token('OZF_SETL_WF_LINE_DETLS', l_line_detail_msg, false);
713: l_line_detail_str := FND_MESSAGE.get;
714: /* ========================================= */
715:
716: WF_ENGINE.SetItemAttrText( itemtype => itemtype,
709: END IF;
710:
711: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WF_LINE_DETLS');
712: FND_MESSAGE.set_token('OZF_SETL_WF_LINE_DETLS', l_line_detail_msg, false);
713: l_line_detail_str := FND_MESSAGE.get;
714: /* ========================================= */
715:
716: WF_ENGINE.SetItemAttrText( itemtype => itemtype,
717: itemkey => itemkey,
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;
2036: RAISE FND_API.G_EXC_ERROR;
2418: x_return_status => l_return_status
2419: );
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;
2419: );
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:
2445: WHERE claim_id = p_claim_id;
2446: EXCEPTION
2447: WHEN OTHERS THEN
2448: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2449: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_UPD_CLAM_ERR');
2450: FND_MSG_PUB.add;
2451: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2452: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
2453: FND_MSG_PUB.Add;
2447: WHEN OTHERS THEN
2448: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2449: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_UPD_CLAM_ERR');
2450: FND_MSG_PUB.add;
2451: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2452: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
2453: FND_MSG_PUB.Add;
2454: END IF;
2455: END;
2448: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2449: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_UPD_CLAM_ERR');
2450: FND_MSG_PUB.add;
2451: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2452: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
2453: FND_MSG_PUB.Add;
2454: END IF;
2455: END;
2456: -------------- start the process ---------------------
2461:
2462: EXCEPTION
2463: WHEN FND_API.G_EXC_ERROR THEN
2464: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2465: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2466: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
2467: FND_MSG_PUB.Add;
2468: END IF;
2469: RAISE;
2462: EXCEPTION
2463: WHEN FND_API.G_EXC_ERROR THEN
2464: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2465: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2466: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
2467: FND_MSG_PUB.Add;
2468: END IF;
2469: RAISE;
2470: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2468: END IF;
2469: RAISE;
2470: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2471: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2472: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2473: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
2474: FND_MSG_PUB.Add;
2475: END IF;
2476: RAISE;
2469: RAISE;
2470: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2471: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2472: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2473: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
2474: FND_MSG_PUB.Add;
2475: END IF;
2476: RAISE;
2477: WHEN OTHERS THEN
3119: itemkey => p_itemkey,
3120: aname => 'OZF_CLAIM_NUMBER'
3121: );
3122:
3123: FND_MESSAGE.set_name ('OZF', 'OZF_SETL_WF_NTF_ERR');
3124: FND_MESSAGE.set_token ('CLAIM', l_claim_number, FALSE);
3125:
3126: l_err_subj := SUBSTR(FND_MESSAGE.get, 1, 240);
3127:
3120: aname => 'OZF_CLAIM_NUMBER'
3121: );
3122:
3123: FND_MESSAGE.set_name ('OZF', 'OZF_SETL_WF_NTF_ERR');
3124: FND_MESSAGE.set_token ('CLAIM', l_claim_number, FALSE);
3125:
3126: l_err_subj := SUBSTR(FND_MESSAGE.get, 1, 240);
3127:
3128: Wf_Engine.SetItemAttrText(
3122:
3123: FND_MESSAGE.set_name ('OZF', 'OZF_SETL_WF_NTF_ERR');
3124: FND_MESSAGE.set_token ('CLAIM', l_claim_number, FALSE);
3125:
3126: l_err_subj := SUBSTR(FND_MESSAGE.get, 1, 240);
3127:
3128: Wf_Engine.SetItemAttrText(
3129: itemtype => p_itemtype,
3130: itemkey => p_itemkey ,