1: PACKAGE BODY zx_mig_gl_tax_options_pkg AS
2: /* $Header: zxmiggltaxoptb.pls 120.9.12010000.1 2008/07/28 13:34:19 appldev ship $ */
3:
4: PG_DEBUG CONSTANT VARCHAR(1) default
5: NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
3:
4: PG_DEBUG CONSTANT VARCHAR(1) default
5: NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
6:
7: PROCEDURE zx_mig_gl_tax_options_header(P_Ledger_Id IN NUMBER,
8: P_Org_id IN NUMBER);
9:
10: PROCEDURE zx_mig_gl_tax_options_nt(P_Ledger_Id IN NUMBER,
11: P_Org_id IN NUMBER,
6:
7: PROCEDURE zx_mig_gl_tax_options_header(P_Ledger_Id IN NUMBER,
8: P_Org_id IN NUMBER);
9:
10: PROCEDURE zx_mig_gl_tax_options_nt(P_Ledger_Id IN NUMBER,
11: P_Org_id IN NUMBER,
12: P_Account_Segment_Value IN VARCHAR2 );
13:
14: PROCEDURE zx_mig_gl_tax_options_ap(P_Ledger_Id IN NUMBER,
10: PROCEDURE zx_mig_gl_tax_options_nt(P_Ledger_Id IN NUMBER,
11: P_Org_id IN NUMBER,
12: P_Account_Segment_Value IN VARCHAR2 );
13:
14: PROCEDURE zx_mig_gl_tax_options_ap(P_Ledger_Id IN NUMBER,
15: P_Org_id IN NUMBER,
16: P_Account_Segment_Value IN VARCHAR2 );
17:
18: PROCEDURE zx_mig_gl_tax_options_ar(P_Ledger_Id IN NUMBER,
14: PROCEDURE zx_mig_gl_tax_options_ap(P_Ledger_Id IN NUMBER,
15: P_Org_id IN NUMBER,
16: P_Account_Segment_Value IN VARCHAR2 );
17:
18: PROCEDURE zx_mig_gl_tax_options_ar(P_Ledger_Id IN NUMBER,
19: P_Org_id IN NUMBER,
20: P_Account_Segment_Value IN VARCHAR2 );
21:
22:
24: L_ORG_ID NUMBER(15);
25:
26: /*===========================================================================+
27: | PROCEDURE |
28: | zx_sync_gl_tax_options |
29: | |
30: | DESCRIPTION |
31: | This routine is a wrapper for synchroniztion of GL TAX OPTIONS SETUP. |
32: | |
27: | PROCEDURE |
28: | zx_sync_gl_tax_options |
29: | |
30: | DESCRIPTION |
31: | This routine is a wrapper for synchroniztion of GL TAX OPTIONS SETUP. |
32: | |
33: | SCOPE - PUBLIC |
34: | |
35: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
43: | |
44: +==========================================================================*/
45:
46:
47: PROCEDURE zx_sync_gl_tax_options( P_Ledger_Id IN NUMBER,
48: P_Org_id IN NUMBER,
49: P_Account_Segment_Value IN VARCHAR2,
50: P_Tax_Type_Code IN VARCHAR2) is
51: BEGIN
49: P_Account_Segment_Value IN VARCHAR2,
50: P_Tax_Type_Code IN VARCHAR2) is
51: BEGIN
52: IF PG_DEBUG = 'Y' THEN
53: arp_util_tax.debug('zx_sync_gl_tax_options(+)');
54: END IF;
55:
56: if(P_Account_Segment_Value is NULL and p_tax_type_code is NULL ) then
57: zx_mig_gl_tax_options_header(P_Ledger_Id,P_Org_id);
53: arp_util_tax.debug('zx_sync_gl_tax_options(+)');
54: END IF;
55:
56: if(P_Account_Segment_Value is NULL and p_tax_type_code is NULL ) then
57: zx_mig_gl_tax_options_header(P_Ledger_Id,P_Org_id);
58: elsif(P_Tax_Type_Code='N') then
59: zx_mig_gl_tax_options_nt(P_Ledger_Id,P_Org_id,P_Account_Segment_Value);
60: else
61: if(P_Tax_Type_Code='I' or P_Tax_Type_Code='B') then
55:
56: if(P_Account_Segment_Value is NULL and p_tax_type_code is NULL ) then
57: zx_mig_gl_tax_options_header(P_Ledger_Id,P_Org_id);
58: elsif(P_Tax_Type_Code='N') then
59: zx_mig_gl_tax_options_nt(P_Ledger_Id,P_Org_id,P_Account_Segment_Value);
60: else
61: if(P_Tax_Type_Code='I' or P_Tax_Type_Code='B') then
62: zx_mig_gl_tax_options_ap(P_Ledger_Id,P_Org_id,P_Account_Segment_Value);
63: end if;
58: elsif(P_Tax_Type_Code='N') then
59: zx_mig_gl_tax_options_nt(P_Ledger_Id,P_Org_id,P_Account_Segment_Value);
60: else
61: if(P_Tax_Type_Code='I' or P_Tax_Type_Code='B') then
62: zx_mig_gl_tax_options_ap(P_Ledger_Id,P_Org_id,P_Account_Segment_Value);
63: end if;
64: if(P_Tax_Type_Code='O' or P_Tax_Type_Code='B') then
65: zx_mig_gl_tax_options_ar(P_Ledger_Id,P_Org_id,P_Account_Segment_Value);
66: end if;
61: if(P_Tax_Type_Code='I' or P_Tax_Type_Code='B') then
62: zx_mig_gl_tax_options_ap(P_Ledger_Id,P_Org_id,P_Account_Segment_Value);
63: end if;
64: if(P_Tax_Type_Code='O' or P_Tax_Type_Code='B') then
65: zx_mig_gl_tax_options_ar(P_Ledger_Id,P_Org_id,P_Account_Segment_Value);
66: end if;
67: end if;
68:
69: IF PG_DEBUG = 'Y' THEN
66: end if;
67: end if;
68:
69: IF PG_DEBUG = 'Y' THEN
70: arp_util_tax.debug('zx_sync_gl_tax_options(-)');
71: END IF;
72: EXCEPTION
73: WHEN OTHERS THEN
74: IF PG_DEBUG = 'Y' THEN
71: END IF;
72: EXCEPTION
73: WHEN OTHERS THEN
74: IF PG_DEBUG = 'Y' THEN
75: arp_util_tax.debug('EXCEPTION: zx_sync_gl_tax_options ');
76: arp_util_tax.debug(sqlerrm);
77: arp_util_tax.debug('zx_sync_gl_tax_options(-)');
78: END IF;
79: app_exception.raise_exception;
73: WHEN OTHERS THEN
74: IF PG_DEBUG = 'Y' THEN
75: arp_util_tax.debug('EXCEPTION: zx_sync_gl_tax_options ');
76: arp_util_tax.debug(sqlerrm);
77: arp_util_tax.debug('zx_sync_gl_tax_options(-)');
78: END IF;
79: app_exception.raise_exception;
80: End zx_sync_gl_tax_options;
81:
76: arp_util_tax.debug(sqlerrm);
77: arp_util_tax.debug('zx_sync_gl_tax_options(-)');
78: END IF;
79: app_exception.raise_exception;
80: End zx_sync_gl_tax_options;
81:
82: /*===========================================================================+
83: | PROCEDURE |
84: | zx_mig_gl_tax_options |
80: End zx_sync_gl_tax_options;
81:
82: /*===========================================================================+
83: | PROCEDURE |
84: | zx_mig_gl_tax_options |
85: | |
86: | DESCRIPTION |
87: | This routine is a wrapper for migration of GL TAX OPTIONS SETUP. |
88: | |
83: | PROCEDURE |
84: | zx_mig_gl_tax_options |
85: | |
86: | DESCRIPTION |
87: | This routine is a wrapper for migration of GL TAX OPTIONS SETUP. |
88: | |
89: | SCOPE - PUBLIC |
90: | |
91: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
99: | |
100: +==========================================================================*/
101:
102:
103: PROCEDURE zx_mig_gl_tax_options is
104: BEGIN
105: IF PG_DEBUG = 'Y' THEN
106: arp_util_tax.debug('zx_mig_gl_tax_options(+)');
107: END IF;
102:
103: PROCEDURE zx_mig_gl_tax_options is
104: BEGIN
105: IF PG_DEBUG = 'Y' THEN
106: arp_util_tax.debug('zx_mig_gl_tax_options(+)');
107: END IF;
108:
109: zx_mig_gl_tax_options_header(NULL,NULL);
110:
105: IF PG_DEBUG = 'Y' THEN
106: arp_util_tax.debug('zx_mig_gl_tax_options(+)');
107: END IF;
108:
109: zx_mig_gl_tax_options_header(NULL,NULL);
110:
111: zx_mig_gl_tax_options_nt(NULL,NULL,NULL);
112:
113: IF ZX_MIGRATE_UTIL.IS_INSTALLED('AP') = 'Y' THEN
107: END IF;
108:
109: zx_mig_gl_tax_options_header(NULL,NULL);
110:
111: zx_mig_gl_tax_options_nt(NULL,NULL,NULL);
112:
113: IF ZX_MIGRATE_UTIL.IS_INSTALLED('AP') = 'Y' THEN
114: zx_mig_gl_tax_options_ap(NULL,NULL,NULL);
115: END IF;
110:
111: zx_mig_gl_tax_options_nt(NULL,NULL,NULL);
112:
113: IF ZX_MIGRATE_UTIL.IS_INSTALLED('AP') = 'Y' THEN
114: zx_mig_gl_tax_options_ap(NULL,NULL,NULL);
115: END IF;
116:
117: IF ZX_MIGRATE_UTIL.IS_INSTALLED('AR') = 'Y' THEN
118: zx_mig_gl_tax_options_ar(NULL,NULL,NULL);
114: zx_mig_gl_tax_options_ap(NULL,NULL,NULL);
115: END IF;
116:
117: IF ZX_MIGRATE_UTIL.IS_INSTALLED('AR') = 'Y' THEN
118: zx_mig_gl_tax_options_ar(NULL,NULL,NULL);
119: END IF;
120:
121: IF PG_DEBUG = 'Y' THEN
122: arp_util_tax.debug('zx_mig_gl_tax_options(-)');
118: zx_mig_gl_tax_options_ar(NULL,NULL,NULL);
119: END IF;
120:
121: IF PG_DEBUG = 'Y' THEN
122: arp_util_tax.debug('zx_mig_gl_tax_options(-)');
123: END IF;
124: EXCEPTION
125: WHEN OTHERS THEN
126: IF PG_DEBUG = 'Y' THEN
123: END IF;
124: EXCEPTION
125: WHEN OTHERS THEN
126: IF PG_DEBUG = 'Y' THEN
127: arp_util_tax.debug('EXCEPTION: zx_mig_gl_tax_options ');
128: arp_util_tax.debug(sqlerrm);
129: arp_util_tax.debug('zx_mig_gl_tax_options(-)');
130: END IF;
131: app_exception.raise_exception;
125: WHEN OTHERS THEN
126: IF PG_DEBUG = 'Y' THEN
127: arp_util_tax.debug('EXCEPTION: zx_mig_gl_tax_options ');
128: arp_util_tax.debug(sqlerrm);
129: arp_util_tax.debug('zx_mig_gl_tax_options(-)');
130: END IF;
131: app_exception.raise_exception;
132: END zx_mig_gl_tax_options;
133:
128: arp_util_tax.debug(sqlerrm);
129: arp_util_tax.debug('zx_mig_gl_tax_options(-)');
130: END IF;
131: app_exception.raise_exception;
132: END zx_mig_gl_tax_options;
133:
134: /*===========================================================================+
135: | PROCEDURE |
136: | zx_mig_gl_tax_options_header |
132: END zx_mig_gl_tax_options;
133:
134: /*===========================================================================+
135: | PROCEDURE |
136: | zx_mig_gl_tax_options_header |
137: | |
138: | DESCRIPTION |
139: | This routine migrates GL TAX OPTIONS SETUP Header Information. |
140: | |
135: | PROCEDURE |
136: | zx_mig_gl_tax_options_header |
137: | |
138: | DESCRIPTION |
139: | This routine migrates GL TAX OPTIONS SETUP Header Information. |
140: | |
141: | SCOPE - PRIVATE |
142: | |
143: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
142: | |
143: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
144: | |
145: | CALLED FROM |
146: | zx_mig_gl_tax_options |
147: | NOTES |
148: | |
149: | MODIFICATION HISTORY |
150: | 24-Mar-05 Vamshi/Vinit Created. |
151: | |
152: +==========================================================================*/
153:
154:
155: PROCEDURE zx_mig_gl_tax_options_header(P_Ledger_Id number,P_Org_id number) is
156: BEGIN
157: IF PG_DEBUG = 'Y' THEN
158: arp_util_tax.debug('zx_mig_gl_tax_options_header(+)');
159: END IF;
154:
155: PROCEDURE zx_mig_gl_tax_options_header(P_Ledger_Id number,P_Org_id number) is
156: BEGIN
157: IF PG_DEBUG = 'Y' THEN
158: arp_util_tax.debug('zx_mig_gl_tax_options_header(+)');
159: END IF;
160:
161: Insert ALL
162: Into zx_account_rates_tmp
278: NULL ATTRIBUTE14,
279: NULL ATTRIBUTE15,
280: opt.ALLOW_ROUNDING_OVERRIDE_FLAG ALLOW_ROUNDING_OVERRIDE_FLAG
281: From
282: GL_TAX_OPTIONS opt,
283: zx_party_tax_profile ptp
284: Where
285: opt.input_tax_code is NULL and
286: opt.output_tax_code is NULL and
295: and account_segment_value is null
296: and tax_class is NULL );
297:
298: IF PG_DEBUG = 'Y' THEN
299: arp_util_tax.debug('zx_mig_gl_tax_options_header(-)');
300: END IF;
301: EXCEPTION
302: WHEN OTHERS THEN
303: IF PG_DEBUG = 'Y' THEN
300: END IF;
301: EXCEPTION
302: WHEN OTHERS THEN
303: IF PG_DEBUG = 'Y' THEN
304: arp_util_tax.debug('EXCEPTION: zx_mig_gl_tax_options_header ');
305: arp_util_tax.debug(sqlerrm);
306: arp_util_tax.debug('zx_mig_gl_tax_options_header(-)');
307: END IF;
308: app_exception.raise_exception;
302: WHEN OTHERS THEN
303: IF PG_DEBUG = 'Y' THEN
304: arp_util_tax.debug('EXCEPTION: zx_mig_gl_tax_options_header ');
305: arp_util_tax.debug(sqlerrm);
306: arp_util_tax.debug('zx_mig_gl_tax_options_header(-)');
307: END IF;
308: app_exception.raise_exception;
309: END zx_mig_gl_tax_options_header;
310:
305: arp_util_tax.debug(sqlerrm);
306: arp_util_tax.debug('zx_mig_gl_tax_options_header(-)');
307: END IF;
308: app_exception.raise_exception;
309: END zx_mig_gl_tax_options_header;
310:
311: /*===========================================================================+
312: | PROCEDURE |
313: | zx_mig_gl_tax_options_nt |
309: END zx_mig_gl_tax_options_header;
310:
311: /*===========================================================================+
312: | PROCEDURE |
313: | zx_mig_gl_tax_options_nt |
314: | |
315: | DESCRIPTION |
316: | This routine migrates GL TAX OPTIONS SETUP for Non-Taxable Account |
317: | Type. |
312: | PROCEDURE |
313: | zx_mig_gl_tax_options_nt |
314: | |
315: | DESCRIPTION |
316: | This routine migrates GL TAX OPTIONS SETUP for Non-Taxable Account |
317: | Type. |
318: | |
319: | SCOPE - PRIVATE |
320: | |
320: | |
321: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
322: | |
323: | CALLED FROM |
324: | zx_mig_gl_tax_options |
325: | NOTES |
326: | |
327: | MODIFICATION HISTORY |
328: | 09-Feb-05 Vamshi/Vinit Created. |
329: | |
330: +==========================================================================*/
331:
332:
333: PROCEDURE zx_mig_gl_tax_options_nt(P_Ledger_Id number,P_Org_id number,P_Account_Segment_Value varchar2) is
334: BEGIN
335: IF PG_DEBUG = 'Y' THEN
336: arp_util_tax.debug('zx_mig_gl_tax_options_nt(+)');
337: END IF;
332:
333: PROCEDURE zx_mig_gl_tax_options_nt(P_Ledger_Id number,P_Org_id number,P_Account_Segment_Value varchar2) is
334: BEGIN
335: IF PG_DEBUG = 'Y' THEN
336: arp_util_tax.debug('zx_mig_gl_tax_options_nt(+)');
337: END IF;
338:
339: Insert ALL
340: Into zx_account_rates_tmp
458: NULL ATTRIBUTE15,
459: opt.ALLOW_ROUNDING_OVERRIDE_FLAG ALLOW_ROUNDING_OVERRIDE_FLAG
460: From
461: gl_tax_option_accounts accounts,
462: gl_tax_options opt,
463: zx_party_tax_profile ptp
464: Where
465: accounts.ledger_id = opt.ledger_id and
466: decode(l_multi_org_flag,'N',l_org_id,accounts.org_id) = decode(l_multi_org_flag,'N',l_org_id,opt.org_id) and
478: and account_segment_value = accounts.account_segment_value
479: and tax_class = 'NON_TAXABLE' );
480:
481: IF PG_DEBUG = 'Y' THEN
482: arp_util_tax.debug('zx_mig_gl_tax_options_nt(-)');
483: END IF;
484: EXCEPTION
485: WHEN OTHERS THEN
486: IF PG_DEBUG = 'Y' THEN
483: END IF;
484: EXCEPTION
485: WHEN OTHERS THEN
486: IF PG_DEBUG = 'Y' THEN
487: arp_util_tax.debug('EXCEPTION: zx_mig_gl_tax_options_nt ');
488: arp_util_tax.debug(sqlerrm);
489: arp_util_tax.debug('zx_mig_gl_tax_options_nt(-)');
490: END IF;
491: app_exception.raise_exception;
485: WHEN OTHERS THEN
486: IF PG_DEBUG = 'Y' THEN
487: arp_util_tax.debug('EXCEPTION: zx_mig_gl_tax_options_nt ');
488: arp_util_tax.debug(sqlerrm);
489: arp_util_tax.debug('zx_mig_gl_tax_options_nt(-)');
490: END IF;
491: app_exception.raise_exception;
492: END zx_mig_gl_tax_options_nt;
493:
488: arp_util_tax.debug(sqlerrm);
489: arp_util_tax.debug('zx_mig_gl_tax_options_nt(-)');
490: END IF;
491: app_exception.raise_exception;
492: END zx_mig_gl_tax_options_nt;
493:
494: /*===========================================================================+
495: | PROCEDURE |
496: | zx_mig_gl_tax_options_ap |
492: END zx_mig_gl_tax_options_nt;
493:
494: /*===========================================================================+
495: | PROCEDURE |
496: | zx_mig_gl_tax_options_ap |
497: | |
498: | DESCRIPTION |
499: | This routine migrates GL TAX OPTIONS SETUP for AP(Input Tax). |
500: | |
495: | PROCEDURE |
496: | zx_mig_gl_tax_options_ap |
497: | |
498: | DESCRIPTION |
499: | This routine migrates GL TAX OPTIONS SETUP for AP(Input Tax). |
500: | |
501: | SCOPE - PRIVATE |
502: | |
503: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
502: | |
503: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
504: | |
505: | CALLED FROM |
506: | zx_mig_gl_tax_options |
507: | NOTES |
508: | |
509: | MODIFICATION HISTORY |
510: | 09-Feb-05 Vamshi/Vinit Created. |
511: | |
512: +==========================================================================*/
513:
514:
515: PROCEDURE zx_mig_gl_tax_options_ap(P_Ledger_Id number,P_Org_id number,P_Account_Segment_Value varchar2) is
516: BEGIN
517: IF PG_DEBUG = 'Y' THEN
518: arp_util_tax.debug('zx_mig_gl_tax_options_ap(+)');
519: END IF;
514:
515: PROCEDURE zx_mig_gl_tax_options_ap(P_Ledger_Id number,P_Org_id number,P_Account_Segment_Value varchar2) is
516: BEGIN
517: IF PG_DEBUG = 'Y' THEN
518: arp_util_tax.debug('zx_mig_gl_tax_options_ap(+)');
519: END IF;
520:
521: Insert ALL
522: Into zx_account_rates_tmp
638: NULL ATTRIBUTE14,
639: NULL ATTRIBUTE15,
640: opt.ALLOW_ROUNDING_OVERRIDE_FLAG ALLOW_ROUNDING_OVERRIDE_FLAG
641: From
642: GL_TAX_OPTIONS opt,
643: ap_tax_codes_all aptax,
644: zx_RATES_B rates
645: Where
646: opt.ledger_id = aptax.set_of_books_id and
844: opt.ALLOW_ROUNDING_OVERRIDE_FLAG ALLOW_ROUNDING_OVERRIDE_FLAG
845: From
846: gl_tax_option_accounts accounts,
847: ap_tax_codes_all aptax,
848: gl_tax_options opt,
849: zx_rates_b rates
850: Where
851: accounts.ledger_id = opt.ledger_id and
852: decode(l_multi_org_flag,'N',l_org_id,accounts.org_id) = decode(l_multi_org_flag,'N',l_org_id,opt.org_id) and
870: and account_segment_value = accounts.account_segment_value
871: and tax_class = 'INPUT' );
872:
873: IF PG_DEBUG = 'Y' THEN
874: arp_util_tax.debug('zx_mig_gl_tax_options_ap(-)');
875: END IF;
876: EXCEPTION
877: WHEN OTHERS THEN
878: IF PG_DEBUG = 'Y' THEN
875: END IF;
876: EXCEPTION
877: WHEN OTHERS THEN
878: IF PG_DEBUG = 'Y' THEN
879: arp_util_tax.debug('EXCEPTION: zx_mig_gl_tax_options_ap ');
880: arp_util_tax.debug(sqlerrm);
881: arp_util_tax.debug('zx_mig_gl_tax_options_ap(-)');
882: END IF;
883: app_exception.raise_exception;
877: WHEN OTHERS THEN
878: IF PG_DEBUG = 'Y' THEN
879: arp_util_tax.debug('EXCEPTION: zx_mig_gl_tax_options_ap ');
880: arp_util_tax.debug(sqlerrm);
881: arp_util_tax.debug('zx_mig_gl_tax_options_ap(-)');
882: END IF;
883: app_exception.raise_exception;
884: END zx_mig_gl_tax_options_ap;
885:
880: arp_util_tax.debug(sqlerrm);
881: arp_util_tax.debug('zx_mig_gl_tax_options_ap(-)');
882: END IF;
883: app_exception.raise_exception;
884: END zx_mig_gl_tax_options_ap;
885:
886: /*===========================================================================+
887: | PROCEDURE |
888: | zx_mig_gl_tax_options_ar |
884: END zx_mig_gl_tax_options_ap;
885:
886: /*===========================================================================+
887: | PROCEDURE |
888: | zx_mig_gl_tax_options_ar |
889: | |
890: | DESCRIPTION |
891: | This routine migrates GL TAX OPTIONS SETUP for AR(Output Tax). |
892: | |
887: | PROCEDURE |
888: | zx_mig_gl_tax_options_ar |
889: | |
890: | DESCRIPTION |
891: | This routine migrates GL TAX OPTIONS SETUP for AR(Output Tax). |
892: | |
893: | SCOPE - PRIVATE |
894: | |
895: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
894: | |
895: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
896: | |
897: | CALLED FROM |
898: | zx_mig_gl_tax_options |
899: | NOTES |
900: | |
901: | MODIFICATION HISTORY |
902: | 09-Feb-05 Vamshi/Vinit Created. |
902: | 09-Feb-05 Vamshi/Vinit Created. |
903: | |
904: +==========================================================================*/
905:
906: PROCEDURE zx_mig_gl_tax_options_ar(P_Ledger_Id number,P_Org_id number,P_Account_Segment_Value varchar2) is
907: BEGIN
908: IF PG_DEBUG = 'Y' THEN
909: arp_util_tax.debug('zx_mig_gl_tax_options_ar(+)');
910: END IF;
905:
906: PROCEDURE zx_mig_gl_tax_options_ar(P_Ledger_Id number,P_Org_id number,P_Account_Segment_Value varchar2) is
907: BEGIN
908: IF PG_DEBUG = 'Y' THEN
909: arp_util_tax.debug('zx_mig_gl_tax_options_ar(+)');
910: END IF;
911:
912: Insert ALL
913: Into zx_account_rates_tmp
1029: NULL ATTRIBUTE14,
1030: NULL ATTRIBUTE15,
1031: opt.ALLOW_ROUNDING_OVERRIDE_FLAG ALLOW_ROUNDING_OVERRIDE_FLAG
1032: From
1033: GL_TAX_OPTIONS opt,
1034: AR_VAT_TAX_ALL artax,
1035: zx_RATES_B rates
1036: Where
1037: opt.ledger_id = artax.set_of_books_id and
1237: opt.ALLOW_ROUNDING_OVERRIDE_FLAG ALLOW_ROUNDING_OVERRIDE_FLAG
1238: From
1239: gl_tax_option_accounts accounts,
1240: ar_vat_tax_all artax,
1241: gl_tax_options opt,
1242: zx_rates_b rates
1243: Where
1244: accounts.ledger_id = opt.ledger_id and
1245: decode(l_multi_org_flag,'N',l_org_id,opt.org_id) = decode(l_multi_org_flag,'N',l_org_id,accounts.org_id) and
1264: and account_segment_value = accounts.account_segment_value
1265: and tax_class = 'OUTPUT' );
1266:
1267: IF PG_DEBUG = 'Y' THEN
1268: arp_util_tax.debug('zx_mig_gl_tax_options_ar(-)');
1269: END IF;
1270: EXCEPTION
1271: WHEN OTHERS THEN
1272: IF PG_DEBUG = 'Y' THEN
1269: END IF;
1270: EXCEPTION
1271: WHEN OTHERS THEN
1272: IF PG_DEBUG = 'Y' THEN
1273: arp_util_tax.debug('EXCEPTION: zx_mig_gl_tax_options_ar ');
1274: arp_util_tax.debug(sqlerrm);
1275: arp_util_tax.debug('zx_mig_gl_tax_options_ar(-)');
1276: END IF;
1277: app_exception.raise_exception;
1271: WHEN OTHERS THEN
1272: IF PG_DEBUG = 'Y' THEN
1273: arp_util_tax.debug('EXCEPTION: zx_mig_gl_tax_options_ar ');
1274: arp_util_tax.debug(sqlerrm);
1275: arp_util_tax.debug('zx_mig_gl_tax_options_ar(-)');
1276: END IF;
1277: app_exception.raise_exception;
1278: END zx_mig_gl_tax_options_ar;
1279:
1274: arp_util_tax.debug(sqlerrm);
1275: arp_util_tax.debug('zx_mig_gl_tax_options_ar(-)');
1276: END IF;
1277: app_exception.raise_exception;
1278: END zx_mig_gl_tax_options_ar;
1279:
1280: BEGIN
1281: SELECT NVL(MULTI_ORG_FLAG,'N') INTO L_MULTI_ORG_FLAG FROM
1282: FND_PRODUCT_GROUPS;
1295:
1296:
1297: EXCEPTION
1298: WHEN OTHERS THEN
1299: arp_util_tax.debug('Exception in constructor of GL Tax Options Code '||sqlerrm);
1300: END zx_mig_gl_tax_options_pkg;
1296:
1297: EXCEPTION
1298: WHEN OTHERS THEN
1299: arp_util_tax.debug('Exception in constructor of GL Tax Options Code '||sqlerrm);
1300: END zx_mig_gl_tax_options_pkg;