The following lines contain the word 'select', 'insert', 'update' or 'delete':
'UPDATE fem_bal_interface_t ' || pv_partition_clause ||
' SET posting_request_id = :req_id_slice, ' ||
'previous_error_flag = ' ||
'DECODE(posting_error_code, NULL, NULL, ''Y''), ' ||
'posting_error_code = NULL ';
v_rows_updated NUMBER;
' UPDATE fem_bal_interface_t ' ||
' SET posting_error_code = ''FEM_GL_POST_MIX_LOAD_METHOD'' ' ||
' WHERE EXISTS ( SELECT 1 ' ||
' FROM fem_bal_interface_t ' ||
' WHERE posting_request_id = :pv_req_id_slice '||
' AND load_set_id = :p_load_set_id ' ||
' HAVING COUNT (DISTINCT load_method_code) > 1 ) ' ||
' AND posting_request_id = :pv_req_id_slice ' ||
' AND load_set_id = :p_load_set_id ';
' UPDATE fem_bal_interface_t ' ||
' SET posting_error_code = ''FEM_GL_POST_DUP_PROC_KEYS'' ' ||
' WHERE ( ' || v_key_stmt2 || ') IN' ||
' ( SELECT ' || v_key_stmt2 ||
' FROM fem_bal_interface_t ' ||
' WHERE posting_request_id = :pv_req_id_slice ' ||
' GROUP BY ' || v_key_stmt2 ||
' HAVING COUNT(*) > 1) ' ||
' AND posting_error_code IS NULL ' ||
' AND load_method_code = ''S''' ||
' AND posting_request_id = :pv_req_id_slice ';
' UPDATE fem_bal_interface_t ' ||
' SET posting_error_code = ' ||
' DECODE(currency_type_code, ' ||
' ''ENTERED'', ' ||
' DECODE(bal_post_type_code, ''A'', NULL, ' ||
' ''R'', NULL, ''FEM_GL_POST_INVALID_POST_TYPE''), ' ||
' ''TRANSLATED'', ' ||
' DECODE(bal_post_type_code, ''A'', NULL, ' ||
' ''R'', NULL, ''FEM_GL_POST_INVALID_POST_TYPE''), ' ||
' ''FEM_GL_POST_INVALID_CURR_TYPE'') ' ||
' WHERE (bal_post_type_code NOT IN (''A'', ''R'') OR ' ||
' currency_type_code NOT IN (''ENTERED'', ''TRANSLATED'')) ' ||
' AND posting_request_id = :pv_req_id_slice ' ||
' AND posting_error_code IS NULL ' ||
' AND (load_set_id = :p_load_set_id OR ' ||
' :p_proc_snapshot_rows = ''Y'')';
' UPDATE fem_bal_interface_t ' ||
' SET posting_error_code = ''FEM_GL_POST_MISSING_BAL_COL'' ';
' UPDATE fem_bal_interface_t u' ||
' SET posting_error_code = ''FEM_GL_POST_PREV_SET_ERROR'' ' ||
' WHERE ( ' || v_key_stmt2 || ') IN' ||
' ( SELECT ' || v_key_stmt3 ||
' FROM fem_bal_interface_t s' ||
' WHERE s.posting_error_code IS NOT NULL ' ||
' AND s.posting_request_id = :pv_req_id_slice ' ||
' AND s.load_set_id < :p_load_set_id ) ' ||
' AND u.posting_error_code IS NULL ' ||
' AND u.posting_request_id = :pv_req_id_slice ' ||
' AND u.load_set_id = :p_load_set_id ';
INSERT INTO fem_bal_post_interim_gt
(interface_rowid,
bal_post_type_code,
dataset_code,
cal_period_id,
ledger_id,
company_cost_center_org_id,
currency_code,
currency_type_code,
xtd_balance_e,
xtd_balance_f,
ytd_balance_e,
ytd_balance_f,
qtd_balance_e,
qtd_balance_f,
ptd_debit_balance_e,
ptd_credit_balance_e,
ytd_debit_balance_e,
ytd_credit_balance_e,
previous_error_flag,
posting_error_flag)
SELECT
rowid,
bal_post_type_code,
FEM_GL_POST_PROCESS_PKG.pv_dataset_code,
FEM_GL_POST_PROCESS_PKG.pv_cal_period_id,
FEM_GL_POST_PROCESS_PKG.pv_ledger_id,
-1,
currency_code,
currency_type_code,
xtd_balance_e,
xtd_balance_f,
DECODE(FEM_GL_POST_PROCESS_PKG.pv_qtd_ytd_code,
'PTD', NULL, 'QTD', NULL, ytd_balance_e),
DECODE(FEM_GL_POST_PROCESS_PKG.pv_qtd_ytd_code,
'PTD', NULL, 'QTD', NULL, ytd_balance_f),
DECODE(FEM_GL_POST_PROCESS_PKG.pv_qtd_ytd_code,
'PTD', NULL, 'YTD', NULL, qtd_balance_e),
DECODE(FEM_GL_POST_PROCESS_PKG.pv_qtd_ytd_code,
'PTD', NULL, 'YTD', NULL, qtd_balance_e),
ptd_debit_balance_e,
ptd_credit_balance_e,
ytd_debit_balance_e,
ytd_credit_balance_e,
previous_error_flag,
'N'
FROM fem_bal_interface_t
WHERE (v_proc_snapshot_rows = 'Y' OR load_set_id = p_load_set_id)
AND posting_request_id = pv_req_id_slice
AND posting_error_code is NULL;
v_sql_stmt := 'UPDATE fem_bal_post_interim_gt g SET ';
v_sel_stmt := '(SELECT ';
v_sql_stmt := 'UPDATE fem_bal_post_interim_gt g ' ||
'SET posting_error_flag = ''Y'' ' || 'WHERE ';
UPDATE fem_bal_interface_t
SET posting_error_code = 'FEM_GL_POST_INVALID_DIM_MEMBER'
WHERE rowid IN
(SELECT interface_rowid
FROM fem_bal_post_interim_gt
WHERE posting_error_flag = 'Y');
SELECT count(*)
INTO x_prev_err_rows_reproc
FROM fem_bal_post_interim_gt
WHERE posting_error_flag = 'N'
AND previous_error_flag = 'Y';
SELECT cm.interface_column_name, d.dimension_name
FROM fem_tab_columns_b tc,
fem_xdim_dimensions xd,
fem_dimensions_vl d,
fem_int_column_map cm
WHERE tc.table_name = 'FEM_BALANCES'
AND tc.column_name NOT IN ('CAL_PERIOD_ID', 'DATASET_CODE', 'LEDGER_ID')
AND xd.dimension_id = tc.dimension_id
AND xd.value_set_required_flag = 'N'
AND d.dimension_id = tc.dimension_id
AND cm.object_type_code = 'XGL_INTEGRATION'
AND cm.target_column_name = tc.column_name
ORDER BY 1;
SELECT cm.interface_column_name, d.dimension_name, vs.value_set_name
FROM fem_tab_columns_b tc,
fem_xdim_dimensions xd,
fem_dimensions_vl d,
fem_int_column_map cm,
fem_global_vs_combo_defs gvscd,
fem_value_sets_vl vs
WHERE tc.table_name = 'FEM_BALANCES'
AND tc.column_name NOT IN ('CAL_PERIOD_ID', 'DATASET_CODE', 'LEDGER_ID')
AND xd.dimension_id = tc.dimension_id
AND xd.value_set_required_flag = 'Y'
AND d.dimension_id = tc.dimension_id
AND cm.object_type_code = 'XGL_INTEGRATION'
AND cm.target_column_name = tc.column_name
AND gvscd.global_vs_combo_id = FEM_GL_POST_PROCESS_PKG.pv_global_vs_combo_id
AND gvscd.dimension_id = tc.dimension_id
AND vs.dimension_id = gvscd.dimension_id
AND vs.value_set_id = gvscd.value_set_id
ORDER BY 1;
SELECT SUM(rows_loaded), SUM(rows_processed), SUM(rows_rejected)
INTO v_tot_posted_rows, v_tot_prev_err_rows_reproc, v_tot_cur_data_err_rows
FROM fem_mp_process_ctl_t
WHERE req_id = FEM_GL_POST_PROCESS_PKG.pv_req_id;
SELECT DISTINCT(message)
BULK COLLECT INTO v_msg_list
FROM fem_mp_process_ctl_t
WHERE req_id = FEM_GL_POST_PROCESS_PKG.pv_req_id
AND status = 2;
FEM_MULTI_PROC_PKG.Delete_Data_Slices(FEM_GL_POST_PROCESS_PKG.pv_req_id);
FEM_MULTI_PROC_PKG.Delete_Data_Slices(FEM_GL_POST_PROCESS_PKG.pv_req_id);
v_param_list.DELETE;
v_param_list.DELETE;
SELECT attribute_name
INTO v_ds_bal_type_attr_name
FROM fem_dim_attributes_vl
WHERE attribute_varchar_label = 'DATASET_BALANCE_TYPE_CODE';
SELECT dimension_name
INTO v_dataset_dim_name
FROM fem_dimensions_vl
WHERE dimension_varchar_label = 'DATASET';
SELECT object_type_name
INTO v_xgl_rule_type_name
FROM fem_object_types_vl
WHERE object_type_code = 'XGL_INTEGRATION';
DELETE FROM fem_bal_interface_t
WHERE posting_request_id = pv_req_id_slice
AND posting_error_code is NULL
AND load_method_code = 'S';
'SELECT DISTINCT load_set_id ' ||
'FROM fem_bal_interface_t ' ||
'WHERE load_method_code = ''I'' ' ||
'AND cal_per_dim_grp_display_code = :cal_per_dim_grp_dsp_cd ' ||
'AND cal_period_end_date = :cal_per_end_date ' ||
'AND cal_period_number = :cal_gl_per_num ' ||
'AND ledger_display_code = :ledger_dsp_cd ' ||
'AND (budget_display_code = :budget_dsp_cd ' ||
'OR :budget_dsp_cd is NULL) ' ||
'AND (encumbrance_type_code = :enc_type_dsp_cd ' ||
'OR :enc_type_dsp_cd is NULL) ' ||
'ORDER BY load_set_id ASC';
'SELECT DISTINCT load_set_id ' ||
'FROM fem_bal_interface_t ' ||
'WHERE posting_error_code is NOT NULL ' ||
'AND load_method_code = ''I'' ' ||
'AND cal_per_dim_grp_display_code = :cal_per_dim_grp_dsp_cd ' ||
'AND cal_period_end_date = :cal_per_end_date ' ||
'AND cal_period_number = :cal_gl_per_num ' ||
'AND ledger_display_code = :ledger_dsp_cd ' ||
'AND (budget_display_code = :budget_dsp_cd ' ||
'OR :budget_dsp_cd is NULL) ' ||
'AND (encumbrance_type_code = :enc_type_dsp_cd ' ||
'OR :enc_type_dsp_cd is NULL) ' ||
'ORDER BY load_set_id ASC';
DELETE FROM fem_bal_interface_t
WHERE posting_request_id = pv_req_id_slice
AND posting_error_code is NULL
AND load_method_code = 'I'
AND load_set_id = v_curr_load_set_id;
UPDATE fem_bal_interface_t
SET posting_error_code = 'FEM_GL_POST_TO_BE_REPROCESSED'
WHERE posting_request_id = pv_req_id_slice
AND posting_error_code is NULL
AND previous_error_flag = 'Y';
UPDATE fem_bal_interface_t
SET posting_error_code = 'FEM_GL_POST_TO_BE_REPROCESSED'
WHERE posting_request_id = pv_req_id_slice
AND posting_error_code is NULL
AND previous_error_flag = 'Y';