The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_mtl_sec_inventory( p_user_id NUMBER
, p_subinventory_code VARCHAR2
, p_organization_id NUMBER)
IS
l_sqlerrno varchar2(20);
CSM_UTIL_PKG.LOG('Entering CSM_MTL_SEC_INV_EVENT_PKG.insert_mtl_sec_inventory ',
'CSM_MTL_SEC_INV_EVENT_PKG.insert_mtl_sec_inventory',FND_LOG.LEVEL_PROCEDURE);
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_CHAR_VALUE => p_subinventory_code
,P_PK2_NAME => g_pk2_name1
,P_PK2_NUM_VALUE => p_organization_id
,P_USER_ID => p_user_id
);
CSM_UTIL_PKG.LOG('Leaving CSM_MTL_SEC_INV_EVENT_PKG.insert_mtl_sec_inventory ',
'CSM_MTL_SEC_INV_EVENT_PKG.insert_mtl_sec_inventory',FND_LOG.LEVEL_PROCEDURE);
CSM_UTIL_PKG.LOG('Exception in CSM_MTL_SEC_INV_EVENT_PKG.insert_mtl_sec_inventory: ' || l_sqlerrno || ':' || l_sqlerrmsg,
'CSM_MTL_SEC_INV_EVENT_PKG.insert_mtl_sec_inventory', FND_LOG.LEVEL_EXCEPTION);
END insert_mtl_sec_inventory;
PROCEDURE update_mtl_sec_inventory( p_user_id NUMBER
, p_subinventory_code VARCHAR2
, p_organization_id NUMBER)
IS
l_sqlerrno varchar2(20);
CSM_UTIL_PKG.LOG('Entering CSM_MTL_SEC_INV_EVENT_PKG.update_mtl_sec_inventory ',
'CSM_MTL_SEC_INV_EVENT_PKG.update_mtl_sec_inventory',FND_LOG.LEVEL_PROCEDURE);
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
);
CSM_UTIL_PKG.LOG('Leaving CSM_MTL_SEC_INV_EVENT_PKG.update_mtl_sec_inventory ',
'CSM_MTL_SEC_INV_EVENT_PKG.update_mtl_sec_inventory',FND_LOG.LEVEL_PROCEDURE);
CSM_UTIL_PKG.LOG('Exception in CSM_MTL_SEC_INV_EVENT_PKG.update_mtl_sec_inventory: ' || l_sqlerrno || ':' || l_sqlerrmsg,
'CSM_MTL_SEC_INV_EVENT_PKG.update_mtl_sec_inventory', FND_LOG.LEVEL_EXCEPTION);
END update_mtl_sec_inventory;
PROCEDURE delete_mtl_sec_inventory( p_user_id NUMBER
, p_subinventory_code VARCHAR2
, p_organization_id NUMBER)
IS
l_sqlerrno varchar2(20);
CSM_UTIL_PKG.LOG('Entering CSM_MTL_SEC_INV_EVENT_PKG.delete_mtl_sec_inventory ',
'CSM_MTL_SEC_INV_EVENT_PKG.delete_mtl_sec_inventory',FND_LOG.LEVEL_PROCEDURE);
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_CHAR_VALUE => p_subinventory_code
,P_PK2_NAME => g_pk2_name1
,P_PK2_NUM_VALUE => p_organization_id
,P_USER_ID => p_user_id
);
CSM_UTIL_PKG.LOG('Leaving CSM_MTL_SEC_INV_EVENT_PKG.delete_mtl_sec_inventory ',
'CSM_MTL_SEC_INV_EVENT_PKG.delete_mtl_sec_inventory',FND_LOG.LEVEL_PROCEDURE);
CSM_UTIL_PKG.LOG('Exception in CSM_MTL_SEC_INV_EVENT_PKG.delete_mtl_sec_inventory: ' || l_sqlerrno || ':' || l_sqlerrmsg,
'CSM_MTL_SEC_INV_EVENT_PKG.delete_mtl_sec_inventory', FND_LOG.LEVEL_EXCEPTION);
END delete_mtl_sec_inventory;
l_prog_update_date jtm_con_request_data.last_run_date%TYPE;
SELECT nvl(last_run_date, (sysdate - 365*50))
FROM jtm_con_request_data
WHERE package_name = 'CSM_MTL_SEC_INV_EVENT_PKG'
AND procedure_name = 'REFRESH_ACC';
SELECT acc.access_id, acc.user_id
FROM csm_mtl_sec_inv_acc acc
WHERE not exists (Select 1 FROM CSM_INTERORG_PARAMETERS_ACC
WHERE acc.organization_id IN (FROM_ORGANIZATION_ID,TO_ORGANIZATION_ID) AND USER_ID=acc.user_id)
OR EXISTS(SELECT 1 FROM mtl_secondary_inventories msi WHERE acc.organization_id=msi.organization_id AND acc.secondary_inventory_name=msi.secondary_inventory_name
AND nvl(msi.disable_date,sysdate+1)
SELECT acc.access_id, acc.user_id
FROM csp_sec_inventories csi,
csm_mtl_sec_inv_acc acc
WHERE csi.secondary_inventory_name = acc.secondary_inventory_name
AND csi.organization_id = acc.organization_id
AND csi.last_update_date >= p_last_upd_date;
select CSM_MTL_SEC_INV_ACC_S.nextval as access_id,au.user_id , csi.organization_id,csi.secondary_inventory_name
from csp_sec_inventories csi,asg_user au
where au.enabled='Y' and au.multi_platform='Y'
--AND csi.CONDITION_TYPE='G'
AND EXISTS(SELECT 1 FROM mtl_secondary_inventories msi WHERE csi.organization_id=msi.organization_id AND csi.secondary_inventory_name=msi.secondary_inventory_name
AND nvl(msi.disable_date,sysdate+1)>=sysdate)
AND EXISTS(SELECT 1 FROM CSM_INTERORG_PARAMETERS_ACC WHERE USER_ID=au.user_id AND csi.organization_id IN (FROM_ORGANIZATION_ID,TO_ORGANIZATION_ID))
AND NOT EXISTS(SELECT 1 FROM csm_mtl_sec_inv_acc acc WHERE csi.organization_id=acc.organization_id
AND csi.secondary_inventory_name=acc.secondary_inventory_name and acc.user_id=au.user_id);
FETCH l_last_run_date_csr INTO l_prog_update_date;
CSM_UTIL_PKG.LOG('Processing deletes', 'CSM_MTL_SEC_INV_EVENT_PKG.refresh_acc', FND_LOG.LEVEL_PROCEDURE);
l_tab_access_id.DELETE;
l_tab_user_id.DELETE;
CSM_UTIL_PKG.LOG('Bulk deleted ' || l_tab_access_id.count || ' records from csm_mtl_sec_inv_acc' ,
'CSM_MTL_SEC_INV_EVENT_PKG.refresh_acc',FND_LOG.LEVEL_EVENT);
DELETE FROM csm_mtl_sec_inv_acc WHERE access_id = l_tab_access_id(i);
CSM_UTIL_PKG.LOG('Processing Updates', 'CSM_MTL_SEC_INV_EVENT_PKG.refresh_acc', FND_LOG.LEVEL_PROCEDURE);
OPEN l_upd_mtl_sec_inv_csr(l_prog_update_date);
l_tab_access_id.DELETE;
l_tab_user_id.DELETE;
CSM_UTIL_PKG.LOG('Bulk updated ' || l_tab_access_id.count || ' records from csm_mtl_sec_inv_acc' ,
'CSM_MTL_SEC_INV_EVENT_PKG.refresh_acc',FND_LOG.LEVEL_EVENT);
CSM_UTIL_PKG.LOG('Processing inserts', 'CSM_MTL_SEC_INV_EVENT_PKG.refresh_acc', FND_LOG.LEVEL_PROCEDURE);
l_tab_access_id.DELETE;
l_tab_user_id.DELETE;
l_tab_org_id.DELETE;
l_tab_sub_code.DELETE;
CSM_UTIL_PKG.LOG('Bulk inserted ' || l_tab_access_id.count || ' records into CSM_INTERORG_FREIGHTS_ACC' ,
'CSM_MTL_SEC_INV_EVENT_PKG.refresh_acc',FND_LOG.LEVEL_EVENT);
INSERT INTO CSM_MTL_SEC_INV_ACC (access_id, user_id,organization_id, secondary_inventory_name,
counter, created_by, creation_date, last_updated_by, last_update_date ,lasT_update_login)
VALUES (l_tab_access_id(i), l_tab_user_id(i),l_tab_org_id(i),l_tab_sub_code(i),
1,fnd_global.user_id, l_run_date, fnd_global.user_id, l_run_date,1);
UPDATE jtm_con_request_data
SET last_run_date = l_run_date
WHERE package_name = 'CSM_MTL_SEC_INV_EVENT_PKG'
AND procedure_name = 'REFRESH_ACC';