function validera()
{

	if((vflt.Titel_000_data.value == "") || 
	   (vflt.Titel_000_data.value == " "))
	{
		alert("Ange titel eller d\366.");
		return false;
	}
	if(vflt.tryckt.value != 'A')
	   {
	      alert("Lugna dej, ett tryck räcker."); 
	      return false;
	   }
	vflt.tryckt.value = 'B';
	return true;
}	

function modrow(flt, ide)
{
	p1 = 0;
	p2 = flt.indexOf(ide, p1);  /* letar i flt efter förekomst av ide */
//	alert("modrow flt=" + flt.length + "/" + flt + " ide=" + ide.length
//             + "/" + ide + " p2=" + p2);
	while (p2 > 0)
	{
		p2 += ide.length;
		var newf = flt.substring(0, p2)
			+ "a"
			+ flt.substring(p2);
//		alert("p1=" + p1 + " p2=" + p2 +
//			"  newf=" + newf.length + "/" + newf);
		p1 = p2;
		flt = newf;
		p2 = flt.indexOf(ide, p1)
	}
		
	return flt;

}
function clval(flt)
{
	  /* Man måste ta bort även value= för att det ska bli ok */
	  /* "Visa källa" ljuger som bara den */

	p1 = flt.indexOf("text value=");
	p1 += 5;
	p2 = flt.indexOf(" name=", p1);
	if ((p1 > 10) && (p2 > p1))
	{
		var newf = flt.substring(0, p1);
		newf += flt.substring(p2);
		return newf;
	}
	return flt;
}		
function addrow(obj)
{
	var olds = cat_code.innerHTML;
	var start = "<!-- Start " + obj.name + " -->";
	var slut  = "<!-- Slut " + obj.name + " -->";
	var adds = "";
//	alert("start=" + start + "/" + start.length + 
//		", slut=" + slut + "/" + slut.length); 
	sof = olds.indexOf(start);
	eof = olds.indexOf(slut);
	eof += slut.length;
//	alert("sof=" + sof + " eof=" + eof);
	adds = olds.substring(sof, eof);

//	modify obj.name to maintain order between rows for succesive + clicks
	adds = modrow(adds, obj.name);
//	alert ("efter modrow adds="+ adds.length + "/" + adds);

//      clear value from contents
	adds = clval(adds);

//  	modify following rows by adding a 
	var svans = olds.substring(eof);
	svans = modrow(svans, obj.name);

	/***
	alert("start=" + olds.substring(0, eof).length + "/"  
	      + olds.substring(0, eof));
	alert("adds=" + adds.length + "/" + adds);
	alert("svans=" + svans.length + "/" + svans);
	***/

		
	cat_code.innerHTML = olds.substring(0, eof)
		           + adds
			   + svans;
}
function form_submit(url)
{
   if (validera())
   {
      document.vflt.action=url;
      document.vflt.method="POST";
      document.vflt.target=this.name;
      document.vflt.submit();
   }
}