function getXMLHttpRequest()
{
  var request = false;

  try {
    request = new XMLHttpRequest();
  } catch(err1) {
    try {
      request = new ActiveXObject('Msxml2.XMLHTTP');
    } catch(err2) {
      try {
        request = new ActiveXObject('Microsoft.XMLHTTP');
      } catch(err3) {
        request = false;
      }
    }
  }
  return request;
}
var r,czekaj,czekaj1;
r = getXMLHttpRequest();
czekaj = getXMLHttpRequest();
czekaj1 = getXMLHttpRequest();


function processResponse()
{
  var el;
  if (czekaj.readyState == 4) {
    if (czekaj.status == 200) {
      //alert('Tekst z serwera: ' + r.responseText);
    //el = document.getElementById('komunikat');
    //el.innerHTML ='';
    komunikat('','x');
    el = document.getElementById('srodekID');
    el.innerHTML = czekaj.responseText
    };
  };
}

function processResponse1()
{
  var el,typ;
  if (czekaj.readyState == 4) {
    if (czekaj.status == 200) {
      //alert('Tekst z serwera: ' + r.responseText);
    //el = document.getElementById('komunikat');
    //el.innerHTML ='';
    typ=czekaj.responseText[0];
    
    komunikat(czekaj.responseText.substring(1,czekaj.responseText.length),typ);

    };
  };
}


function wymiar_x()
{
    return screen.width;
}

function komunikat(tresc,typ)
{
   var el;
    el = document.getElementById('komunikat');
    el.innerHTML = '<br>'+tresc+'<br>&nbsp; ';
    switch(typ)
    {
        case 'u':
            el.style.border = '3px solid red';
            el.style.background = '#fef4e0';
         break;
        case 'i':
            el.style.border = '3px solid green';
            el.style.background = '#fef4e0';
         break;
        case 'x':
            el.style.border = '';
            el.style.background = '';
            el.innerHTML ='';
            break;


    }

    return true;

}

function strtodate1(s)
{

    ok1=0;

    
try
 {
   d1=s.substring(0,4);
   d2=s.substring(5,7)-0;
   d3=s.substring(8,10)-0;
   
   if ((d2>12) ||(d2<1)) ok1=2;
   if (d3<1)ok1=3;
   if (ok1==0)
   {
   switch(d2)
   {
       case 1:
       if(d3>31)ok1=4;
       break;
        case 2:
       if(d3>29)ok1=4;
       break;
        case 3:
       if(d3>31)ok1=4;
       break;
        case 4:
       if(d3>30)ok1=4;
       break;
        case 5:
       if(d3>31)ok1=4;
       break;
        case 6:
       if(d3>30)ok1=4;
       break;
        case 7:
       if(d3>31)ok1=4;
       break;
        case 8:
       if(d3>31)ok1=4;
       break;
        case 9:
       if(d3>30)ok1=4;
       break;
        case 10:
       if(d3>31)ok1=4;
       break;
        case 11:
       if(d3>30)ok1=4;
       break;
        case 12:
       if(d3>31)ok1=4;
       break;
   }
   }
   

   
   var dt= new Date();
   dt.setHours(0);
   dt.setFullYear(d1);
   dt.setMonth(d2-1);
   dt.setDate(d3);
   //alert("data="+s+" : "+dt.getDate()+"/"+dt.getMonth());
   
 }
catch(err)
{


     ok1=1;
 }
switch(ok1)
{
    case 1: alert ("Wadliwy format daty YYYY-MM-DD");break;
    case 2: alert ("Liczba miesiąca nieprawidłowa");break;
    case 3: alert ("Liczba dnia mniejszy od zera");break;
    case 4: alert ("Liczba dnia w tym miesiącu jest niepoprawna");break;
    
}

 
 
 
if (ok1==0)return dt;
return false;
}
function test_daty_rejestr(form,dp1)
{
/*
test poprawności wypełnienia daty dla nowego okresu rozliczeniowego
dodanie, modyfikacja okresu dotępu użytkownika do sieci
form -forma
typ - N - brak dotychczasowych przypisań okresów
K - Kolejny dodanie nowego okresu
P - poprawa okresu ( poprawiany może być tylko ostani okrese );

*/

var ddk = new Date();
var ddp = new Date();
var ddp1 = new Date();
dk='';
dp='';
dk=form.data_do.value;
if ((form.data_do.value=='') || (form.data_do.value=='0000-00-00'))dk='2100-01-01';

dp=form.data_od.value;
if (dp1=='') dp1='2000-01-01';


ddp=strtodate1(dp);
ddk=strtodate1(dk);
ddp1=strtodate1(dp1);

//alert ("ddp="+ddp.toString()+"\n\r ddp1="+ddp1.toString());

if (ddp && ddk && ddp1)
{
// formaty dat poprawne

   poprawnosc=0;
   if (ddk<ddp)poprawnosc=1;
   if (ddp<=ddp1)poprawnosc=2;
}
else
{
    poprawnosc=3;
}

switch(poprawnosc)
{
    case 1:
    alert("Data końcowa musi być większa od daty początkowej !");
    break;
    case 2:
    alert ("Data początkowa musi być większa od daty początkowej poprzedniego okresu \n\r tj. od "+dp1);
    //alert ("ddp="+ddp.toString()+"\n\r ddp1="+ddp1.toString());
    break;
    
}

if (poprawnosc==0)return true;
form.data_od.focus();
return false;
}

