[Home] [Help]
516: -- encumbrance Item details.
517:
518: CURSOR c_original_enc_exists IS
519: SELECT net_zero_adjustment_flag,amount
520: FROM gms_encumbrance_items_all gei
521: WHERE gei.transaction_source = P_transaction_source
522: AND gei.encumbrance_item_id = l_orig_enc_item_id ;
523:
524: BEGIN
1288: begin
1289: x_dummy := 0 ;
1290: select count(*)
1291: into x_dummy
1292: from gms_encumbrance_items_all gei
1293: where orig_transaction_reference = trxRec.orig_transaction_reference
1294: and transaction_source = P_TRANSACTION_SOURCE ;
1295:
1296: if x_dummy > 0 then
1415: AND transaction_source = P_TRANSACTION_SOURCE;*/
1416:
1417: -- Bug 3465939 : Updating the original encumbrance Item to Net zero.
1418:
1419: UPDATE gms_encumbrance_items_all
1420: SET net_zero_adjustment_flag = 'Y'
1421: WHERE encumbrance_item_id = l_orig_enc_item_id;
1422:
1423: ELSE
1529: PROCEDURE Validate_Dates_YN
1530: ( l_award_id1 IN gms_awards_all.award_id%TYPE, -- Original Encumbrance Award Id
1531: l_project_id1 IN pa_projects_all.project_id%TYPE, -- Original Encumbrance Project Id
1532: l_task_id1 IN pa_tasks.task_id%TYPE, -- Original Encumbrance Task Id
1533: l_orig_enc_item_id1 IN gms_encumbrance_items_all.encumbrance_item_id%TYPE -- Original Encumbrance Item Id
1534: ) IS
1535:
1536: /* relaxing this check from bug 7271321
1537:
1573: -- dates there is no need to do the date validation for the reversal encumbrance item.
1574:
1575: CURSOR Cur_Check_EncItemDate IS
1576: SELECT 1
1577: FROM gms_encumbrance_items_all
1578: WHERE encumbrance_item_id = l_orig_enc_item_id1;
1579: --AND (encumbrance_item_date < l_max_start_date OR encumbrance_item_date > l_min_end_date); -- bug 7271321
1580:
1581: l_Check_EncItemDate NUMBER := 0;