function substr(sarta,p,c)
{
var r="";
if (sarta){
 var j=p+c;
 for (i=p;i<j;i++) r=r+sarta.substring(i,i+1);
}
return r;
}

function len(sarta)
{
var r=0;
if (sarta) r=sarta.length;
return r;
}

function instr(start,string1,string2)
{
 r=strpos(string1,string2,start); 
 return r;
}

function strpos(string1,string2,start)
{
var i=start; 
var j=0; 
var z=0; 
var m=len(string1); 
var r=0;
var k=0;
for (i ; i < m ; i++)
{
j=0; k=i; 
z=len(string2);

while ( substr(string1,k,1) == substr(string2,j,1) & j < z )
{
 k++;j++;
}

if (j==len(string2)) break;
}
if (j==len(string2))
  r=i+1;
else
  r=0;
return r;
}

function left(sarta,i)
{
var r="";
r=sarta.substring(0,i-1);
return r;
}

function trim(sarta)
{
var i=0;
var r="";var l="";
for (i=0;i<len(sarta);i++){
 l=sarta.substring(i,i+1); //alert("i="+i+" l="+l);
 if (l==" ") l="%20";
 if (l!=" ") r=r+l;
// alert(r);
}
return r;
}