DBA Data[Home] [Help]

PACKAGE BODY: APPS.CE_SYSTEM_PARAMETERS1_PKG

Source


1 PACKAGE BODY CE_SYSTEM_PARAMETERS1_PKG as
2 /* $Header: cesysp1b.pls 120.8 2008/01/23 13:21:45 kbabu ship $ */
3   FUNCTION body_revision RETURN VARCHAR2 IS
4   BEGIN
5 
6     RETURN '$Revision: 120.8 $';
7 
8   END body_revision;
9 
10   FUNCTION spec_revision RETURN VARCHAR2 IS
11   BEGIN
12 
13     RETURN G_spec_revision;
14 
15   END spec_revision;
16 
17 /* ---------------------------------------------------------------------
18 |  CALL BY                                                             |
19 |       CEXCABMR.fmb AXCABMR.set_sys_par
20 |       ceabrdrb.pls,
21 |       ceabrmab.pls
22 |
23 |  The LEGAL_ENTITY_ID must be provided
24  --------------------------------------------------------------------- */
25 
26   PROCEDURE SELECT_COLUMNS
27 	          (X_ROWID                        	IN OUT NOCOPY VARCHAR2,
28                    X_SET_OF_BOOKS_ID             	IN OUT NOCOPY NUMBER,
29                    X_CASHBOOK_BEGIN_DATE            	IN OUT NOCOPY DATE,
30                    X_SHOW_CLEARED_FLAG              	IN OUT NOCOPY VARCHAR2,
31                    X_SHOW_VOID_PAYMENT_FLAG         	IN OUT NOCOPY VARCHAR2,
32 		   X_LINE_AUTOCREATION_FLAG		IN OUT NOCOPY VARCHAR2,
33 		   X_INTERFACE_PURGE_FLAG		IN OUT NOCOPY VARCHAR2,
34 		   X_INTERFACE_ARCHIVE_FLAG		IN OUT NOCOPY VARCHAR2,
35                    X_LINES_PER_COMMIT               	IN OUT NOCOPY NUMBER,
36                    X_FUNCTIONAL_CURRENCY            	IN OUT NOCOPY VARCHAR2,
37 	 	   X_SOB_SHORT_NAME			IN OUT NOCOPY VARCHAR2,
38 	 	   X_ACCOUNT_PERIOD_TYPE		IN OUT NOCOPY VARCHAR2,
39 	 	   X_USER_EXCHANGE_RATE_TYPE		IN OUT NOCOPY VARCHAR2,
40 		   X_CHART_OF_ACCOUNTS_ID		IN OUT NOCOPY NUMBER,
41                    X_CASHFLOW_EXCHANGE_RATE_TYPE    	IN OUT NOCOPY VARCHAR2,
42                    X_AUTHORIZATION_BAT	            	IN OUT NOCOPY VARCHAR2,
43                    X_BSC_EXCHANGE_DATE_TYPE         	IN OUT NOCOPY VARCHAR2,
44                    X_BAT_EXCHANGE_DATE_TYPE         	IN OUT NOCOPY VARCHAR2,
45 		   X_LEGAL_ENTITY_ID		   	IN OUT NOCOPY NUMBER
46 		) IS
47   BEGIN
48     IF ( X_legal_entity_id is not null) then
49       SELECT s.rowid,
50 	   s.set_of_books_id,
51            s.cashbook_begin_date,
52            s.show_cleared_flag,
53            NVL(s.show_void_payment_flag, 'N'),
58 	   NVL(s.interface_archive_flag,'N'),
54            NVL(s.lines_per_commit,1),
55 	   g.currency_code,
56 	   s.line_autocreation_flag,
57 	   NVL(s.interface_purge_flag,'N'),
59 	   g.short_name,
60 	   g.accounted_period_type,
61 	   ct.user_conversion_type,
62 	   g.chart_of_accounts_id,
63 	   s.CASHFLOW_EXCHANGE_RATE_TYPE,
64 	   s.AUTHORIZATION_BAT,
65 	   s.BSC_EXCHANGE_DATE_TYPE,
66  	   s.BAT_EXCHANGE_DATE_TYPE,
67 	   s.legal_entity_id
68       INTO X_Rowid,
69 	 X_Set_Of_Books_Id,
70          X_Cashbook_Begin_Date,
71          X_Show_Cleared_Flag,
72          X_Show_Void_Payment_Flag,
73          X_Lines_Per_Commit,
74          X_Functional_Currency,
75 	 X_line_autocreation_flag,
76 	 X_interface_purge_flag,
77 	 X_interface_archive_flag,
78 	 X_sob_short_name,
79 	 X_account_period_type,
80 	 X_user_exchange_rate_type,
81 	 X_chart_of_accounts_id,
82 	 X_CASHFLOW_EXCHANGE_RATE_TYPE,
83 	 X_AUTHORIZATION_BAT,
84 	 X_BSC_EXCHANGE_DATE_TYPE,
85 	 X_BAT_EXCHANGE_DATE_TYPE,
86          X_legal_entity_id
87       FROM CE_SYSTEM_PARAMETERS s,
88 	 GL_SETS_OF_BOOKS g,
89 	 GL_DAILY_CONVERSION_TYPES ct
90       WHERE s.legal_entity_id =  X_legal_entity_id
91       and s.set_of_books_id = g.set_of_books_id
92       AND	  ct.conversion_type = 'User';
93 
94 
95     END IF;
96   EXCEPTION
97   WHEN NO_DATA_FOUND THEN
98     cep_standard.debug('EXCEPTION: CE_SYSTEM_PARAMETERS1_PKG.SELECT_COLUMNS NO_DATA_FOUND');
99 	null;
100   WHEN TOO_MANY_ROWS THEN
101     cep_standard.debug('EXCEPTION: CE_SYSTEM_PARAMETERS1_PKG.SELECT_COLUMNS TOO_MANY_ROWS');
102 	null;
103   WHEN OTHERS THEN
104     cep_standard.debug('EXCEPTION: CE_SYSTEM_PARAMETERS1_PKG.SELECT_COLUMNS');
105     RAISE;
106   END SELECT_COLUMNS;
107 
108 /* ---------------------------------------------------------------------
109 |  CALL BY                                                             |
110 |       ceabrimb.pls, ceabrmab.pls
111 |
112 |  The X_BANK_ACCOUNT_ID must be provided
113 |
114  --------------------------------------------------------------------- */
115 
116    PROCEDURE BA_SELECT_COLUMNS
117 	          (X_ROWID                      	IN OUT NOCOPY VARCHAR2,
118 	           X_AP_AMOUNT_TOLERANCE		IN OUT NOCOPY NUMBER,
119 	           X_AP_PERCENT_TOLERANCE		IN OUT NOCOPY NUMBER,
120 	           X_AR_AMOUNT_TOLERANCE		IN OUT NOCOPY NUMBER,
121 	           X_AR_PERCENT_TOLERANCE		IN OUT NOCOPY NUMBER,
122 	           X_CE_AMOUNT_TOLERANCE		IN OUT NOCOPY NUMBER,
123 	           X_CE_PERCENT_TOLERANCE		IN OUT NOCOPY NUMBER,
124            	   X_STMT_LN_FLOAT_HANDLING_FLAG 	IN OUT NOCOPY VARCHAR2,
125              	   X_AUTORECON_AP_MATCHING_ORDER 	IN OUT NOCOPY VARCHAR2,
126 	           X_AUTORECON_AR_MATCHING_ORDER 	IN OUT NOCOPY VARCHAR2,
127 	           X_RECON_FX_BANK_XRATE_TYPE 		IN OUT NOCOPY VARCHAR2,
128 	           X_RECON_FX_BANK_XDATE_TYPE	 	IN OUT NOCOPY VARCHAR2,
129 	           X_RECON_ENABLE_OI_FLAG 		IN OUT NOCOPY VARCHAR2,
130 	           X_RECON_OI_FLOAT_STATUS 		IN OUT NOCOPY VARCHAR2,
131 	           X_RECON_OI_CLEARED_STATUS 		IN OUT NOCOPY VARCHAR2,
132 	           X_RECON_OI_MATCHING_CODE 		IN OUT NOCOPY VARCHAR2,
133 	           X_RECON_OI_AMOUNT_TOLERANCE          IN OUT NOCOPY NUMBER,
134 	           X_RECON_OI_PERCENT_TOLERANCE         IN OUT NOCOPY NUMBER,
135 	           X_MANUAL_RECON_AMOUNT_TOL     	IN OUT NOCOPY NUMBER,
136 	           X_MANUAL_RECON_PERCENT_TOL     	IN OUT NOCOPY NUMBER,
137 	           X_RECON_AP_FX_DIFF_HANDLING 		IN OUT NOCOPY VARCHAR2,
138 	           X_RECON_AR_FX_DIFF_HANDLING 		IN OUT NOCOPY VARCHAR2,
139 	           X_RECON_CE_FX_DIFF_HANDLING 		IN OUT NOCOPY VARCHAR2,
140 	           X_RECON_AP_TOL_DIFF_ACCT 		IN OUT NOCOPY VARCHAR2,
141 	           X_RECON_CE_TOL_DIFF_ACCT		IN OUT NOCOPY VARCHAR2,
142 	           X_LEGAL_ENTITY_ID			IN OUT NOCOPY NUMBER,
143 	           X_BANK_ACCOUNT_ID			IN OUT NOCOPY NUMBER,
144 		   X_AUTORECON_AP_MATCHING_ORDER2 	IN OUT NOCOPY VARCHAR2 -- FOR SEPA ER 6700007
145 		) IS
146   BEGIN
147     IF ( X_legal_entity_id is not null) then
148       SELECT BA.rowid,
149            BA.AP_AMOUNT_TOLERANCE		,
150            BA.AP_PERCENT_TOLERANCE		,
151            BA.AR_AMOUNT_TOLERANCE		,
152            BA.AR_PERCENT_TOLERANCE		,
153            BA.CE_AMOUNT_TOLERANCE		,
154            BA.CE_PERCENT_TOLERANCE		,
155       	   BA.STMT_LINE_FLOAT_HANDLING_FLAG 	,
156       	   BA.AUTORECON_AP_MATCHING_ORDER 	,
157            BA.AUTORECON_AR_MATCHING_ORDER 	,
158  	   BA.RECON_FOREIGN_BANK_XRATE_TYPE,
159 	   BA.RECON_FOR_BANK_XRATE_DATE_TYPE ,
160            BA.RECON_ENABLE_OI_FLAG 		,
161            BA.RECON_OI_FLOAT_STATUS 		,
162            BA.RECON_OI_CLEARED_STATUS 		,
163            BA.RECON_OI_MATCHING_CODE 		,
164            BA.RECON_OI_AMOUNT_TOLERANCE          ,
165            BA.RECON_OI_PERCENT_TOLERANCE         ,
166            BA.MANUAL_RECON_AMOUNT_TOLERANCE     	,
167            BA.MANUAL_RECON_PERCENT_TOLERANCE     	,
168 	   BA.RECON_AP_FOREIGN_DIFF_HANDLING,
169 	   BA.RECON_AR_FOREIGN_DIFF_HANDLING,
170 	   BA.RECON_CE_FOREIGN_DIFF_HANDLING,
171            BA.RECON_AP_TOLERANCE_DIFF_ACCT 		,
172            BA.RECON_CE_TOLERANCE_DIFF_ACCT		,
173            BA.ACCOUNT_OWNER_ORG_ID,
174            BA.BANK_ACCOUNT_ID                   ,
175 	   BA.AUTORECON_AP_MATCHING_ORDER2 -- FOR SEPA ER 6700007
176 
177       INTO X_Rowid,
178            X_AP_AMOUNT_TOLERANCE		,
179            X_AP_PERCENT_TOLERANCE		,
180            X_AR_AMOUNT_TOLERANCE		,
181            X_AR_PERCENT_TOLERANCE		,
182            X_CE_AMOUNT_TOLERANCE		,
183            X_CE_PERCENT_TOLERANCE		,
184            X_STMT_LN_FLOAT_HANDLING_FLAG 	,
185            X_AUTORECON_AP_MATCHING_ORDER 	,
186            X_AUTORECON_AR_MATCHING_ORDER 	,
187 	   X_RECON_FX_BANK_XRATE_TYPE 		,
188 	   X_RECON_FX_BANK_XDATE_TYPE	 	,
189            X_RECON_ENABLE_OI_FLAG 		,
190            X_RECON_OI_FLOAT_STATUS 		,
191            X_RECON_OI_CLEARED_STATUS 		,
192            X_RECON_OI_MATCHING_CODE 		,
193            X_RECON_OI_AMOUNT_TOLERANCE          ,
194            X_RECON_OI_PERCENT_TOLERANCE         ,
195            X_MANUAL_RECON_AMOUNT_TOL     	,
196            X_MANUAL_RECON_PERCENT_TOL     	,
197            X_RECON_AP_FX_DIFF_HANDLING 		,
198            X_RECON_AR_FX_DIFF_HANDLING 		,
199            X_RECON_CE_FX_DIFF_HANDLING 		,
200            X_RECON_AP_TOL_DIFF_ACCT 		,
201            X_RECON_CE_TOL_DIFF_ACCT		,
202            X_LEGAL_ENTITY_ID			,
203            X_BANK_ACCOUNT_ID			,
204 	   X_AUTORECON_AP_MATCHING_ORDER2       -- FOR SEPA ER 6700007
205       FROM CE_BANK_ACCOUNTS	BA
206       WHERE BA.BANK_ACCOUNT_ID = X_BANK_ACCOUNT_ID;
207     END IF;
208   EXCEPTION
209   WHEN NO_DATA_FOUND THEN
210     cep_standard.debug('EXCEPTION: CE_SYSTEM_PARAMETERS1_PKG.BA_SELECT_COLUMNS NO_DATA_FOUND');
211 	null;
212   WHEN TOO_MANY_ROWS THEN
213     cep_standard.debug('EXCEPTION: CE_SYSTEM_PARAMETERS1_PKG.BA_SELECT_COLUMNS TOO_MANY_ROWS');
214 	null;
215   WHEN OTHERS THEN
216     cep_standard.debug('EXCEPTION: CE_SYSTEM_PARAMETERS1_PKG.BA_SELECT_COLUMNS');
217     RAISE;
218   END Ba_Select_Columns;
219 
220 /* ---------------------------------------------------------------------
221 |  CALL BY                                                             |
222 |
223 |
224 |
225  --------------------------------------------------------------------- */
226   PROCEDURE BAU_SELECT_COLUMNS
227 		        (X_ROWID                      	IN OUT NOCOPY VARCHAR2,
228 			 X_RECEIVABLE_TRX_ID		IN OUT NOCOPY NUMBER,
229 		         X_ORG_ID			IN OUT NOCOPY NUMBER,
230 		         X_BANK_ACCOUNT_ID		IN OUT NOCOPY NUMBER,
231 		         X_BANK_ACCT_USE_ID		IN OUT NOCOPY NUMBER)
232 IS
233   BEGIN
234     IF ((X_BANK_ACCT_USE_ID is not null) or
235 	  (X_BANK_ACCOUNT_ID is not null and X_ORG_ID is not null )) then
236 null;
237       SELECT BAU.rowid,
238 	     BAU.NEW_AR_RCPTS_RECEIVABLE_TRX_ID ,
239 	     BAU.ORG_ID,
240 	     BAU.BANK_ACCOUNT_ID,
241 	     BAU.BANK_ACCT_USE_ID
242 	INTO X_ROWID ,
243 	     X_RECEIVABLE_TRX_ID,
244              X_ORG_ID,
245              X_BANK_ACCOUNT_ID,
246              X_BANK_ACCT_USE_ID
247   	FROM CE_BANK_ACCT_USES_ALL  BAU
248 	WHERE
249 	     BAU.BANK_ACCT_USE_ID = NVL(X_BANK_ACCT_USE_ID, BAU.BANK_ACCT_USE_ID)
250 	 and  BAU.ORG_ID = NVL(X_ORG_ID, BAU.ORG_ID)
251 	AND  BAU.BANK_ACCOUNT_ID = NVL(X_BANK_ACCOUNT_ID, BAU.BANK_ACCOUNT_ID);
252     END IF;
253   EXCEPTION
254   WHEN NO_DATA_FOUND THEN
255     cep_standard.debug('EXCEPTION: CE_SYSTEM_PARAMETERS1_PKG.BAU_SELECT_COLUMNS NO_DATA_FOUND');
256 	null;
257   WHEN TOO_MANY_ROWS THEN
258     cep_standard.debug('EXCEPTION: CE_SYSTEM_PARAMETERS1_PKG.BAU_SELECT_COLUMNS TOO_MANY_ROWS');
259 	null;
260   WHEN OTHERS THEN
261     cep_standard.debug('EXCEPTION: CE_SYSTEM_PARAMETERS1_PKG.BAU_SELECT_COLUMNS');
262     RAISE;
263   END BAU_SELECT_COLUMNS;
264 
265 END CE_SYSTEM_PARAMETERS1_PKG;