<!--
function obj()
{
this.inhalatoria='';
this.intramuscular='';
this.intratecal='';
this.intravaginal='';
this.intravenosa='';
this.oral='';
this.percutanea='';
this.rectal='';
this.subcutanea='';
this.sublingual='';
this.cualquiera='';
}

function clinical(f)
{

if(f.termClinical.value=='')
return false;

//biodisponibilidad
biodis=new obj;
biodis['inhalatoria']=
"inhal* [AB] OR nebuliz* [AB] AND (bioavailability [AB] OR pharmacology [SH])";

biodis['intramuscular']=
"intramuscular [AB] AND (bioavailability [AB] OR pharmacology [SH])";

biodis['intratecal']=
"intrathecal [AB] OR spinal [AB] AND (bioavailability [AB] OR pharmacology [SH])";

biodis['intravaginal']=
"intravaginal [AB] OR vaginal [AB] AND (bioavailability [AB] OR pharmacology [SH])";

biodis['intravenosa']=
"intravenous* [AB] OR infus* [AB] OR parenteral [AB] AND (bioavailability [AB] OR pharmacology [SH])";

biodis['oral']=
"oral [AB] OR enteral [AB] AND (bioavailability [AB] OR pharmacology [SH])";

biodis['percutanea']=
"percutaneous [AB] OR topic [AB] AND (bioavailability [AB] OR pharmacology [SH])";

biodis['rectal']=
"rectal [AB] OR suppositor* [AB] AND (bioavailability [AB] OR pharmacology [SH])";

biodis['subcutanea']=
"subcutaneous [AB] AND (bioavailability [AB] OR pharmacology [SH])";

biodis['sublingual']=
"sublingual [AB] OR ocular [AB] OR ophthalm* [AB] OR nasal* [AB] AND (bioavailability [AB] OR pharmacology [SH])";

biodis['cualquiera']=
"bioavailability [AB] AND pharmacology [SH]";

//eadversos
eadver=new obj;
eadver['inhalatoria']=
"inhal* [AB] OR nebuliz* [AB] AND (side [AB] AND (effect* [AB]) OR adverse effects [SH])";

eadver['intramuscular']=
"intramuscular [AB] AND (side [AB] AND (effect* [AB]) OR adverse effects [SH])";

eadver['intratecal']=
"intrathecal [AB] OR spinal [AB] AND (side [AB] AND (effect* [AB]) OR adverse effects [SH])";

eadver['intravaginal']=
"intravaginal [AB] OR vaginal [AB] AND (side [AB] AND (effect* [AB]) OR adverse effects [SH])";

eadver['intravenosa']=
"intravenous* [AB] OR infus* [AB] OR parenteral [AB] AND (side [AB] AND (effect* [AB] OR adverse effects [SH])";

eadver['oral']=
"oral [AB] OR enteral [AB] AND (side [AB] AND (effect* [AB]) OR adverse effects [SH])";

eadver['percutanea']=
"percutaneous [AB] OR topic [AB] AND (side [AB] AND (effect* [AB]) OR adverse effects [SH])";

eadver['rectal']=
"rectal [AB] OR suppositor* [AB] AND (side [AB] AND (effect* [AB]) OR adverse effects [SH])";

eadver['subcutanea']=
"subcutaneous [AB] AND (side [AB] AND (effect* [AB]) OR adverse effects [SH])";

eadver['sublingual']=
"sublingual [AB] OR ocular [AB] OR ophthalm* [AB] OR nasal* [AB] AND (side [AB] AND (effect* [AB]) OR adverse effects [SH])";

eadver['cualquiera']=
"(side [AB] AND (effect* [AB]) OR adverse effects [SH])";

//eclinicos
eclini=new obj;
eclini['inhalatoria']=
"inhal* [AB] OR nebuliz* [AB] AND (randomized controlled trial [PT] OR clinical trial [PT] OR drug therapy [SH])";

eclini['intramuscular']=
"intramuscular [AB] AND (randomized controlled trial [PT] OR clinical trial [PT] OR drug therapy [SH])";

eclini['intratecal']=
"intrathecal [AB] OR spinal [AB] AND (randomized controlled trial [PT] OR clinical trial [PT] OR drug therapy [SH])";

eclini['intravaginal']=
"intravaginal [AB] OR vaginal [AB] AND (randomized controlled trial [PT] OR clinical trial [PT] OR drug therapy [SH])]";

eclini['intravenosa']=
"intravenous* [AB] OR infus* [AB] OR parenteral [AB] AND (randomized controlled trial [PT] OR clinical trial [PT] OR drug therapy [SH])";

eclini['oral']=
"oral [AB] OR enteral [AB] AND (randomized controlled trial [PT] OR clinical trial [PT] OR drug therapy [SH])";

eclini['percutanea']=
"percutaneous [AB] OR topic [AB] AND (randomized controlled trial [PT] OR clinical trial [PT] OR drug therapy [SH])";

eclini['rectal']=
"rectal [AB] OR suppositor* [AB] AND (randomized controlled trial [PT] OR clinical trial [PT] OR drug therapy [SH])";

eclini['subcutanea']=
"subcutaneous [AB] AND (randomized controlled trial [PT] OR clinical trial [PT] OR drug therapy [SH])";

eclini['sublingual']=
"sublingual [AB] OR ocular [AB] OR ophthalm* [AB] OR nasal* [AB] AND (randomized controlled trial [PT] OR clinical trial [PT] OR drug therapy [SH])";

eclini['cualquiera']=
"(randomized controlled trial [PT] OR clinical trial [PT] OR drug therapy [SH])";

//excrecion
excre=new obj;
excre['inhalatoria']=
"inhal* [AB] OR nebuliz* [AB] AND (excretion [AB] OR eliminat* [AB])";

excre['intramuscular']=
"intramuscular [AB] AND (excretion [AB] OR eliminat* [AB])";

excre['intratecal']=
"intrathecal [AB] OR spinal [AB] AND (excretion [AB] OR eliminat* [AB])";

excre['intravaginal']=
"intravaginal [AB] OR vaginal [AB] AND (excretion [AB] OR eliminat* [AB])";

excre['intravenosa']=
"intravenous* [AB] OR infus* [AB] OR parenteral [AB] AND (excretion [AB] OR eliminat* [AB])";

excre['oral']=
"oral [AB] OR enteral [AB] AND (excretion [AB] OR eliminat* [AB])";

excre['percutanea']=
"percutaneous [AB] OR topic [AB] AND (excretion [AB] OR eliminat* [AB])";

excre['rectal']=
"rectal [AB] OR suppositor* [AB] AND (excretion [AB] OR eliminat* [AB])";

excre['subcutanea']=
"subcutaneous [AB] AND (excretion [AB] OR eliminat* [AB])";

excre['sublingual']=
"sublingual [AB] OR ocular [AB] OR ophthalm* [AB] OR nasal* [AB] AND (excretion [AB] OR eliminat* [AB])";

excre['cualquiera']=
"(excretion [AB] OR eliminat* [AB])";

//farmacocinetica
farmacoci=new obj;
farmacoci['inhalatoria']=
"inhal* [AB] OR nebuliz* [AB] AND (pharmacokinetic* [AB] OR distributi* [AB] OR pharmacokinetics [SH])";

farmacoci['intramuscular']=
"intramuscular [AB] AND pharmacokinetic* [AB] OR distributi* [AB] OR pharmacokinetics  [SH]";

farmacoci['intratecal']=
"intrathecal [AB] OR spinal [AB] AND (pharmacokinetic* [AB] OR distributi* [AB] OR pharmacokinetics [SH])";

farmacoci['intravaginal']=
"intravaginal [AB] OR vaginal [AB] AND (pharmacokinetic* [AB] OR distributi* [AB] OR pharmacokinetics [SH])";

farmacoci['intravenosa']=
"intravenous* [AB] OR infus* [AB] OR parenteral [AB] AND (pharmacokinetic* [AB] OR distributi* [AB] OR pharmacokinetics [SH])";

farmacoci['oral']=
"oral [AB] OR enteral [AB] AND (pharmacokinetic* [AB] OR distributi* [AB] OR pharmacokinetics [SH])";

farmacoci['percutanea']=
"percutaneous [AB] OR topic [AB] AND (pharmacokinetic* [AB] OR distributi* [AB] OR pharmacokinetics [SH])";

farmacoci['rectal']=
"rectal [AB] OR suppositor* [AB] AND (pharmacokinetic* [AB] OR distributi* [AB] OR pharmacokinetics [SH])";

farmacoci['subcutanea']=
"subcutaneous [AB] AND (pharmacokinetic* [AB] OR distributi* [AB] OR pharmacokinetics [SH])";

farmacoci['sublingual']=
"sublingual [AB] OR ocular [AB] OR ophthalm* [AB] OR nasal* [AB] AND (pharmacokinetic* [AB] OR distributi* [AB] OR pharmacokinetics [SH])";

farmacoci['cualquiera']=
"(pharmacokinetic* [AB] OR distributi* [AB] OR pharmacokinetics [SH])";

//farmacodinamia
farmacodi=new obj;
farmacodi['inhalatoria']=
"inhal* [AB] OR nebuliz* [AB] AND pharmacodynamic* [AB] OR (mechanism* [AB] AND action [AB])";

farmacodi['intramuscular']=
"intramuscular [AB] AND pharmacodynamic* [AB] OR (mechanism* [AB] AND action [AB])";

farmacodi['intratecal']=
"intrathecal [AB] OR spinal [AB] AND pharmacodynamic* [AB] OR (mechanism* [AB] AND action [AB])";

farmacodi['intravaginal']=
"intravaginal [AB] OR vaginal [AB] AND pharmacodynamic* [AB] OR (mechanism* [AB] AND action [AB])";

farmacodi['intravenosa']=
"intravenous* [AB] OR infus* [AB] OR parenteral [AB] AND pharmacodynamic* [AB] OR (mechanism* [AB] AND action [AB])";

farmacodi['oral']=
"oral [AB] OR enteral [AB] AND pharmacodynamic* [AB] OR (mechanism* [AB] AND action [AB])";

farmacodi['percutanea']=
"percutaneous [AB] OR topic [AB] AND pharmacodynamic* [AB] OR (mechanism* [AB] AND action [AB])";

farmacodi['rectal']=
"rectal [AB] OR suppositor* [AB] AND pharmacodynamic* [AB] OR (mechanism* [AB] AND action [AB])";

farmacodi['subcutanea']=
"subcutaneous [AB] AND pharmacodynamic* [AB] OR (mechanism* [AB] AND action [AB])";

farmacodi['sublingual']=
"sublingual [AB] OR ocular [AB] OR ophthalm* [AB] OR nasal* [AB] AND pharmacodynamic* [AB] OR (mechanism* [AB] AND action [AB])";

farmacodi['cualquiera']=
"pharmacodynamic* [AB] OR (mechanism* [AB] AND action [AB])";

//farmacologia
farmacolo=new obj;
farmacolo['inhalatoria']=
"inhal* [AB] OR nebuliz* [AB] AND (pharmacolog* [AB] OR pharmacology [SH])";

farmacolo['intramuscular']=
"intramuscular [AB] AND (pharmacolog* [AB] OR pharmacology [SH])";

farmacolo['intratecal']=
"intrathecal [AB] OR spinal [AB] AND (pharmacolog* [AB] OR pharmacology [SH])";

farmacolo['intravaginal']=
"intravaginal [AB] OR vaginal [AB] AND (pharmacolog* [AB] OR pharmacology [SH])";

farmacolo['intravenosa']=
"intravenous* [AB] OR infus* [AB] OR parenteral [AB] AND (pharmacolog* [AB] OR pharmacology [SH])";

farmacolo['oral']=
"oral [AB] OR enteral [AB] AND (pharmacolog* [AB] OR pharmacology [SH])";

farmacolo['percutanea']=
"percutaneous [AB] OR topic [AB] AND (pharmacolog* [AB] OR pharmacology [SH])";

farmacolo['rectal']=
"rectal [AB] OR suppositor* [AB] AND (pharmacolog* [AB] OR pharmacology [SH])";

farmacolo['subcutanea']=
"subcutaneous [AB] AND (pharmacolog* [AB] OR pharmacology [SH])";

farmacolo['sublingual']=
"sublingual [AB] OR ocular [AB] OR ophthalm* [AB] OR nasal* [AB] AND (pharmacolog* [AB] OR pharmacology [SH])";

farmacolo['cualquiera']=
"(pharmacolog* [AB] OR pharmacology [SH])";

//interacciones
intera=new obj;
intera['inhalatoria']=
"inhal* [AB] OR nebuliz* [AB] AND interac* [AB] OR Agonists [SH] OR Antagonist and Inhibitors  [SH]";

intera['intramuscular']=
"intramuscular [AB] AND (interac* [AB] OR Agonists [SH] OR Antagonist and Inhibitors [SH])";

intera['intratecal']=
"intrathecal [AB] OR spinal [AB] AND (interac* [AB] OR Agonists [SH] OR Antagonist and Inhibitors [SH])";

intera['intravaginal']=
"intravaginal [AB] OR vaginal [AB] AND (interac* [AB] OR Agonists [SH] OR Antagonist and Inhibitors [SH])";

intera['intravenosa']=
"intravenous* [AB] OR infus* [AB] OR parenteral [AB] AND (interac* [AB] OR Agonists [SH] OR Antagonist and Inhibitors [SH])";

intera['oral']=
"oral [AB] OR enteral [AB] AND (interac* [AB] OR Agonists [SH] OR Antagonist and Inhibitors [SH])";

intera['percutanea']=
"percutaneous [AB] OR topic [AB] AND interac* [AB] OR ag [SH] OR Antagonist and Inhibitors [SH]";

intera['rectal']=
"rectal [AB] OR suppositor* [AB] AND (interac* [AB] OR Agonists [SH] OR Antagonist and Inhibitors [SH])";

intera['subcutanea']=
"subcutaneous [AB] AND (interac* [AB] OR Agonists [SH] OR Antagonist and Inhibitors [SH])";

intera['sublingual']=
"sublingual [AB] OR ocular [AB] OR ophthalm* [AB] OR nasal* [AB] AND (interac* [AB] OR Agonists [SH] OR Antagonist and Inhibitors [SH])";

intera['cualquiera']=
"(interac* [AB] OR Agonists [SH] OR Antagonist and Inhibitors [SH])";

//metabolismo
metabo=new obj;
metabo['inhalatoria']=
"inhal* [AB] OR nebuliz* [AB] AND (metaboli* [AB] OR biotransformation [AB] OR metabolism [SH])";

metabo['intramuscular']=
"intramuscular [AB] AND (metaboli* [AB] OR biotransformation [AB] OR metabolism [SH])";

metabo['intratecal']=
"intrathecal [AB] OR spinal [AB] AND (metaboli* [AB] OR biotransformation [AB] OR metabolism [SH])";

metabo['intravaginal']=
"intravaginal [AB] OR vaginal [AB] AND (metaboli* [AB] OR biotransformation [AB] OR metabolism [SH])";

metabo['intravenosa']=
"intravenous* [AB] OR infus* [AB] OR parenteral [AB] AND (metaboli* [AB] OR biotransformation [AB] OR metabolism [SH])";

metabo['oral']=
"oral [AB] OR enteral [AB] AND (metaboli* [AB] OR biotransformation [AB] OR metabolism [SH])";

metabo['percutanea']=
"percutaneous [AB] OR topic [AB] AND (metaboli* [AB] OR biotransformation [AB] OR metabolism [SH])";

metabo['rectal']=
"rectal [AB] OR suppositor* [AB] AND (metaboli* [AB] OR biotransformation [AB] OR metabolism [SH])";

metabo['subcutanea']=
"subcutaneous [AB] AND (metaboli* [AB] OR biotransformation [AB] OR metabolism [SH])";

metabo['sublingual']=
"sublingual [AB] OR ocular [AB] OR ophthalm* [AB] OR nasal* [AB] AND (metaboli* [AB] OR biotransformation [AB] OR metabolism [SH])";

metabo['cualquiera']=
"(metaboli* [AB] OR biotransformation [AB] OR metabolism [SH])";

//toxicidad
toxi=new obj;
toxi['inhalatoria']=
"inhal* [AB] OR nebuliz* [AB] AND (toxic* [AB] OR toxicity [SH])";

toxi['intramuscular']=
"intramuscular [AB] AND (toxic* [AB] OR toxicity [SH])";

toxi['intratecal']=
"intrathecal [AB] OR spinal [AB] AND (toxic* [AB] OR toxicity [SH])";

toxi['intravaginal']=
"intravaginal [AB] OR vaginal [AB] AND (toxic* [AB] OR toxicity [SH])";

toxi['intravenosa']=
"intravenous* [AB] OR infus* [AB] OR parenteral [AB] AND (toxic* [AB] OR toxicity [SH])";

toxi['oral']=
"oral [AB] OR enteral [AB] AND (toxic* [AB] OR toxicity [SH])";

toxi['percutanea']=
"percutaneous [AB] OR topic [AB] AND (toxic* [AB] OR toxicity [SH])";

toxi['rectal']=
"rectal [AB] OR suppositor* [AB] AND (toxic* [AB] OR toxicity [SH])";

toxi['subcutanea']=
"subcutaneous [AB] AND (toxic* [AB] OR toxicity [SH])";

toxi['sublingual']=
"sublingual [AB] OR ocular [AB] OR ophthalm* [AB] OR nasal* [AB] AND (toxic* [AB] OR toxicity [SH])";

toxi['cualquiera']=
"(toxic* [AB] OR toxicity [SH])";

var i,strategy='',precision='';
for(i=0;i<f.strategy.length;i++){
if(f.strategy[i].checked){strategy=f.strategy[i].value;break;}
}

for(i=0;i<f.precision.length;i++){
if(f.precision[i].checked){precision=f.precision[i].value;break;}
}

if(strategy==''||precision=='')
return false;

var cond=biodis[strategy];
if(precision=="eadversos"){
cond=eadver[strategy];
}

if(precision=="eclinicos"){
cond=eclini[strategy];
}

if(precision=="excrecion"){
cond=excre[strategy];
}

if(precision=="farmacocinetica"){
cond=farmacoci[strategy];
}

if(precision=="farmacodinamia"){
cond=farmacodi[strategy];
}

if(precision=="farmacologia"){
cond=farmacolo[strategy];
}

if(precision=="interacciones"){
cond=intera[strategy];
}

if(precision=="metabolismo"){
cond=metabo[strategy];
}

if(precision=="toxicidad"){
cond=toxi[strategy];
}

f.term.value="("+f.termClinical.value+" [TI]) AND ("+cond+")"

return true;

}
//-->