// $Rev: 38927 $ $URL: svn://subversion.gepro/kokes/_verze_branch/10.50/Kokes/web/files/common.js $ 
// ------------------------------------------------------------------------------------------------------
// Obecna funkce pro ovladani formularu a vystupnich tabulek uzivatelskych modulu.
// ------------------------------------------------------------------------------------------------------
// Konstanty pro bitovy prepinac cinnosti prezentacni funkce
if( null!=parent && null!=parent.language) {
 top.SYSTEM_SHOW_SAME    = 0x1;    // vystup do stejneho okna, default do noveho
 top.SYSTEM_SHOW_FORM    = 0x2;    // vystup do formulare, default je do tabulky
 top.SYSTEM_TABLE_CHECK  = 0x4;    // polozky v tabulce s checkboxy
 top.SYSTEM_TABLE_RADIO  = 0x8;    // polozky v tabulce s radioboxy
 top.SYSTEM_TABLE_SCROLL = 0x10;   // cela tabulka naraz, bez listovani
 top.SYSTEM_DRAW_COOR    = 0x20;   // zobrazovat znacky na souradnice
 top.SYSTEM_DRAW_ENTITY  = 0x40;   // zobrazovat metafile
 top.SYSTEM_DRAW_DIALOG  = 0x80;   // zobrazovat dialog pro multivyber
 top.SYSTEM_DLG_NOTSHOW  = 0x100;  // nezobrazovat tlacitko pro kresleni
}

// ------------------------------------------------------------------------------------
// Funkce pro obarveni parcelnich cisel podle vysledku hledani z databaze
// do mapy. Funkce se vola ze stranky s prezentaci vysledku, pomoci tlacitka "Zobraz"
// Parametr flg urcuje je prebran z funkce SysPresent
// ------------------------------------------------------------------------------------
function SysPaint(module, flg, f)
{
 var Souradnice="";
 var oznacene = new Array(1); 
 var citozn=0;
 var i, j, k;
 var tooltip=0;
 if( !(flg&top.SYSTEM_SHOW_FORM) && (flg&top.SYSTEM_TABLE_CHECK) || (flg&top.SYSTEM_TABLE_RADIO))
 {
  // Hledani oznacenych položek
  var x=f.elements.OZNAC;
  
  if( null == x.length) {
   if( x.checked) {
	oznacene[citozn++] = 0;
	}
  }
  else {
   for(i=0; i<x.length; i++) {
	  if ( x[i].checked) {
		 oznacene[citozn++]=i*module.SysOffset;
		 if(flg&top.SYSTEM_TABLE_RADIO)
		  break;
	  }
   }
  }  
	if( citozn > 0)
	{
	 if( !(flg&top.SYSTEM_TABLE_SCROLL))
	 {
	  // Prepocet indexu podle nalistovane stranky
		for( i=0; i < citozn; i++)
		 oznacene[i] += module.SysCitac;
	 }
	}
	else
	{
	 alert("Žádná položka nebyla označena !");
	 return;
	}
 } // Hledani oznacenych
 if( module.SysIdTyp != 0 && module.SysIdVal != "")
 {
  /* Vytvoreni pole s hodnotami */
  Souradnice = "~#";
	for( i=0, j=0; i<module.SysArray.length-1; i+=module.SysOffset)
	{
   if( citozn != 0)
	 {
		if( oznacene[j] == i)
		 j++;
    else
		 continue;
	 }
	 if( Souradnice != "~#")
	  Souradnice += "~";
   Souradnice += (module.SysIdVal.substring(1,module.SysIdVal.length)+"="+module.SysArray[i+module.SysBound-1]+"#");
   if( citozn != 0 && (flg&top.SYSTEM_TABLE_RADIO))
	  break;
	}
	/* Volani zobrazovací funkce */
  var draw = 0;
  if( !(flg&top.SYSTEM_DRAW_COOR) && !(flg&top.SYSTEM_DRAW_ENTITY) && !(flg&top.SYSTEM_DRAW_DIALOG))
   draw = App.IDE_SHOW_COOR | App.IDE_SHOW_ENTITY | App.IDE_SHOW_DIALOG;
  if( flg&top.SYSTEM_DRAW_COOR) draw |= App.IDE_SHOW_COOR;
  if( flg&top.SYSTEM_DRAW_ENTITY) draw |= App.IDE_SHOW_ENTITY;
  if( flg&top.SYSTEM_DRAW_DIALOG) draw |= App.IDE_SHOW_DIALOG;
  var Hexlist="";
  if( (null!=module.SysTema&&module.SysTema!="") || (null!=module.SysObl&&module.SysObl!="") ||
	  (null!=module.SysGrp&&module.SysGrp!="") || (null!=module.SysLrs&&module.SysLrs!=""))
   Hexlist=top.ROOT.SetTemataOblasti(1,(null!=module.SysObl&&module.SysObl!="")?module.SysObl:"",
	                                   (null!=module.SysTema&&module.SysTema!="")?module.SysTema:"",
                                   	   (null!=module.SysGrp&&module.SysGrp!="")?module.SysGrp:"",
	                                   (null!=module.SysLrs&&module.SysLrs!="")?module.SysLrs:"");
  App.ShEntity( draw, module.SysIdVal, Souradnice, Math.abs(SysInfo.SetDetail), SysInfo.killpnt, 
  SysInfo.bod_b, SysInfo.znak, Hexlist);
 } // Zobrazení podle identifikace
 else
 {
	if( "undefined"!=typeof(module.SysT) && eval(module.SysT)!=0) tooltip=1;
	/* Citac v cyklu se zvetsuje o 5, protože je 5 vybranych hodnot. Souradnice x je na 3 pozici
     a souřadnice y na 4 pozici */
  for(i=0, j=0, k=0; i< module.SysArray.length; i+=module.SysOffset)
  {
   if( citozn != 0)
	 {
	  if( oznacene[j] == i)
		 j++;
    else
		 continue;
	 }
   if( k!=0)
	  Souradnice += "|";
	 Souradnice += (module.SysArray[i+module.SysX-1]+"|"+module.SysArray[i+module.SysY-1]);
   if( eval(tooltip)==1)
		Souradnice += ("|"+module.SysArray[i+module.SysT-1]);
	 k++;
   if( citozn != 0 && (flg&top.SYSTEM_TABLE_RADIO))
	  break;
  } /* for */
	App.SetPntColor(Souradnice,true,
	                SysInfo['killpnt']==1?true:false,
				    (eval(tooltip)!=0)?true:false,Math.round( SysInfo.znak/100), 
					SysInfo.bod_b, Math.round( SysInfo.znak/10)%10, SysInfo.znak%10,
					eval( Math.abs( SysInfo.SetDetail)));
 } // Zobrazeni podle souradnic
} /* SysPaint */

