// klientske funkce pro praci s formulari
function SetFrm(form,par)	//nastavi pole SET ve formulari a odesle jej (SET urcuje co se ma s daty udelat)
{
	if(par.substr(0,3)=='DEL') if(!confirm('Opravdu si přejete vymazat záznam?')) return false;
	document.forms[form].SET.value=par;
	document.forms[form].submit();
}
function MoveItems(from,to,all)	//presun vybranych polozek mezi selekty, je-li zadan parametr all=true, presouvaji se vsechny, from a to jsou objekty typu Select()
{
	for(i=0;i<from.length;i++) if (from.options[i].selected || all)  {
		var opt = new Option(from.options[i].text,from.options[i].value);
		to.options[to.length]=opt;
		from.options[i]= null;
		i=-1;
	}
}
function SetDel()   //sestavi seznam objektu pro vymazani
{
	if(confirm('Opravdu chcete zrušit označené objekty?')) {
	for(i=0;i<OPTFORM.Del.length;i++) if(OPTFORM.Del[i].checked)
		OPTFORM.DelList.value=OPTFORM.DelList.value+IIf(OPTFORM.DelList.value.length>0,',','')+OPTFORM.Del[i].value;
	SetFrm('DEL');
}}

function SetList(src,trgt,c)   //sestavi univezalni seznam a vlozi do formulare - nahrazuje vsechny pripitomely predchozi funkce
{
	for(i=0;i<src.length;i++)
		trgt.value=trgt.value+IIf(trgt.value.length>0,',','')+src.options[i].value;
	SetFrm(c);
}
function Ciselnik(tbl,col,resultcol,val,idcol)
{
	var args = new Object();
	if (showModalDialog('ciselnikx.php?TBL='+tbl+'&COL='+col+'&IDCOL='+idcol+'&VAL='+val,args,"dialogWidth:200px;dialogHeight:200px;status:0;help:0")) {
		F1[resultcol].value=args.Result;
	}
}