[Home] [Help]
90: req.parent_request_id parent_request_id,
91: req.CONCURRENT_PROGRAM_ID program_id,
92: prog.STAGE_REQUEST_ID stage_req_id
93: from fnd_concurrent_requests req,
94: BIS_RS_PROG_RUN_HISTORY prog
95: where --(req.parent_request_id is not null) and
96: req.parent_request_id = prog.request_id
97: and (instr(l_parent_request_ids,to_char(req.parent_request_id)||',') <> 0);
98:
113: /** Cursor no longer used in the code
114: --for MVs of type consider refresh
115: cursor c_refresh_mv is
116: select obj.prog_request_id request_id
117: from BIS_RS_PROG_RUN_HISTORY prog,
118: fnd_concurrent_programs fnd,
119: BIS_OBJ_REFRESH_HISTORY obj
120: where prog.set_request_id = l_root_request_id
121: and prog.program_id = fnd.CONCURRENT_PROGRAM_ID
126: c_refresh_mv_rec c_refresh_mv%rowtype;
127: **/
128: cursor c_consider_mv is
129: select request_id
130: from BIS_RS_PROG_RUN_HISTORY
131: where set_request_id = l_root_request_id
132: and PROG_APP_ID =191
133: and program_id = ( select CONCURRENT_PROGRAM_ID
134: from fnd_concurrent_programs
136:
137: -- get_stage
138: cursor c_get_stage(p_prog_req_id in number) is
139: select stage_request_id
140: from bis_rs_prog_run_history
141: where request_id = p_prog_req_id;
142:
143: begin
144: errbuf := NULL;
341: OPEN c_get_stage(FND_GLOBAL.conc_request_id);
342: FETCH c_get_stage into l_rs_history_stage;
343: CLOSE c_get_stage;
344:
345: if((BIS_RS_PROG_RUN_HISTORY_PKG.Update_Row( p_Set_request_id => l_root_request_id
346: , p_Stage_request_id => l_rs_history_stage
347: , p_Request_id => FND_GLOBAL.conc_request_id
348: , p_Status_code => 'C'
349: , p_Phase_code => 'C'
395: select request_id from BIS_RS_RUN_HISTORY
396: where last_update_date <= (sysdate-history_days);
397:
398: cursor rs_prog_run(p_set_rq_id number) is
399: select request_id from BIS_RS_PROG_RUN_HISTORY
400: where set_request_id = p_set_rq_id;
401:
402: begin
403: history_days := fnd_profile.value('BIS_BIA_REQUESTSET_HISTORY');
411: BIS_OBJ_REFRESH_HISTORY_PKG.Delete_Row(rs_prog_run_rec.request_id);
412: end loop;
413:
414: -- then delete program data and stage data
415: BIS_RS_PROG_RUN_HISTORY_PKG.Delete_Row(rs_run_rec.request_id);
416: BIS_RS_STAGE_RUN_HISTORY_PKG.Delete_Row(rs_run_rec.request_id);
417: end loop;
418:
419: BIS_RS_RUN_HISTORY_PKG.Delete_Row(sysdate-history_days);
445: request_id number;
446: l_root_request_id number;
447:
448: cursor request_id_exists is
449: select 1 from BIS_RS_PROG_RUN_HISTORY
450: where Request_id = x_request_id;
451:
452: cursor request_details is
453: select program_application_id,
473: cursor c_objects is
474: select linkage.OBJECT_TYPE obj_type,
475: linkage.object_name obj_name,
476: linkage.refresh_mode obj_refresh_mode
477: from BIS_RS_PROG_RUN_HISTORY prog,
478: fnd_concurrent_programs fnd,
479: bis_obj_prog_linkages linkage
480: where prog.request_id = x_request_id
481: and prog.program_id = fnd.CONCURRENT_PROGRAM_ID
504: fetch request_id_exists into request_id;
505: if (x_request_id is not null) then
506: l_root_request_id := x_set_request_id;
507: if (request_id_exists%NOTFOUND) then
508: BIS_RS_PROG_RUN_HISTORY_PKG.Insert_Row
509: ( p_Set_request_id => l_root_request_id
510: , p_Stage_request_id => x_stage_req_id
511: , p_Request_id => x_request_id
512: , p_Program_id => req_details_rec.concurrent_program_id
522: , p_completion_text => req_details_rec.completion_text
523: );
524: else
525: --if request already exists then update status code , completion date and stage id.
526: if (BIS_RS_PROG_RUN_HISTORY_PKG.update_row
527: ( p_Set_request_id => l_root_request_id
528: , p_Stage_request_id => x_stage_req_id
529: , p_Request_id => x_request_id
530: , p_Status_code => req_details_rec.Status_code
930: ********/
931: PROCEDURE update_warn_compl_txt(p_root_req_id IN NUMBER) IS
932:
933: cursor check_in_progs(root_req_id number) is
934: select request_id ,STAGE_REQUEST_ID from BIS_RS_PROG_RUN_HISTORY
935: where SET_REQUEST_ID = root_req_id and
936: status_code = 'G' ;
937:
938: check_in_progs_rec check_in_progs%rowtype;
944: check_in_stages_rec check_in_stages%rowtype;
945:
946: BEGIN
947: for check_in_progs_rec in check_in_progs(p_root_req_id) loop
948: if(BIS_RS_PROG_RUN_HISTORY_PKG.Update_Row
949: ( p_Set_request_id => p_root_req_id,
950: p_Stage_request_id => check_in_progs_rec.STAGE_REQUEST_ID,
951: p_Request_id => check_in_progs_rec.request_id,
952: p_Last_update_date => sysdate,
1038: PROCEDURE update_rs_stage_dates(p_root_req_id IN NUMBER) IS
1039:
1040: --for updating request set status
1041: cursor c_request_status is
1042: select status_code from BIS_RS_PROG_RUN_HISTORY
1043: where set_request_id =p_root_req_id
1044: and (status_code ='E' or status_code ='G')
1045: --added for Bug 4173989
1046: union
1061: where SET_REQUEST_ID = p_root_req_id;
1062:
1063: cursor c_stages_dates(stage_req_id number) is
1064: select min(START_DATE) stage_start_date, max(COMPLETION_DATE) stage_com_date
1065: from bis_rs_prog_run_history
1066: where STAGE_REQUEST_ID =stage_req_id;
1067:
1068: is_request_err boolean :=false;
1069: is_request_warn boolean :=false;
1165: */
1166: PROCEDURE capture_object_info(p_root_request_id IN NUMBER) IS
1167: CURSOR get_objects IS
1168: SELECT object_name, object_type, prog_Request_id
1169: FROM BIS_RS_PROG_RUN_HISTORY prog, BIS_OBJ_REFRESH_HISTORY obj
1170: WHERE set_request_id = p_root_request_id AND obj.prog_request_id = prog.request_id;
1171:
1172: --for objects data
1173: l_Object_row_count NUMBER;