// ------------------------------------------------------------------------------------
// Funkce pro prezentaci vysledku hledani z databaze a obarveni vyhledanych zaznamu
// do mapy.
// Parametr flg urcuje, jak se ma vystupovat
// top.SYSTEM_SHOW_SAME    = 0x1;  // vystup do stejneho okna, default do noveho
// top.SYSTEM_SHOW_FORM    = 0x2;  // vystup do formulare, default je do tabulky
// top.SYSTEM_TABLE_CHECK  = 0x4;  // polozky v tabulce s checkboxy
// top.SYSTEM_TABLE_RADIO  = 0x8;  // polozky v tabulce s radioboxy
// top.SYSTEM_TABLE_SCROLL = 0x10; // cela tabulka naraz, bez listovani
// ------------------------------------------------------------------------------------
function SysPresent(module,flg)
{ 
 if( module.SysStream.substring(0,3) == "###")
 {
  KON.Println("    "+module.SysStream.substring(3,module.SysStream.length),"#FF4040");
  return;
 }
 /* Chybove hlaseni od databazoveho rozhrani na konsoli */
 if( module.SysStream.substring(0,2) == "##")
 {
  KON.Println("    "+module.SysStream.substring(2,module.SysStream.length),"#FF4040");
  return;
 }
 module.SysCitac=0;  // Vynulovani citace zaznamu
 /* Prenos streamu s hodnotami oddelenymi strednikem do pole */
 module.SysArray = module.SysStream.split(';');
 if( !(flg&top.SYSTEM_SHOW_SAME)) /* Vytvoreni noveho okna */
 {
  var par = "width="+module.SysWidth+",height="+module.SysHeight+",resizable";
	if( flg&top.SYSTEM_TABLE_SCROLL)
	 par += ",scrollbars=yes";
	OW.SysOutput = window.open("","Výstup",par) ;
 }
 top.FCE.SysGenerateOutput(module,flg);
} /* MM_Present */

