[Home] [Help]
PACKAGE: APPS.XTR_IG_TRANSFERS_PKG
Source
1 PACKAGE XTR_IG_TRANSFERS_PKG AS
2 /* $Header: xtrimigs.pls 120.9 2005/06/29 09:45:33 csutaria ship $ */
3 --------------------------------------------------------------------------
4
5 Procedure Log_IG_Errors(p_Ext_Deal_Id In Varchar2,
6 p_Deal_Type In Varchar2,
7 p_Error_Column In Varchar2,
8 p_Error_Code In Varchar2,
9 p_Field_Name In Varchar2 DEFAULT NULL);
10
11 function VALID_CPARTY_CODE(p_comp IN VARCHAR2,
12 p_cparty IN VARCHAR2) return boolean;
13
14 function VALID_TRANSFER_DATE(p_transfer_date IN DATE) return boolean;
15
16 function VALID_CURRENCY(p_curr IN VARCHAR2) return boolean;
17
18 function VALID_COMP_ACCT(p_comp IN VARCHAR2,
19 p_comp_acct IN VARCHAR2,
20 p_curr IN VARCHAR2) return boolean;
21
22 function VALID_PARTY_ACCT(p_party IN VARCHAR2,
23 p_party_acct IN VARCHAR2,
24 p_curr IN VARCHAR2) return boolean;
25
26 function VALID_ACTION(p_action IN VARCHAR2) return boolean;
27
28 function VALID_PRODUCT(p_product IN VARCHAR2) return boolean;
29
30 function VALID_PORTFOLIO(p_comp IN VARCHAR2,
31 p_cparty IN VARCHAR2,
32 p_portfolio IN VARCHAR2) return boolean;
33
34 function VALID_LIMIT_CODE(p_comp IN VARCHAR2,
35 p_cparty IN VARCHAR2,
36 p_limit IN VARCHAR2,
37 p_limit_type IN VARCHAR2) return boolean;
38 -- p_balance IN NUMBER) return boolean;
39
40 function VALID_PRINCIPAL_ADJUST(p_value IN NUMBER) return boolean;
41
42 -- Bug 2994712
43 function VALID_DEAL_LINKING_CODE(p_deal_linking_code IN varchar2) return boolean;
44
45 -- Bug 2684411
46 function VALID_DEALER_CODE(p_dealer_code IN varchar2) return boolean;
47
48 function VALID_COMP_REPORTING_CCY (p_comp IN VARCHAR2) return boolean;
49
50
51 procedure VALID_IG_ACCT(p_comp IN VARCHAR2,
52 p_cparty IN VARCHAR2,
53 p_curr IN VARCHAR2,
54 p_transfer_date IN DATE,
55 p_ext_deal_no IN VARCHAR2,
56 p_deal_type IN VARCHAR2,
57 p_error IN OUT NOCOPY BOOLEAN);
58
59 procedure COPY_FROM_INTERFACE_TO_IG(ARec_Interface IN XTR_DEALS_INTERFACE%rowtype );
60
61 procedure CALC_DETAILS;
62
63 procedure CALC_HCE_AMTS;
64
65 procedure CALCULATE_VALUES (ARec_Interface IN XTR_DEALS_INTERFACE%rowtype, p_err_limit OUT NOCOPY VARCHAR2);
66
67 procedure CHECK_MANDATORY_FIELDS(ARec_Interface IN XTR_DEALS_INTERFACE%rowtype, p_error OUT NOCOPY BOOLEAN);
68
69 procedure VALIDATE_DEALS(ARec_Interface IN XTR_DEALS_INTERFACE%rowtype, p_error OUT NOCOPY BOOLEAN);
70
71 procedure GET_DEAL_TRAN_NUMBERS(p_comp IN VARCHAR2,
72 p_cparty IN VARCHAR2,
73 p_curr IN VARCHAR2,
74 p_deal_no IN OUT NOCOPY NUMBER,
75 p_tran_no IN OUT NOCOPY NUMBER,
76 p_new_deal IN VARCHAR2 DEFAULT 'Y');
77
78 procedure CREATE_IG_DEAL(ARec_IG IN XTR_INTERGROUP_TRANSFERS%rowtype );
79
80 procedure SETTLE_DDA (p_settle_flag IN VARCHAR2,
81 p_actual_settle IN DATE,
82 p_settle OUT NOCOPY VARCHAR2,
83 p_settle_no OUT NOCOPY NUMBER,
84 p_settle_auth OUT NOCOPY VARCHAR2,
85 p_settle_date OUT NOCOPY DATE,
86 p_trans_mts OUT NOCOPY VARCHAR2,
87 p_audit_indic OUT NOCOPY VARCHAR2);
88
89
90 procedure INS_DEAL_DATE_AMTS;
91
92 function IS_MIRROR_DEAL(p_comp IN VARCHAR2,
93 p_cparty IN VARCHAR2,
94 p_curr IN VARCHAR2) return boolean;
95
96 function IS_COMPANY(p_comp IN VARCHAR2) return boolean;
97
98 procedure CASCADE_RECALC(p_company_code IN VARCHAR2,
99 p_party_code IN VARCHAR2,
100 p_currency IN VARCHAR2,
101 p_transfer_date IN DATE,
102 p_fund_limit IN VARCHAR2,
103 p_invest_limit IN VARCHAR2,
104 p_update IN VARCHAR2,
105 p_rounding_type IN VARCHAR2 default NULL, --* Add for Interest Project
106 p_day_count_type IN VARCHAR2 default NULL, --* Add for Interest Project
107 p_types_update IN VARCHAR2 default NULL); --* Add for Interest Project
108 -- p_error OUT VARCHAR2);
109
110 procedure TRANSFER_IG_DEALS( ARec_Interface IN XTR_DEALS_INTERFACE%rowtype,
111 p_source IN VARCHAR2,
112 user_error OUT NOCOPY BOOLEAN,
113 mandatory_error OUT NOCOPY BOOLEAN,
114 validation_error OUT NOCOPY BOOLEAN,
115 limit_error OUT NOCOPY BOOLEAN);
116
117 procedure TRANSFER_IG_DEALS( ARec_Interface IN XTR_DEALS_INTERFACE%rowtype,
118 p_source IN VARCHAR2,
119 user_error OUT NOCOPY BOOLEAN,
120 mandatory_error OUT NOCOPY BOOLEAN,
121 validation_error OUT NOCOPY BOOLEAN,
122 limit_error OUT NOCOPY BOOLEAN,
123 deal_num OUT NOCOPY NUMBER);
124
125 -- 3800146 new signature --------------------------------------------------------
126 procedure TRANSFER_IG_DEALS( ARec_Interface IN XTR_DEALS_INTERFACE%rowtype,
127 p_source IN VARCHAR2,
128 user_error OUT NOCOPY BOOLEAN,
129 mandatory_error OUT NOCOPY BOOLEAN,
130 validation_error OUT NOCOPY BOOLEAN,
131 limit_error OUT NOCOPY BOOLEAN,
132 deal_num OUT NOCOPY NUMBER,
133 tran_num OUT NOCOPY NUMBER,
134 mirror_deal_num OUT NOCOPY NUMBER,
135 mirror_tran_num OUT NOCOPY NUMBER);
136 ----------------------------------------------------------------------------------
137
138 procedure MIRROR_INIT(p_mirror_deal IN VARCHAR2 DEFAULT NULL,
139 p_mirror_deal_no IN NUMBER DEFAULT NULL,
140 p_mirror_trans_no IN NUMBER DEFAULT NULL,
141 p_rounding_type IN VARCHAR2 DEFAULT NULL, --* Added for Interest Override
142 p_day_count_type IN VARCHAR2 DEFAULT NULL); --* Added for Interest Override
143
144 procedure UPDATE_PRICING_MODEL(p_company_code VARCHAR2,
145 p_party_code VARCHAR2,
146 p_currency VARCHAR2,
147 p_pricing_model VARCHAR2);
148
149 procedure DEFAULT_PRICING_MODEL(p_company_code IN VARCHAR2,
150 p_party_code IN VARCHAR2,
151 p_currency IN VARCHAR2,
152 p_product_type IN VARCHAR2,
153 p_pricing_model OUT NOCOPY VARCHAR2);
154
155
156 --* Public Variables
157 G_Ig_curr_date DATE;
158 G_Ig_SysDate DATE;
159 G_Ig_user_id NUMBER;
160 G_Ig_user xtr_dealer_codes.dealer_code%TYPE;
161 G_Ig_bal_out NUMBER;
162 G_Ig_action XTR_AMOUNT_ACTIONS.ACTION_CODE%type;
163 G_Ig_year_calc_type XTR_MASTER_CURRENCIES_V.IG_YEAR_BASIS%type;
164 G_Ig_Main_Rec XTR_INTERGROUP_TRANSFERS%rowtype;
165 G_Ig_Mirror_Rec XTR_INTERGROUP_TRANSFERS%rowtype;
166
167 /*------------------ Rvallams: Bug# 2229236 -------------------------*/
168
169 G_Ig_Source VARCHAR2(10);
170 G_Ig_Mirror_Deal VARCHAR2(1);
171 G_Ig_Orig_Deal_No NUMBER;
172 G_Ig_Orig_Trans_No NUMBER;
173
174 /*----------------- Added for Interest Project ----------------------*/
175 G_Ig_Rounding_Type VARCHAR2(1);
176 G_Ig_Day_Count_Type VARCHAR2(1);
177 G_Ig_Original_Amount NUMBER;
178
179 /*----------------- 3800146 Added for IG/IAC Redesign ----------------------*/
180 G_Ig_External_Source VARCHAR2(30);
181 G_Ig_Settlement_Flag VARCHAR2(1);
182 G_Main_log_id NUMBER;
183 G_Mirror_log_id NUMBER;
184
185 /*----------------- 3800146 Added for IG/IAC Redesign ----------------------*/
186 C_ZBA constant VARCHAR2(3) := 'ZBA';
187 C_CL constant VARCHAR2(3) := 'CL';
188
189
190 END;