The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT *
FROM PO_DISTRIBUTIONS
WHERE rowid = X_Rowid
FOR UPDATE of Po_Distribution_Id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
l_return_status VARCHAR2(1);
DELETE FROM PO_DISTRIBUTIONS
WHERE rowid = X_Rowid
RETURNING po_distribution_id, line_location_id, po_header_id, po_release_id, distribution_type, org_id
INTO l_distribution_id, l_line_location_id, l_po_header_id, l_po_release_id, l_distribution_type, l_org_id; --
SELECT COUNT(1) INTO l_distribution_count
FROM po_distributions_all pd
WHERE pd.line_location_id=l_line_location_id;
ZX_API_PUB.delete_tax_distributions(
p_api_version => 1.0,
p_init_msg_list => FND_API.G_TRUE,
p_commit => FND_API.G_FALSE,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_transaction_line_rec => l_transaction_line_rec_type
);
UPDATE po_line_locations
SET tax_attribute_update_code = 'DIST_DELETE'
WHERE tax_attribute_update_code IS NULL
AND line_location_id=l_line_location_id;
END Delete_Row;