// ------------------------------------------------------------------------------------
// Generovani vystupni tabulky, podle vyberu v module.SysArray a podle globalnich 
// promennych module.SysCitac, module.SysLines, module.SysColumns, module.SysOffset
// ------------------------------------------------------------------------------------
function SysGenerateOutput(module,flg)
{
 var k;
 if( !(flg&top.SYSTEM_SHOW_SAME))
	k = OW.SysOutput.document;  /* Jeho zpristupneni */
 else {
  if( null == eval("OW."+module.SysModule.toUpperCase()+""))
	 k = eval("TEMA."+module.SysModule.toUpperCase()+".document");  /* Zpristupneni teze stranky jako je vyberovy formular */
  else
	 k = eval("OW."+module.SysModule.toUpperCase()+"."+module.SysModule.toUpperCase()+".document");  /* Zpristupneni teze stranky jako je vyberovy formular */
 }
 
Max = module.SysCitac+module.SysOffset; // pro formular
//if( !(flg&top.SYSTEM_SHOW_FORM))
//{
 if( (module.SysArray.length > module.SysCitac+module.SysLines*module.SysOffset) && /*!(flg&top.SYSTEM_SHOW_FORM) &&*/ !(flg&top.SYSTEM_TABLE_SCROLL))
  Max = module.SysCitac+module.SysLines*module.SysOffset;
 else 
  Max = module.SysArray.length;
//}

 var ArrHead = module.SysHead.split( ';');
 k.open();
 /* Generovani pocatecni (fixni) casti stranky */
 k.writeln("<html><head><title>Výstup</title>");
 k.writeln("<link rel='stylesheet' href='"+parent.CSSName+"' type='text/css'>");  

 if( !(flg&top.SYSTEM_SHOW_SAME))
  k.writeln("</head><body class='cli'>");
 else
  k.writeln("</head><body class='cli' onload=\"window.focus();top.App.Identif( "+module.SysIdTyp+", '"+module.SysIdVal+"','');\">");
 k.writeln("<form class='CLI'>");

 k.writeln("<table class='CLI' width='100%'><tr><td class='CLI'><div align='center'>"+module.SysNadpis+"</div>");
 k.write("<div class='nadpis'>");
 if( module.SysArray.length != 0)
  k.write(" ["+((module.SysCitac/module.SysOffset)+1)+"-"+(Max/module.SysOffset)+" z "+(module.SysArray.length/module.SysOffset)+"]");
 k.writeln("</div>");
 k.writeln("<table width='95%' align='center' cellpadding='0' cellspacing='0'><tr><td>");
 k.writeln("<table align='center' width='100%' border='1'>");

 if( !(flg&top.SYSTEM_SHOW_FORM))
 {
  /* Prvni radek tabulky se pouzije pro nadpisy sloupcu. Souradnice se nebudou vypisovat, slouzi pouze
     pro zobrazeni do mapy */
  k.write("<tr class='theader'>");
  if( (flg&top.SYSTEM_TABLE_CHECK) || (flg&top.SYSTEM_TABLE_RADIO))
   k.write("<td class='theader'>&nbsp;</td>");
  for(j=0;j<module.SysColumns;j++)
   k.write("<td class='theader'>"+ArrHead[j]+"</td>");
  k.writeln("</tr>");
 } // Pouze pro trabulku
 
 /* Vypisovani jednotlivych radku a sloupcu tabulky */
 for(i=module.SysCitac; i< Max;)
 {
  if( !(flg&top.SYSTEM_SHOW_FORM))
	{
	 k.writeln("<tr>");
   if( (flg&top.SYSTEM_TABLE_CHECK) || (flg&top.SYSTEM_TABLE_RADIO))
	  k.write("<td><input type="+((flg&top.SYSTEM_TABLE_CHECK)?"'CHECKBOX' class='checkbox'":"'RADIO' class='radio'")+" name='OZNAC'></td>");
	}
  for(j=0;j<module.SysColumns;j++)
  {
   if( (flg&top.SYSTEM_SHOW_FORM))
	 {
	  k.write("<tr><td class='title'>"+ArrHead[j]+"</td><td>");
	 }
	 else
    k.write("<td>");
   for( l=0; l<module.Obrs.length; l++)
   {
    if( module.Obrs[l]==(j+1)) 
     break;
   } // for
   if( l != module.Obrs.length)
   {
	  if( module.SysArray[i+j]!="")
	   k.write("<a href='"+module.ObrDir+ "/"+module.SysArray[i+j]+"' target='_blank'><img src='"+module.ObrDir+ "/"+module.SysArray[i+j]+"' width='"+module.ObrWidth+"' height='"+module.ObrHeight+"'></a>");
    else
	   k.write("&nbsp;");
   } // if l != Obrs.length
   else 
   { // Obrs.length == 0
    for( l=0; l<module.Docs.length; l++)
	  {
	   if( module.Docs[l]==(j+1)) 
	    break;
    } // for
    if( l != module.Docs.length)
	  {
	   if( module.SysArray[i+j]!="")
	    k.write("<a href='"+module.DocDir+ "/"+module.SysArray[i+j]+"' target='_blank'>"+module.SysArray[i+j]+"</a>");
     else
	    k.write("&nbsp;");
	 } // if l != Docs.length
	else // Docs.length == 0
	{
   if( module.SysArray[i+j]!="" && module.SysArray[i+j]!="null")
	  k.write(module.SysArray[i+j]);
   else
    k.write("&nbsp;");
	}
 } // Obrs.length == 0
 k.writeln("</td>");
 if( (flg&top.SYSTEM_SHOW_FORM))
  k.writeln("</tr>");
 } // for j
 i+=module.SysOffset;
 if( !(flg&top.SYSTEM_SHOW_FORM))
  k.writeln("</tr>");
 } // for i
 if( !(flg&top.SYSTEM_SHOW_FORM) && (Max-module.SysCitac < module.SysLines*module.SysOffset) && !(flg&top.SYSTEM_TABLE_SCROLL))
 {
  for( i=Max;i<module.SysCitac+module.SysLines*module.SysOffset;)
  {
   k.writeln("<tr>");
   if( (flg&top.SYSTEM_TABLE_CHECK) || (flg&top.SYSTEM_TABLE_RADIO))
	  k.writeln("<td>&nbsp;</td>");
   for(j=0;j<module.SysColumns;j++)
	  k.writeln("<td>&nbsp;</td>");
   i+=module.SysOffset;
	 k.writeln("</tr>");
	}
 }
 k.writeln("</table>");

 k.writeln("</td></tr>");
 if( /*!(flg&top.SYSTEM_SHOW_FORM) &&*/ !(flg&top.SYSTEM_TABLE_SCROLL))
 {
  k.writeln("<tr><td>");
  /* Generovani tlacitek pro pohyb v rozsahlych vyberech */
  k.writeln("<table align='center' width='100%'><tr>");
  if( !(flg&top.SYSTEM_SHOW_SAME)) // nove okno
  {
   if( null == eval("OW."+module.SysModule.toUpperCase()+"")) // z tematu
	 {
    k.writeln("<td align='left'><input class='btn' type='button' "+(module.SysCitac > 0?"":"DISABLED")+" onclick='opener.top.Module.SysCitac=0;top.opener.FCE.SysGenerateOutput(opener.top.Module,"+flg+");' value='|<' width='20' style='width:20px'></td>");
    k.writeln("<td align='center'><input class='btn' type='button' "+(module.SysCitac > 0?"":"DISABLED")+" onclick='opener.top.Module.SysCitac-=opener.top.Module.SysLines*opener.top.Module.SysOffset;top.opener.FCE.SysGenerateOutput(opener.top.Module,"+flg+");' value='<' width='20' style='width:20px'></td>");
    k.writeln("<td align='center'><input class='btn' type='button' "+(module.SysArray.length > module.SysCitac+module.SysLines*module.SysOffset?"":"DISABLED")+" onclick='opener.top.Module.SysCitac+=opener.top.Module.SysLines*opener.top.Module.SysOffset;top.opener.FCE.SysGenerateOutput(opener.top.Module,"+flg+");' value='>' width='20' style='width:20px'></td>");
    k.writeln("<td align='right'><input class='btn' type='button' "+(module.SysArray.length > module.SysCitac+module.SysLines*module.SysOffset?"":"DISABLED")+" onclick='opener.top.Module.SysCitac=(opener.top.Module.SysArray.length-(opener.top.Module.SysArray.length%(opener.top.Module.SysLines*opener.top.Module.SysOffset)))==opener.top.Module.SysArray.length?(opener.top.Module.SysArray.length-(opener.top.Module.SysLines*opener.top.Module.SysOffset)):(opener.top.Module.SysArray.length-(opener.top.Module.SysArray.length%(opener.top.Module.SysLines*opener.top.Module.SysOffset)));top.opener.FCE.SysGenerateOutput(opener.top.Module,"+flg+");' value='>|' width='20' style='width:20px'></td>");
	 }
	 else // z noveho
	 {
    k.writeln("<td align='left'><input class='btn' type='button' "+(module.SysCitac > 0?"":"DISABLED")+" onclick='opener.OW."+module.SysModule.toUpperCase()+".Module.SysCitac=0;top.FCE.SysGenerateOutput(opener.OW."+module.SysModule.toUpperCase()+".Module,"+flg+");' value='|<' width='20' style='width:20px'></td>");
    k.writeln("<td align='center'><input class='btn' type='button' "+(module.SysCitac > 0?"":"DISABLED")+" onclick='opener.OW."+module.SysModule.toUpperCase()+".Module.SysCitac-=opener.OW."+module.SysModule.toUpperCase()+".Module.SysLines*opener.OW."+module.SysModule.toUpperCase()+".Module.SysOffset;top.FCE.SysGenerateOutput(opener.OW."+module.SysModule.toUpperCase()+".Module,"+flg+");' value='<' width='20' style='width:20px'></td>");
    k.writeln("<td align='center'><input class='btn' type='button' "+(module.SysArray.length > module.SysCitac+module.SysLines*module.SysOffset?"":"DISABLED")+" onClick='opener.OW."+module.SysModule.toUpperCase()+".Module.SysCitac+=opener.OW."+module.SysModule.toUpperCase()+".Module.SysLines*opener.OW."+module.SysModule.toUpperCase()+".Module.SysOffset;top.FCE.SysGenerateOutput(opener.OW."+module.SysModule.toUpperCase()+".Module,"+flg+");' value='>' width='20' style='width:20px'></td>");
    k.writeln("<td align='right'><input class='btn' type='button' "+(module.SysArray.length > module.SysCitac+module.SysLines*module.SysOffset?"":"DISABLED")+" onClick='opener.OW."+module.SysModule.toUpperCase()+".Module.SysCitac=(opener.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length-(opener.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length%(opener.OW."+module.SysModule.toUpperCase()+".Module.SysLines*opener.OW."+module.SysModule.toUpperCase()+".Module.SysOffset)))==opener.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length?(opener.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length-(opener.OW."+module.SysModule.toUpperCase()+".Module.SysLines*opener.OW."+module.SysModule.toUpperCase()+".Module.SysOffset)):(opener.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length-(opener.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length%(opener.OW."+module.SysModule.toUpperCase()+".Module.SysLines*opener.OW."+module.SysModule.toUpperCase()+".Module.SysOffset)));top.FCE.SysGenerateOutput(opener.OW."+module.SysModule.toUpperCase()+".Module,"+flg+");' value='>|' width='20' style='width:20px'></td>");
	 }
  }
  else // puvodni okno
  {
   if( null == eval("OW."+module.SysModule.toUpperCase()+"")) // v tematu
	 {
    k.writeln("<td align='left'><input class='btn' type='button' "+(module.SysCitac > 0?"":"DISABLED")+" onclick='top.Module.SysCitac=0;top.FCE.SysGenerateOutput(top.Module,"+flg+");' value='|<' width='20' style='width:20px'></td>");
    k.writeln("<td align='center'><input class='btn' type='button' "+(module.SysCitac > 0?"":"DISABLED")+" onclick='top.Module.SysCitac-=top.Module.SysLines*top.Module.SysOffset;top.FCE.SysGenerateOutput(top.Module,"+flg+");' value='<' width='20' style='width:20px'></td>");
    k.writeln("<td align='center'><input class='btn' type='button' "+(module.SysArray.length > module.SysCitac+module.SysLines*module.SysOffset?"":"DISABLED")+" onclick='top.Module.SysCitac+=top.Module.SysLines*top.Module.SysOffset;top.FCE.SysGenerateOutput(top.Module,"+flg+");' value='>' width='20' style='width:20px'></td>");
    k.writeln("<td align='right'><input class='btn' type='button' "+(module.SysArray.length > module.SysCitac+module.SysLines*module.SysOffset?"":"DISABLED")+" onclick='top.Module.SysCitac=(top.Module.SysArray.length-(top.Module.SysArray.length%(top.Module.SysLines*top.Module.SysOffset)))==top.Module.SysArray.length?(top.Module.SysArray.length-(top.Module.SysLines*top.Module.SysOffset)):(top.Module.SysArray.length-(top.Module.SysArray.length%(top.Module.SysLines*top.Module.SysOffset)));top.FCE.SysGenerateOutput(top.Module,"+flg+");' value='>|' width='20' style='width:20px'></td>");
	 }
	 else // v novem okne
	 {
    k.writeln("<td align='left'><input class='btn' type='button' "+(module.SysCitac > 0?"":"DISABLED")+" onclick='top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysCitac=0;top.ROOT.SysGenerateOutput(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module,"+flg+");' value='|<' width='20' style='width:20px'></td>");
    k.writeln("<td align='center'><input class='btn' type='button' "+(module.SysCitac > 0?"":"DISABLED")+" onclick='top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysCitac-=top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysLines*top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysOffset;top.ROOT.SysGenerateOutput(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module,"+flg+");' value='<' width='20' style='width:20px'></td>");
    k.writeln("<td align='center'><input class='btn' type='button' "+(module.SysArray.length > module.SysCitac+module.SysLines*module.SysOffset?"":"DISABLED")+" onclick='top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysCitac+=top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysLines*top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysOffset;top.ROOT.SysGenerateOutput(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module,"+flg+");' value='>' width='20' style='width:20px'></td>");
    k.writeln("<td align='right'><input class='btn' type='button' "+(module.SysArray.length > module.SysCitac+module.SysLines*module.SysOffset?"":"DISABLED")+" onclick='top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysCitac=(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length-(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length%(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysLines*top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysOffset)))==top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length?(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length-(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysLines*top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysOffset)):(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length-(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysArray.length%(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysLines*top.ROOT.OW."+module.SysModule.toUpperCase()+".Module.SysOffset)));top.ROOT.SysGenerateOutput(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module,"+flg+");' value='>|' width='20' style='width:20px'></td>");
	 }
  }
  k.writeln("</tr></table>");
  k.writeln("</td></tr>");
 } // Ne pro scroll
 k.writeln("<tr><td>");
 
 /* Generovani tlacitek pro zobrazeni bodu do mapy a pro opusteni vyberového formulare */
 k.writeln("<table align='center' width='100%'><tr>");
 if( !(flg&top.SYSTEM_SHOW_SAME)) // Nove okno
 {
  if( null == eval("OW."+module.SysModule.toUpperCase()+"")) { // z tematu
	 if( !(flg&top.SYSTEM_DLG_NOTSHOW))
	  k.writeln("<td align='center'><input class='btn' type='button' value='Zobraz' onclick='opener.top.FCE.SysPaint(opener.top.Module,"+flg+",this.form);' width='60' style='width:60px'></td>");
	 }
  else { // z noveho okna
	 if( !(flg&top.SYSTEM_DLG_NOTSHOW))
	  k.writeln("<td align='center'><input class='btn' type='button' value='Zobraz' onclick='top.FCE.SysPaint(opener.OW."+module.SysModule.toUpperCase()+".Module,"+flg+",this.form);' width='60' style='width:60px'></td>");
	 }
  k.writeln("<td align='center'><input class='btn' type='button' value='Konec' onclick='opener.OW.SysOutput.close();' width='60' style='width:60px'></td>");
  if( flg&top.SYSTEM_TABLE_CHECK) {
   k.writeln("<td align='center'><input class='btn' type='button' value='Vše' onclick='opener.top.SysCheck(this.form,1);' width='60' style='width:60px'></td>");
   k.writeln("<td align='center'><input class='btn' type='button' value='Žádné' onclick='opener.top.SysCheck(this.form,0);' width='60' style='width:60px'></td>");
	}
 }
 else
 { // Puvodni okno
  if( null == eval("OW."+module.SysModule.toUpperCase()+""))
	{ // Ve funkcnim panelu
	 if( !(flg&top.SYSTEM_DLG_NOTSHOW))
    k.writeln("<td align='center'><input class='btn' type='button' value='Zobraz' onclick='top.FCE.SysPaint(top.Module,"+flg+",this.form);' width='60' style='width:60px'></td>");
   k.writeln("<td align='center'><input class='btn' type='button' value='Zpět' onclick='top.TEMA."+module.SysModule.toUpperCase()+".document.location=\"/OUT/HTML/files/pasport/"+module.SysModule.toUpperCase()+".htm\";' width='60' style='width:60px'></td>");
   if( flg&top.SYSTEM_TABLE_CHECK) {
    k.writeln("<td align='center'><input class='btn' type='button' value='Vše' onclick='top.SysCheck(this.form,1);' width='60' style='width:60px'></td>");
    k.writeln("<td align='center'><input class='btn' type='button' value='Žádné' onclick='top.SysCheck(this.form,0);' width='60' style='width:60px'></td>");
	 }
  }
  else 
	{ // V novem okne 
	 if( !(flg&top.SYSTEM_DLG_NOTSHOW))
    k.writeln("<td align='center'><input class='btn' type='button' value='Zobraz' onclick='top.FCE.SysPaint(top.ROOT.OW."+module.SysModule.toUpperCase()+".Module,"+flg+",this.form);' width='60' style='width:60px'></td>");
	 k.writeln("<td align='center'><input class='btn' type='button' value='Zpět' onclick='top.ROOT.OW."+module.SysModule.toUpperCase()+"."+module.SysModule.toUpperCase()+".document.location=\"/OUT/HTML/files/pasport/"+module.SysModule.toUpperCase()+".htm\";' width='60' style='width:60px'></td>");
   if( flg&top.SYSTEM_TABLE_CHECK) {
    k.writeln("<td align='center'><input class='btn' type='button' value='Vše' onclick='top.ROOT.SysCheck(this.form,1);' width='60' style='width:60px'></td>");
    k.writeln("<td align='center'><input class='btn' type='button' value='Žádné' onclick='top.ROOT.SysCheck(this.form,0);' width='60' style='width:60px'></td>");
	 }
	}
 }
 k.writeln("</tr></table>");
 k.writeln("</td></tr></table>");
 k.writeln("</td></tr></table>");

 /* Generovani koncove (fixni) casti stranky */
 k.writeln("</form></body></html>");
 /* Uzavreni generovane stranky */
 if( !(flg&top.SYSTEM_SHOW_SAME))
 {
  setTimeout('OW.SysOutput.document.close();',SysInfo.CloseTM);   
  OW.SysOutput.focus();
 }
 else {
  if( null == eval("OW."+module.SysModule.toUpperCase()+""))
   setTimeout("TEMA."+module.SysModule.toUpperCase()+".document.close();",SysInfo.CloseTM);   
  else
   setTimeout("OW."+module.SysModule.toUpperCase()+"."+module.SysModule.toUpperCase()+".document.close();",SysInfo.CloseTM);   
	}
 return;
} /* SysGenerateOutput */

