var dat1;
//alert(parent.frame3.document.body.scrollHeight + 4);
//****************************************************************
function rowf2(){
  if (parent.document.all.FS2.rows != parent.frame3.document.body.scrollHeight + 4 + ", *") {
      parent.document.all.FS2.rows = parent.frame3.document.body.scrollHeight + 4 + ", *";
  }
}
//****************************************************************
function rowcol(){
  var loc=document.location.pathname;
  if  (loc.indexOf ("dn_find.htm", loc.length-12) != -1 )
    {parent.parent.document.all.FS1.cols="50%,*";
    parent.document.all.FS2.rows="1,*"
    }
  else
    {parent.parent.document.all.FS1.cols="*,1";
    parent.document.all.FS2.rows="50,*";
    rowf2
    }
}
//20
//****************************************************************
function pickup(){
  var sel = document.selection.createRange();
  parent.frame1.f1.text1.value=sel.text;
  document.selection.empty();
  seek1("Всё");
}
//****************************************************************
function pickup2(){
  var sel = document.selection.createRange();
  if (sel.text.length>1) {
   parent.frame1.f1.text1.value=sel.text;
   document.selection.empty();
   seek1("Всё");
   window.event.returnValue = false;
  }
}
//****************************************************************
  document.oncontextmenu = pickup2;
