[Home] [Help]
42: When no_data_found then
43: v_exists := 'N';
44: End;
45: If v_exists = 'N' then
46: Select Xtr_Settlement_Summary_S.Nextval
47: Into v_settlement_ID
48: From Dual;
49:
50: Insert into Xtr_Settlement_Summary(Settlement_Summary_Id, Settlement_Number, Company, Currency,
46: Select Xtr_Settlement_Summary_S.Nextval
47: Into v_settlement_ID
48: From Dual;
49:
50: Insert into Xtr_Settlement_Summary(Settlement_Summary_Id, Settlement_Number, Company, Currency,
51: Settlement_Amount, Settlement_Date, Company_Acct_No, Cparty_Acct_No, Net_ID, Status,
52: Created_By, Creation_Date, Last_Updated_By, Last_Update_Date, Last_Update_Login, cparty_code,
53: external_source)
54: Values(v_settlement_ID, p_settlement_number, p_company, p_currency, p_settlement_amount,
169:
170: /******************************************************************************/
171: /* This procedure handles the situation when user want to unnet settlements */
172: /* totally (i.e., change radio button back to 'None', the netted transaction */
173: /* in Xtr_Settlement_Summary should be deleted. Also update the status to 'A' */
174: /* for original entries. */
175: /******************************************************************************/
176:
177: Procedure DEL_SETTLEMENT_SUMMARY(p_settle_date IN Date,
350: Set status = 'I',
351: net_ID = v_net_ID
352: Where settlement_number = p_settlement_number;
353: Else
354: Select Xtr_Settlement_Summary_S.Nextval
355: Into v_settlement_ID
356: From Dual;
357:
358: Insert into Xtr_Settlement_Summary(Settlement_Summary_Id, Settlement_Number, Company, Currency,
354: Select Xtr_Settlement_Summary_S.Nextval
355: Into v_settlement_ID
356: From Dual;
357:
358: Insert into Xtr_Settlement_Summary(Settlement_Summary_Id, Settlement_Number, Company, Currency,
359: Settlement_Amount, Settlement_Date, Company_Acct_No, Cparty_Acct_No, Net_ID, Status,
360: Created_By, Creation_Date, Last_Updated_By, Last_Update_Date, Last_Update_Login, cparty_code)
361: Values(v_settlement_ID, p_settlement_number, p_company, p_currency, p_settlement_amount,
362: p_settlement_date, p_company_acct_no, p_cparty_acct_no, v_net_ID, 'I',