The following lines contain the word 'select', 'insert', 'update' or 'delete':
| Procedure insert_row |
| |
+======================================================================*/
PROCEDURE insert_row
(x_rowid IN OUT NOCOPY VARCHAR2
,x_application_id IN NUMBER
,x_entity_code IN VARCHAR2
,x_event_class_code IN VARCHAR2
,x_event_class_group_code IN VARCHAR2
,x_je_category_name IN VARCHAR2
,x_reporting_view_name IN VARCHAR2
,x_allow_actuals_flag IN VARCHAR2
,x_allow_budgets_flag IN VARCHAR2
,x_allow_encumbrance_flag IN VARCHAR2
,x_calculate_acctd_amts_flag IN VARCHAR2
,x_calculate_g_l_amts_flag 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)
IS
CURSOR c IS
SELECT rowid
FROM xla_event_class_attrs
WHERE application_id = x_application_id
AND entity_code = x_entity_code
AND event_class_code = x_event_class_code
;
l_log_module := C_DEFAULT_MODULE||'.insert_row';
trace(p_msg => 'BEGIN of procedure insert_row',
p_module => l_log_module,
p_level => C_LEVEL_PROCEDURE);
INSERT INTO xla_event_class_attrs
(creation_date
,created_by
,application_id
,entity_code
,event_class_code
,event_class_group_code
,je_category_name
,reporting_view_name
,allow_actuals_flag
,allow_budgets_flag
,allow_encumbrance_flag
,calculate_acctd_amts_flag
,calculate_g_l_amts_flag
,last_update_date
,last_updated_by
,last_update_login)
VALUES
(x_creation_date
,x_created_by
,x_application_id
,x_entity_code
,x_event_class_code
,x_event_class_group_code
,x_je_category_name
,x_reporting_view_name
,x_allow_actuals_flag
,x_allow_budgets_flag
,x_allow_encumbrance_flag
,x_calculate_acctd_amts_flag
,x_calculate_g_l_amts_flag
,x_last_update_date
,x_last_updated_by
,x_last_update_login)
;
trace(p_msg => 'END of procedure insert_row',
p_module => l_log_module,
p_level => C_LEVEL_PROCEDURE);
END insert_row;
SELECT application_id
,entity_code
,event_class_code
,event_class_group_code
,je_category_name
,reporting_view_name
,allow_actuals_flag
,allow_budgets_flag
,allow_encumbrance_flag
,calculate_acctd_amts_flag
,calculate_g_l_amts_flag
FROM xla_event_class_attrs
WHERE application_id = x_application_id
AND entity_code = x_entity_code
AND event_class_code = x_event_class_code
FOR UPDATE OF application_id NOWAIT;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
| Procedure update_row |
| |
+======================================================================*/
PROCEDURE update_row
(x_rowid IN OUT NOCOPY VARCHAR2
,x_application_id IN NUMBER
,x_entity_code IN VARCHAR2
,x_event_class_code IN VARCHAR2
,x_event_class_group_code IN VARCHAR2
,x_je_category_name IN VARCHAR2
,x_reporting_view_name IN VARCHAR2
,x_allow_actuals_flag IN VARCHAR2
,x_allow_budgets_flag IN VARCHAR2
,x_allow_encumbrance_flag IN VARCHAR2
,x_calculate_acctd_amts_flag IN VARCHAR2
,x_calculate_g_l_amts_flag IN VARCHAR2
,x_last_update_date IN DATE
,x_last_updated_by IN NUMBER
,x_last_update_login IN NUMBER)
IS
l_log_module VARCHAR2(240);
l_log_module := C_DEFAULT_MODULE||'.update_row';
trace(p_msg => 'BEGIN of procedure update_row',
p_module => l_log_module,
p_level => C_LEVEL_PROCEDURE);
UPDATE xla_event_class_attrs
SET
last_update_date = x_last_update_date
,event_class_group_code = x_event_class_group_code
,je_category_name = x_je_category_name
,reporting_view_name = x_reporting_view_name
,allow_actuals_flag = x_allow_actuals_flag
,allow_budgets_flag = x_allow_budgets_flag
,allow_encumbrance_flag = x_allow_encumbrance_flag
,calculate_acctd_amts_flag = x_calculate_acctd_amts_flag
,calculate_g_l_amts_flag = x_calculate_g_l_amts_flag
,last_updated_by = x_last_updated_by
,last_update_login = x_last_update_login
WHERE application_id = X_application_id
AND entity_code = x_entity_code
AND event_class_code = x_event_class_code;
trace(p_msg => 'END of procedure update_row',
p_module => l_log_module,
p_level => C_LEVEL_PROCEDURE);
END update_row;
| Procedure delete_row |
| |
+======================================================================*/
PROCEDURE delete_row
(x_application_id IN NUMBER
,x_entity_code IN VARCHAR2
,x_event_class_code IN VARCHAR2)
IS
l_log_module VARCHAR2(240);
l_log_module := C_DEFAULT_MODULE||'.delete_row';
trace(p_msg => 'BEGIN of procedure delete_row',
p_module => l_log_module,
p_level => C_LEVEL_PROCEDURE);
DELETE FROM xla_event_class_attrs
WHERE application_id = x_application_id
AND entity_code = x_entity_code
AND event_class_code = x_event_class_code;
trace(p_msg => 'END of procedure delete_row',
p_module => l_log_module,
p_level => C_LEVEL_PROCEDURE);
END delete_row;
,p_last_update_date IN VARCHAR2)
IS
CURSOR c_app_id(p_app_short_name VARCHAR2) IS
SELECT application_id
FROM fnd_application
WHERE application_short_name = p_app_short_name;
SELECT je_category_name
FROM gl_je_categories
WHERE je_category_key = p_je_category_key;
f_ludate DATE; -- entity update date in file
db_ludate DATE; -- entity update date in db
f_ludate := nvl(to_date(p_last_update_date, 'YYYY/MM/DD'), sysdate);
SELECT last_updated_by, last_update_date
INTO db_luby, db_ludate
FROM xla_event_class_attrs
WHERE application_id = l_application_id
AND entity_code = p_entity_code
AND event_class_code = p_event_class_code;
xla_event_class_attrs_f_pkg.update_row
(x_rowid => l_rowid
,x_application_id => l_application_id
,x_entity_code => p_entity_code
,x_event_class_code => p_event_class_code
,x_event_class_group_code => p_event_class_group_code
,x_je_category_name => l_je_category_name
,x_reporting_view_name => p_reporting_view_name
,x_allow_actuals_flag => p_allow_actuals_flag
,x_allow_budgets_flag => p_allow_budgets_flag
,x_allow_encumbrance_flag => p_allow_encumbrance_flag
,x_calculate_acctd_amts_flag => p_calculate_acctd_amts_flag
,x_calculate_g_l_amts_flag => p_calculate_g_l_amts_flag
,x_last_update_date => f_ludate
,x_last_updated_by => f_luby
,x_last_update_login => 0);
xla_event_class_attrs_f_pkg.insert_row
(x_rowid => l_rowid
,x_application_id => l_application_id
,x_entity_code => p_entity_code
,x_event_class_code => p_event_class_code
,x_event_class_group_code => p_event_class_group_code
,x_je_category_name => l_je_category_name
,x_reporting_view_name => p_reporting_view_name
,x_allow_actuals_flag => p_allow_actuals_flag
,x_allow_budgets_flag => p_allow_budgets_flag
,x_allow_encumbrance_flag => p_allow_encumbrance_flag
,x_calculate_acctd_amts_flag => p_calculate_acctd_amts_flag
,x_calculate_g_l_amts_flag => p_calculate_g_l_amts_flag
,x_creation_date => f_ludate
,x_created_by => f_luby
,x_last_update_date => f_ludate
,x_last_updated_by => f_luby
,x_last_update_login => 0);
,p_last_update_date IN VARCHAR2)
IS
BEGIN
xla_event_class_attrs_f_pkg.load_row
(p_application_short_name => p_application_short_name
,p_entity_code => p_entity_code
,p_event_class_code => p_event_class_code
,p_event_class_group_code => p_event_class_group_code
,p_je_category_key => p_je_category_name
,p_reporting_view_name => p_reporting_view_name
,p_allow_actuals_flag => p_allow_actuals_flag
,p_allow_budgets_flag => p_allow_budgets_flag
,p_allow_encumbrance_flag => p_allow_encumbrance_flag
,p_calculate_acctd_amts_flag => p_calculate_acctd_amts_flag
,p_calculate_g_l_amts_flag => p_calculate_g_l_amts_flag
,p_owner => p_owner
,p_last_update_date => p_last_update_date);