function test_kas()
{
if (!confirm("Kliknij <OK> aby potwierdzić kasowanie ")){return false;}
return true;
}
function test_del_ok(form)
{
ok=0;
if (form.rok.value==''){ok=1;}
if (form.mies.value==''){ok=2;}

switch (ok)
{
    case 1: komunikat("Wybierz rok","u");
            form.rok.focus();
            break;
    case 2: komunikat("Wybierz miesiąc","u");
            form.mies.focus();
            break;

}
if (ok!=0){return false;}

if (!confirm("Kliknij <OK> aby potwierdzić kasowanie okresu rozliczeniowego")){return false;}
return true;
}

function P_taryfy(form)
{
id=0;
ok=0;
lp=0;
for (i=0; i<form.length;i++)
{
  if (form[i].type=="radio")
       {if (form[i].checked==true){lp++;id=i;}}
}
if(lp==0){ok=1;}
//alert ("ok");
switch (ok)
{
 case 1: komunikat("Nie wybrano żadnej taryfy","u");
         //form.data_od.focus();
         break;
}


if(ok==0)
{
 if (confirm("Kliknij <OK> aby potwierdzić zmianę taryfy "))
 {
 s='ajaxp.php?z=taryfa&id='+form[id].value+'&id_kontr='+form.id_kontr.value+'&id_last='+form.id_last.value;
 czekaj_na_odp(s);
 if(form.pls.value=='Tak'){czekaj_na_odp_nowait('ajaxp.php?z=pl_system');}
 }

}

//if (ok!=0){return false;}
//return true;
return false;

}

function P_faktura(form)
{
id=0;
ok=0;
lp=0;
for (i=0; i<form.length;i++)
{
  if (form[i].type=="radio")
       {if (form[i].checked==true){lp++;id=i;}}
}
if(lp==0){ok=1;}
//alert ("ok");
switch (ok)
{
 case 1: komunikat("Nie wybrano żadnej formy doatarczenia faktury","u");
         //form.data_od.focus();
         break;
}


if(ok==0)
{
 if (confirm("Kliknij <OK> aby potwierdzić zmianę sposobu dostarczania fatury "))
 {
 s='ajaxp.php?z=faktura&id='+form[id].value+'&id_kontr='+form.id_kontr.value+'&email='+form.email.value;
 czekaj_na_odp(s);
 //if(form.pls.value=='Tak'){czekaj_na_odp_nowait('ajaxp.php?z=pl_faktury');}
 }

}

//if (ok!=0){return false;}
//return true;
return false;

}


function test_stawki(form)
{

ok=0;
if(form.nazwa.value==''){ok=1;}
if(form.cena.value==''){ok=2;}

//alert ("ok");
switch (ok)
{
 case 1: komunikat("Pole nazwa musi być wypełnione","u");
         form.nazwa.focus();
         break;
 case 2: komunikat("Pole cena musi być wypełnione","u");
         form.cena.focus();
         break;
}

if (ok!=0){return false;}
return true;
}


function test_sieci(form)
{
    var ok;
    ok=0;
    if (form.nazwa.value=='')ok=1;
    if (ok==1){komunikat('Pole <b>Nazwa sieci</b> nie może być puste','u');form.nazwa.focus();}else{return true;}

    return false;
}

function test_kontrahenta(form)
{
    var ok;
    ok=0;
    if (form.nazwisko.value=='')ok=1;
    if (form.imie.value=='')ok=2;
    r.open('GET', 'ajaxtest.php?z=ip_kontrahent&ip='+form.ip.value+'&siec='+form.siec.value+'&id='+form.id.value, false);
    //r.onreadystatechange = processResponse;
    r.send(null);
    if (r.responseText!='')ok=3;
    switch (ok)
    {
        case 1:komunikat('Pole <b>Nazwisko</b> nie może być puste','u');
               form.nazwisko.focus();
               break;
        case 2:komunikat('Pole <b>Imię</b> nie może być puste','u');
               form.imie.focus();
               break;
        case 3:komunikat(r.responseText,'u');
               form.imie.focus();
               break;
               
    }
    if (ok==0){return true;}

    return false;
}
function test_adresy(form)
{
    var ok;
    ok=0;
    if (form.ip_od.value=='')ok=1;
    if (form.ip_do.value=='')ok=2;
    if (form.maska.value=='')ok=3;
    if (form.brama.value=='')ok=4;
    

    switch (ok)
    {
        case 1:komunikat('Pole <b>Początek IP</b> nie może być puste','u');
               form.ip_od.focus();
               break;
        case 2:komunikat('Pole <b>Koniec IP</b> nie może być puste','u');
               form.ip_do.focus();
               break;
        case 3:komunikat('Pole <b>Maska</b> nie może być puste','u');
               form.maska.focus();
               break;
        case 4:komunikat('Pole <b>Brama</b> nie może być puste','u');
               form.brama.focus();
               break;
    }
    if (ok==0){return true;}

    return false;
}

