[Home] [Help]
1117: v_mandatory_error Boolean;
1118: v_validation_error Boolean;
1119: v_limit_error Boolean;
1120:
1121: v_exp_rec Xtr_Exposure_Transactions%Rowtype;
1122: v_cparty Xtr_Tax_Brokerage_Setup_V.Payee%Type;
1123: v_settlement_code Xtr_One_Step_Settle_Codes.Settlement_Code%Type;
1124: v_amount_hce Xtr_Exposure_Transactions.Amount_HCE%Type;
1125: v_comments Xtr_Exposure_Transactions.Comments%Type;
1120:
1121: v_exp_rec Xtr_Exposure_Transactions%Rowtype;
1122: v_cparty Xtr_Tax_Brokerage_Setup_V.Payee%Type;
1123: v_settlement_code Xtr_One_Step_Settle_Codes.Settlement_Code%Type;
1124: v_amount_hce Xtr_Exposure_Transactions.Amount_HCE%Type;
1125: v_comments Xtr_Exposure_Transactions.Comments%Type;
1126: v_settle_method Xtr_Tax_Brokerage_Setup.Tax_Settle_Method%Type;
1127: v_party_type Xtr_Parties_V.Party_Type%Type;
1128:
1121: v_exp_rec Xtr_Exposure_Transactions%Rowtype;
1122: v_cparty Xtr_Tax_Brokerage_Setup_V.Payee%Type;
1123: v_settlement_code Xtr_One_Step_Settle_Codes.Settlement_Code%Type;
1124: v_amount_hce Xtr_Exposure_Transactions.Amount_HCE%Type;
1125: v_comments Xtr_Exposure_Transactions.Comments%Type;
1126: v_settle_method Xtr_Tax_Brokerage_Setup.Tax_Settle_Method%Type;
1127: v_party_type Xtr_Parties_V.Party_Type%Type;
1128:
1129: cursor CALC_HCE_AMTS is
1230: v_exp_rec.TAX_BROKERAGE_TYPE := 'Y';
1231: v_exp_rec.COMMENTS := v_comments;
1232: v_exp_rec.CPARTY_ACCOUNT_NO := p_one_step_rec.p_cparty_account_no;
1233:
1234: /***** EXP open API which inserts into Xtr_Exposure_Transactions and Xtr_Deal_Date_Amounts ******/
1235:
1236: XTR_EXP_TRANSFERS_PKG.TRANSFER_EXP_DEALS(v_exp_rec,
1237: p_one_step_rec.p_source,
1238: v_user_error,
2791:
2792: ---------------------------------------
2793: -- Replace this with DELETE_TAX_EXPOSURE
2794: ---------------------------------------
2795: delete XTR_EXPOSURE_TRANSACTIONS
2796: where TRANSACTION_NUMBER = p_prncpl_ref;
2797:
2798: delete XTR_DEAL_DATE_AMOUNTS
2799: where DEAL_TYPE = 'EXP'
2810: elsif p_prncpl_ref is not null then
2811:
2812: if nvl(p_one_step.p_amount,0) = 0 then
2813:
2814: delete XTR_EXPOSURE_TRANSACTIONS
2815: where TRANSACTION_NUMBER = p_prncpl_ref;
2816:
2817: delete XTR_DEAL_DATE_AMOUNTS
2818: where DEAL_TYPE = 'EXP'
2821: p_one_step.p_exp_number := null;
2822:
2823: else
2824:
2825: update XTR_EXPOSURE_TRANSACTIONS
2826: set AMOUNT = abs(nvl(p_one_step.p_amount,0)),
2827: AMOUNT_HCE = abs(nvl(p_amt_hce,0)),
2828: VALUE_DATE = p_one_step.p_settlement_date
2829: where TRANSACTION_NUMBER = p_prncpl_ref;
2863:
2864: ---------------------------------------
2865: -- Replace this with Jeremy's procedure
2866: ---------------------------------------
2867: delete XTR_EXPOSURE_TRANSACTIONS
2868: where TRANSACTION_NUMBER = p_income_ref;
2869:
2870: delete XTR_DEAL_DATE_AMOUNTS
2871: where DEAL_TYPE = 'EXP'
2882: elsif p_income_ref is not null then
2883:
2884: if nvl(p_one_step.p_amount,0) = 0 then
2885:
2886: delete XTR_EXPOSURE_TRANSACTIONS
2887: where TRANSACTION_NUMBER = p_income_ref;
2888:
2889: delete XTR_DEAL_DATE_AMOUNTS
2890: where DEAL_TYPE = 'EXP'
2893: p_one_step.p_exp_number := null;
2894:
2895: else
2896:
2897: update XTR_EXPOSURE_TRANSACTIONS
2898: set AMOUNT = abs(nvl(p_one_step.p_amount,0)),
2899: AMOUNT_HCE = abs(nvl(p_amt_hce,0)),
2900: VALUE_DATE = p_one_step.p_settlement_date
2901: where TRANSACTION_NUMBER = p_income_ref;
3013:
3014: BEGIN
3015:
3016: if p_tax_settle_no is not null then
3017: delete from XTR_EXPOSURE_TRANSACTIONS
3018: where TRANSACTION_NUMBER = p_tax_settle_no;
3019:
3020: delete from XTR_DEAL_DATE_AMOUNTS_V
3021: where DEAL_TYPE = 'EXP'
3083:
3084:
3085:
3086: --Bug 2804548
3087: --This procedure will update the Tax Entries in XTR_EXPOSURE_TRANSACTIONS
3088: --for One Step and Two Step Settlement Method.
3089: --p_amount = Old Tax Amount - New Tax Amount
3090: --p_exp_number = Tax Settled Reference Number
3091: PROCEDURE UPDATE_TAX_EXP (p_exp_number NUMBER,
3091: PROCEDURE UPDATE_TAX_EXP (p_exp_number NUMBER,
3092: p_amount NUMBER) IS
3093:
3094: BEGIN
3095: update xtr_exposure_transactions
3096: set amount=amount-nvl(p_amount,0)
3097: where transaction_number=p_exp_number;
3098: END update_tax_exp;
3099: