[Home] [Help]
605: Cursor Entries (bid number) is
606: Select 1
607: from dual
608: where exists (select null
609: from xtr_journals
610: where batch_id = bid);
611: -- Bug 3805480 end
612:
613: Cursor EVENT_ID is
799: -- In the JEA setup, the amount type of 'UNREAL' and 'REAL' is intended
800: -- to allow the user to post unrealized/realized gains/losses to different
801: -- GL accounts. In addition, any unrealized gains/losses will be flagged
802: -- as requiring a reversal entry in the subsequent period when transferring
803: -- XTR journals to the GL interface table.
804: -- Instead, there are separate columns for REALIZED_PL and UNREALIZED_PL
805: -- amounts in the XTR_REVALUATION_DETAILS table. If the row is for a realized
806: -- profit/loss, then there will be an amount in the REALIZED_PL column, etc.
807: ----------------------------------------------------------------------------------------------
1119: -- Bug 4634182
1120:
1121: CURSOR C_NRA_PERIOD_FROM IS
1122: SELECT min(journal_date)
1123: FROM XTR_JOURNALS
1124: WHERE batch_id = in_batch_id;
1125:
1126: l_nra_period_from DATE;
1127:
1533: Goto NEXT_Q2;
1534: END;
1535:
1536: BEGIN
1537: Insert into XTR_JOURNALS
1538: (batch_id,
1539: company_code,
1540: journal_date,
1541: orig_journal_date,
1852: Goto NEXT_Q3;
1853: END;
1854:
1855: BEGIN
1856: Insert into XTR_JOURNALS
1857: (batch_id,
1858: company_code,
1859: journal_date,
1860: orig_journal_date,
1936: l_accounted_dr := l_accounted_cr;
1937: l_accounted_cr := l_tmp_amt;
1938:
1939: BEGIN
1940: Insert into XTR_JOURNALS
1941: (batch_id,
1942: company_code,
1943: journal_date,
1944: orig_journal_date,
2137: Goto NEXT_Q4;
2138: END;
2139:
2140: BEGIN
2141: Insert into XTR_JOURNALS
2142: (batch_id,
2143: company_code,
2144: journal_date,
2145: orig_journal_date,
2356: l_credit_amount := 0;
2357:
2358:
2359: BEGIN
2360: Insert into XTR_JOURNALS
2361: (batch_id,
2362: company_code,
2363: journal_date,
2364: orig_journal_date,
2424:
2425:
2426:
2427: BEGIN
2428: Insert into XTR_JOURNALS
2429: (batch_id,
2430: company_code,
2431: journal_date,
2432: orig_journal_date,
2658: l_credit_amount := 0;
2659:
2660:
2661: BEGIN
2662: Insert into XTR_JOURNALS
2663: (batch_id,
2664: company_code,
2665: journal_date,
2666: orig_journal_date,
2729:
2730:
2731:
2732: BEGIN
2733: Insert into XTR_JOURNALS
2734: (batch_id,
2735: company_code,
2736: journal_date,
2737: orig_journal_date,
2886: l_ret_value := greatest(l_ret_value,2);
2887: Goto NEXT_Q7;
2888: END;
2889: BEGIN
2890: Insert into XTR_JOURNALS
2891: (batch_id,
2892: company_code,
2893: journal_date,
2894: orig_journal_date,
3079: | |
3080: | NOTES |
3081: | Possible permetations of the JNL_REVERSAL_IND, |
3082: | TRANSFER_TO_EXTERNAL_GL, and CANCELLED_IN_GL fields in |
3083: | XTR_JOURNALS Table. |
3084: | |
3085: | Reversal Transfer to Cancelled |
3086: | Indic External G/L in G/L Description |
3087: | --------- ------------ --------- -------------------------------- |
3090: | C XX-XXX-XX Y A Transaction was cancelled, the |
3091: | journal has been transferred to |
3092: | the G/L and it has been reversed |
3093: | by creation of a reversal entry |
3094: | in XTR_JOURNALS. |
3095: R NULL NULL Reversal entry created as a |
3096: | result of a deal cancellation or |
3097: | closure. Ineligible for journal |
3098: | clearing. |
3132: suspense_gl,
3133: accounted_cr,
3134: accounted_dr,
3135: set_of_books_id
3136: from XTR_JOURNALS
3137: where deal_number=l_deal_nos
3138: and transaction_number=l_trans_nos
3139: and deal_type=l_deal_type;
3140: --
3145: --
3146: fnd_user_id number;
3147: jnl_rec SEL_JNL%ROWTYPE;
3148: --
3149: comment_msg xtr_journals.comments%TYPE;
3150: --
3151: BEGIN
3152: -- Setup reversal comment message.
3153:
3166: Open SEL_JNL;
3167: Fetch SEL_JNL into jnl_rec;
3168: While (SEL_JNL%FOUND) LOOP
3169: If (jnl_rec.TRANSFER_TO_EXTERNAL_GL is null) then
3170: delete from XTR_journals
3171: where rowid=jnl_rec.rowid;
3172: Else
3173: -- Create reversing journal entry.
3174:
3183: jnl_rec.ACCOUNTED_DR := jnl_rec.ACCOUNTED_DR;
3184: jnl_rec.ACCOUNTED_CR := 0;
3185: End If;
3186:
3187: INSERT into XTR_JOURNALS
3188: (COMPANY_CODE,
3189: JOURNAL_DATE,
3190: ORIG_JOURNAL_DATE,
3191: DEAL_NUMBER,
3231: jnl_rec.ACCOUNTED_DR,
3232: 'R');
3233:
3234: If (SQL%FOUND) then
3235: UPDATE XTR_JOURNALS
3236: set JNL_REVERSAL_IND = 'C',
3237: CANCELLED_IN_GL = 'Y'
3238: where ROWID = jnl_rec.ROWID;
3239: End If;
3353:
3354: -- Added below cursors for Bug 4639287
3355: cursor c_max_journal_date is
3356: select max(journal_date)
3357: from xtr_journals
3358: where batch_id = l_next_bid;
3359:
3360: cursor c_min_journal_date is
3361: select min(journal_date)
3358: where batch_id = l_next_bid;
3359:
3360: cursor c_min_journal_date is
3361: select min(journal_date)
3362: from xtr_journals
3363: where batch_id = l_next_bid;
3364:
3365: cursor c_acctg_period(p_journal_date DATE) is
3366: select period_name