The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT RH.resource_id
FROM CSP_REQUIREMENT_HEADERS RH
, CSP_REQUIREMENT_LINES RL
WHERE RH.REQUIREMENT_HEADER_ID = RL.REQUIREMENT_HEADER_ID
AND RL.REQUIREMENT_LINE_ID = b_req_line_id;
SELECT jta.resource_id
FROM jtf.jtf_task_assignments jta
, csp_requirement_headers crh
, csp_requirement_lines crl
WHERE crh.task_assignment_id = jta.task_assignment_id
AND jta.assignee_role = 'ASSIGNEE'
AND crh.requirement_header_id = crl.requirement_header_id
AND crl.requirement_line_id = b_req_line_id;*/
PROCEDURE Insert_ACC_Record
( p_req_line_id IN NUMBER
)
IS
CURSOR c_req_info (b_req_line_id NUMBER) IS
SELECT RH.resource_id
, OH.HEADER_ID
, OL.LINE_ID
, RH.DESTINATION_ORGANIZATION_ID
, RL.INVENTORY_ITEM_ID
FROM CSP_REQUIREMENT_HEADERS RH
, CSP_REQUIREMENT_LINES RL
, OE_ORDER_LINES_ALL OL
, OE_ORDER_HEADERS_ALL OH
WHERE RH.REQUIREMENT_HEADER_ID = RL.REQUIREMENT_HEADER_ID
AND RL.REQUIREMENT_LINE_ID = b_req_line_id
AND RL.ORDER_LINE_ID = OL.LINE_ID (+)
AND OL.HEADER_ID = OH.HEADER_ID (+);
SELECT jta.resource_id
, oh.header_id
, ol.line_id
FROM jtf.jtf_task_assignments jta
, csp_requirement_headers crh
, csp_requirement_lines crl
, oe_order_headers_all oh
, oe_order_lines_all ol
WHERE crh.task_assignment_id = jta.task_assignment_id
AND jta.assignee_role = 'ASSIGNEE'
AND crh.requirement_header_id = crl.requirement_header_id
AND crl.requirement_line_id = b_req_line_id
AND crl.order_line_id = ol.line_id(+)
AND ol.header_id = oh.header_id(+);*/
, 'Entering Insert_ACC_Record'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
, 'Inserting ACC record'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
csl_mtl_system_items_acc_pkg.pre_insert_child(
r_req_info.inventory_item_id
,r_req_info.destination_organization_id
,l_resource_id);
JTM_HOOK_UTIL_PKG.Insert_Acc
( P_PUBLICATION_ITEM_NAMES => g_publication_item_name
, P_ACC_TABLE_NAME => g_acc_table_name
, P_PK1_NAME => g_pk1_name
, P_PK1_NUM_VALUE => p_req_line_id
, P_RESOURCE_ID => l_resource_id
);
JTM_HOOK_UTIL_PKG.Insert_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 => l_header_id
, P_RESOURCE_ID => l_resource_id
);
JTM_HOOK_UTIL_PKG.Insert_Acc
( P_PUBLICATION_ITEM_NAMES => g_publication_item_name2
, P_ACC_TABLE_NAME => g_acc_table_name2
, P_PK1_NAME => g_pk1_name2
, P_PK1_NUM_VALUE => l_line_id
, P_RESOURCE_ID => l_resource_id
);
, 'Leaving Insert_ACC_Record'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
END Insert_ACC_Record;
PROCEDURE Update_ACC_Record
( p_req_line_id IN NUMBER
)
IS
CURSOR c_req_info (b_req_line_id NUMBER) IS
SELECT RH.resource_id
, OH.HEADER_ID
, OL.LINE_ID
, RH.DESTINATION_ORGANIZATION_ID
, RL.INVENTORY_ITEM_ID
FROM CSP_REQUIREMENT_HEADERS RH
, CSP_REQUIREMENT_LINES RL
, OE_ORDER_LINES_ALL OL
, OE_ORDER_HEADERS_ALL OH
WHERE RH.REQUIREMENT_HEADER_ID = RL.REQUIREMENT_HEADER_ID
AND RL.REQUIREMENT_LINE_ID = b_req_line_id
AND RL.ORDER_LINE_ID = OL.LINE_ID (+)
AND OL.HEADER_ID = OH.HEADER_ID (+);
SELECT jta.resource_id
, oh.header_id
, ol.line_id
FROM jtf.jtf_task_assignments jta
, csp_requirement_headers crh
, csp_requirement_lines crl
, oe_order_headers_all oh
, oe_order_lines_all ol
WHERE crh.task_assignment_id = jta.task_assignment_id
AND jta.assignee_role = 'ASSIGNEE'
AND crh.requirement_header_id = crl.requirement_header_id
AND crl.requirement_line_id = b_req_line_id
AND crl.order_line_id = ol.line_id(+)
AND ol.header_id = oh.header_id(+);*/
, 'Entering Update_ACC_Record'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
, 'Update ACC Record error: Could not find resource for requirement line '|| p_req_line_id
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_ERROR);
csl_mtl_system_items_acc_pkg.pre_insert_child(
r_req_info.inventory_item_id
,r_req_info.destination_organization_id
,l_resource_id);
JTM_HOOK_UTIL_PKG.Update_Acc
( g_publication_item_name
,g_acc_table_name
,l_resource_id
,p_req_line_id
);
JTM_HOOK_UTIL_PKG.Insert_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 => l_header_id
, P_RESOURCE_ID => l_resource_id
);
JTM_HOOK_UTIL_PKG.Insert_Acc
( P_PUBLICATION_ITEM_NAMES => g_publication_item_name2
, P_ACC_TABLE_NAME => g_acc_table_name2
, P_PK1_NAME => g_pk1_name2
, P_PK1_NUM_VALUE => l_line_id
, P_RESOURCE_ID => l_resource_id
);
, 'Leaving Update_ACC_Record'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
END Update_ACC_Record;
/*** Private procedure that deletes requirement for resource from acc table ***/
PROCEDURE Delete_ACC_Record
( p_req_line_id IN NUMBER
,p_resource_id IN NUMBER
)
IS
CURSOR c_req_line_id (b_req_line_id NUMBER) IS
SELECT RH.resource_id
, OH.HEADER_ID
, OL.LINE_ID
FROM CSP_REQUIREMENT_HEADERS RH
, CSP_REQUIREMENT_LINES RL
, OE_ORDER_LINES_ALL OL
, OE_ORDER_HEADERS_ALL OH
WHERE RH.REQUIREMENT_HEADER_ID = RL.REQUIREMENT_HEADER_ID
AND RL.REQUIREMENT_LINE_ID = b_req_line_id
AND RL.ORDER_LINE_ID = OL.LINE_ID (+)
AND OL.HEADER_ID = OH.HEADER_ID (+);
, 'Entering Delete_ACC_Record'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
JTM_HOOK_UTIL_PKG.Delete_Acc
( P_PUBLICATION_ITEM_NAMES => g_publication_item_name
, P_ACC_TABLE_NAME => g_acc_table_name
, P_PK1_NAME => g_pk1_name
, P_PK1_NUM_VALUE => p_req_line_id
, P_RESOURCE_ID => p_resource_id
);
, 'Delete Order Header acc record for user: ' || p_resource_id
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
JTM_HOOK_UTIL_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 => l_header_id
, P_RESOURCE_ID => p_resource_id
);
, 'Delete Order Line acc record for user: ' || p_resource_id
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
JTM_HOOK_UTIL_PKG.Delete_Acc
( P_PUBLICATION_ITEM_NAMES => g_publication_item_name2
, P_ACC_TABLE_NAME => g_acc_table_name2
, P_PK1_NAME => g_pk1_name2
, P_PK1_NUM_VALUE => l_line_id
, P_RESOURCE_ID => p_resource_id
);
, 'Leaving Delete_ACC_Record'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
END Delete_ACC_Record;
/*** Called before requirement Insert ***/
PROCEDURE PRE_INSERT_REQ_LINE
( x_return_status OUT NOCOPY varchar2
)
IS
BEGIN
x_return_status := FND_API.G_RET_STS_SUCCESS;
END PRE_INSERT_REQ_LINE;
/*** Called after requirement Insert ***/
PROCEDURE POST_INSERT_REQ_LINE
( x_return_status OUT NOCOPY varchar2
)
IS
l_req_line_id NUMBER;
, 'Entering POST_INSERT hook'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
/*** Insert record if applicable ***/
IF Replicate_Record(l_req_line_id) THEN
Insert_ACC_Record(l_req_line_id);
, 'Leaving POST_INSERT hook'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
, 'Caught exception in POST_INSERT hook:' || fnd_global.local_chr(10) || sqlerrm
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_ERROR);
fnd_msg_pub.Add_Exc_Msg('CSL_CSP_REQ_LINES_ACC_PKG','POST_INSERT_REQ_LINE',sqlerrm);
END POST_INSERT_REQ_LINE;
/* Called before requirement Update */
PROCEDURE PRE_UPDATE_REQ_LINE
( x_return_status OUT NOCOPY varchar2
)
IS
BEGIN
x_return_status := FND_API.G_RET_STS_SUCCESS;
fnd_msg_pub.Add_Exc_Msg('CSL_CSP_REQ_LINES_ACC_PKG','PRE_UPDATE_REQ_LINE',sqlerrm);
END PRE_UPDATE_REQ_LINE;
/* Called after requirement Update */
PROCEDURE POST_UPDATE_REQ_LINE
( x_return_status OUT NOCOPY varchar2
)
IS
l_req_line_id NUMBER;
, 'Entering POST_UPDATE hook'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
Update_ACC_Record(l_req_line_id);
, 'Leaving POST_UPDATE hook'
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
, 'Caught exception in POST_UPDATE hook:' || fnd_global.local_chr(10) || sqlerrm
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_ERROR);
fnd_msg_pub.Add_Exc_Msg('CSL_CSP_REQ_LINES_ACC_PKG','POST_UPDATE_REQ_LINE',sqlerrm);
END POST_UPDATE_REQ_LINE;
/* Called before req header Delete */
PROCEDURE PRE_DELETE_REQ_LINE
( x_return_status OUT NOCOPY varchar2
)
IS
BEGIN
x_return_status := FND_API.G_RET_STS_SUCCESS;
END PRE_DELETE_REQ_LINE;
/* Called after req header Delete */
PROCEDURE POST_DELETE_REQ_LINE
( x_return_status OUT NOCOPY varchar2
)
IS
BEGIN
x_return_status := FND_API.G_RET_STS_SUCCESS;
fnd_msg_pub.Add_Exc_Msg('CSL_CSP_REQ_LINES_ACC_PKG','POST_DELETE_REQ_LINE',sqlerrm);
END POST_DELETE_REQ_LINE;
PROCEDURE Delete_All_ACC_Records
( p_resource_id in NUMBER
, x_return_status OUT NOCOPY varchar2
)
IS
CURSOR c_req_resource (b_resource_id NUMBER) IS
SELECT RL.REQUIREMENT_LINE_ID
FROM CSP_REQUIREMENT_HEADERS RH
, CSP_REQUIREMENT_LINES RL
WHERE RH.REQUIREMENT_HEADER_ID = RL.REQUIREMENT_HEADER_ID
AND RH.RESOURCE_ID = b_resource_id;
SELECT crl.requirement_line_id
FROM jtf.jtf_task_assignments jta
, csp_requirement_headers crh
, csp_requirement_lines crl
WHERE crh.task_assignment_id = jta.task_assignment_id
AND jta.assignee_role = 'ASSIGNEE'
AND crh.requirement_header_id = crl.requirement_header_id
AND jta.resource_id = b_resource_id;*/
, 'Entering Delete_All_ACC_Records procedure for user: ' || p_resource_id
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
Delete_Acc_Record( r_req_resource.requirement_line_id, p_resource_id );
, 'Leaving Delete_All_ACC_Records procedure for user: ' || p_resource_id
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
fnd_msg_pub.Add_Exc_Msg('CSL_CSP_REQ_LINES_ACC_PKG','Delete_All_ACC_Records',sqlerrm);
END Delete_All_ACC_Records;
PROCEDURE Insert_All_ACC_Records
( p_resource_id in NUMBER
, x_return_status OUT NOCOPY varchar2
)
IS
CURSOR c_req_resource (b_resource_id NUMBER) IS
SELECT RL.REQUIREMENT_LINE_ID
FROM CSP_REQUIREMENT_HEADERS RH
, CSP_REQUIREMENT_LINES RL
WHERE RH.REQUIREMENT_HEADER_ID = RL.REQUIREMENT_HEADER_ID
AND RH.RESOURCE_ID = b_resource_id;
SELECT crl.requirement_line_id
FROM jtf.jtf_task_assignments jta
, csp_requirement_headers crh
, csp_requirement_lines crl
WHERE crh.task_assignment_id = jta.task_assignment_id
AND jta.assignee_role = 'ASSIGNEE'
AND crh.requirement_header_id = crl.requirement_header_id
AND jta.resource_id = b_resource_id;*/
, 'Entering Insert_All_ACC_Records procedure for user: ' || p_resource_id
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
Insert_Acc_Record( r_req_resource.requirement_line_id );
, 'Leaving Insert_All_ACC_Records procedure for user: ' || p_resource_id
, JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_FULL);
fnd_msg_pub.Add_Exc_Msg('CSL_CSP_REQ_LINES_ACC_PKG','Insert_All_ACC_Records',sqlerrm);
END Insert_All_ACC_Records;