The following lines contain the word 'select', 'insert', 'update' or 'delete':
CSM_ACC_PKG.Insert_Acc
( P_PUBLICATION_ITEM_NAMES => g_publication_item_name1
,P_ACC_TABLE_NAME => g_acc_table_name1
,P_SEQ_NAME => g_acc_sequence_name1
,P_PK1_NAME => g_pk1_name1
,P_PK1_NUM_VALUE => p_requirement_line_id
,P_USER_ID => p_user_id
);
CSM_ACC_PKG.Delete_Acc
( P_PUBLICATION_ITEM_NAMES => g_publication_item_name1
,P_ACC_TABLE_NAME => g_acc_table_name1
,P_PK1_NAME => g_pk1_name1
,P_PK1_NUM_VALUE => p_requirement_line_id
,P_USER_ID => p_user_id
);
CSM_ACC_PKG.Update_Acc
( P_PUBLICATION_ITEM_NAMES => g_publication_item_name1
,P_ACC_TABLE_NAME => g_acc_table_name1
,P_ACCESS_ID => l_access_id
,P_USER_ID => p_user_id
);
PROCEDURE CONC_ORDER_UPDATE(p_status OUT NOCOPY VARCHAR2,
p_message OUT NOCOPY VARCHAR2)
IS
/*** get the last run date of the concurent program ***/
CURSOR c_LastRundate
IS
SELECT NVL(LAST_RUN_DATE, to_date('1','J')) LAST_RUN_DATE
FROM JTM_CON_REQUEST_DATA
WHERE package_name = 'CSM_CSP_REQ_LINES_EVENT_PKG'
AND procedure_name = 'CONC_ORDER_UPDATE';
SELECT acc.user_id
, acc.access_id
FROM csm_req_lines_acc acc
, CSP_REQ_LINE_DETAILS crld
, OE_ORDER_LINES_ALL ol
WHERE acc.requirement_line_id = crld.requirement_line_id
AND crld.source_id = ol.line_id
AND ol.LAST_UPDATE_DATE >= b_last_run_date ;
, 'Entering CONC_ORDER_UPDATE hook'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
l_tab_access_id.DELETE;
l_tab_user_id.DELETE;
UPDATE JTM_CON_REQUEST_DATA
SET LAST_RUN_DATE = l_current_run_date
WHERE package_name = 'CSM_CSP_REQ_LINES_EVENT_PKG'
AND procedure_name = 'CONC_ORDER_UPDATE';
, 'Leaving CONC_ORDER_UPDATE hook'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
p_message := 'CSM_CSP_REQ_LINES_EVENT_PKG.CONC_ORDER_UPDATE Executed successfully';
p_message := 'Error in CSM_CSP_REQ_LINES_EVENT_PKG.CONC_ORDER_UPDATE: ' || substr(SQLERRM, 1, 2000);
, 'Caught exception in CONC_ORDER_UPDATE hook:' || fnd_global.local_chr(10) || sqlerrm
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_ERROR);
fnd_msg_pub.Add_Exc_Msg('CSM_CSP_REQ_LINES_EVENT_PKG','CONC_ORDER_UPDATE',sqlerrm);
END CONC_ORDER_UPDATE;