[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
DELETE qa_results
WHERE collection_id = p_collection_id;
DELETE qa_pc_results_relationship
WHERE parent_collection_id = p_collection_id
OR child_collection_id = p_collection_id;
DELETE qa_action_log
WHERE collection_id = p_collection_id;
no_of_rows_updated NUMBER;
UPDATE qa_results
SET status = 2,
cs_incident_id = nvl(p_incident_id, cs_incident_id)
WHERE p_collection_id = collection_id
AND status <> 2;
no_of_rows_updated := SQL%ROWCOUNT;
IF no_of_rows_updated > 0 THEN
IF (QLTDACTB.DO_ACTIONS(p_collection_id,
1,
NULL,
NULL,
FALSE ,
FALSE,
'DEFERRED' ,
'COLLECTION_ID'
)= FALSE ) then
p_msg_count := -1 ;
Last Updated: 08/21/98
Called From: WIP COMPLETION TXN COMMIT LOGIC
Parameter: X_txn_header_id ( identifier for a group of material txns )
***********************************************************************/
PROCEDURE Enable_QA_Results ( X_Txn_Header_ID Number,
P_MSG_COUNT IN OUT NOCOPY NUMBER ) IS
Cursor C_Collection_id is
Select qa_collection_id
from mtl_material_transactions_temp
where Transaction_header_id = x_txn_header_id
and qa_collection_id is not null;
SELECT plan_id,
txn_header_id,
occurrence
FROM QA_RESULTS
WHERE collection_id = c_collection_id
AND status <> 2
ORDER BY txn_header_id DESC, plan_id;
SELECT event_name,
document_id
FROM EDR_PSIG_DOCUMENTS
WHERE event_key = c_event_key
AND event_name IN
( 'oracle.apps.qa.ncm.create',
'oracle.apps.qa.ncm.update',
'oracle.apps.qa.ncm.master.approve',
'oracle.apps.qa.ncm.detail.approve',
'oracle.apps.qa.disp.create',
'oracle.apps.qa.disp.update',
'oracle.apps.qa.disp.header.approve',
'oracle.apps.qa.disp.detail.approve',
'oracle.apps.qa.car.create',
'oracle.apps.qa.car.update',
'oracle.apps.qa.car.approve',
'oracle.apps.qa.car.review.approve',
'oracle.apps.qa.car.impl.approve',
'oracle.apps.qa.result.create',
'oracle.apps.qa.result.update' )
ORDER BY creation_date DESC;
SELECT occurrence, plan_id
FROM qa_results
WHERE collection_id = p_collection_id
AND status <> 2;
DELETE QA_RESULTS
WHERE plan_id = l_plans(i)
AND occurrence = l_occurrences(i);
DELETE QA_PC_RESULTS_RELATIONSHIP
WHERE parent_occurrence = l_occurrences(i);
DELETE QA_PC_RESULTS_RELATIONSHIP
WHERE child_occurrence = l_occurrences(i);
SELECT MAX( txn_header_id )
FROM QA_RESULTS
WHERE collection_id = c_collection_id
AND status <> 2;
UPDATE qa_results
SET status = 2,
cs_incident_id = nvl(p_incident_id, cs_incident_id)
WHERE p_collection_id = collection_id
AND (txn_header_id = l_txn_header_id OR txn_header_id IS NULL)
AND status = 1
RETURNING plan_id, collection_id, occurrence
bulk collect into plan_id_tab, collection_id_tab, occurrence_tab;