The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
X_ROWID in out nocopy VARCHAR2,
X_SYSTEM_PROFILE_CODE in VARCHAR2,
X_REMIT_PMT_DETAILS_LENGTH_LIM in NUMBER,
X_REMIT_REMITTANCE_ADVICE_FORM in VARCHAR2,
X_REMIT_SRA_OVERRIDE_PAYEE_FLA in VARCHAR2,
X_REMIT_ADVICE_DELIVERY_METHOD in VARCHAR2,
X_REMIT_AUTOMATIC_SRA_SUBMIT in VARCHAR2,
X_OBJECT_VERSION_NUMBER in NUMBER,
X_PMT_PAYMENT_DETAILS_FORMULA in VARCHAR2,
X_INST_GROUP_BY_LEGAL_ENTITY in VARCHAR2,
X_INST_GROUP_BY_BILL_PAYABLE in VARCHAR2,
X_INST_GROUP_BY_MAX_INSTRUCTIO in VARCHAR2,
X_INST_GROUP_BY_ORGANIZATION in VARCHAR2,
X_INST_GROUP_BY_PAYMENT_FUNCTI in VARCHAR2,
X_INST_GROUP_BY_PAYMENT_REASON in VARCHAR2,
X_INST_GROUP_BY_RFC in VARCHAR2,
X_INST_MAX_PAYMENTS_PER_INSTR in NUMBER,
X_INST_MAX_AMOUNT_PER_INSTR_VA in NUMBER,
X_INST_MAX_AMOUNT_PER_INSTR_CU in VARCHAR2,
X_INST_MAX_AMOUNT_FX_RATE_TYPE in VARCHAR2,
X_INST_SORT_OPTION_1 in VARCHAR2,
X_INST_SORT_ORDER_1 in VARCHAR2,
X_INST_SORT_OPTION_2 in VARCHAR2,
X_POSITIVE_PAY_DELIVERY_FLAG in VARCHAR2,
X_TRANSMIT_INSTR_IMMED_FLAG in VARCHAR2,
X_AUTOMATIC_PI_REG_SUBMIT in VARCHAR2,
X_PMT_GROUP_BY_DELIVERY_CHANNE in VARCHAR2,
X_PMT_GROUP_BY_REMITTANCE_MES in VARCHAR2,
X_PMT_GROUP_BY_MAX_DOCUMENTS in VARCHAR2,
X_PMT_GROUP_BY_UNIQUE_REMIT_ID in VARCHAR2,
X_PMT_GROUP_BY_SETTLE_PRIORITY in VARCHAR2,
X_PMT_GROUP_BY_PAYMENT_REASON in VARCHAR2,
X_PMT_GROUP_BY_DUE_DATE_FLAG in VARCHAR2,
X_PMT_MAX_DOCUMENTS_PER_PAYMEN in NUMBER,
X_PMT_PAYMENT_DETAILS_LENGTH_L in NUMBER,
X_PMT_GROUP_BY_PAYMENT_DETAILS in VARCHAR2,
X_PMT_GROUP_BY_BANK_CHARGE_BEA in VARCHAR2,
X_INST_SORT_ORDER_2 in VARCHAR2,
X_INST_SORT_OPTION_3 in VARCHAR2,
X_INST_SORT_ORDER_3 in VARCHAR2,
X_REMIT_DOCUMENT_COUNT_LIMIT in NUMBER,
X_REMIT_ALLOW_MULTIPLE_COPY_FL in VARCHAR2,
X_INST_GROUP_BY_PAYMENT_DATE in VARCHAR2,
X_INST_GROUP_BY_PAYMENT_CURREN in VARCHAR2,
X_INST_GROUP_BY_INT_BANK_ACCT in VARCHAR2,
X_INST_GROUP_BY_MAX_PAYMENTS in VARCHAR2,
X_INST_GROUP_BY_PAY_SERVICE_RE in VARCHAR2,
X_DCL_ONLY_FOREIGN_CURR_PMT_FL in VARCHAR2,
X_DECLARATION_REPORT_FORMAT_CO in VARCHAR2,
X_DECLARATION_CURR_FX_RATE_TYP in VARCHAR2,
X_DECLARATION_CURRENCY_CODE in VARCHAR2,
X_DECLARATION_THRESHOLD_AMOUNT in NUMBER,
X_BANK_INSTRUCTION1_CODE in VARCHAR2,
X_BANK_INSTRUCTION2_CODE in VARCHAR2,
X_BANK_INSTRUCTION_DETAILS in VARCHAR2,
X_PAYMENT_TEXT_MESSAGE1 in VARCHAR2,
X_PAYMENT_TEXT_MESSAGE2 in VARCHAR2,
X_ACK_TRANSMIT_PROTOCOL_CODE in VARCHAR2,
X_ACK_SECURITY_PROTOCOL_CODE in VARCHAR2,
X_SEND_TO_FILE_FLAG in VARCHAR2,
X_PI_REGISTER_FORMAT in VARCHAR2,
X_BEP_ACCOUNT_ID in NUMBER,
X_APPLICABLE_PMT_METHOD in VARCHAR2,
X_APPLICABLE_CURRENCY in VARCHAR2,
X_APPLICABLE_PAYER_ORG in VARCHAR2,
X_APPLICABLE_INT_BANK_ACCOUNT in VARCHAR2,
X_BEP_SUFFIX in VARCHAR2,
X_SECURITY_PROTOCOL_CODE in VARCHAR2,
X_TRANSMIT_PROTOCOL_CODE in VARCHAR2,
X_PAYMENT_FORMAT_CODE in VARCHAR2,
X_POSITIVE_PAY_FORMAT_CODE in VARCHAR2,
X_PAY_FILE_LETTER_FORMAT_CODE in VARCHAR2,
X_PRINT_INSTRUCTION_IMMED_FLAG in VARCHAR2,
X_PERIODIC_SEQUENCE_NAME_1 in VARCHAR2,
X_PERIODIC_SEQUENCE_NAME_2 in VARCHAR2,
X_PERIODIC_SEQUENCE_NAME_3 in VARCHAR2,
X_PROCESSING_TYPE in VARCHAR2,
X_MARK_COMPLETE_EVENT in VARCHAR2,
X_MANUAL_MARK_COMPLETE_FLAG in VARCHAR2,
X_DECLARATION_OPTION in VARCHAR2,
X_SYSTEM_PROFILE_NAME in VARCHAR2,
X_SYSTEM_PROFILE_DESCRIPTION in VARCHAR2,
X_CREATION_DATE in DATE,
X_CREATED_BY in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER,
X_ELECTRONIC_PROCESSING_CHNNL in VARCHAR2,
X_LOGICAL_GROUPING_MODE in VARCHAR2,
X_BATCH_BOOKING_FLAG in VARCHAR2,
X_INST_GROUP_BY_PAYMENT_METHOD in VARCHAR2
) is
cursor C is select ROWID from IBY_UPG_PPP_B
where SYSTEM_PROFILE_CODE = X_SYSTEM_PROFILE_CODE
;
insert into IBY_UPG_PPP_B (
REMIT_PMT_DETAILS_LENGTH_LIM,
REMIT_REMITTANCE_ADVICE_FORMAT,
REMIT_SRA_OVERRIDE_PAYEE_FLAG,
REMIT_ADVICE_DELIVERY_METHOD,
REMIT_AUTOMATIC_SRA_SUBMIT,
OBJECT_VERSION_NUMBER,
PMT_PAYMENT_DETAILS_FORMULA,
INST_GROUP_BY_LEGAL_ENTITY,
INST_GROUP_BY_BILL_PAYABLE,
INST_GROUP_BY_MAX_INSTRUCTION,
INST_GROUP_BY_ORGANIZATION,
INST_GROUP_BY_PAYMENT_FUNCTION,
INST_GROUP_BY_PAYMENT_REASON,
INST_GROUP_BY_RFC,
INST_MAX_PAYMENTS_PER_INSTR,
INST_MAX_AMOUNT_PER_INSTR_VAL,
INST_MAX_AMOUNT_PER_INSTR_CURR,
INST_MAX_AMOUNT_FX_RATE_TYPE,
INST_SORT_OPTION_1,
INST_SORT_ORDER_1,
INST_SORT_OPTION_2,
POSITIVE_PAY_DELIVERY_FLAG,
TRANSMIT_INSTR_IMMED_FLAG,
AUTOMATIC_PI_REG_SUBMIT,
PMT_GROUP_BY_DELIVERY_CHANNEL,
PMT_GROUP_BY_REMITTANCE_MES,
PMT_GROUP_BY_MAX_DOCUMENTS,
PMT_GROUP_BY_UNIQUE_REMIT_ID,
PMT_GROUP_BY_SETTLE_PRIORITY,
PMT_GROUP_BY_PAYMENT_REASON,
PMT_GROUP_BY_DUE_DATE_FLAG,
PMT_MAX_DOCUMENTS_PER_PAYMENT,
PMT_PAYMENT_DETAILS_LENGTH_LIM,
PMT_GROUP_BY_PAYMENT_DETAILS,
PMT_GROUP_BY_BANK_CHARGE_BEAR,
INST_SORT_ORDER_2,
INST_SORT_OPTION_3,
INST_SORT_ORDER_3,
REMIT_DOCUMENT_COUNT_LIMIT,
REMIT_ALLOW_MULTIPLE_COPY_FLAG,
INST_GROUP_BY_PAYMENT_DATE,
INST_GROUP_BY_PAYMENT_CURRENCY,
INST_GROUP_BY_INT_BANK_ACCT,
INST_GROUP_BY_MAX_PAYMENTS,
INST_GROUP_BY_PAY_SERVICE_REQ,
DCL_ONLY_FOREIGN_CURR_PMT_FLAG,
DECLARATION_REPORT_FORMAT_CODE,
DECLARATION_CURR_FX_RATE_TYPE,
DECLARATION_CURRENCY_CODE,
DECLARATION_THRESHOLD_AMOUNT,
BANK_INSTRUCTION1_CODE,
BANK_INSTRUCTION2_CODE,
BANK_INSTRUCTION_DETAILS,
PAYMENT_TEXT_MESSAGE1,
PAYMENT_TEXT_MESSAGE2,
ACK_TRANSMIT_PROTOCOL_CODE,
ACK_SECURITY_PROTOCOL_CODE,
SEND_TO_FILE_FLAG,
PI_REGISTER_FORMAT,
BEP_ACCOUNT_ID,
APPLICABLE_PMT_METHOD,
APPLICABLE_CURRENCY,
APPLICABLE_PAYER_ORG,
APPLICABLE_INT_BANK_ACCOUNT,
SYSTEM_PROFILE_CODE,
BEP_SUFFIX,
SECURITY_PROTOCOL_CODE,
TRANSMIT_PROTOCOL_CODE,
PAYMENT_FORMAT_CODE,
POSITIVE_PAY_FORMAT_CODE,
PAY_FILE_LETTER_FORMAT_CODE,
PRINT_INSTRUCTION_IMMED_FLAG,
PERIODIC_SEQUENCE_NAME_1,
PERIODIC_SEQUENCE_NAME_2,
PERIODIC_SEQUENCE_NAME_3,
PROCESSING_TYPE,
MARK_COMPLETE_EVENT,
MANUAL_MARK_COMPLETE_FLAG,
DECLARATION_OPTION,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
ELECTRONIC_PROCESSING_CHANNEL,
LOGICAL_GROUPING_MODE,
BATCH_BOOKING_FLAG,
INST_GROUP_BY_PAYMENT_METHOD
) values (
X_REMIT_PMT_DETAILS_LENGTH_LIM,
X_REMIT_REMITTANCE_ADVICE_FORM,
X_REMIT_SRA_OVERRIDE_PAYEE_FLA,
X_REMIT_ADVICE_DELIVERY_METHOD,
X_REMIT_AUTOMATIC_SRA_SUBMIT,
X_OBJECT_VERSION_NUMBER,
X_PMT_PAYMENT_DETAILS_FORMULA,
X_INST_GROUP_BY_LEGAL_ENTITY,
X_INST_GROUP_BY_BILL_PAYABLE,
X_INST_GROUP_BY_MAX_INSTRUCTIO,
X_INST_GROUP_BY_ORGANIZATION,
X_INST_GROUP_BY_PAYMENT_FUNCTI,
X_INST_GROUP_BY_PAYMENT_REASON,
X_INST_GROUP_BY_RFC,
X_INST_MAX_PAYMENTS_PER_INSTR,
X_INST_MAX_AMOUNT_PER_INSTR_VA,
X_INST_MAX_AMOUNT_PER_INSTR_CU,
X_INST_MAX_AMOUNT_FX_RATE_TYPE,
X_INST_SORT_OPTION_1,
X_INST_SORT_ORDER_1,
X_INST_SORT_OPTION_2,
X_POSITIVE_PAY_DELIVERY_FLAG,
X_TRANSMIT_INSTR_IMMED_FLAG,
X_AUTOMATIC_PI_REG_SUBMIT,
X_PMT_GROUP_BY_DELIVERY_CHANNE,
X_PMT_GROUP_BY_REMITTANCE_MES,
X_PMT_GROUP_BY_MAX_DOCUMENTS,
X_PMT_GROUP_BY_UNIQUE_REMIT_ID,
X_PMT_GROUP_BY_SETTLE_PRIORITY,
X_PMT_GROUP_BY_PAYMENT_REASON,
X_PMT_GROUP_BY_DUE_DATE_FLAG,
X_PMT_MAX_DOCUMENTS_PER_PAYMEN,
X_PMT_PAYMENT_DETAILS_LENGTH_L,
X_PMT_GROUP_BY_PAYMENT_DETAILS,
X_PMT_GROUP_BY_BANK_CHARGE_BEA,
X_INST_SORT_ORDER_2,
X_INST_SORT_OPTION_3,
X_INST_SORT_ORDER_3,
X_REMIT_DOCUMENT_COUNT_LIMIT,
X_REMIT_ALLOW_MULTIPLE_COPY_FL,
X_INST_GROUP_BY_PAYMENT_DATE,
X_INST_GROUP_BY_PAYMENT_CURREN,
X_INST_GROUP_BY_INT_BANK_ACCT,
X_INST_GROUP_BY_MAX_PAYMENTS,
X_INST_GROUP_BY_PAY_SERVICE_RE,
X_DCL_ONLY_FOREIGN_CURR_PMT_FL,
X_DECLARATION_REPORT_FORMAT_CO,
X_DECLARATION_CURR_FX_RATE_TYP,
X_DECLARATION_CURRENCY_CODE,
X_DECLARATION_THRESHOLD_AMOUNT,
X_BANK_INSTRUCTION1_CODE,
X_BANK_INSTRUCTION2_CODE,
X_BANK_INSTRUCTION_DETAILS,
X_PAYMENT_TEXT_MESSAGE1,
X_PAYMENT_TEXT_MESSAGE2,
X_ACK_TRANSMIT_PROTOCOL_CODE,
X_ACK_SECURITY_PROTOCOL_CODE,
X_SEND_TO_FILE_FLAG,
X_PI_REGISTER_FORMAT,
X_BEP_ACCOUNT_ID,
X_APPLICABLE_PMT_METHOD,
X_APPLICABLE_CURRENCY,
X_APPLICABLE_PAYER_ORG,
X_APPLICABLE_INT_BANK_ACCOUNT,
X_SYSTEM_PROFILE_CODE,
X_BEP_SUFFIX,
X_SECURITY_PROTOCOL_CODE,
X_TRANSMIT_PROTOCOL_CODE,
X_PAYMENT_FORMAT_CODE,
X_POSITIVE_PAY_FORMAT_CODE,
X_PAY_FILE_LETTER_FORMAT_CODE,
X_PRINT_INSTRUCTION_IMMED_FLAG,
X_PERIODIC_SEQUENCE_NAME_1,
X_PERIODIC_SEQUENCE_NAME_2,
X_PERIODIC_SEQUENCE_NAME_3,
X_PROCESSING_TYPE,
X_MARK_COMPLETE_EVENT,
X_MANUAL_MARK_COMPLETE_FLAG,
X_DECLARATION_OPTION,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN,
X_ELECTRONIC_PROCESSING_CHNNL,
X_LOGICAL_GROUPING_MODE,
X_BATCH_BOOKING_FLAG,
X_INST_GROUP_BY_PAYMENT_METHOD
);
insert into IBY_UPG_PPP_TL (
SYSTEM_PROFILE_CODE,
SYSTEM_PROFILE_NAME,
SYSTEM_PROFILE_DESCRIPTION,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER,
LANGUAGE,
SOURCE_LANG
) select
X_SYSTEM_PROFILE_CODE,
X_SYSTEM_PROFILE_NAME,
X_SYSTEM_PROFILE_DESCRIPTION,
X_CREATED_BY,
X_CREATION_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATE_LOGIN,
X_OBJECT_VERSION_NUMBER,
L.LANGUAGE_CODE,
userenv('LANG')
from FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and not exists
(select NULL
from IBY_UPG_PPP_TL T
where T.SYSTEM_PROFILE_CODE = X_SYSTEM_PROFILE_CODE
and T.LANGUAGE = L.LANGUAGE_CODE);
end INSERT_ROW;
cursor c is select
REMIT_PMT_DETAILS_LENGTH_LIM,
REMIT_REMITTANCE_ADVICE_FORMAT,
REMIT_SRA_OVERRIDE_PAYEE_FLAG,
REMIT_ADVICE_DELIVERY_METHOD,
REMIT_AUTOMATIC_SRA_SUBMIT,
OBJECT_VERSION_NUMBER,
PMT_PAYMENT_DETAILS_FORMULA,
INST_GROUP_BY_LEGAL_ENTITY,
INST_GROUP_BY_BILL_PAYABLE,
INST_GROUP_BY_MAX_INSTRUCTION,
INST_GROUP_BY_ORGANIZATION,
INST_GROUP_BY_PAYMENT_FUNCTION,
INST_GROUP_BY_PAYMENT_REASON,
INST_GROUP_BY_RFC,
INST_MAX_PAYMENTS_PER_INSTR,
INST_MAX_AMOUNT_PER_INSTR_VAL,
INST_MAX_AMOUNT_PER_INSTR_CURR,
INST_MAX_AMOUNT_FX_RATE_TYPE,
INST_SORT_OPTION_1,
INST_SORT_ORDER_1,
INST_SORT_OPTION_2,
POSITIVE_PAY_DELIVERY_FLAG,
TRANSMIT_INSTR_IMMED_FLAG,
AUTOMATIC_PI_REG_SUBMIT,
PMT_GROUP_BY_DELIVERY_CHANNEL,
PMT_GROUP_BY_REMITTANCE_MES,
PMT_GROUP_BY_MAX_DOCUMENTS,
PMT_GROUP_BY_UNIQUE_REMIT_ID,
PMT_GROUP_BY_SETTLE_PRIORITY,
PMT_GROUP_BY_PAYMENT_REASON,
PMT_GROUP_BY_DUE_DATE_FLAG,
PMT_MAX_DOCUMENTS_PER_PAYMENT,
PMT_PAYMENT_DETAILS_LENGTH_LIM,
PMT_GROUP_BY_PAYMENT_DETAILS,
PMT_GROUP_BY_BANK_CHARGE_BEAR,
INST_SORT_ORDER_2,
INST_SORT_OPTION_3,
INST_SORT_ORDER_3,
REMIT_DOCUMENT_COUNT_LIMIT,
REMIT_ALLOW_MULTIPLE_COPY_FLAG,
INST_GROUP_BY_PAYMENT_DATE,
INST_GROUP_BY_PAYMENT_CURRENCY,
INST_GROUP_BY_INT_BANK_ACCT,
INST_GROUP_BY_MAX_PAYMENTS,
INST_GROUP_BY_PAY_SERVICE_REQ,
DCL_ONLY_FOREIGN_CURR_PMT_FLAG,
DECLARATION_REPORT_FORMAT_CODE,
DECLARATION_CURR_FX_RATE_TYPE,
DECLARATION_CURRENCY_CODE,
DECLARATION_THRESHOLD_AMOUNT,
BANK_INSTRUCTION1_CODE,
BANK_INSTRUCTION2_CODE,
BANK_INSTRUCTION_DETAILS,
PAYMENT_TEXT_MESSAGE1,
PAYMENT_TEXT_MESSAGE2,
ACK_TRANSMIT_PROTOCOL_CODE,
ACK_SECURITY_PROTOCOL_CODE,
SEND_TO_FILE_FLAG,
PI_REGISTER_FORMAT,
BEP_ACCOUNT_ID,
APPLICABLE_PMT_METHOD,
APPLICABLE_CURRENCY,
APPLICABLE_PAYER_ORG,
APPLICABLE_INT_BANK_ACCOUNT,
BEP_SUFFIX,
SECURITY_PROTOCOL_CODE,
TRANSMIT_PROTOCOL_CODE,
PAYMENT_FORMAT_CODE,
POSITIVE_PAY_FORMAT_CODE,
PAY_FILE_LETTER_FORMAT_CODE,
PRINT_INSTRUCTION_IMMED_FLAG,
PERIODIC_SEQUENCE_NAME_1,
PERIODIC_SEQUENCE_NAME_2,
PERIODIC_SEQUENCE_NAME_3,
PROCESSING_TYPE,
MARK_COMPLETE_EVENT,
MANUAL_MARK_COMPLETE_FLAG,
DECLARATION_OPTION,
ELECTRONIC_PROCESSING_CHANNEL,
LOGICAL_GROUPING_MODE,
BATCH_BOOKING_FLAG,
INST_GROUP_BY_PAYMENT_METHOD
from IBY_UPG_PPP_B
where SYSTEM_PROFILE_CODE = X_SYSTEM_PROFILE_CODE
for update of SYSTEM_PROFILE_CODE nowait;
cursor c1 is select
SYSTEM_PROFILE_NAME,
SYSTEM_PROFILE_DESCRIPTION,
decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
from IBY_UPG_PPP_TL
where SYSTEM_PROFILE_CODE = X_SYSTEM_PROFILE_CODE
and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
for update of SYSTEM_PROFILE_CODE nowait;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
procedure UPDATE_ROW (
X_SYSTEM_PROFILE_CODE in VARCHAR2,
X_REMIT_PMT_DETAILS_LENGTH_LIM in NUMBER,
X_REMIT_REMITTANCE_ADVICE_FORM in VARCHAR2,
X_REMIT_SRA_OVERRIDE_PAYEE_FLA in VARCHAR2,
X_REMIT_ADVICE_DELIVERY_METHOD in VARCHAR2,
X_REMIT_AUTOMATIC_SRA_SUBMIT in VARCHAR2,
X_OBJECT_VERSION_NUMBER in NUMBER,
X_PMT_PAYMENT_DETAILS_FORMULA in VARCHAR2,
X_INST_GROUP_BY_LEGAL_ENTITY in VARCHAR2,
X_INST_GROUP_BY_BILL_PAYABLE in VARCHAR2,
X_INST_GROUP_BY_MAX_INSTRUCTIO in VARCHAR2,
X_INST_GROUP_BY_ORGANIZATION in VARCHAR2,
X_INST_GROUP_BY_PAYMENT_FUNCTI in VARCHAR2,
X_INST_GROUP_BY_PAYMENT_REASON in VARCHAR2,
X_INST_GROUP_BY_RFC in VARCHAR2,
X_INST_MAX_PAYMENTS_PER_INSTR in NUMBER,
X_INST_MAX_AMOUNT_PER_INSTR_VA in NUMBER,
X_INST_MAX_AMOUNT_PER_INSTR_CU in VARCHAR2,
X_INST_MAX_AMOUNT_FX_RATE_TYPE in VARCHAR2,
X_INST_SORT_OPTION_1 in VARCHAR2,
X_INST_SORT_ORDER_1 in VARCHAR2,
X_INST_SORT_OPTION_2 in VARCHAR2,
X_POSITIVE_PAY_DELIVERY_FLAG in VARCHAR2,
X_TRANSMIT_INSTR_IMMED_FLAG in VARCHAR2,
X_AUTOMATIC_PI_REG_SUBMIT in VARCHAR2,
X_PMT_GROUP_BY_DELIVERY_CHANNE in VARCHAR2,
X_PMT_GROUP_BY_REMITTANCE_MES in VARCHAR2,
X_PMT_GROUP_BY_MAX_DOCUMENTS in VARCHAR2,
X_PMT_GROUP_BY_UNIQUE_REMIT_ID in VARCHAR2,
X_PMT_GROUP_BY_SETTLE_PRIORITY in VARCHAR2,
X_PMT_GROUP_BY_PAYMENT_REASON in VARCHAR2,
X_PMT_GROUP_BY_DUE_DATE_FLAG in VARCHAR2,
X_PMT_MAX_DOCUMENTS_PER_PAYMEN in NUMBER,
X_PMT_PAYMENT_DETAILS_LENGTH_L in NUMBER,
X_PMT_GROUP_BY_PAYMENT_DETAILS in VARCHAR2,
X_PMT_GROUP_BY_BANK_CHARGE_BEA in VARCHAR2,
X_INST_SORT_ORDER_2 in VARCHAR2,
X_INST_SORT_OPTION_3 in VARCHAR2,
X_INST_SORT_ORDER_3 in VARCHAR2,
X_REMIT_DOCUMENT_COUNT_LIMIT in NUMBER,
X_REMIT_ALLOW_MULTIPLE_COPY_FL in VARCHAR2,
X_INST_GROUP_BY_PAYMENT_DATE in VARCHAR2,
X_INST_GROUP_BY_PAYMENT_CURREN in VARCHAR2,
X_INST_GROUP_BY_INT_BANK_ACCT in VARCHAR2,
X_INST_GROUP_BY_MAX_PAYMENTS in VARCHAR2,
X_INST_GROUP_BY_PAY_SERVICE_RE in VARCHAR2,
X_DCL_ONLY_FOREIGN_CURR_PMT_FL in VARCHAR2,
X_DECLARATION_REPORT_FORMAT_CO in VARCHAR2,
X_DECLARATION_CURR_FX_RATE_TYP in VARCHAR2,
X_DECLARATION_CURRENCY_CODE in VARCHAR2,
X_DECLARATION_THRESHOLD_AMOUNT in NUMBER,
X_BANK_INSTRUCTION1_CODE in VARCHAR2,
X_BANK_INSTRUCTION2_CODE in VARCHAR2,
X_BANK_INSTRUCTION_DETAILS in VARCHAR2,
X_PAYMENT_TEXT_MESSAGE1 in VARCHAR2,
X_PAYMENT_TEXT_MESSAGE2 in VARCHAR2,
X_ACK_TRANSMIT_PROTOCOL_CODE in VARCHAR2,
X_ACK_SECURITY_PROTOCOL_CODE in VARCHAR2,
X_SEND_TO_FILE_FLAG in VARCHAR2,
X_PI_REGISTER_FORMAT in VARCHAR2,
X_BEP_ACCOUNT_ID in NUMBER,
X_APPLICABLE_PMT_METHOD in VARCHAR2,
X_APPLICABLE_CURRENCY in VARCHAR2,
X_APPLICABLE_PAYER_ORG in VARCHAR2,
X_APPLICABLE_INT_BANK_ACCOUNT in VARCHAR2,
X_BEP_SUFFIX in VARCHAR2,
X_SECURITY_PROTOCOL_CODE in VARCHAR2,
X_TRANSMIT_PROTOCOL_CODE in VARCHAR2,
X_PAYMENT_FORMAT_CODE in VARCHAR2,
X_POSITIVE_PAY_FORMAT_CODE in VARCHAR2,
X_PAY_FILE_LETTER_FORMAT_CODE in VARCHAR2,
X_PRINT_INSTRUCTION_IMMED_FLAG in VARCHAR2,
X_PERIODIC_SEQUENCE_NAME_1 in VARCHAR2,
X_PERIODIC_SEQUENCE_NAME_2 in VARCHAR2,
X_PERIODIC_SEQUENCE_NAME_3 in VARCHAR2,
X_PROCESSING_TYPE in VARCHAR2,
X_MARK_COMPLETE_EVENT in VARCHAR2,
X_MANUAL_MARK_COMPLETE_FLAG in VARCHAR2,
X_DECLARATION_OPTION in VARCHAR2,
X_SYSTEM_PROFILE_NAME in VARCHAR2,
X_SYSTEM_PROFILE_DESCRIPTION in VARCHAR2,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER,
X_ELECTRONIC_PROCESSING_CHNNL in VARCHAR2,
X_LOGICAL_GROUPING_MODE in VARCHAR2,
X_BATCH_BOOKING_FLAG in VARCHAR2,
X_INST_GROUP_BY_PAYMENT_METHOD in VARCHAR2
) is
l_jenl_eft_reporting_limit NUMBER;
select system_profile_code
from
(SELECT DISTINCT(decode(sfgdf.org_id,
NULL,ppp.system_profile_code || '_' ||
to_char(cf.check_format_id),
ppp.system_profile_code || '_' || to_char
(cf.check_format_id) || '_' || sfgdf.org_id))
system_profile_code
FROM
ap_check_formats cf,
ap_check_stocks_all cs,
ce_upg_bank_accounts cba,
ap_payment_programs pp,
jg_zz_pay_format_info gdf,
(SELECT(
CASE
WHEN sfa.jgzz_attribute_category =
'SE.JESEPBAI' THEN sfa.jgzz_system_info5
END) AS
payment_text_message1,
(
CASE
WHEN sfa.jgzz_attribute_category =
'SE.JESEPBAI' THEN sfa.jgzz_system_info3
END) AS
payment_text_message2,
(
CASE
WHEN sfa.jgzz_attribute_category =
'NO.JENOPTGN' THEN
sfa.jgzz_system_info20
WHEN sfa.jgzz_attribute_category =
'SE.JESEPBAI' THEN sfa.jgzz_system_info10
WHEN sfa.jgzz_attribute_category =
'SE.JESEPBSI' THEN sfa.jgzz_system_info8
WHEN sfa.jgzz_attribute_category =
'SE.JESEPBUT' THEN sfa.jgzz_system_info8
WHEN sfa.jgzz_attribute_category =
'SE.JESEPPOI' THEN sfa.jgzz_system_info11
WHEN sfa.jgzz_attribute_category =
'SE.JESEPPOU' THEN sfa.jgzz_system_info10
END) AS
outbound_pmt_file_directory,
(
CASE
WHEN sfa.jgzz_attribute_category =
'DE.JEDEDEFI' THEN decode
(sfa.jgzz_system_info3, 'Y',
'DECLARE_THROUGH_BANK', 'N',
'NO_DECLARATIONS',
sfa.jgzz_system_info3)
WHEN sfa.jgzz_attribute_category =
'NL.JENLFFGN' THEN decode(
l_jenl_eft_reporting_limit,
NULL,
'NO_DECLARATIONS',
'DECLARE_THROUGH_BANK')
END)
AS
declaration_option,
(
CASE
WHEN sfa.jgzz_attribute_category =
'DE.JEDEDEFI' THEN to_number
(sfa.jgzz_system_info5)
WHEN sfa.jgzz_attribute_category =
'NL.JENLFFGN' THEN
l_jenl_eft_reporting_limit
END)
AS
declaration_threshold_amount,
(
CASE
WHEN sfa.jgzz_attribute_category =
'DE.JEDEDEFI'
AND sfa.jgzz_system_info5 IS NOT NULL
THEN 'EUR'
WHEN sfa.jgzz_attribute_category =
'NL.JENLFFGN'
AND
l_jenl_eft_reporting_limit
IS
NOT NULL THEN
'NLG'
END)
AS
declaration_currency_code,
(
CASE
WHEN sfa.jgzz_attribute_category =
'NL.JENLFFGN' THEN sfa.jgzz_system_info13
WHEN sfa.jgzz_attribute_category =
'DE.JEDEDEFI' THEN decode
(sfa.jgzz_system_info3, 'Y', 'Corporate')
END) AS
declaration_curr_fx_rate_type,
sfa.jgzz_attribute_category,
SUBSTR(sfa.jgzz_attribute_category,
LENGTH(sfa.jgzz_country_code) + 2,
LENGTH(sfa.jgzz_attribute_category))
format_code,
sfa.org_id
FROM jg_zz_sys_formats_all_b sfa)
sfgdf,
iby_formats_b ipf,
iby_upg_ppp_b ppp,
iby_bepinfo bep,
iby_bepkeys KEY
WHERE cf.format_payments_program_id =
pp.program_id
AND cf.check_format_id =
cs.check_format_id(+)
AND cs.bank_account_id = cba.source_pk_id
(+)
AND cba.source_application_id(+) = 200
AND cf.check_format_id =
gdf.check_format_id(+)
AND pp.program_name =
ipf.reference_format_code
AND ipf.format_type_code =
'OUTBOUND_PAYMENT_INSTRUCTION'
AND pp.program_name = sfgdf.format_code
(+)
AND ppp.payment_format_code =
ipf.format_code
AND ppp.bep_suffix = bep.suffix(+)
AND bep.bepid = KEY.bepid(+)
AND ppp.system_profile_code =
X_SYSTEM_PROFILE_CODE
UNION ALL
SELECT distinct(ppb.system_profile_code) system_profile_code
FROM iby_formats_b ipf,
iby_upg_ppp_tl ppp,
iby_upg_ppp_b ppb,
iby_acct_pmt_profiles_b app,
iby_bepinfo bep,
iby_bepkeys key1
WHERE(ipf.reference_format_code IS NULL OR(ipf.reference_format_code IS NOT NULL
AND ipf.reference_format_code NOT IN
(SELECT pp.program_name
FROM ap_check_formats cf, ap_payment_programs pp
WHERE cf.format_payments_program_id = pp.program_id)))
AND ppb.payment_format_code = ipf.format_code
AND ipf.format_type_code = 'OUTBOUND_PAYMENT_INSTRUCTION'
AND ppp.system_profile_code = app.system_profile_code
AND ppp.system_profile_code = ppb.system_profile_code
AND ppb.bep_suffix = bep.suffix(+)
AND app.bep_account_id = key1.bep_account_id(+)
AND ppp.system_profile_code = X_SYSTEM_PROFILE_CODE) SYSTEM_PROF_CODE_TABLE;
SELECT TO_NUMBER(x.profile_option_value)
INTO l_jenl_eft_reporting_limit
FROM ( SELECT o.profile_option_name, v.profile_option_value,
row_number() OVER (partition by o.profile_option_name
order by count(*) desc) order_rank
FROM fnd_profile_options o,
fnd_profile_option_values v
WHERE o.profile_option_name = UPPER('JENL_REPORTING_THRESHOLD')
AND v.application_id = o.application_id
AND v.profile_option_id = o.profile_option_id
GROUP BY o.profile_option_name, v.profile_option_value) x
WHERE x.order_rank = 1;
update IBY_UPG_PPP_B set
REMIT_PMT_DETAILS_LENGTH_LIM = X_REMIT_PMT_DETAILS_LENGTH_LIM,
REMIT_REMITTANCE_ADVICE_FORMAT = X_REMIT_REMITTANCE_ADVICE_FORM,
REMIT_SRA_OVERRIDE_PAYEE_FLAG = X_REMIT_SRA_OVERRIDE_PAYEE_FLA,
REMIT_ADVICE_DELIVERY_METHOD = X_REMIT_ADVICE_DELIVERY_METHOD,
REMIT_AUTOMATIC_SRA_SUBMIT = X_REMIT_AUTOMATIC_SRA_SUBMIT,
OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
PMT_PAYMENT_DETAILS_FORMULA = X_PMT_PAYMENT_DETAILS_FORMULA,
INST_GROUP_BY_LEGAL_ENTITY = X_INST_GROUP_BY_LEGAL_ENTITY,
INST_GROUP_BY_BILL_PAYABLE = X_INST_GROUP_BY_BILL_PAYABLE,
INST_GROUP_BY_MAX_INSTRUCTION = X_INST_GROUP_BY_MAX_INSTRUCTIO,
INST_GROUP_BY_ORGANIZATION = X_INST_GROUP_BY_ORGANIZATION,
INST_GROUP_BY_PAYMENT_FUNCTION = X_INST_GROUP_BY_PAYMENT_FUNCTI,
INST_GROUP_BY_PAYMENT_REASON = X_INST_GROUP_BY_PAYMENT_REASON,
INST_GROUP_BY_RFC = X_INST_GROUP_BY_RFC,
INST_MAX_PAYMENTS_PER_INSTR = X_INST_MAX_PAYMENTS_PER_INSTR,
INST_MAX_AMOUNT_PER_INSTR_VAL = X_INST_MAX_AMOUNT_PER_INSTR_VA,
INST_MAX_AMOUNT_PER_INSTR_CURR = X_INST_MAX_AMOUNT_PER_INSTR_CU,
INST_MAX_AMOUNT_FX_RATE_TYPE = X_INST_MAX_AMOUNT_FX_RATE_TYPE,
INST_SORT_OPTION_1 = X_INST_SORT_OPTION_1,
INST_SORT_ORDER_1 = X_INST_SORT_ORDER_1,
INST_SORT_OPTION_2 = X_INST_SORT_OPTION_2,
POSITIVE_PAY_DELIVERY_FLAG = X_POSITIVE_PAY_DELIVERY_FLAG,
TRANSMIT_INSTR_IMMED_FLAG = X_TRANSMIT_INSTR_IMMED_FLAG,
AUTOMATIC_PI_REG_SUBMIT = X_AUTOMATIC_PI_REG_SUBMIT,
PMT_GROUP_BY_DELIVERY_CHANNEL = X_PMT_GROUP_BY_DELIVERY_CHANNE,
PMT_GROUP_BY_REMITTANCE_MES = X_PMT_GROUP_BY_REMITTANCE_MES,
PMT_GROUP_BY_MAX_DOCUMENTS = X_PMT_GROUP_BY_MAX_DOCUMENTS,
PMT_GROUP_BY_UNIQUE_REMIT_ID = X_PMT_GROUP_BY_UNIQUE_REMIT_ID,
PMT_GROUP_BY_SETTLE_PRIORITY = X_PMT_GROUP_BY_SETTLE_PRIORITY,
PMT_GROUP_BY_PAYMENT_REASON = X_PMT_GROUP_BY_PAYMENT_REASON,
PMT_GROUP_BY_DUE_DATE_FLAG = X_PMT_GROUP_BY_DUE_DATE_FLAG,
PMT_MAX_DOCUMENTS_PER_PAYMENT = X_PMT_MAX_DOCUMENTS_PER_PAYMEN,
PMT_PAYMENT_DETAILS_LENGTH_LIM = X_PMT_PAYMENT_DETAILS_LENGTH_L,
PMT_GROUP_BY_PAYMENT_DETAILS = X_PMT_GROUP_BY_PAYMENT_DETAILS,
PMT_GROUP_BY_BANK_CHARGE_BEAR = X_PMT_GROUP_BY_BANK_CHARGE_BEA,
INST_SORT_ORDER_2 = X_INST_SORT_ORDER_2,
INST_SORT_OPTION_3 = X_INST_SORT_OPTION_3,
INST_SORT_ORDER_3 = X_INST_SORT_ORDER_3,
REMIT_DOCUMENT_COUNT_LIMIT = X_REMIT_DOCUMENT_COUNT_LIMIT,
REMIT_ALLOW_MULTIPLE_COPY_FLAG = X_REMIT_ALLOW_MULTIPLE_COPY_FL,
INST_GROUP_BY_PAYMENT_DATE = X_INST_GROUP_BY_PAYMENT_DATE,
INST_GROUP_BY_PAYMENT_CURRENCY = X_INST_GROUP_BY_PAYMENT_CURREN,
INST_GROUP_BY_INT_BANK_ACCT = X_INST_GROUP_BY_INT_BANK_ACCT,
INST_GROUP_BY_MAX_PAYMENTS = X_INST_GROUP_BY_MAX_PAYMENTS,
INST_GROUP_BY_PAY_SERVICE_REQ = X_INST_GROUP_BY_PAY_SERVICE_RE,
DCL_ONLY_FOREIGN_CURR_PMT_FLAG = X_DCL_ONLY_FOREIGN_CURR_PMT_FL,
DECLARATION_REPORT_FORMAT_CODE = X_DECLARATION_REPORT_FORMAT_CO,
DECLARATION_CURR_FX_RATE_TYPE = X_DECLARATION_CURR_FX_RATE_TYP,
DECLARATION_CURRENCY_CODE = X_DECLARATION_CURRENCY_CODE,
DECLARATION_THRESHOLD_AMOUNT = X_DECLARATION_THRESHOLD_AMOUNT,
BANK_INSTRUCTION1_CODE = X_BANK_INSTRUCTION1_CODE,
BANK_INSTRUCTION2_CODE = X_BANK_INSTRUCTION2_CODE,
BANK_INSTRUCTION_DETAILS = X_BANK_INSTRUCTION_DETAILS,
PAYMENT_TEXT_MESSAGE1 = X_PAYMENT_TEXT_MESSAGE1,
PAYMENT_TEXT_MESSAGE2 = X_PAYMENT_TEXT_MESSAGE2,
ACK_TRANSMIT_PROTOCOL_CODE = X_ACK_TRANSMIT_PROTOCOL_CODE,
ACK_SECURITY_PROTOCOL_CODE = X_ACK_SECURITY_PROTOCOL_CODE,
SEND_TO_FILE_FLAG = X_SEND_TO_FILE_FLAG,
PI_REGISTER_FORMAT = X_PI_REGISTER_FORMAT,
BEP_ACCOUNT_ID = X_BEP_ACCOUNT_ID,
APPLICABLE_PMT_METHOD = X_APPLICABLE_PMT_METHOD,
APPLICABLE_CURRENCY = X_APPLICABLE_CURRENCY,
APPLICABLE_PAYER_ORG = X_APPLICABLE_PAYER_ORG,
APPLICABLE_INT_BANK_ACCOUNT = X_APPLICABLE_INT_BANK_ACCOUNT,
BEP_SUFFIX = X_BEP_SUFFIX,
SECURITY_PROTOCOL_CODE = X_SECURITY_PROTOCOL_CODE,
TRANSMIT_PROTOCOL_CODE = X_TRANSMIT_PROTOCOL_CODE,
PAYMENT_FORMAT_CODE = X_PAYMENT_FORMAT_CODE,
POSITIVE_PAY_FORMAT_CODE = X_POSITIVE_PAY_FORMAT_CODE,
PAY_FILE_LETTER_FORMAT_CODE = X_PAY_FILE_LETTER_FORMAT_CODE,
PRINT_INSTRUCTION_IMMED_FLAG = X_PRINT_INSTRUCTION_IMMED_FLAG,
PERIODIC_SEQUENCE_NAME_1 = X_PERIODIC_SEQUENCE_NAME_1,
PERIODIC_SEQUENCE_NAME_2 = X_PERIODIC_SEQUENCE_NAME_2,
PERIODIC_SEQUENCE_NAME_3 = X_PERIODIC_SEQUENCE_NAME_3,
PROCESSING_TYPE = X_PROCESSING_TYPE,
MARK_COMPLETE_EVENT = X_MARK_COMPLETE_EVENT,
MANUAL_MARK_COMPLETE_FLAG = X_MANUAL_MARK_COMPLETE_FLAG,
DECLARATION_OPTION = X_DECLARATION_OPTION,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
ELECTRONIC_PROCESSING_CHANNEL = X_ELECTRONIC_PROCESSING_CHNNL,
LOGICAL_GROUPING_MODE = X_LOGICAL_GROUPING_MODE,
BATCH_BOOKING_FLAG = X_BATCH_BOOKING_FLAG,
INST_GROUP_BY_PAYMENT_METHOD = X_INST_GROUP_BY_PAYMENT_METHOD
where SYSTEM_PROFILE_CODE = X_SYSTEM_PROFILE_CODE;
update iby_sys_pmt_profiles_b set
payment_format_code = X_PAYMENT_FORMAT_CODE,
print_instruction_immed_flag = X_PRINT_INSTRUCTION_IMMED_FLAG,
processing_type = X_PROCESSING_TYPE,
mark_complete_event = X_MARK_COMPLETE_EVENT,
manual_mark_complete_flag = X_MANUAL_MARK_COMPLETE_FLAG,
positive_pay_delivery_flag= X_POSITIVE_PAY_DELIVERY_FLAG,
object_version_number= X_OBJECT_VERSION_NUMBER,
transmit_instr_immed_flag= X_TRANSMIT_INSTR_IMMED_FLAG,
automatic_pi_reg_submit = X_AUTOMATIC_PI_REG_SUBMIT,
send_to_file_flag = X_SEND_TO_FILE_FLAG,
dcl_only_foreign_curr_pmt_flag = X_DCL_ONLY_FOREIGN_CURR_PMT_FL,
security_protocol_code = X_SECURITY_PROTOCOL_CODE,
transmit_protocol_code = X_TRANSMIT_PROTOCOL_CODE,
positive_pay_format_code = X_POSITIVE_PAY_FORMAT_CODE,
pay_file_letter_format_code = X_PAY_FILE_LETTER_FORMAT_CODE,
periodic_sequence_name_1 = X_PERIODIC_SEQUENCE_NAME_1,
periodic_sequence_name_2= X_PERIODIC_SEQUENCE_NAME_2,
periodic_sequence_name_3= X_PERIODIC_SEQUENCE_NAME_3,
declaration_option= X_DECLARATION_OPTION,
declaration_report_format_code =X_DECLARATION_REPORT_FORMAT_CO,
declaration_curr_fx_rate_type = X_DECLARATION_CURR_FX_RATE_TYP,
declaration_currency_code = X_DECLARATION_CURRENCY_CODE,
declaration_threshold_amount = X_DECLARATION_THRESHOLD_AMOUNT,
bank_instruction1_code= X_BANK_INSTRUCTION1_CODE,
bank_instruction2_code= X_BANK_INSTRUCTION2_CODE,
bank_instruction_details = X_BANK_INSTRUCTION_DETAILS,
payment_text_message1= X_PAYMENT_TEXT_MESSAGE1,
payment_text_message2=X_PAYMENT_TEXT_MESSAGE2,
ack_transmit_protocol_code = X_ACK_TRANSMIT_PROTOCOL_CODE,
ack_security_protocol_code= X_ACK_SECURITY_PROTOCOL_CODE,
pi_register_format= X_PI_REGISTER_FORMAT,
electronic_processing_channel= X_ELECTRONIC_PROCESSING_CHNNL,
logical_grouping_mode=X_LOGICAL_GROUPING_MODE,
BATCH_BOOKING_FLAG = X_BATCH_BOOKING_FLAG,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
where SYSTEM_PROFILE_CODE = l_sys_profile_code_tab(i);
update IBY_PMT_CREATION_RULES set
group_by_delivery_channel = X_PMT_GROUP_BY_DELIVERY_CHANNE,
group_by_remittance_message = X_PMT_GROUP_BY_REMITTANCE_MES,
group_by_max_documents_flag = X_PMT_GROUP_BY_MAX_DOCUMENTS,
group_by_unique_remit_id_flag = X_PMT_GROUP_BY_UNIQUE_REMIT_ID,
group_by_settle_priority_flag = X_PMT_GROUP_BY_SETTLE_PRIORITY,
group_by_payment_reason = X_PMT_GROUP_BY_PAYMENT_REASON,
group_by_due_date_flag = X_PMT_GROUP_BY_DUE_DATE_FLAG,
max_documents_per_payment = X_PMT_MAX_DOCUMENTS_PER_PAYMEN,
payment_details_length_limit = X_PMT_PAYMENT_DETAILS_LENGTH_L,
payment_details_formula = X_PMT_PAYMENT_DETAILS_FORMULA,
group_by_payment_details_flag = X_PMT_GROUP_BY_PAYMENT_DETAILS,
group_by_bank_charge_bearer = X_PMT_GROUP_BY_BANK_CHARGE_BEA,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
where system_profile_code = l_sys_profile_code_tab(i);
update iby_acct_pmt_profiles_b set
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
BEP_ACCOUNT_ID = X_BEP_ACCOUNT_ID
where SYSTEM_PROFILE_CODE = l_sys_profile_code_tab(i) ;
update iby_instr_creation_rules set
group_by_payment_date= X_INST_GROUP_BY_PAYMENT_DATE,
group_by_payment_currency = X_INST_GROUP_BY_PAYMENT_CURREN,
group_by_internal_bank_account = X_INST_GROUP_BY_INT_BANK_ACCT,
group_by_max_payments_flag = X_INST_GROUP_BY_MAX_PAYMENTS,
group_by_pay_service_request = X_INST_GROUP_BY_PAY_SERVICE_RE,
group_by_legal_entity = X_INST_GROUP_BY_LEGAL_ENTITY,
group_by_bill_payable = X_INST_GROUP_BY_BILL_PAYABLE,
group_by_organization = X_INST_GROUP_BY_ORGANIZATION,
group_by_max_instruction_flag = X_INST_GROUP_BY_MAX_INSTRUCTIO,
group_by_payment_function = X_INST_GROUP_BY_PAYMENT_FUNCTI,
group_by_payment_reason = X_INST_GROUP_BY_PAYMENT_REASON,
group_by_rfc= X_INST_GROUP_BY_RFC,
max_payments_per_instruction = X_INST_MAX_PAYMENTS_PER_INSTR,
max_amount_per_instr_value = X_INST_MAX_AMOUNT_PER_INSTR_VA,
max_amount_per_instr_curr_code= X_INST_MAX_AMOUNT_PER_INSTR_CU,
max_amount_fx_rate_type= X_INST_MAX_AMOUNT_FX_RATE_TYPE,
SORT_OPTION_1 = X_INST_SORT_OPTION_1,
SORT_ORDER_1 = X_INST_SORT_ORDER_1,
SORT_OPTION_2 = X_INST_SORT_OPTION_2,
SORT_ORDER_2 = X_INST_SORT_ORDER_2,
SORT_OPTION_3 = X_INST_SORT_OPTION_3,
SORT_ORDER_3 = X_INST_SORT_ORDER_3,
group_by_payment_method = X_INST_GROUP_BY_PAYMENT_METHOD,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
where SYSTEM_PROFILE_CODE = l_sys_profile_code_tab(i) ;
update iby_remit_advice_setup set
document_count_limit = X_REMIT_DOCUMENT_COUNT_LIMIT,
allow_multiple_copy_flag = X_REMIT_ALLOW_MULTIPLE_COPY_FL,
remittance_advice_format_code = X_REMIT_REMITTANCE_ADVICE_FORM,
sra_override_payee_flag = X_REMIT_SRA_OVERRIDE_PAYEE_FLA,
REMIT_ADVICE_DELIVERY_METHOD = X_REMIT_ADVICE_DELIVERY_METHOD,
automatic_sra_submit_flag = X_REMIT_AUTOMATIC_SRA_SUBMIT,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
where system_profile_code = l_sys_profile_code_tab(i);
update IBY_UPG_PPP_TL set
SYSTEM_PROFILE_NAME = X_SYSTEM_PROFILE_NAME,
SYSTEM_PROFILE_DESCRIPTION = X_SYSTEM_PROFILE_DESCRIPTION,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
SOURCE_LANG = userenv('LANG')
where SYSTEM_PROFILE_CODE = X_SYSTEM_PROFILE_CODE
and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
end UPDATE_ROW;
procedure DELETE_ROW (
X_SYSTEM_PROFILE_CODE in VARCHAR2
) is
begin
delete from IBY_UPG_PPP_TL
where SYSTEM_PROFILE_CODE = X_SYSTEM_PROFILE_CODE;
delete from IBY_UPG_PPP_B
where SYSTEM_PROFILE_CODE = X_SYSTEM_PROFILE_CODE;
end DELETE_ROW;
delete from IBY_UPG_PPP_TL T
where not exists
(select NULL
from IBY_UPG_PPP_B B
where B.SYSTEM_PROFILE_CODE = T.SYSTEM_PROFILE_CODE
);
update IBY_UPG_PPP_TL T set (
SYSTEM_PROFILE_NAME,
SYSTEM_PROFILE_DESCRIPTION
) = (select
B.SYSTEM_PROFILE_NAME,
B.SYSTEM_PROFILE_DESCRIPTION
from IBY_UPG_PPP_TL B
where B.SYSTEM_PROFILE_CODE = T.SYSTEM_PROFILE_CODE
and B.LANGUAGE = T.SOURCE_LANG)
where (
T.SYSTEM_PROFILE_CODE,
T.LANGUAGE
) in (select
SUBT.SYSTEM_PROFILE_CODE,
SUBT.LANGUAGE
from IBY_UPG_PPP_TL SUBB, IBY_UPG_PPP_TL SUBT
where SUBB.SYSTEM_PROFILE_CODE = SUBT.SYSTEM_PROFILE_CODE
and SUBB.LANGUAGE = SUBT.SOURCE_LANG
and (SUBB.SYSTEM_PROFILE_NAME <> SUBT.SYSTEM_PROFILE_NAME
or SUBB.SYSTEM_PROFILE_DESCRIPTION <> SUBT.SYSTEM_PROFILE_DESCRIPTION
or (SUBB.SYSTEM_PROFILE_DESCRIPTION is null and SUBT.SYSTEM_PROFILE_DESCRIPTION is not null)
or (SUBB.SYSTEM_PROFILE_DESCRIPTION is not null and SUBT.SYSTEM_PROFILE_DESCRIPTION is null)
));
insert into IBY_UPG_PPP_TL (
SYSTEM_PROFILE_CODE,
SYSTEM_PROFILE_NAME,
SYSTEM_PROFILE_DESCRIPTION,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER,
LANGUAGE,
SOURCE_LANG
) select /*+ ORDERED */
B.SYSTEM_PROFILE_CODE,
B.SYSTEM_PROFILE_NAME,
B.SYSTEM_PROFILE_DESCRIPTION,
B.CREATED_BY,
B.CREATION_DATE,
B.LAST_UPDATED_BY,
B.LAST_UPDATE_DATE,
B.LAST_UPDATE_LOGIN,
B.OBJECT_VERSION_NUMBER,
L.LANGUAGE_CODE,
B.SOURCE_LANG
from IBY_UPG_PPP_TL B, FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and B.LANGUAGE = userenv('LANG')
and not exists
(select NULL
from IBY_UPG_PPP_TL T
where T.SYSTEM_PROFILE_CODE = B.SYSTEM_PROFILE_CODE
and T.LANGUAGE = L.LANGUAGE_CODE);
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER,
X_OBJECT_VERSION_NUMBER in NUMBER,
X_ELECTRONIC_PROCESSING_CHNNL in VARCHAR2,
X_LOGICAL_GROUPING_MODE in VARCHAR2,
X_BATCH_BOOKING_FLAG in VARCHAR2,
X_INST_GROUP_BY_PAYMENT_METHOD in VARCHAR2
)
is
row_id VARCHAR2(200);
UPDATE_ROW (
X_SYSTEM_PROFILE_CODE,
X_REMIT_PMT_DETAILS_LENGTH_LIM,
X_REMIT_REMITTANCE_ADVICE_FORM,
X_REMIT_SRA_OVERRIDE_PAYEE_FLA,
X_REMIT_ADVICE_DELIVERY_METHOD,
X_REMIT_AUTOMATIC_SRA_SUBMIT,
X_OBJECT_VERSION_NUMBER,
X_PMT_PAYMENT_DETAILS_FORMULA,
X_INST_GROUP_BY_LEGAL_ENTITY,
X_INST_GROUP_BY_BILL_PAYABLE,
X_INST_GROUP_BY_MAX_INSTRUCTIO,
X_INST_GROUP_BY_ORGANIZATION,
X_INST_GROUP_BY_PAYMENT_FUNCTI,
X_INST_GROUP_BY_PAYMENT_REASON,
X_INST_GROUP_BY_RFC,
X_INST_MAX_PAYMENTS_PER_INSTR,
X_INST_MAX_AMOUNT_PER_INSTR_VA,
X_INST_MAX_AMOUNT_PER_INSTR_CU,
X_INST_MAX_AMOUNT_FX_RATE_TYPE,
X_INST_SORT_OPTION_1,
X_INST_SORT_ORDER_1,
X_INST_SORT_OPTION_2,
X_POSITIVE_PAY_DELIVERY_FLAG,
X_TRANSMIT_INSTR_IMMED_FLAG,
X_AUTOMATIC_PI_REG_SUBMIT,
X_PMT_GROUP_BY_DELIVERY_CHANNE,
X_PMT_GROUP_BY_REMITTANCE_MES,
X_PMT_GROUP_BY_MAX_DOCUMENTS,
X_PMT_GROUP_BY_UNIQUE_REMIT_ID,
X_PMT_GROUP_BY_SETTLE_PRIORITY,
X_PMT_GROUP_BY_PAYMENT_REASON,
X_PMT_GROUP_BY_DUE_DATE_FLAG,
X_PMT_MAX_DOCUMENTS_PER_PAYMEN,
X_PMT_PAYMENT_DETAILS_LENGTH_L,
X_PMT_GROUP_BY_PAYMENT_DETAILS,
X_PMT_GROUP_BY_BANK_CHARGE_BEA,
X_INST_SORT_ORDER_2,
X_INST_SORT_OPTION_3,
X_INST_SORT_ORDER_3,
X_REMIT_DOCUMENT_COUNT_LIMIT,
X_REMIT_ALLOW_MULTIPLE_COPY_FL,
X_INST_GROUP_BY_PAYMENT_DATE,
X_INST_GROUP_BY_PAYMENT_CURREN,
X_INST_GROUP_BY_INT_BANK_ACCT,
X_INST_GROUP_BY_MAX_PAYMENTS,
X_INST_GROUP_BY_PAY_SERVICE_RE,
X_DCL_ONLY_FOREIGN_CURR_PMT_FL,
X_DECLARATION_REPORT_FORMAT_CO,
X_DECLARATION_CURR_FX_RATE_TYP,
X_DECLARATION_CURRENCY_CODE,
X_DECLARATION_THRESHOLD_AMOUNT,
X_BANK_INSTRUCTION1_CODE,
X_BANK_INSTRUCTION2_CODE,
X_BANK_INSTRUCTION_DETAILS,
X_PAYMENT_TEXT_MESSAGE1,
X_PAYMENT_TEXT_MESSAGE2,
X_ACK_TRANSMIT_PROTOCOL_CODE,
X_ACK_SECURITY_PROTOCOL_CODE,
X_SEND_TO_FILE_FLAG,
X_PI_REGISTER_FORMAT,
X_BEP_ACCOUNT_ID,
X_APPLICABLE_PMT_METHOD,
X_APPLICABLE_CURRENCY,
X_APPLICABLE_PAYER_ORG,
X_APPLICABLE_INT_BANK_ACCOUNT,
X_BEP_SUFFIX,
X_SECURITY_PROTOCOL_CODE,
X_TRANSMIT_PROTOCOL_CODE,
X_PAYMENT_FORMAT_CODE,
X_POSITIVE_PAY_FORMAT_CODE,
X_PAY_FILE_LETTER_FORMAT_CODE,
X_PRINT_INSTRUCTION_IMMED_FLAG,
X_PERIODIC_SEQUENCE_NAME_1,
X_PERIODIC_SEQUENCE_NAME_2,
X_PERIODIC_SEQUENCE_NAME_3,
X_PROCESSING_TYPE,
X_MARK_COMPLETE_EVENT,
X_MANUAL_MARK_COMPLETE_FLAG,
X_DECLARATION_OPTION,
X_SYSTEM_PROFILE_NAME,
X_SYSTEM_PROFILE_DESCRIPTION,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN,
X_ELECTRONIC_PROCESSING_CHNNL,
X_LOGICAL_GROUPING_MODE,
X_BATCH_BOOKING_FLAG,
X_INST_GROUP_BY_PAYMENT_METHOD);
INSERT_ROW (
row_id,
X_SYSTEM_PROFILE_CODE,
X_REMIT_PMT_DETAILS_LENGTH_LIM,
X_REMIT_REMITTANCE_ADVICE_FORM,
X_REMIT_SRA_OVERRIDE_PAYEE_FLA,
X_REMIT_ADVICE_DELIVERY_METHOD,
X_REMIT_AUTOMATIC_SRA_SUBMIT,
X_OBJECT_VERSION_NUMBER,
X_PMT_PAYMENT_DETAILS_FORMULA,
X_INST_GROUP_BY_LEGAL_ENTITY,
X_INST_GROUP_BY_BILL_PAYABLE,
X_INST_GROUP_BY_MAX_INSTRUCTIO,
X_INST_GROUP_BY_ORGANIZATION,
X_INST_GROUP_BY_PAYMENT_FUNCTI,
X_INST_GROUP_BY_PAYMENT_REASON,
X_INST_GROUP_BY_RFC,
X_INST_MAX_PAYMENTS_PER_INSTR,
X_INST_MAX_AMOUNT_PER_INSTR_VA,
X_INST_MAX_AMOUNT_PER_INSTR_CU,
X_INST_MAX_AMOUNT_FX_RATE_TYPE,
X_INST_SORT_OPTION_1,
X_INST_SORT_ORDER_1,
X_INST_SORT_OPTION_2,
X_POSITIVE_PAY_DELIVERY_FLAG,
X_TRANSMIT_INSTR_IMMED_FLAG,
X_AUTOMATIC_PI_REG_SUBMIT,
X_PMT_GROUP_BY_DELIVERY_CHANNE,
X_PMT_GROUP_BY_REMITTANCE_MES,
X_PMT_GROUP_BY_MAX_DOCUMENTS,
X_PMT_GROUP_BY_UNIQUE_REMIT_ID,
X_PMT_GROUP_BY_SETTLE_PRIORITY,
X_PMT_GROUP_BY_PAYMENT_REASON,
X_PMT_GROUP_BY_DUE_DATE_FLAG,
X_PMT_MAX_DOCUMENTS_PER_PAYMEN,
X_PMT_PAYMENT_DETAILS_LENGTH_L,
X_PMT_GROUP_BY_PAYMENT_DETAILS,
X_PMT_GROUP_BY_BANK_CHARGE_BEA,
X_INST_SORT_ORDER_2,
X_INST_SORT_OPTION_3,
X_INST_SORT_ORDER_3,
X_REMIT_DOCUMENT_COUNT_LIMIT,
X_REMIT_ALLOW_MULTIPLE_COPY_FL,
X_INST_GROUP_BY_PAYMENT_DATE,
X_INST_GROUP_BY_PAYMENT_CURREN,
X_INST_GROUP_BY_INT_BANK_ACCT,
X_INST_GROUP_BY_MAX_PAYMENTS,
X_INST_GROUP_BY_PAY_SERVICE_RE,
X_DCL_ONLY_FOREIGN_CURR_PMT_FL,
X_DECLARATION_REPORT_FORMAT_CO,
X_DECLARATION_CURR_FX_RATE_TYP,
X_DECLARATION_CURRENCY_CODE,
X_DECLARATION_THRESHOLD_AMOUNT,
X_BANK_INSTRUCTION1_CODE,
X_BANK_INSTRUCTION2_CODE,
X_BANK_INSTRUCTION_DETAILS,
X_PAYMENT_TEXT_MESSAGE1,
X_PAYMENT_TEXT_MESSAGE2,
X_ACK_TRANSMIT_PROTOCOL_CODE,
X_ACK_SECURITY_PROTOCOL_CODE,
X_SEND_TO_FILE_FLAG,
X_PI_REGISTER_FORMAT,
X_BEP_ACCOUNT_ID,
X_APPLICABLE_PMT_METHOD,
X_APPLICABLE_CURRENCY,
X_APPLICABLE_PAYER_ORG,
X_APPLICABLE_INT_BANK_ACCOUNT,
X_BEP_SUFFIX,
X_SECURITY_PROTOCOL_CODE,
X_TRANSMIT_PROTOCOL_CODE,
X_PAYMENT_FORMAT_CODE,
X_POSITIVE_PAY_FORMAT_CODE,
X_PAY_FILE_LETTER_FORMAT_CODE,
X_PRINT_INSTRUCTION_IMMED_FLAG,
X_PERIODIC_SEQUENCE_NAME_1,
X_PERIODIC_SEQUENCE_NAME_2,
X_PERIODIC_SEQUENCE_NAME_3,
X_PROCESSING_TYPE,
X_MARK_COMPLETE_EVENT,
X_MANUAL_MARK_COMPLETE_FLAG,
X_DECLARATION_OPTION,
X_SYSTEM_PROFILE_NAME,
X_SYSTEM_PROFILE_DESCRIPTION,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN,
X_ELECTRONIC_PROCESSING_CHNNL,
X_LOGICAL_GROUPING_MODE,
X_BATCH_BOOKING_FLAG,
X_INST_GROUP_BY_PAYMENT_METHOD);
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER)
is
begin
update IBY_UPG_PPP_TL set
SYSTEM_PROFILE_NAME = X_SYSTEM_PROFILE_NAME,
SYSTEM_PROFILE_DESCRIPTION = X_SYSTEM_PROFILE_DESCRIPTION,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
SOURCE_LANG = userenv('LANG')
where SYSTEM_PROFILE_CODE = X_SYSTEM_PROFILE_CODE
and userenv('LANG') in (LANGUAGE, SOURCE_LANG);