331: End If; -- End of the array count condition
332:
333: -- Insert New Computed Balances since old balances were deleted
334: Forall k in l_period_num_tbl.First .. l_period_num_tbl.Last
335: Insert Into jl_br_balances_all
336: (application_id
337: ,set_of_books_id
338: ,period_set_name
339: ,period_name
484: SELECT jb.application_id appl_id
485: ,jb.org_id
486: ,jb.personnel_id vendor_id
487: ,jb.code_combination_id ccid
488: FROM jl_br_balances_all jb
489: WHERE jb.application_id = nvl(p_appl_id, jb.application_id)
490: AND jb.org_id = nvl(p_org_id, jb.org_id)
491: AND jb.set_of_books_id = cp_sob_id
492: AND jb.personnel_id = nvl(p_vendor_id, jb.personnel_id)
516: ,cp_name In jl_br_balances.period_name%Type) Is
517: SELECT
518: NVL(sum(decode(ending_balance_sign,'D', -1 * ending_balance,
519: ending_balance)),0) ending_balance
520: FROM jl_br_balances_all jb
521: WHERE jb.application_id = cp_appl_id
522: AND jb.org_id = cp_org_id
523: AND jb.set_of_books_id = cp_sob
524: AND jb.personnel_id = cp_vendor_id
625: End If;
626:
627: -- Purge the Balances Tables
628:
629: Delete from JL_BR_BALANCES_ALL
630: Where application_id = nvl(p_appl_id, application_id)
631: and org_id = nvl(p_org_id, org_id)
632: and set_of_books_id = Sob_Rec.sob_id
633: and ((period_year*10000) + period_num) > l_min_period_ctr
728: End Loop; -- End Loop of Periods Table
729:
730: -- Insert Balances
731: Forall j in l_period_num_tbl.First .. l_period_num_tbl.Last
732: Insert Into jl_br_balances_all
733: (application_id
734: ,set_of_books_id
735: ,period_set_name
736: ,period_name