/*
record.pl params:
l - location (city id)
c - course id
d - start date (yyyy-mm-dd)
v - vendor id
*/

badcharz=new Array('/','\\','#','(',')','"',"'");

cdat=new Date();
cd=cdat.getDate();
cm=cdat.getMonth()+1;
cy=cdat.getYear();if(cy<1900)cy=1900+cy;

function isdmore(y,m,d)
{
 ret=false;
 if((y>cy)||(y==cy&&m>cm)||(y==cy&&m==cm&&d>=cd))ret=true;
 return(ret);
}

function isBad(c)
{
 var i,r=false;
 for(i=0;i<badcharz.length;i++)if(c==badcharz[i])r=true;
 if(c>='À')r=true; //Cyrillc 'A'
 return r;
}

function clearTitle(s)
{
 var i,n;
 n=s.indexOf('(');
 if(n>0)s=s.substring(0,n);
 for(i=0;i<s.length;i++){
  if(isBad(s.charAt(i))){s=s.substring(0,i)+s.substring(i+1,s.length);i--;}
  if(s.charAt(i)=='+')s=s.substring(0,i)+'-'+s.substring(i+1,s.length);
 }
 for(i=0;i<s.length;i++)if(s.charAt(i)==' ')
  if((i>0)&&(s.charAt(i-1)!='_'))s=s.substring(0,i)+'_'+s.substring(i+1,s.length);
  else{s=s.substring(0,i)+s.substring(i+1,s.length);i--;}
 for(1;s.length>0&&s.charAt(s.length-1)=='_';s=s.substring(0,s.length-1));
 //return s.toUpperCase();
 return s;
}

function c2l(s)
{
 var i,j,n,l,cc,lc,tmp;
 cc=new Array('À','Á','Â','Ã','Ä','Å','¨','Æ',  'Ç','È','É','Ê','Ë','Ì','Í','Î','Ï','Ð','Ñ','Ò','Ó','Ô','Õ','Ö', '×', 'Ø', 'Ù', 'Ú','Û','Ü','Ý', 'Þ', 'ß','à','á','â','ã','ä','å', '¸', 'æ','ç','è','é','ê','ë','ì','í','î','ï','ð','ñ','ò','ó','ô','õ', 'ö', '÷', 'ø', 'ù','ú','û','ü','ý','þ', 'ÿ', ' ');
 lc=new Array('a','b','v','g','d','e','yo','zh','z','i','y','k','l','m','n','o','p','r','s','t','u','f','h','ts','ch','sh','sch','','y', '','e','yu','ya','a','b','v','g','d','e','yo','zh','z','i','y','k','l','m','n','o','p','r','s','t','u','f','h','ts','ch','sh','sch','','y', '','e','yu','ya','_');
 l=s.length;
 n=cc.length;
 for(i=0;i<l;i++){
  for(j=0;j<n;j++){
   if(s.charAt(i)==cc[j]){
    s=s.substring(0,i)+lc[j]+s.substring(i+1,s.length);
    i+=lc[j].length-1;
    l+=lc[j].length-1;
 }}}
 return s;
}

function i_constr(i,corp,cod,ttl,lng,prc,theme,uin,opn,cid,dlist)
{
 this.i=i;
 this.corp=corp;
 this.cod=cod;
 this.ttl=ttl;
 this.lng=lng;
 this.prc=prc;
 this.theme=theme;
 this.uin=uin;
 this.opn=opn;
 this.cid=cid;
 this.dlist=dlist;
 return(this);
}

