[Home] [Help]
376: AND rlk_adj.lookup_type(+) = 'ADJUST_REASON';
377:
378: BEGIN
379: IF OZF_DEBUG_HIGH_ON THEN
380: ozf_utility_pvt.debug_message(l_api_name || 'Entering' || 'document id ' || document_id);
381: END IF;
382: document_type := 'text/plain';
383: -- parse document_id for the ':' dividing item type name from item key value
384: -- document_id value will take the form
640: AND rlk_adj.lookup_type(+) = 'ADJUST_REASON';
641:
642: BEGIN
643: IF OZF_DEBUG_HIGH_ON THEN
644: ozf_utility_pvt.debug_message(l_api_name || 'Entering' || 'document id ' || document_id);
645: END IF;
646: document_type := 'text/plain';
647: -- parse document_id for the ':' dividing item type name from item key value
648: -- document_id value will take the form
935: AND rlk_adj.lookup_type(+) = 'ADJUST_REASON';
936:
937: BEGIN
938: IF OZF_DEBUG_HIGH_ON THEN
939: ozf_utility_pvt.debug_message(l_api_name || 'Entering' || 'document id ' || document_id);
940: END IF;
941: document_type := 'text/plain';
942: -- parse document_id for the ':' dividing item type name from item key value
943: -- document_id value will take the form
1188: AND rlk_adj.lookup_type(+) = 'ADJUST_REASON';
1189:
1190: BEGIN
1191: IF OZF_DEBUG_HIGH_ON THEN
1192: ozf_utility_pvt.debug_message(l_api_name || 'Entering' || 'document id ' || document_id);
1193: END IF;
1194: document_type := 'text/plain';
1195: -- parse document_id for the ':' dividing item type name from item key value
1196: -- document_id value will take the form
1443: AND rlk_adj.lookup_type(+) = 'ADJUST_REASON';
1444:
1445: BEGIN
1446: IF OZF_DEBUG_HIGH_ON THEN
1447: ozf_utility_pvt.debug_message(l_api_name || 'Entering' || 'document id ' || document_id);
1448: END IF;
1449: document_type := 'text/plain';
1450: -- parse document_id for the ':' dividing item type name from item key value
1451: -- document_id value will take the form
1830: ,aname => 'AMS_APPROVAL_OBJECT_NAME'
1831: ,avalue => l_object_details.name
1832: );
1833:
1834: l_object_meaning := OZF_UTILITY_PVT.get_lookup_meaning('AMS_SYS_ARC_QUALIFIER', 'CLAM');
1835:
1836: WF_ENGINE.setitemattrtext(
1837: itemtype => itemtype
1838: ,itemkey => itemkey
2500: l_claim_rec.approved_date := SYSDATE;
2501: l_claim_rec.object_version_number := l_object_version_number ;
2502:
2503: IF OZF_DEBUG_HIGH_ON THEN
2504: ozf_utility_pvt.debug_message(l_full_name ||': update_status = ' || l_update_status);
2505: END IF;
2506:
2507: ELSIF l_update_status = 'REJECTED' THEN
2508: l_next_status_id := l_reject_status_id;
2509:
2510: l_claim_rec.object_version_number := l_object_version_number ;
2511:
2512: ELSE
2513: l_next_status_id := OZF_UTILITY_PVT.get_default_user_status(
2514: 'OZF_CLAIM_STATUS'
2515: ,'OPEN'
2516: );
2517:
2520: CLOSE csr_claim_obj_ver;
2521:
2522: END IF;
2523:
2524: l_status_code := ozf_utility_pvt.get_system_status_code(l_next_status_id);
2525: l_claim_rec.claim_id := l_claim_id;
2526: l_claim_rec.user_status_id := l_next_status_id;
2527:
2528: IF OZF_DEBUG_HIGH_ON THEN
2525: l_claim_rec.claim_id := l_claim_id;
2526: l_claim_rec.user_status_id := l_next_status_id;
2527:
2528: IF OZF_DEBUG_HIGH_ON THEN
2529: ozf_utility_pvt.debug_message(l_full_name || l_status_code || l_approved_amount || l_update_status);
2530: END IF;
2531:
2532: IF l_payment_method = 'MASS_SETTLEMENT' THEN
2533: IF l_update_status = 'APPROVED' THEN
2616: ,p_data => l_msg_data
2617: );
2618:
2619: IF OZF_DEBUG_HIGH_ON THEN
2620: ozf_utility_pvt.debug_message(l_full_name || ': l_return_status' || l_return_status);
2621: END IF;
2622:
2623: EXCEPTION
2624: WHEN APPROVAL_RAISE_ERROR THEN