[Home] [Help]
230: for update of status_code nowait;
231:
232: cursor LOCK_ROLL is
233: select ROWID
234: from XTR_ROLLOVER_TRANSACTIONS
235: where deal_number = p_deal_no
236: for update of status_code nowait;
237:
238: cursor BKGE_EXP is
251:
252: cursor UPD_BUY_DIV(p_buy_deal NUMBER, p_sell_date DATE) is
253: select transaction_number, quantity, interest_rate,
254: tax_settled_reference, tax_rate
255: from XTR_ROLLOVER_TRANSACTIONS
256: where deal_number = p_buy_deal
257: and start_date >= p_sell_date;
258:
259: cursor cur_hce is
293: fetch lock_dda_deal into l_rowid;
294: end loop;
295:
296: --------------------------------------------------
297: -- Set Status to CANCELLED for XTR_ROLLOVER_TRANSACTIONS table
298: ----------------------------------------------------
299: if p_deal_subtype = 'BUY' then
300: Open lock_roll;
301: fetch lock_roll into l_rowid;
299: if p_deal_subtype = 'BUY' then
300: Open lock_roll;
301: fetch lock_roll into l_rowid;
302: while lock_roll%FOUND loop
303: update XTR_ROLLOVER_TRANSACTIONS
304: set status_code = 'CANCELLED'
305: where rowid = l_rowid;
306: fetch lock_roll into l_rowid;
307: end loop;
388: and deal_number = 0
389: and transaction_number = l_tax_ref;
390: end if;
391:
392: Update XTR_ROLLOVER_TRANSACTIONS
393: Set quantity = l_trans_quantity,
394: interest = l_trans_int,
395: interest_hce = l_hce_int,
396: tax_amount = l_tax_amt,
545: and nvl(dda.settle,'N') = 'Y'
546: union
547: select 1
548: from xtr_deal_date_amounts a,
549: xtr_rollover_transactions b
550: where a.deal_type = 'EXP'
551: and a.transaction_number = b.tax_settled_reference
552: and nvl(a.settle,'N') = 'Y'
553: and b.deal_type = 'STOCK'
563: or (jnl.amount_type = 'DIVEXP'))
564: union
565: select 2
566: from xtr_journals a,
567: xtr_rollover_transactions b
568: where a.deal_type = 'EXP'
569: and a.transaction_number = b.tax_settled_reference
570: and b.deal_type = 'STOCK'
571: and b.transaction_number = p_div_id
638: from xtr_stock_alloc_details b
639: where b.deal_no = d.deal_no
640: and b.cross_ref_start_date <= p_record_date)
641: and not exists (select 1
642: from xtr_rollover_transactions r
643: where r.transaction_number = p_div_id
644: and r.deal_number = d.deal_no
645: and r.settle_date IS NOT NULL) ;
646:
684: from xtr_stock_alloc_details b
685: where b.deal_no = d.deal_no
686: and b.cross_ref_start_date <= p_record_date)
687: and not exists (select 1
688: from xtr_rollover_transactions r
689: where r.transaction_number = p_div_id
690: and r.deal_number = d.deal_no
691: and r.settle_date IS NOT NULL);
692:
907: -------------------------------------------------
908: -- Insert cash dividend RT row for the BUY deal
909: -------------------------------------------------
910: /* Bug 3737048. Modified Code Begins. */
911: Update xtr_rollover_transactions
912: set settle_date = p_payment_date
913: where transaction_number = p_div_id
914: and deal_number = BUY.deal_no;
915:
913: where transaction_number = p_div_id
914: and deal_number = BUY.deal_no;
915:
916: IF SQL%NOTFOUND THEN /* End Code Added. */
917: Insert into xtr_rollover_transactions
918: (deal_number, transaction_number,
919: deal_type, deal_subtype,
920: quantity, interest,
921: interest_hce, tax_code,
1121: generated already. */
1122:
1123: select tax_settled_reference
1124: into l_tax_settled_reference
1125: from xtr_rollover_transactions
1126: where deal_number = BUY.deal_no
1127: and deal_type = 'STOCK'
1128: and transaction_number = p_div_id;
1129:
1153: -- Update Rollover Rows for related transactions
1154: -------------------------------------------------------
1155:
1156: if one_step_rec.p_exp_number is not null then
1157: update XTR_ROLLOVER_TRANSACTIONS
1158: set TAX_SETTLED_REFERENCE = one_step_rec.p_exp_number
1159: where DEAL_TYPE = 'STOCK'
1160: and DEAL_NUMBER = BUY.deal_no
1161: and TRANSACTION_NUMBER = p_div_id;
1180: BEGIN
1181:
1182: select count(*)
1183: into l_dummy
1184: from xtr_rollover_transactions
1185: where transaction_number = p_div_id
1186: and deal_type = 'STOCK';
1187:
1188: return l_dummy;
1196:
1197: cursor TAX_TRANS is
1198: select deal_number, -- Bug 2506786 tax_settled_reference
1199: transaction_number
1200: from XTR_ROLLOVER_TRANSACTIONS
1201: where deal_type = 'STOCK'
1202: and transaction_number = p_div_id
1203: and tax_settled_reference is not null;
1204:
1227:
1228: -------------------------------
1229: -- Any RT's cash dividend
1230: -------------------------------
1231: delete xtr_rollover_transactions
1232: where deal_type = 'STOCK'
1233: and transaction_number = p_div_id;
1234:
1235: -------------------------------