[Home] [Help]
128: SELECT TO_CHAR(REQUEST_ID) REQUEST_ID,
129: PERIOD_NAME,
130: TO_CHAR(CAL_PERIOD_ID) CAL_PERIOD_ID,
131: LOAD_METHOD_CODE
132: FROM FEM_INTG_EXEC_PARAMS_GT
133: WHERE REQUEST_ID IS NOT NULL
134: AND NUM_OF_ROWS_POSTED > 0;
135:
136: v_bsv_range_low VARCHAR2(200);
480: THEN
481: -- There are no rows inserted from OGL into the posting interim table,
482: -- so set the number of rows selected and balances selected for each
483: -- valid execution parameter to 0
484: UPDATE FEM_INTG_EXEC_PARAMS_GT
485: SET NUM_OF_ROWS_SELECTED = 0
486: , SELECTED_PTD_DR_BAL = 0
487: , SELECTED_PTD_CR_BAL = 0
488: WHERE ERROR_CODE IS NULL
487: , SELECTED_PTD_CR_BAL = 0
488: WHERE ERROR_CODE IS NULL
489: AND REQUEST_ID IS NOT NULL;
490:
491: -- Log the number of rows updated in FEM_INTG_EXEC_PARAMS_GT
492: FEM_ENGINES_PKG.Tech_Message
493: (p_severity => pc_log_level_statement,
494: p_module => v_module,
495: p_app_name => 'FEM',
496: p_msg_name => 'FEM_GL_POST_217',
497: p_token1 => 'NUM',
498: p_value1 => TO_CHAR(SQL%ROWCOUNT),
499: p_token2 => 'TABLE',
500: p_value2 => 'FEM_INTG_EXEC_PARAMS_GT');
501:
502: -- Raise exception to skip all posting process and jump to print the
503: -- report, perform final process logging, and exit the program with
504: -- Warning status
507: ELSE
508: -- At least one row is inserted from OGL into the posting interim table,
509: -- so find the number of rows selected and balances selected for each
510: -- valid execution parameter
511: UPDATE FEM_INTG_EXEC_PARAMS_GT param
512: SET ( NUM_OF_ROWS_SELECTED
513: , SELECTED_PTD_DR_BAL
514: , SELECTED_PTD_CR_BAL) =
515: (SELECT COUNT(*)
520: AND bpi.CAL_PERIOD_ID = param.CAL_PERIOD_ID)
521: WHERE param.ERROR_CODE IS NULL
522: AND param.REQUEST_ID IS NOT NULL;
523:
524: -- Log the number of rows updated in FEM_INTG_EXEC_PARAMS_GT
525: FEM_ENGINES_PKG.Tech_Message
526: (p_severity => pc_log_level_statement,
527: p_module => v_module,
528: p_app_name => 'FEM',
529: p_msg_name => 'FEM_GL_POST_217',
530: p_token1 => 'NUM',
531: p_value1 => TO_CHAR(SQL%ROWCOUNT),
532: p_token2 => 'TABLE',
533: p_value2 => 'FEM_INTG_EXEC_PARAMS_GT');
534:
535: END IF;
536:
537: -- ---------------------------------------
1185: v_ds_code FEM_DATASETS_B.DATASET_CODE%TYPE;
1186: v_ds_name FEM_DATASETS_TL.dataset_name%TYPE;
1187: v_registered_flag VARCHAR2(1);
1188: v_print_exec_list VARCHAR2(1);
1189: v_eff_per_num FEM_INTG_EXEC_PARAMS_GT.effective_period_num%TYPE;
1190:
1191: CURSOR Cur_PerList_Line (p_errText1 IN VARCHAR2,
1192: p_errText2 IN VARCHAR2,
1193: p_errText3 IN VARCHAR2) IS
1200: , '')
1201: , 'PERIOD_NOT_MAPPED' , p_errText2
1202: , 'OTHER_DS_LOADED' , p_errText3)
1203: , EFFECTIVE_PERIOD_NUM
1204: FROM FEM_INTG_EXEC_PARAMS_GT
1205: WHERE ERROR_CODE IN
1206: ('INVALID_PERIOD_STATUS', 'PERIOD_NOT_MAPPED', 'OTHER_DS_LOADED')
1207: ORDER BY EFFECTIVE_PERIOD_NUM;
1208:
1210: SELECT ds.DATASET_CODE,
1211: p_ds_dim_name || ' ' || ds.DATASET_NAME
1212: FROM FEM_DATASETS_TL ds
1213: WHERE ds.DATASET_CODE IN (SELECT DISTINCT OUTPUT_DATASET_CODE
1214: FROM FEM_INTG_EXEC_PARAMS_GT)
1215: AND ds.LANGUAGE = USERENV('LANG');
1216:
1217: CURSOR Cur_RegList_Line (p_ds_code IN NUMBER,
1218: p_succText IN VARCHAR2,
1223: || DECODE(gt.ERROR_CODE, NULL, p_succText
1224: , 'PERIOD_GAP_EXISTS', p_errText1
1225: , 'EXEC_LOCK_EXISTS' , p_errText2)
1226: , DECODE(gt.ERROR_CODE, NULL, 'Y', 'N')
1227: FROM FEM_INTG_EXEC_PARAMS_GT gt
1228: WHERE (gt.REQUEST_ID IS NOT NULL
1229: OR gt.ERROR_CODE IN ('PERIOD_GAP_EXISTS', 'EXEC_LOCK_EXISTS'))
1230: AND gt.OUTPUT_DATASET_CODE = p_ds_code
1231: ORDER BY gt.EFFECTIVE_PERIOD_NUM;
1235: || LPAD(TO_CHAR(NVL(gt.SELECTED_PTD_DR_BAL, '')), 16) || ' '
1236: || LPAD(TO_CHAR(NVL(gt.SELECTED_PTD_CR_BAL, '')), 16) || ' '
1237: || LPAD(TO_CHAR(NVL(gt.POSTED_PTD_DR_BAL, '')), 16) || ' '
1238: || LPAD(TO_CHAR(NVL(gt.POSTED_PTD_CR_BAL, '')), 16)
1239: FROM FEM_INTG_EXEC_PARAMS_GT gt
1240: WHERE gt.REQUEST_ID IS NOT NULL
1241: AND gt.ERROR_CODE IS NULL
1242: AND gt.OUTPUT_DATASET_CODE = p_ds_code
1243: ORDER BY gt.EFFECTIVE_PERIOD_NUM;
1252: WHERE gt.POSTING_ERROR_FLAG = 'Y') errAcct;
1253:
1254: CURSOR Cur_NoDataPerList_Line (p_ds_code IN NUMBER) IS
1255: SELECT ' ' || RPAD(gt.PERIOD_NAME, 17, ' ')
1256: FROM FEM_INTG_EXEC_PARAMS_GT gt
1257: WHERE gt.REQUEST_ID IS NOT NULL
1258: AND gt.ERROR_CODE IS NULL
1259: AND gt.OUTPUT_DATASET_CODE = p_ds_code
1260: AND gt.NUM_OF_ROWS_SELECTED = 0
1322: IF (p_tot_rows_posted > 0)
1323: THEN
1324: -- At least one row is posted into FEM, so find the number of rows
1325: -- posted and balances posted for each valid execution parameter
1326: UPDATE FEM_INTG_EXEC_PARAMS_GT param
1327: SET ( NUM_OF_ROWS_POSTED
1328: , POSTED_PTD_DR_BAL
1329: , POSTED_PTD_CR_BAL) =
1330: (SELECT COUNT(*)
1344: AND dl.LOADED_FLAG = 'N'))
1345: WHERE param.ERROR_CODE IS NULL
1346: AND param.REQUEST_ID IS NOT NULL;
1347:
1348: -- Log the number of rows updated in FEM_INTG_EXEC_PARAMS_GT
1349: FEM_ENGINES_PKG.Tech_Message
1350: (p_severity => pc_log_level_statement,
1351: p_module => v_module,
1352: p_app_name => 'FEM',
1353: p_msg_name => 'FEM_GL_POST_217',
1354: p_token1 => 'NUM',
1355: p_value1 => TO_CHAR(SQL%ROWCOUNT),
1356: p_token2 => 'TABLE',
1357: p_value2 => 'FEM_INTG_EXEC_PARAMS_GT');
1358:
1359: END IF; -- IF (p_tot_rows_posted > 0)
1360:
1361: -- --------------------------------------------
1529: SELECT 'No-data-found dataset/snapshot period exists'
1530: INTO v_line_text
1531: FROM DUAL
1532: WHERE EXISTS (SELECT 'X'
1533: FROM FEM_INTG_EXEC_PARAMS_GT
1534: WHERE ERROR_CODE IS NULL
1535: AND REQUEST_ID IS NOT NULL
1536: AND NUM_OF_ROWS_SELECTED = 0
1537: AND LOAD_METHOD_CODE = 'S');