//****************************************************************
function seek1(flt) {
//alert(text2.innerHTML); //);
  parent.frame2.Mak2.DATAPAGESIZE=15;
  var txtLo = parent.frame1.f1.text1.value.toLowerCase( );
  if (txtLo.length<2) {
    alert("Слишком мало букв. Надо не меньше двух");
    return false;
  }
  if (txtLo.substr(txtLo.length-1,1)==" "){
  txtLo=txtLo.substr(0,txtLo.length-1);
  }
  var xrezult = "<table><CAPTION ALIGN=top>Искать можно: 1)&nbsp;двойным щелчком по слову в таблице; 2)&nbsp;щелчком правой кнопкой мыши по выделенному тексту</CAPTION><tr><td class=not1>Строка в рекл. объявлении</td><td class=not1><td class=not1><td class=not1>Объяв.</td>";
  var i=0; 
  var j=0;
  parent.frame2.Mak1.innerHTML = "";
  if (flt != "Всё") {
    parent.frame2.fnd1.FilterColumn = "tipStr";
    parent.frame2.fnd1.FilterValue  = flt;
    parent.frame2.fnd1.FilterCriterion  = "=";
    }
  else {
    parent.frame2.fnd1.FilterColumn = ""
  }
  parent.frame2.fnd1.reset();
  var rst = parent.frame2.fnd1.recordset;
  rst.moveFirst();
  var Mak4 = "";
//40
  while (!rst.eof){
    j++;
    window.status = "Среди " +j + " строк найдено '" + txtLo + "': " + i ;
    var strLo = rst.fields(0).value.toLowerCase();
    if (strLo.indexOf(txtLo)>=0){  
      i++;
      if (Mak4 == "") {Mak4 = rst.fields(3).value; }
      xrezult+= "<tr onDblClick='pickup()'><td class=fnd>" + rst.fields(0).value  + "<td class=fnd><right>"  + rst.fields(1).value + "<td class=fnd>"  + rst.fields(2).value + "<td class=fnd><button class=ann OnClick=filter1(\"" + rst.fields(3).value + "\")>" + rst.fields(3).value + "</td>";
    }
   rst.moveNext();
  }
    var flt1="";
    switch (flt) {
      case "Товар": flt1 = "Все товары 'ДН'"; break;
      case "Адрес": flt1 = "Все адреса фирм";break;
      case "Клиент": flt1 = "Все наименования фирм";break;
      default:      flt1 = "Все строки 'ДН'";break;
    }
  if (i>0) {
    parent.frame1.text2.innerHTML = "Щёлкните по любой кнопке с номером рекламного объявления (последняя колонка в таблице), чтобы увидеть всё объявление в правом окне.</font>";
    parent.frame1.tuta.innerHTML = "Найдено '" + txtLo + "': " + i;
    parent.frame1.fnd2.innerHTML =  xrezult + "</table>";
    filter1(Mak4);
  }
  else {
  parent.frame2.Mak1.innerHTML = flt1;
  parent.frame2.Mak3.innerHTML = "";
  parent.frame1.tuta.innerHTML = "";
  parent.frame1.fnd2.innerHTML = "";
  parent.frame1.text2.innerHTML = "<Font color=#990000>Очень жаль, но текст '" + txtLo + "' не найден. Попробуйте уменьшить количество букв для поиска или нажать кнопку 'Всё'.</font>";
  }
  //alert(flt+"/"+flt1);
}
//****************************************************************
function filter1(Mak) {
  //rowcol
  parent.parent.document.all.FS1.cols="50%,*";
//80
  parent.parent.frame2.fnd1.FilterColumn = "Maket";
  parent.parent.frame2.fnd1.FilterValue  = Mak;
  parent.parent.frame2.fnd1.FilterCriterion  = "=";
  parent.parent.frame2.fnd1.reset();
  dat1 = dat2();
  parent.parent.frame2.Mak1.innerHTML = "Строки объявления " + Mak + " (" + dat1 + ")";
  var loc=document.location.pathname;
  if  ((loc.indexOf ("dn_find.htm", loc.length-12)!=-1) & (parent.parent.frame2.img_dnsmtp.checked==0)) { 
      parent.parent.frame2.Mak3.innerHTML = "<IMG SRC=" + "http://dnirkutsk.nm.ru/dn_tovar.img/" + Mak + ".png ALT="  + Mak + ".png onerror='Mak3absent()'>";
    }
  else {
    parent.parent.frame2.Mak3.innerHTML = "";
  }
  window.status = "Деловая неделя - рекламное объявление " + Mak;
}
//****************************************************************
function dat2() {
  var rst = parent.parent.frame2.fnd1.recordset;
  var dat3, dat4;
//100
  if (rst.eof && rst.bof) {
    return("");
  }
  rst.moveFirst();
  dat3 = rst.fields(7).value;
  while (!rst.eof){
    if (rst.fields(7).value > dat3) {
      dat3 = rst.fields(7).value;
    }
    rst.moveNext();
  }
  dat1 = "";
//115
  dat4= new Date(dat3);
  dat1+= ((dat4.getDate() < 10) ? "0" : "") + dat4.getDate();
  dat1+= ((dat4.getMonth()+1 < 10) ? ".0" : ".") + (dat4.getMonth()+1);
  dat1+= ((dat4.getYear() < 10) ? ".0" : ".") + dat4.getYear();
  return(dat1);
}
//****************************************************************
function sort(m) {
  if (fnd1.recordset.recordcount>15) {
    var m5=Mak5.onclick;
    var m6=Mak6.onclick;
    var n2= nav2.innerHTML;
    var n1= nav1.innerHTML;
    var dps=Mak2.dataPageSize;
  } 
    var sc=fnd1.SortColumn;
  fnd1.SortColumn = m;
  if (m!=sc) {
    fnd1.SortAscending = true;
//120 
    }
  else {
    if (fnd1.SortAscending == true) {
      fnd1.SortAscending = false;
    }
    else {
      fnd1.SortAscending = true;
    }
  }
  fnd1.reset();
  if (fnd1.recordset.recordcount>15) {
    Mak2.dataPageSize=dps;
    nav2.innerHTML = n2;
    nav1.innerHTML = n1;
    Mak5.onclick = m5;
    Mak6.onclick = m6;
  }
}
//***************************************
function pagesiz1() {
  if (fnd1.recordset.recordcount>15) {
    Mak2.dataPageSize =15;
    nav1.innerHTML="<BUTTON  style='width: 7em' OnClick= prn1()>Для печати</BUTTON>&nbsp;<span id=nav11><INPUT TYPE=BUTTON VALUE='<<<' ONCLICK=Mak2.previousPage()><i style='font-size:90%'> Листать </i><INPUT TYPE=BUTTON VALUE='>>>' OnClick=Mak2.nextPage()></span><IMG id='Mak6' style='cursor: hand;' SRC='plushor.png' align=absmiddle>";
    nav2.innerHTML="<span id=nav21><INPUT TYPE=BUTTON VALUE='<<<' ONCLICK=Mak2.previousPage()><i style='font-size:90%'> Листать </i><INPUT TYPE=BUTTON VALUE='>>>' OnClick=Mak2.nextPage()></span><IMG id='Mak5' style='cursor: hand;' SRC='plushor.png' align=absmiddle>";
    Mak5.src="plusver2.png";
    Mak5.onclick=pagesiz100;
    Mak6.src="plusver2.png";
    Mak6.onclick=pagesiz100;
  }
  else {
    nav1.innerHTML="<BUTTON  style='width: 7em' OnClick= prn1()>Для печати</BUTTON>";
    nav2.innerHTML="";
  }
//alert(nav2.innerHTML);
}
//***************************************
function pagesiz100() {
  if (fnd1.recordset.recordcount<101) {
    Mak2.dataPageSize =0;
    nav21.style.visibility="hidden";
    nav11.style.visibility="hidden";
  }
  else {
    Mak2.dataPageSize =100;
    nav21.style.visibility="visible";
    nav11.style.visibility="visible";
  }
  Mak5.src="svern.png";
  Mak5.onclick=pagesiz1;
  Mak6.src="svern.png";
  Mak6.onclick=pagesiz1;
}
//***************************************
function Mak3absent() {
  Mak3.innerHTML="";
}
//***************************************
function reloadall(){
  parent.location.reload();
}
//***************************************
function prn1() {
var win1=window.open();
win1.document.write("<TITLE> Деловая неделя - "+Mak1.innerText+"</TITLE>");
win1.document.write("<SCRIPT  LANGUAGE='JavaScript' src='program'></SCRIPT>");
win1.document.write(document.all.item(6).outerHTML); 
win1.document.write(Mak2.outerHTML);
win1.document.close();
}
//***************************************
function sha(){
  Mak2.dataPageSize =0;
}