[Home] [Help]
12484: p_project_id Number ,p_struc_Ver_Id Number,
12485: p_lock_mode varchar2 )
12486: IS
12487: Cursor C1 IS
12488: SELECT Count(1) FROM PA_PJI_PROJ_EVENTS_LOG
12489: where event_object=p_project_id
12490: AND EVENT_TYPE='DEFER_ROLLUP';
12491: L_ATTRIBUTE3 VARCHAR2(2000);
12492: l_rec_count NUMBER;
12497: Fetch C1 into l_rec_count;
12498: CLOSE C1;
12499:
12500: If l_rec_count = 0 THEN
12501: INSERT INTO PA_PJI_PROJ_EVENTS_LOG (EVENT_ID,EVENT_TYPE,EVENT_OBJECT,ATTRIBUTE3,OPERATION_TYPE,
12502: STATUS,LAST_UPDATE_DATE,LAST_UPDATED_BY,CREATION_DATE,CREATED_BY,ATTRIBUTE4)
12503: VALUES (pa_pji_proj_events_log_s.nextval,'DEFER_ROLLUP',p_project_id,p_lock_mode,'I','X',SYSDATE,-1,SYSDATE,-1,p_struc_Ver_Id);
12504: ELSE
12505:
12499:
12500: If l_rec_count = 0 THEN
12501: INSERT INTO PA_PJI_PROJ_EVENTS_LOG (EVENT_ID,EVENT_TYPE,EVENT_OBJECT,ATTRIBUTE3,OPERATION_TYPE,
12502: STATUS,LAST_UPDATE_DATE,LAST_UPDATED_BY,CREATION_DATE,CREATED_BY,ATTRIBUTE4)
12503: VALUES (pa_pji_proj_events_log_s.nextval,'DEFER_ROLLUP',p_project_id,p_lock_mode,'I','X',SYSDATE,-1,SYSDATE,-1,p_struc_Ver_Id);
12504: ELSE
12505:
12506: SELECT ATTRIBUTE3 INTO L_ATTRIBUTE3 FROM PA_PJI_PROJ_EVENTS_LOG
12507: where event_object=p_project_id AND EVENT_TYPE='DEFER_ROLLUP' and rownum = 1;
12502: STATUS,LAST_UPDATE_DATE,LAST_UPDATED_BY,CREATION_DATE,CREATED_BY,ATTRIBUTE4)
12503: VALUES (pa_pji_proj_events_log_s.nextval,'DEFER_ROLLUP',p_project_id,p_lock_mode,'I','X',SYSDATE,-1,SYSDATE,-1,p_struc_Ver_Id);
12504: ELSE
12505:
12506: SELECT ATTRIBUTE3 INTO L_ATTRIBUTE3 FROM PA_PJI_PROJ_EVENTS_LOG
12507: where event_object=p_project_id AND EVENT_TYPE='DEFER_ROLLUP' and rownum = 1;
12508:
12509: IF INSTR(L_ATTRIBUTE3,p_lock_mode) = 0 THEN
12510: UPDATE PA_PJI_PROJ_EVENTS_LOG
12506: SELECT ATTRIBUTE3 INTO L_ATTRIBUTE3 FROM PA_PJI_PROJ_EVENTS_LOG
12507: where event_object=p_project_id AND EVENT_TYPE='DEFER_ROLLUP' and rownum = 1;
12508:
12509: IF INSTR(L_ATTRIBUTE3,p_lock_mode) = 0 THEN
12510: UPDATE PA_PJI_PROJ_EVENTS_LOG
12511: SET ATTRIBUTE3=ATTRIBUTE3||','||p_lock_mode
12512: WHERE event_object=p_project_id AND EVENT_TYPE='DEFER_ROLLUP';
12513: END IF;
12514: END IF;