function write_tabhead()
{
 var d=document,i,j;
 d.write('<tr bgcolor="#DBE2F2"><td bgcolor="#FFCC00"><img border="0" src="/pic/1.gif" width="20" height="1" /><b>Êóðñ</b></td><td bgcolor="#FFCC00" align="center"><b>Äíåé</b></td><td bgcolor="#FFCC00" align="center"><b>Öåíà</b></td>');
 for(j=0;j<numdayz;j++){
  if(wendz[j]==1)tstl=' class="wend"'; else tstl='';
  day=j+1;if(day<10)day='0'+day;
  d.write('<td align="center"'+tstl+'><font size="1" style="font-size:10px;">'+day+'</font></td>');
 }
 if(ed==1)d.write('<td>&nbsp;</td>');
 d.write('</tr>');
}

function write_tab()
{
 var d=document,i,j,k,fold,cont,by,bm,bd,cdir='';
 i=dte.indexOf('-');
 by=parseInt(dte.substring(0,i));
	if(dte.charAt(i+1)=='0')i++;	
 bm=parseInt(dte.substring(i+1,dte.length));
 
 for(i=0;i<sn;i++)
 {
  d.write('<tr>');
  if(tab[i].corp&&tab[i].corp!=''){
   cdir=c2l(tab[i].corp.toLowerCase())+'/';
   if(ed==1){cspn=colspan;vend='';}
        else{cspn=colspan-3;vend='<td colspan="3" bgcolor="#DBE2F2"><img border="0" src="/pic/1.gif" width="20" height="1" /><b><a href="/courses/'+cdir+'">'+tab[i].corp+'</a></b></td>';}
   if(!tab[i].theme||tab[i].theme=='')thm='&nbsp;';else thm=tab[i].theme;
   d.write(vend+'<td colspan="'+cspn+'" bgcolor="#FFFFFF" align="center"><B>'+thm+'</B></td>');
  }
  else{
   d.write('<td bgcolor="#DBE2F2"><img border="0" src="/pic/1.gif" width="40" height="1" /><a title="'+tab[i].ttl+'" href="/courses/'+cdir+clearTitle(tab[i].cod)+'.shtml">'+tab[i].cod+'</a></td><td bgcolor="#DBE2F2" align="center">'+tab[i].lng+'</td><td bgcolor="#DBE2F2" align="center">'+tab[i].prc+'</td>');
   fold=0;
   for(j=0;j<numdayz;j++){
    if(tab[i].dlist[j]==1){
     csp=1;
     for(k=j+1;(k<numdayz)&&(tab[i].dlist[k]==1);k++)csp++;
    }
    if(wendz[j]==1)tstl='';else tstl=' bgcolor="#FFFFFF"';
    if(tab[i].dlist[j]==1){
     if(fold==0){
      if(tab[i].opn=='z')cont='';
      else if(tab[i].opn!='x'&&isdmore(by,bm,j+1))cont='<a href="/cgi-bin/record.pl?t=cv&city='+city+'&cid='+tab[i].uin+'&sdt='+dte+'-'+(j+1)+'&corp='+tab[i].cid+'"><img border="0" width="16" height="16" alt="çàïèñàòüñÿ íà êóðñ" src="/pic/folder.gif" /></a>';
      else cont='<img border="0" width="16" height="16" alt="çàïèñàòüñÿ óæå íåëüçÿ" src="/pic/folderc.gif" />';
      fold=1;
     }
     else cont='&nbsp;';
     tstl=' colspan="'+csp+'" bgcolor="#FFCC00" align="center"';j=k-1;
    }
    else cont='&nbsp;';
    d.write('<td'+tstl+'>'+cont+'</td>');
   }
   if(ed==1)d.write('<td align="right"><input type="button" value="Óäàë." onClick="delrow('+tab[i].i+')" /> <input type="button" value="Op/Cl/Em" onClick="opcl('+tab[i].i+')" /> <input type="button" value="Up" onClick="mv(0,'+tab[i].i+')" /> <input type="button" value="Dn" onClick="mv(1,'+tab[i].i+')" /></td>');
  }
  d.write('</tr>');
 }
 if(sn==0)d.write('<tr><td colspan="'+colspan+'" align="center">íåò ðàñïèñàíèÿ</td></tr>');
}