patients=Map[With[{patientData=#,pos=Position[#["Clinical::Drug::drug_name"],s_String/;StringMatchQ[s,drugName,IgnoreCaseTrue]]},Join[patientData,"Clinical::Drug::drug_name"Extract[patientData["Clinical::Drug::drug_name"],pos],"Clinical::Drug::days_to_drug_therapy_start"Extract[patientData["Clinical::Drug::days_to_drug_therapy_start"],pos],"Clinical::Drug::days_to_drug_therapy_end"Extract[patientData["Clinical::Drug::days_to_drug_therapy_end"],pos],"Clinical::Drug::measure_of_response"Extract[patientData["Clinical::Drug::measure_of_response"],pos]]]&,patients];