function test_urzadzenia(form)
{
    var ok;
    ok=0;
    if (form.nazwa.value=='')ok=1;
    if (form.ip.value=='')ok=2;


    switch (ok)
    {
        case 1:komunikat('Pole <b>Nazwa</b> nie może być puste','u');
               form.nazwa.focus();
               break;
        case 2:komunikat('Pole <b>IP</b> nie może być puste','u');
               form.ip.focus();
               break;
    }
    if (ok==0){return true;}

    return false;
}



function test_naliczania(form,strona)
{
    var ok;
    ok=0;
    d1=form.rok.value * 1;
    if((d1<1999) || (d1>2050))ok=1;
    switch (ok)
    {
        case 1:komunikat('Pole <b>Rok</b> zawiera niepoprawne dane','u');
               form.rok.focus();
               break;

    }
    //return false;
    //if (ok==0){return true;}
    if(ok==0)
    {
    str=strona+'&rok='+form.rok.value+'&mies='+form.mies.value+'&data_nal='+form.data_nal.value+'&termin_zapl='+form.termin_zapl.value;
    czekaj_na_odp(str);
    }

    return false;
}
function czekaj_na_odp_nowait(strona)
{
    var el;
    el = document.getElementById('srodekID');
    el.innerHTML='';
    //komunikat('&nbsp;<img src="'+lokalizacja+'admin/img/pre.gif" width="40" height="40" alt="" />&nbsp;&nbsp;Czekaj...','i');
    s='<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0" width="70" height="70" id="czekaj" align="middle">';
    s+='<param name="allowScriptAccess" value="sameDomain" />';
    s+='<param name="movie" value="czekaj.swf" /><param name="quality" value="best" /><param name="wmode" value="transparent" /><param name="bgcolor" value="#ece9d8" />';
    s+='<embed src="'+lokalizacja+'admin/img/czekaj.swf" quality="best" wmode="transparent" bgcolor="#ece9d8" width="70" height="70" name="czekaj" align="middle" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />';
    s+='</object>&nbsp;&nbsp;Czekaj..';
    komunikat('&nbsp;'+s,'i');
    czekaj1.open('GET', strona, true);
    //czekaj.onreadystatechange = processResponse;
    czekaj1.send(null);
 }

function czekaj_na_odp(strona)
{
    var el;
    el = document.getElementById('srodekID');
    el.innerHTML='';
    //komunikat('&nbsp;<img src="'+lokalizacja+'admin/img/pre.gif" width="40" height="40" alt="" />&nbsp;&nbsp;Czekaj...','i');
    s='<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0" width="70" height="70" id="czekaj" align="middle">';
    s+='<param name="allowScriptAccess" value="sameDomain" />';
    s+='<param name="movie" value="czekaj.swf" /><param name="quality" value="best" /><param name="wmode" value="transparent" /><param name="bgcolor" value="#ece9d8" />';
    s+='<embed src="'+lokalizacja+'../admin/img/czekaj.swf" quality="best" wmode="transparent" bgcolor="#ece9d8" width="70" height="70" name="czekaj" align="middle" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />';
    s+='</object>&nbsp;&nbsp;Czekaj..';
    komunikat('&nbsp;'+s,'i');
    czekaj.open('GET', strona, true);
    czekaj.onreadystatechange = processResponse;
    czekaj.send(null);
 }
 function czekaj_na_odp1(strona)
{
    var el;
    el = document.getElementById('srodekID');
    el.innerHTML='';
    //komunikat('&nbsp;<img src="'+lokalizacja+'admin/img/pre.gif" width="40" height="40" alt="" />&nbsp;&nbsp;Czekaj...','i');
    s='<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0" width="70" height="70" id="czekaj" align="middle">';
    s+='<param name="allowScriptAccess" value="sameDomain" />';
    s+='<param name="movie" value="czekaj.swf" /><param name="quality" value="best" /><param name="wmode" value="transparent" /><param name="bgcolor" value="#ece9d8" />';
    s+='<embed src="'+lokalizacja+'admin/img/czekaj.swf" quality="best" wmode="transparent" bgcolor="#ece9d8" width="70" height="70" name="czekaj" align="middle" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />';
    s+='</object>&nbsp;&nbsp;Czekaj..';
    komunikat('&nbsp;'+s,'i');
    czekaj.open('GET', strona, true);
    czekaj.onreadystatechange = processResponse1;
    czekaj.send(null);
 }

function ajax_int_vat1(form,strona)
{
   var FA1,FA2;
   FA1=(form.FA1.checked)?'F':'';
   FA2=(form.FA2.checked)?'N':'';
   str=strona+'&rok='+form.rok.value+'&mies='+form.mies.value+'&FA1='+FA1+'&FA2='+FA2;
   czekaj_na_odp(str);
   return false;
}
function update_ajax(strona)
{
    czekaj_na_odp1(strona);
}