The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_row
(
p_collection_id IN NUMBER
, p_eam_wo_quality_tbl IN EAM_PROCESS_WO_PUB.eam_wo_quality_tbl_type
, x_eam_wo_quality_tbl OUT NOCOPY EAM_PROCESS_WO_PUB.eam_wo_quality_tbl_type
, x_return_status OUT NOCOPY VARCHAR2
, x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
)IS
Type header_plan_id_tbl_type is table of NUMBER INDEX BY BINARY_INTEGER;
IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Inside EAM_WO_QUA_UTILITY_PVT insert_row ...'); END IF;
elements.delete;
IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling qa_results_pub.insert_row ...'); END IF;
qa_results_pub.insert_row(
p_api_version => 1.0,
p_init_msg_list => fnd_api.g_true,
p_org_id => l_org_id,
p_plan_id => header_plan_id_tbl(xx),
p_spec_id => null,
p_transaction_number => l_txn_number,
p_transaction_id => null,
p_enabled_flag => 1,
p_commit => fnd_api.g_false,
x_collection_id => l_collection_id,
x_occurrence => temp_occurence,
x_row_elements => elements,
x_msg_count => msg_count,
x_msg_data => msg_data,
x_error_array => error_array,
x_message_array => message_array,
x_return_status => return_status,
x_action_result => action_result);
, p_message_text => G_PKG_NAME ||' :Inserting Record ' || SQLERRM
, x_mesg_token_Tbl => x_mesg_token_tbl
);
IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('completed the insert_row procedure ...'); END IF;
, p_message_text => G_PKG_NAME ||' :Inserting Record ' || SQLERRM
, x_mesg_token_Tbl => x_mesg_token_tbl
);
END insert_row;