/* Funkce pro oznaceni popr. odznaceni vsech zaznamu */
function SysCheck(f, vlajka)
{
 var x=f.elements.OZNAC;
  
 if( null == x.length) {
  x.checked=(vlajka?true:false);
	}
 else {
  for(i=0; i<x.length; i++)
   x[i].checked=(vlajka?true:false);
  }  
} // Oznac/Odznac vse

// ------------------------------------------------------------------------------------
// Obecna funkce pro zvyraznovani pro externi pasporty
// IdVal:    Hodnoty pro identifikaci (napr. IY). Je-li prazdny retezec, berou se v idstream x,y
// IdStream: hodnoty ziskane identifikaci ~#Y=xxx#~Y=yyy# nebo pole souradnic oddelene carkami x1,y1,x2,y2
// flg:      vlajka pro urceni zpusobu prezentace, 1 = znacka, 2 = meta, 4 = dialog
// dodelat moznost tooltipu pro identifikovane entity
// ------------------------------------------------------------------------------------
function WebPaint(IdVal,IdStream,flg)
{
 	/* Volani zobrazovaci funkce */
  var draw = 0;
	if( !(flg&top.SYSTEM_DRAW_COOR) && !(flg&top.SYSTEM_DRAW_ENTITY) && !(flg&top.SYSTEM_DRAW_DIALOG))
	 draw = App.IDE_SHOW_COOR | App.IDE_SHOW_ENTITY | App.IDE_SHOW_DIALOG;
	if( flg&top.SYSTEM_DRAW_COOR) draw |= App.IDE_SHOW_COOR;
	if( flg&top.SYSTEM_DRAW_ENTITY) draw |= App.IDE_SHOW_ENTITY;
	if( flg&top.SYSTEM_DRAW_DIALOG) draw |= App.IDE_SHOW_DIALOG;
 if( IdVal!="")
 {
	App.ShEntity( draw, IdVal, IdStream, Math.abs(SysInfo.SetDetail), 
	SysInfo.killpnt, SysInfo.bod_b, SysInfo.znak,"");
 } // Zobrazeni podle identifikace
 else
 {
	App.SetPntColor(IdStream,true,
	                SysInfo['killpnt']==1?true:false,
				    false,Math.round( SysInfo.znak/100), 
					SysInfo.bod_b, Math.round( SysInfo.znak/10)%10, SysInfo.znak%10,
					eval( Math.abs( SysInfo.SetDetail)));
 } // Zobrazeni podle souradnic
 App.focus(); 
} /* WebPaint */

