1: PACKAGE BODY AR_INVOICE_DEFAULT_PVT AS
2: /* $Header: ARXVINDB.pls 120.11 2011/05/25 09:38:51 naneja ship $ */
3:
4: pg_debug VARCHAR2(1) := nvl(fnd_profile.value('AFLOG_ENABLED'),'N');
5:
6: PROCEDURE Get_system_parameters (
7: p_trx_system_parameters_rec OUT NOCOPY trx_system_parameters_rec_type,
8: x_errmsg OUT NOCOPY VARCHAR2,
124: END IF;
125:
126: x_return_status := FND_API.G_RET_STS_SUCCESS;
127:
128: trx_profile_rec.ar_unique_seq_numbers := fnd_profile.value('UNIQUE:SEQ_NUMBERS');
129:
130: /* 4743228 - swap AR to ZX profiles for etax */
131: trx_profile_rec.ar_allow_manual_tax_lines := fnd_profile.value('ZX_ALLOW_MANUAL_TAX_LINES');
132: trx_profile_rec.ar_allow_tax_code_override := fnd_profile.value('ZX_ALLOW_TAX_CLASSIF_OVERRIDE');
127:
128: trx_profile_rec.ar_unique_seq_numbers := fnd_profile.value('UNIQUE:SEQ_NUMBERS');
129:
130: /* 4743228 - swap AR to ZX profiles for etax */
131: trx_profile_rec.ar_allow_manual_tax_lines := fnd_profile.value('ZX_ALLOW_MANUAL_TAX_LINES');
132: trx_profile_rec.ar_allow_tax_code_override := fnd_profile.value('ZX_ALLOW_TAX_CLASSIF_OVERRIDE');
133: trx_profile_rec.ar_allow_trx_line_exemptions := fnd_profile.value('ZX_ALLOW_TRX_LINE_EXEMPTIONS');
134: /* 4743228 - end */
135:
128: trx_profile_rec.ar_unique_seq_numbers := fnd_profile.value('UNIQUE:SEQ_NUMBERS');
129:
130: /* 4743228 - swap AR to ZX profiles for etax */
131: trx_profile_rec.ar_allow_manual_tax_lines := fnd_profile.value('ZX_ALLOW_MANUAL_TAX_LINES');
132: trx_profile_rec.ar_allow_tax_code_override := fnd_profile.value('ZX_ALLOW_TAX_CLASSIF_OVERRIDE');
133: trx_profile_rec.ar_allow_trx_line_exemptions := fnd_profile.value('ZX_ALLOW_TRX_LINE_EXEMPTIONS');
134: /* 4743228 - end */
135:
136: trx_profile_rec.ar_batch_source := fnd_profile.value('AR_BATCH_SOURCE');
129:
130: /* 4743228 - swap AR to ZX profiles for etax */
131: trx_profile_rec.ar_allow_manual_tax_lines := fnd_profile.value('ZX_ALLOW_MANUAL_TAX_LINES');
132: trx_profile_rec.ar_allow_tax_code_override := fnd_profile.value('ZX_ALLOW_TAX_CLASSIF_OVERRIDE');
133: trx_profile_rec.ar_allow_trx_line_exemptions := fnd_profile.value('ZX_ALLOW_TRX_LINE_EXEMPTIONS');
134: /* 4743228 - end */
135:
136: trx_profile_rec.ar_batch_source := fnd_profile.value('AR_BATCH_SOURCE');
137: trx_profile_rec.ar_ra_batch_source := fnd_profile.value('AR_RA_BATCH_SOURCE');
132: trx_profile_rec.ar_allow_tax_code_override := fnd_profile.value('ZX_ALLOW_TAX_CLASSIF_OVERRIDE');
133: trx_profile_rec.ar_allow_trx_line_exemptions := fnd_profile.value('ZX_ALLOW_TRX_LINE_EXEMPTIONS');
134: /* 4743228 - end */
135:
136: trx_profile_rec.ar_batch_source := fnd_profile.value('AR_BATCH_SOURCE');
137: trx_profile_rec.ar_ra_batch_source := fnd_profile.value('AR_RA_BATCH_SOURCE');
138: trx_profile_rec.ar_update_due_date := fnd_profile.value('AR_UPDATE_DUE_DATE');
139: trx_profile_rec.ussgl_option := NVL(fnd_profile.value('USSGL_OPTION'),'N');
140: trx_profile_rec.ar_allow_salescredit_update := fnd_profile.value('AR_ALLOW_SALESCREDIT_UPDATE');
133: trx_profile_rec.ar_allow_trx_line_exemptions := fnd_profile.value('ZX_ALLOW_TRX_LINE_EXEMPTIONS');
134: /* 4743228 - end */
135:
136: trx_profile_rec.ar_batch_source := fnd_profile.value('AR_BATCH_SOURCE');
137: trx_profile_rec.ar_ra_batch_source := fnd_profile.value('AR_RA_BATCH_SOURCE');
138: trx_profile_rec.ar_update_due_date := fnd_profile.value('AR_UPDATE_DUE_DATE');
139: trx_profile_rec.ussgl_option := NVL(fnd_profile.value('USSGL_OPTION'),'N');
140: trx_profile_rec.ar_allow_salescredit_update := fnd_profile.value('AR_ALLOW_SALESCREDIT_UPDATE');
141: trx_profile_rec.so_organization_id := oe_profile.value('SO_ORGANIZATION_ID');
134: /* 4743228 - end */
135:
136: trx_profile_rec.ar_batch_source := fnd_profile.value('AR_BATCH_SOURCE');
137: trx_profile_rec.ar_ra_batch_source := fnd_profile.value('AR_RA_BATCH_SOURCE');
138: trx_profile_rec.ar_update_due_date := fnd_profile.value('AR_UPDATE_DUE_DATE');
139: trx_profile_rec.ussgl_option := NVL(fnd_profile.value('USSGL_OPTION'),'N');
140: trx_profile_rec.ar_allow_salescredit_update := fnd_profile.value('AR_ALLOW_SALESCREDIT_UPDATE');
141: trx_profile_rec.so_organization_id := oe_profile.value('SO_ORGANIZATION_ID');
142: trx_profile_rec.so_source_code := oe_profile.value('SO_SOURCE_CODE');
135:
136: trx_profile_rec.ar_batch_source := fnd_profile.value('AR_BATCH_SOURCE');
137: trx_profile_rec.ar_ra_batch_source := fnd_profile.value('AR_RA_BATCH_SOURCE');
138: trx_profile_rec.ar_update_due_date := fnd_profile.value('AR_UPDATE_DUE_DATE');
139: trx_profile_rec.ussgl_option := NVL(fnd_profile.value('USSGL_OPTION'),'N');
140: trx_profile_rec.ar_allow_salescredit_update := fnd_profile.value('AR_ALLOW_SALESCREDIT_UPDATE');
141: trx_profile_rec.so_organization_id := oe_profile.value('SO_ORGANIZATION_ID');
142: trx_profile_rec.so_source_code := oe_profile.value('SO_SOURCE_CODE');
143: trx_profile_rec.so_id_flex_code := oe_profile.value('SO_ID_FLEX_CODE');
136: trx_profile_rec.ar_batch_source := fnd_profile.value('AR_BATCH_SOURCE');
137: trx_profile_rec.ar_ra_batch_source := fnd_profile.value('AR_RA_BATCH_SOURCE');
138: trx_profile_rec.ar_update_due_date := fnd_profile.value('AR_UPDATE_DUE_DATE');
139: trx_profile_rec.ussgl_option := NVL(fnd_profile.value('USSGL_OPTION'),'N');
140: trx_profile_rec.ar_allow_salescredit_update := fnd_profile.value('AR_ALLOW_SALESCREDIT_UPDATE');
141: trx_profile_rec.so_organization_id := oe_profile.value('SO_ORGANIZATION_ID');
142: trx_profile_rec.so_source_code := oe_profile.value('SO_SOURCE_CODE');
143: trx_profile_rec.so_id_flex_code := oe_profile.value('SO_ID_FLEX_CODE');
144: trx_profile_rec.ar_jg_create_bank_charges := NVL(fnd_profile.value('AR_JG_CREATE_BANK_CHARGES'),'N');
140: trx_profile_rec.ar_allow_salescredit_update := fnd_profile.value('AR_ALLOW_SALESCREDIT_UPDATE');
141: trx_profile_rec.so_organization_id := oe_profile.value('SO_ORGANIZATION_ID');
142: trx_profile_rec.so_source_code := oe_profile.value('SO_SOURCE_CODE');
143: trx_profile_rec.so_id_flex_code := oe_profile.value('SO_ID_FLEX_CODE');
144: trx_profile_rec.ar_jg_create_bank_charges := NVL(fnd_profile.value('AR_JG_CREATE_BANK_CHARGES'),'N');
145:
146:
147: fnd_profile.get('AR_DEFAULT_EXCHANGE_RATE_TYPE', l_profile_value);
148: IF (l_profile_value IS NOT NULL) THEN
143: trx_profile_rec.so_id_flex_code := oe_profile.value('SO_ID_FLEX_CODE');
144: trx_profile_rec.ar_jg_create_bank_charges := NVL(fnd_profile.value('AR_JG_CREATE_BANK_CHARGES'),'N');
145:
146:
147: fnd_profile.get('AR_DEFAULT_EXCHANGE_RATE_TYPE', l_profile_value);
148: IF (l_profile_value IS NOT NULL) THEN
149: BEGIN
150: SELECT user_conversion_type
151: INTO l_user_conversion_type
153: WHERE conversion_type = l_profile_value;
154:
155: SELECT user_profile_option_name
156: INTO l_user_profile_option_name
157: FROM FND_PROFILE_OPTIONS_VL
158: WHERE application_id = 222
159: AND profile_option_name = 'AR_DEFAULT_EXCHANGE_RATE_TYPE';
160:
161: