<% ' The basic function Function submitRQLQuery(rqlQuery) Dim objIO, strError Set objIO = Server.CreateObject("RDCMSASP.RdPageData") objIO.XMLServerClassName = "RDCMSServer.XmlServer" submitRQLQuery = objIO.ServerExecuteXML(rqlQuery, strError) Set objIO = nothing End Function function GetElementsFromPageGUID(PageGUID,ElementRequired) rqlQueryText = "" 'response.write "" ' Pass RQL statement on to the basic function xmlFile = submitRQLQuery(rqlQueryText) 'response.write "" ' Generate a DOM object to parse the response SQL statement Set xmlDoc = server.CreateObject("Msxml2.DOMDocument.4.0") ' Import content of response RQL to the DOM object xmlDoc.loadXML(xmlFile) ' Create a list of all USER ' entries from the DOM object Set RDxmlNodeList = xmlDoc.getElementsByTagName("SEGMENT") 'response.write "
"&RDxmlNodeList.Length &" SEGMENT nodes found
" ' Loop over list of all users and ' extract the attributes For i=0 To (RDxmlNodeList.length - 1) segName = RDxmlNodeList.item(i).getAttribute("name") segParentGUID = RDxmlNodeList.item(i).getAttribute("parentguid") segGUID = RDxmlNodeList.item(i).getAttribute("guid") If segName = ElementRequired Then GetElementsFromPageGUID= segGUID Next ' Remove DOM object from memory set xmlDoc = nothing End Function function GetContentFromElementGUID(ElementGUID) rqlQueryText = "" ' Pass RQL statement on to the basic function xmlFile = submitRQLQuery(rqlQueryText) 'response.write "" 'response.write "" ' Generate a DOM object to parse the response SQL statement 'Set xmlDoc = server.CreateObject("Msxml2.DOMDocument.4.0") ' Import content of response RQL to the DOM object 'xmlDoc.loadXML(xmlFile) ' Locate ELT node and then assign value to string 'Set RDxmlNodeList = xmlDoc.getElementsByTagName("ELT") 'For i=0 To (RDxmlNodeList.length - 1) 'GetContentFromElementGUID= RDxmlNodeList.item(i).getAttribute("value") 'Next GetContentFromElementGUID = xmlFile ' Remove DOM object from memory set xmlDoc = nothing End Function %> <% PageGUID = "E21DB13AACC84F0C87D827F9C74D7A7C" 'TextElementGUID = GetElementsFromPageGUID(PageGUID,"txt_experience_areas") 'TextGUIDcontent = GetContentFromElementGUID(TextElementGUID ) If "" <> "" Then industry_experience_TextElementGUID = GetElementsFromPageGUID(PageGUID,"txt_industry_experience") industry_experience_TextGUIDcontent = GetContentFromElementGUID(industry_experience_TextElementGUID) industry_experience_TextGUIDcontent = "9|Life Sciences##" legal_advice_TextElementGUID = GetElementsFromPageGUID(PageGUID,"txt_legal_advice") legal_advice_TextGUIDcontent = GetContentFromElementGUID(legal_advice_TextElementGUID) legal_advice_TextGUIDcontent = "107|Intellectual Property##" End If If "9|Life Sciences##" <> "" Then item_industryarray = Split("9|Life Sciences##","##") For i = 0 to uBound(item_industryarray)-1 itemvalue = Split(item_industryarray(i),"|") item_industry_values = item_industry_values&itemvalue(0)&"##" Next 'response.write "item_industry_values are "&item_industry_values&"
" End If If "107|Intellectual Property##" <> "" Then item_legalarray = Split("107|Intellectual Property##","##") For i = 0 to uBound(item_legalarray)-1 legalitemvalue = Split(item_legalarray(i),"|") item_legal_values = item_legal_values&legalitemvalue(0)&"##" Next 'response.write "item_legal_values are "&item_legal_values&"
" End If If "Unknown" = "Chris" Then 'response.write "industry_experience content is: "&industry_experience_TextGUIDcontent &"
" 'response.write "legal_advice content is: "&legal_advice_TextGUIDcontent&"
" End If 'response.write "text element content is "&TextGUIDcontent&"
" %> <% name_value = Request("name") original_name_value = Request("name") industry_value = Request("industry") role_value = Request("role") advice_value = Request("advice") showleftnav = Request("showleftnav") If name_value <> "" or industry_value <> "" or advice_value <> "" or showleftnav = "no" Then lawyersearchresult = "yes" xslfunction = "yes" End If %> <% If "Unknown" <> "" Then %> <% End If %>
Lawyer finder

Adam Cooke

Adam Cooke

Partner
Adam Cooke

An IP partner and head of the Life Sciences Litigation team, I have over 20 years' experience in the IP field, especially multi-jurisdictional patent litigation. Regulatory and clearance advice (FTOs - freedom to operate opinions) are also a key part of my work.

Tel: +44 (0)20 7664 0324

Email: adam_cooke@wragge.com

Best brains in ...

Life sciences litigation, clearance advice and intellectual property

Highlight of your career so far?

Advising Genentech Inc of California, the world's first and largest biotech company, for over 20 years. My first trial for Genentech concerned tPA (tissue plasminogen activator), an enzyme used for dissolving blood clots. As it was the first trial anywhere in the world relating to the patenting of a DNA sequence, the court was packed with lawyers, analysts and big names in science such as James Watson of Watson and Crick fame. Litigation for Genentech has concerned Insulin-like Growth Factor for the treatment of growth disorders.

Most challenging job you've ever done?

In October 2007, we won a major patent action for Siemens Magnet Technology Ltd, one of the world's leading suppliers of superconducting magnets for MRI scanners. The patent was directed to the design of superconducting magnets and involved the use of complex mathematical techniques for optimising the magnetic field within the magnet bore.

What about outside the UK?

Almost all our work is international in nature, either because the clients are foreign or because there are parallel issues or disputes in other countries, especially Continental Europe and the USA.

What's your definition of going the extra mile... And when have you done it?

My patent litigation work is not confined to the life sciences field. Last year (2006) for example, we scored a major win for Tamglass of Finland, a top manufacturer of machines for bending and tempering flat glass. Tamglass sued a Chinese manufacturer and its UK customer for patent infringement. When giving his ruling for Tamglass, the trial judge, Mr Justice Mann, praised the Wragge & Co team for 'the entirely practical way in which they dealt with the shifting and fast moving events of this trial, unaccompanied by any unhelpful forensic or tactical huffing and puffing of the kind that one still not infrequently encounters. Their entirely appropriate and sensible approach enabled the principal focus to remain firmly on the issues in the case and not on procedural points and greatly assisted the efficient conduct of the case'.

When have you ever given a client a real competitive edge?

A great track record for winning cases or resolving disputes on the best possible terms.

What's your single greatest contribution to Wragge & Co's corporate responsibility?

I am a trustee of SOS Sahel International UK. SOS Sahel helps communities in the Sahel countries on the southern edge of the Sahara, such as Mali, Niger and Ethiopia. Three years ago my family and I visited Mali to see some of SOS Sahel's projects first-hand. It was an extraordinary experience being greeted by the whole village and then joining in in a noisy ceremony to celebrate the completion of a new water well.

What's been written or said about you that you're most proud of?

In Chambers 2008, I am described as 'a competent and charming all-round patent litigator who impresses clients with his manner'.