// Pomocna funkce pro ruseni selektu
function RemoveSelect( select)
{
 for(i=select.length-1; i >= 0 ; i--)
 {
  if( prohlizec.IE)
   select.remove(i);
   else
	 select.options[i]=null;
 }
 return;
} // RemoveSelect

// Pomocna funkce pro vytvoreni selektu
function CreateSelect( okno, select, pole, ofset, ofText, ofCode1, ofCode2, ofCode3, ofCode4, ofCode5, ofCode6)
{
 for(i=0,j=0; i<pole.length; i+=ofset,j++)
 {
  if( j>=500) {
   alert("Výběr je příliš obsáhlý. Zobrazeno je jen prvních 500 položek.\nZadejte jeden nebo několik počátečních znaků z názvu.");
   break;
  }
  hodnota=pole[i+ofCode1];
  if( null!=ofCode2) hodnota+=(";"+pole[i+ofCode2]);
  if( null!=ofCode3) hodnota+=(";"+pole[i+ofCode3]);
  if( null!=ofCode4) hodnota+=(";"+pole[i+ofCode4]);
  if( null!=ofCode5) hodnota+=(";"+pole[i+ofCode5]);
  if( null!=ofCode6) hodnota+=(";"+pole[i+ofCode6]);

  var oOption = okno.document.createElement("OPTION");
  oOption.text = (pole[i+ofText]!=" 0"?pole[i+ofText]:" -");
  oOption.value = hodnota;
  select.options.add(oOption);
 }
 select.selectedIndex = 0;
 return;
} // CreateSelect
/* Testovani navratovych stavu */
function TestMsg( List, Msg)
{
 if( null == List || List == ";")
 {
  KON.Println(Msg,"#FF4040");
  return 1;
 }
 /* Chybove hlaseni */
 if( List.substring(0,3) == "###")
 {
  KON.Println("    "+List.substring(3,List.length),"#FF4040");
  return 3;
 }
 /* Chybove hlaseni */
 if( List.substring(0,2) == "##")
 {
  KON.Println("    "+List.substring(2,List.length),"#FF4040");
  return 2;
 }
 return 0
} // TestMsg

function trim(str) {
 return str.replace(/^\s*|\s*$/g,"");
}
function IsNumeric(strString) {
 var strValidChars = "0123456789.-";
 var strChar;
 var blnResult = true;
 if (strString.length == 0) return false;
 for (i = 0; i < strString.length && blnResult == true; i++)
 {
  strChar = strString.charAt(i);
  if (strValidChars.indexOf(strChar) == -1) 
   blnResult = false;
 }
return blnResult;
}

//String.prototype.trim = function() {
//  return this.replace(/(^\s*)|(\s*$)/g, "")
//}