var common_owneridcode = 900;
var common_path = './common/';
var currentdomain = 'http://'+document.domain;

var nodate = -2209161600*1000; //=30-12-1899
var nodateString = '30-12-1899';

var defaulteinddatum = new Date(Date.UTC(2037,11,31,0,0,0,0));

var ladenmededeling = "De gegevens worden geladen. Even geduld a.u.b. ...";

var secsperhour = 3600;
var secsperday = 24*secsperhour; //=86400;

var esList = 0;
var esView = 1;
var esEdit = 2;
var esNew  = 3;

function Record(id) {
  this.id=id;
  this.data='';
  this.tag=0;
}


//veldtype-constantes
var vtString      =  0;
var vtGetal       =  1;
var vtValuta      =  2; //echte waarde is dbwaarde/1000
var vtDatum       =  3; //dd-mm-jjjj
var vtDatumDag    =  4; //wd dd-mm-jjjj
var vtDatumTijd   =  5; //dd-mm-jjjj hh:nn:ss
var vtDatumMinuut =  6; //dd-mm-jjjj hh:nn
var vtDatumNiet0  =  7; //dd-mm-jjjj tenzij =0, dan leeg
var vtTijd        =  8; //hh:nn:ss
var vtTijdMinuut  =  9; //hh:nn
var vtGeo         = 10; //geografische lengte/breedte; echte waarde is dbwaarde/1000000
var vtTekst       = 11; //decimalen bevat aantal regels
var vtLijst       = 12;
var vtLijst2      = 13;

var voNiet  =-1; //
var voIs    = 0; //is
var voTekst = 1; //o.a. %str%
var voGetal = 2; //> <
var voBevat = 3; //%str%

var vrKleinGroot = 0;
var vrGrootKlein = 1;

function Veld(type,decimalen,breedte,naam,kolomtitel,veldnaam,operator,lijst,tabelnaam,veldconstructor,veldjoin,veldgroup) {
  this.type=type;
  this.decimalen=decimalen;
  this.breedte=breedte;
  this.naam=naam;
  if (kolomtitel=='') this.kolomtitel=naam;
                 else this.kolomtitel=kolomtitel;
  this.veldnaam=veldnaam;
  this.operator=operator;
  this.lijst=lijst;
  this.tabelnaam=tabelnaam;
  this.veldconstructor=veldconstructor;
  this.veldjoin=veldjoin;
  this.veldgroup=veldgroup;
  
  this.tag=0;
}

Veld.prototype.maakvalue = function(s) {
  var st2=decode_special(assignValue(s,this.veldnaam));
  switch(this.type) {
  // case vtString :
  //   break;
    case vtGetal :
      st2+='&nbsp;&nbsp;';
      break;
    case vtValuta :
      st2=valutainteger(st2,this.decimalen);
      st2+='&nbsp;&nbsp;';
      break;
    case vtGeo :
      st2=geointeger(st2);
      st2+='&nbsp;&nbsp;';
      break;
    case vtDatum :
      st2=dateString(st2*1000,'dmy',(this.decimalen==1));
      break;
    case vtDatumDag :
      st2=dateString(st2*1000,'wdmy',(this.decimalen==1));
      st2+='&nbsp;&nbsp;';
      break;
    case vtDatumNiet0 :
      if (st2=='0') st2='';
               else st2=dateString(st2*1000,'dmy',(this.decimalen==1));
      break;
    case vtDatumTijd :
      if (st2=='0') st2='';
               else st2=dateString(st2*1000,'dmyhns',(this.decimalen==1));
      break;
    case vtDatumMinuut :
      if (st2=='0') st2='';
               else st2=dateString(st2*1000,'dmyhn',(this.decimalen==1));
      break;
    case vtTijd :
      st2=timeString(st2);
      break;
    case vtTijdMinuut :
      st2=timeString_hm(st2);
      break;
    case vtTekst :
      st2='<textarea cols="'+Math.floor((this.breedte-26)/5)+'" rows="'+this.decimalen+'" readonly style="border:0px solid #000000;" onfocus="allowenter()" onblur="disallowenter()">'+st2+'</textarea>';
      break;
    case vtLijst :
      st2=veldlijstWaarde(this.lijst,st2);
      break;
    case vtLijst2 :
      var ar=this.lijst.split('|');
      var s=s0=s1=tt='';
      var ii=0;
      for (var i=0; i<ar.length; i++) {
        s=ar[i]; ii=s.indexOf('='); s0=s.substring(0,ii); s1=s.substring(ii+1);
        if (st2.indexOf(s0)>=0) { if (tt!='') tt+=', '; tt+=s1; }
      }
      st2=tt;
      break;
  }
  return st2;
}

Veld.prototype.maaktdcolspan = function(s,colspan) {
  var st1='';
  switch(this.type) {
    case vtGetal :
      st1=' align="right"';
      break;
    case vtValuta :
      st1=' align="right"';
      break;
    case vtGeo :
      st1=' align="right"';
      break;
    case vtDatumDag :
      st1=' align="right"';
      break;
  }
  st2=this.maakvalue(s);
  if (colspan>1) return '<td valign="top" colspan="'+colspan+'"'+st1+'>'+st2+'</td>';
            else return '<td valign="top"'+st1+'>'+st2+'</td>';
}

Veld.prototype.maaktd = function(s) {
 return this.maaktdcolspan(s,1);
}

function Veldvolgorde(idx) {
  this.idx=idx;
  this.editidx=idx;
}
Veldvolgorde.prototype.zichtbaar = function() { //boolean
  return (this.editidx>0);
}
Veldvolgorde.prototype.setzichtbaar = function(truefalse) { //boolean zichtbaar
  if (truefalse) this.editidx=Math.abs(this.editidx);
            else this.editidx=-Math.abs(this.editidx);
  return (this.editidx>0);
}
Veldvolgorde.prototype.getindex = function() { //boolean zichtbaar
  return this.idx;
}

function Veldsortering(tabelnaam,veldnaam,richting) {
  this.tabelnaam=tabelnaam;
  this.veldnaam=veldnaam;
  this.richting=richting;
}

var veld = new Array();
var secveld = new Array();
var itemveld = new Array();
var terveld = new Array();

var veldvolgorde = new Array();
var secveldvolgorde = new Array();
var itemveldvolgorde = new Array();
var terveldvolgorde = new Array();

var veldsortering = new Array();
var secveldsortering = new Array();
var itemveldsortering = new Array();
var terveldsortering = new Array();

var overzichtlines     = 20;
var secoverzichtlines  = 15;
var itemoverzichtlines = 15;
var teroverzichtlines  = 15;

function veld_IndexOf(veldnaam) {
  var result=-1;
  for (var i=0; i<veld.length; i++) if (veld[i].veldnaam==veldnaam) result=i;
  return result;
}

function secveld_IndexOf(veldnaam) {
  var result=-1;
  for (var i=0; i<secveld.length; i++) if (secveld[i].veldnaam==veldnaam) result=i;
  return result;
}

function itemveld_IndexOf(veldnaam) {
  var result=-1;
  for (var i=0; i<itemveld.length; i++) if (itemveld[i].veldnaam==veldnaam) result=i;
  return result;
}

function terveld_IndexOf(veldnaam) {
  var result=-1;
  for (var i=0; i<terveld.length; i++) if (terveld[i].veldnaam==veldnaam) result=i;
  return result;
}

function veldvolgorde_moveup(index) {
  if (index==0) return 0;
  var v = veldvolgorde[index].editidx;
  veldvolgorde[index].editidx=veldvolgorde[index-1].editidx;
  veldvolgorde[index-1].editidx=v;
  return 1;
}

function veldvolgorde_movedown(index) {
  if (index==(veldvolgorde.length-1)) return 0;
  var v = veldvolgorde[index].editidx;
  veldvolgorde[index].editidx=veldvolgorde[index+1].editidx;
  veldvolgorde[index+1].editidx=v;
  return 1;
}

function veldvolgorde_apply() {
  for (var i=0; i<veldvolgorde.length; i++)
  veldvolgorde[i].idx=veldvolgorde[i].editidx;
}

function veldvolgorde_breedte() {
  var b=0;
  for (var i=0; i<veldvolgorde.length; i++)
  if (veldvolgorde[i].idx>0)
  b+=veld[veldvolgorde[i].idx].breedte;
  return b;
}

function secveldvolgorde_moveup(index) {
  if (index==0) return 0;
  var v = secveldvolgorde[index].editidx;
  secveldvolgorde[index].editidx=secveldvolgorde[index-1].editidx;
  secveldvolgorde[index-1].editidx=v;
  return 1;
}

function secveldvolgorde_movedown(index) {
  if (index==(secveldvolgorde.length-1)) return 0;
  var v = secveldvolgorde[index].editidx;
  secveldvolgorde[index].editidx=secveldvolgorde[index+1].editidx;
  secveldvolgorde[index+1].editidx=v;
  return 1;
}

function secveldvolgorde_apply() {
  for (var i=0; i<secveldvolgorde.length; i++)
  secveldvolgorde[i].idx=secveldvolgorde[i].editidx;
}

function secveldvolgorde_breedte() {
  var b=0;
  for (var i=0; i<secveldvolgorde.length; i++)
  if (secveldvolgorde[i].idx>0)
  b+=secveld[secveldvolgorde[i].idx].breedte;
  return b;
}

function itemveldvolgorde_moveup(index) {
  if (index==0) return 0;
  var v = itemveldvolgorde[index].editidx;
  itemveldvolgorde[index].editidx=itemveldvolgorde[index-1].editidx;
  itemveldvolgorde[index-1].editidx=v;
  return 1;
}

function itemveldvolgorde_movedown(index) {
  if (index==(itemveldvolgorde.length-1)) return 0;
  var v = itemveldvolgorde[index].editidx;
  itemveldvolgorde[index].editidx=itemveldvolgorde[index+1].editidx;
  itemveldvolgorde[index+1].editidx=v;
  return 1;
}

function itemveldvolgorde_apply() {
  for (var i=0; i<itemveldvolgorde.length; i++)
  itemveldvolgorde[i].idx=itemveldvolgorde[i].editidx;
}

function itemveldvolgorde_breedte() {
  var b=0;
  for (var i=0; i<itemveldvolgorde.length; i++)
  if (itemveldvolgorde[i].idx>0)
  b+=itemveld[itemveldvolgorde[i].idx].breedte;
  return b;
}

function terveldvolgorde_moveup(index) {
  if (index==0) return 0;
  var v = terveldvolgorde[index].editidx;
  terveldvolgorde[index].editidx=terveldvolgorde[index-1].editidx;
  terveldvolgorde[index-1].editidx=v;
  return 1;
}

function terveldvolgorde_movedown(index) {
  if (index==(terveldvolgorde.length-1)) return 0;
  var v = terveldvolgorde[index].editidx;
  terveldvolgorde[index].editidx=terveldvolgorde[index+1].editidx;
  terveldvolgorde[index+1].editidx=v;
  return 1;
}

function terveldvolgorde_apply() {
  for (var i=0; i<terveldvolgorde.length; i++)
  terveldvolgorde[i].idx=terveldvolgorde[i].editidx;
}

function terveldvolgorde_breedte() {
  var b=0;
  for (var i=0; i<terveldvolgorde.length; i++)
  if (terveldvolgorde[i].idx>0)
  b+=terveld[terveldvolgorde[i].idx].breedte;
  return b;
}

function veldsortering_join(filterjoin) {
  if (filterjoin==null) filterjoin='';
  var s=filterjoin;
  var sx='';
  var ok=true;
  var idx=-1;
  for (i=0; i<veldsortering.length; i++)
  if (veldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (veldsortering[ii].veldnaam==veldsortering[i].veldnaam) ok=false;
    if (ok) {
      idx=veld_IndexOf(veldsortering[i].veldnaam);
      if (idx!=-1) {
        sx=veld[idx].veldjoin;
        if (sx!='') if (s.indexOf(sx)==-1) s+=' '+sx;
      }
    }
  }
  return s.trim();
}

function itemveldsortering_join(filterjoin) {
  if (filterjoin==null) filterjoin='';
  var s=filterjoin;
  var sx='';
  var ok=true;
  var idx=-1;
  for (i=0; i<itemveldsortering.length; i++)
  if (itemveldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (itemveldsortering[ii].veldnaam==itemveldsortering[i].veldnaam) ok=false;
    if (ok) {
      idx=itemveld_IndexOf(itemveldsortering[i].veldnaam);
      if (idx!=-1) {
        sx=itemveld[idx].veldjoin;
        if (sx!='') if (s.indexOf(sx)==-1) s+=' '+sx;
      }
    }
  }
  return s.trim();
}

function secveldsortering_join(filterjoin) {
  if (filterjoin==null) filterjoin='';
  var s=filterjoin;
  var sx='';
  var ok=true;
  var idx=-1;
  for (i=0; i<secveldsortering.length; i++)
  if (secveldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (secveldsortering[ii].veldnaam==secveldsortering[i].veldnaam) ok=false;
    if (ok) {
      idx=secveld_IndexOf(secveldsortering[i].veldnaam);
      if (idx!=-1) {
        sx=secveld[idx].veldjoin;
        if (sx!='') if (s.indexOf(sx)==-1) s+=' '+sx;
      }
    }
  }
  return s.trim();
}

function terveldsortering_join(filterjoin) {
  if (filterjoin==null) filterjoin='';
  var s=filterjoin;
  var sx='';
  var ok=true;
  var idx=-1;
  for (i=0; i<terveldsortering.length; i++)
  if (terveldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (terveldsortering[ii].veldnaam==terveldsortering[i].veldnaam) ok=false;
    if (ok) {
      idx=terveld_IndexOf(terveldsortering[i].veldnaam);
      if (idx!=-1) {
        sx=terveld[idx].veldjoin;
        if (sx!='') if (s.indexOf(sx)==-1) s+=' '+sx;
      }
    }
  }
  return s.trim();
}

function veldsortering_group(filtergroup) {
  if (filtergroup==null) filtergroup='';
  var s=filtergroup;
  var sx='';
  var ok=true;
  var idx=-1;
  for (i=0; i<veldsortering.length; i++)
  if (veldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (veldsortering[ii].veldnaam==veldsortering[i].veldnaam) ok=false;
    if (ok) {
      idx=veld_IndexOf(veldsortering[i].veldnaam);
      if (idx!=-1) {
        sx=veld[idx].veldgroup;
        if (sx!='') if (s.indexOf(sx)==-1) { if (s!='') s+=', '; s+=sx; }
      }
    }
  }
  return s.trim();
}

function itemveldsortering_group(filtergroup) {
  if (filtergroup==null) filtergroup='';
  var s=filtergroup;
  var sx='';
  var ok=true;
  var idx=-1;
  for (i=0; i<itemveldsortering.length; i++)
  if (itemveldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (itemveldsortering[ii].veldnaam==itemveldsortering[i].veldnaam) ok=false;
    if (ok) {
      idx=itemveld_IndexOf(itemveldsortering[i].veldnaam);
      if (idx!=-1) {
        sx=itemveld[idx].veldgroup;
        if (sx!='') if (s.indexOf(sx)==-1) { if (s!='') s+=', '; s+=sx; }
      }
    }
  }
  return s.trim();
}

function secveldsortering_group(filtergroup) {
  if (filtergroup==null) filtergroup='';
  var s=filtergroup;
  var sx='';
  var ok=true;
  var idx=-1;
  for (i=0; i<secveldsortering.length; i++)
  if (secveldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (secveldsortering[ii].veldnaam==secveldsortering[i].veldnaam) ok=false;
    if (ok) {
      idx=secveld_IndexOf(secveldsortering[i].veldnaam);
      if (idx!=-1) {
        sx=secveld[idx].veldgroup;
        if (sx!='') if (s.indexOf(sx)==-1) { if (s!='') s+=', '; s+=sx; }
      }
    }
  }
  return s.trim();
}

function terveldsortering_group(filtergroup) {
  if (filtergroup==null) filtergroup='';
  var s=filtergroup;
  var sx='';
  var ok=true;
  var idx=-1;
  for (i=0; i<terveldsortering.length; i++)
  if (terveldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (terveldsortering[ii].veldnaam==terveldsortering[i].veldnaam) ok=false;
    if (ok) {
      idx=terveld_IndexOf(terveldsortering[i].veldnaam);
      if (idx!=-1) {
        sx=terveld[idx].veldgroup;
        if (sx!='') if (s.indexOf(sx)==-1) { if (s!='') s+=', '; s+=sx; }
      }
    }
  }
  return s.trim();
}

function veldsortering_orderby() {
  var s='';
  var ok=true;
  var idx=-1;
  for (i=0; i<veldsortering.length; i++)
  if (veldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (veldsortering[ii].veldnaam==veldsortering[i].veldnaam) ok=false;
    if (ok) {
      if (s!='') s+=', ';
      idx=veld_IndexOf(veldsortering[i].veldnaam);
      if ((idx!=-1)&&(veld[idx].veldconstructor!='')) {
        s+=veld[idx].veldconstructor;
      } else {
        if (veldsortering[i].tabelnaam!='') s+=veldsortering[i].tabelnaam+'.';
        s+=veldsortering[i].veldnaam;
      }
      if (veldsortering[i].richting==vrGrootKlein) s+=' desc';
    }
  }
  if (s!='') s='order by '+s;
  return s;
}

function itemveldsortering_orderby() {
  var s='';
  var ok=true;
  var idx=-1;
  for (i=0; i<itemveldsortering.length; i++)
  if (itemveldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (itemveldsortering[ii].veldnaam==itemveldsortering[i].veldnaam) ok=false;
    if (ok) {
      if (s!='') s+=', ';
      idx=itemveld_IndexOf(itemveldsortering[i].veldnaam);
      if ((idx!=-1)&&(itemveld[idx].veldconstructor!='')) {
        s+=itemveld[idx].veldconstructor;
      } else {
        if (itemveldsortering[i].tabelnaam!='') s+=itemveldsortering[i].tabelnaam+'.';
        s+=itemveldsortering[i].veldnaam;
      }
      if (itemveldsortering[i].richting==vrGrootKlein) s+=' desc';
    }
  }
  if (s!='') s='order by '+s;
  return s;
}

function secveldsortering_orderby() {
  var s='';
  var ok=true;
  var idx=-1;
  for (i=0; i<secveldsortering.length; i++)
  if (secveldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (secveldsortering[ii].veldnaam==secveldsortering[i].veldnaam) ok=false;
    if (ok) {
      if (s!='') s+=', ';
      idx=secveld_IndexOf(secveldsortering[i].veldnaam);
      if ((idx!=-1)&&(secveld[idx].veldconstructor!='')) {
        s+=secveld[idx].veldconstructor;
      } else {
        if (secveldsortering[i].tabelnaam!='') s+=secveldsortering[i].tabelnaam+'.';
        s+=secveldsortering[i].veldnaam;
      }
      if (secveldsortering[i].richting==vrGrootKlein) s+=' desc';
    }
  }
  if (s!='') s='order by '+s;
  return s;
}

function terveldsortering_orderby() {
  var s='';
  var ok=true;
  var idx=-1;
  for (i=0; i<terveldsortering.length; i++)
  if (terveldsortering[i].veldnaam!='') {
    ok=true;
    for (var ii=0; ii<i; ii++)
    if (terveldsortering[ii].veldnaam==terveldsortering[i].veldnaam) ok=false;
    if (ok) {
      if (s!='') s+=', ';
      idx=terveld_IndexOf(terveldsortering[i].veldnaam);
      if ((idx!=-1)&&(terveld[idx].veldconstructor!='')) {
        s+=terveld[idx].veldconstructor;
      } else {
        if (terveldsortering[i].tabelnaam!='') s+=terveldsortering[i].tabelnaam+'.';
        s+=terveldsortering[i].veldnaam;
      }
      if (terveldsortering[i].richting==vrGrootKlein) s+=' desc';
    }
  }
  if (s!='') s='order by '+s;
  return s;
}

function veldsorteercode(veldnaam) {
  var c='';
  if (veldsortering[0].veldnaam==veldnaam)
  if (veldsortering[0].richting==vrKleinGroot) c='<img src="./common/img/Down8.gif">'; else c='<img src="./common/img/Up8.gif">';
  return c;
}

function secveldsorteercode(veldnaam) {
  var c='';
  if (secveldsortering[0].veldnaam==veldnaam)
  if (secveldsortering[0].richting==vrKleinGroot) c='<img src="./common/img/Down8.gif">'; else c='<img src="./common/img/Up8.gif">';
  return c;
}

function itemveldsorteercode(veldnaam) {
  var c='';
  if (itemveldsortering[0].veldnaam==veldnaam)
  if (itemveldsortering[0].richting==vrKleinGroot) c='<img src="./common/img/Down8.gif">'; else c='<img src="./common/img/Up8.gif">';
  return c;
}

function terveldsorteercode(veldnaam) {
  var c='';
  if (terveldsortering[0].veldnaam==veldnaam)
  if (terveldsortering[0].richting==vrKleinGroot) c='<img src="./common/img/Down8.gif">'; else c='<img src="./common/img/Up8.gif">';
  return c;
}

function veldtitelclick(idx) {
  var i = 0;
  var vn=veld[idx].veldnaam;
  if (veldsortering[0].veldnaam!=vn) {
    i=veld_IndexOf(vn);
    if (i==-1) veldsortering[0].tabelnaam='';
          else veldsortering[0].tabelnaam=veld[i].tabelnaam;
    veldsortering[0].veldnaam=vn;
    veldsortering[0].richting=vrKleinGroot;
  } else {
    if (veldsortering[0].richting==vrKleinGroot)
       veldsortering[0].richting=vrGrootKlein;
     else {
       veldsortering[0].tabelnaam='';
       veldsortering[0].veldnaam='';
     }
  }
  overzicht_ververs();
}

function itemveldtitelclick(idx) {
  var vn=itemveld[idx].veldnaam;
  if (itemveldsortering[0].veldnaam!=vn) {
    i=itemveld_IndexOf(vn);
    if (i==-1) itemveldsortering[0].tabelnaam='';
          else itemveldsortering[0].tabelnaam=itemveld[i].tabelnaam;
    itemveldsortering[0].veldnaam=vn;
    itemveldsortering[0].richting=vrKleinGroot;
  } else {
    if (itemveldsortering[0].richting==vrKleinGroot)
       itemveldsortering[0].richting=vrGrootKlein;
     else {
       itemveldsortering[0].tabelnaam='';
       itemveldsortering[0].veldnaam='';
     }
  }
  pageververs();
}

function secveldtitelclick(idx) {
  var vn=secveld[idx].veldnaam;
  if (secveldsortering[0].veldnaam!=vn) {
    i=secveld_IndexOf(vn);
    if (i==-1) secveldsortering[0].tabelnaam='';
          else secveldsortering[0].tabelnaam=secveld[i].tabelnaam;
    secveldsortering[0].veldnaam=vn;
    secveldsortering[0].richting=vrKleinGroot;
  } else {
    if (secveldsortering[0].richting==vrKleinGroot)
       secveldsortering[0].richting=vrGrootKlein;
     else {
       secveldsortering[0].tabelnaam='';
       secveldsortering[0].veldnaam='';
     }
  }
  pageververs();
}

function terveldtitelclick(idx) {
  var vn=terveld[idx].veldnaam;
  if (terveldsortering[0].veldnaam!=vn) {
    i=terveld_IndexOf(vn);
    if (i==-1) terveldsortering[0].tabelnaam='';
          else terveldsortering[0].tabelnaam=terveld[i].tabelnaam;
    terveldsortering[0].veldnaam=vn;
    terveldsortering[0].richting=vrKleinGroot;
  } else {
    if (terveldsortering[0].richting==vrKleinGroot)
       terveldsortering[0].richting=vrGrootKlein;
     else {
       terveldsortering[0].tabelnaam='';
       terveldsortering[0].veldnaam='';
     }
  }
  pageververs();
}

function checkveldvolgordecookie(schermnaam) {
//getid("txt").innerHTML+="|checkveldvolgordecookie";
  var a = new Array();
  var c = '';
  //filter
  c = new String(getcookie(cookienaam+"_"+schermnaam+"_veldvolgorde"));
  if ((c==null)||(c=="null")||(c=="")) c="";
  if (c!="") {
    a=c.split("|");
    for (var i=0; i<Math.min(a.length,veldvolgorde.length); i++) {
//      if (veldvolgorde.length<=i) veldvolgorde[i]=new Veldvolgorde(i);
      veldvolgorde[i].idx=a[i];
      veldvolgorde[i].editidx=a[i];
    }
  }

  checkveldsorteringcookie(schermnaam);
}

function maakveldvolgordecookie(schermnaam) {
  var s='';
  for (var i=0; i<veldvolgorde.length; i++) { if (s!='') s+='|'; s+=veldvolgorde[i].idx; }

  setcookie(cookienaam+"_"+schermnaam+"_veldvolgorde",s,cookie1year);
  
  maakveldsorteringcookie(schermnaam);
}

function checkveldsorteringcookie(schermnaam) {
//getid("txt").innerHTML+="|checkveldsorteringcookie";
  var ix = 0;
  var a = new Array();
  var c = '';
  //filter
  c = new String(getcookie(cookienaam+"_"+schermnaam+"_veldsortering"));
  if ((c==null)||(c=="null")||(c=="")) c="";
  if (c!="") {
    a=c.split("|");
    ix=0;
    for (var i=0; i<a[0]; i++) {
//      if (veldsortering.length<=i) veldsortering[i]=new Veldsortering('','',vrKleinGroot);
      ix++; veldsortering[i].tabelnaam=a[ix];
      ix++; veldsortering[i].veldnaam=a[ix];
      ix++; veldsortering[i].richting=a[ix];
    }
  }
}

function maakveldsorteringcookie(schermnaam) {
  var s=veldsortering.length;
  for (var i=0; i<veldsortering.length; i++)
  s+='|'+veldsortering[i].tabelnaam+
     '|'+veldsortering[i].veldnaam+
     '|'+veldsortering[i].richting;

  setcookie(cookienaam+"_"+schermnaam+"_veldsortering",s,cookie1year);
}
/*
function checkveldsorteringcookie(schermnaam) {
//getid("txt").innerHTML+="|checkveldsorteringcookie";
  var ix = 0;
  var a = new Array();
  var c = '';
  //filter
  c = new String(getcookie(cookienaam+"_"+schermnaam+"_veldsortering"));
  if ((c==null)||(c=="null")||(c=="")) c="";
  if (c!="") {
    a=c.split("|");
    ix=0;
    for (var i=0; i<a[0]; i++) {
//      if (veldsortering.length<=i) veldsortering[i]=new Veldsortering('',vrKleinGroot);
      ix++; veldsortering[i].veldnaam=a[ix];
      ix++; veldsortering[i].richting=a[ix];
    }
  }
}

function maakveldsorteringcookie(schermnaam) {
  var s=veldsortering.length;
  for (var i=0; i<veldsortering.length; i++)
  s+='|'+veldsortering[i].veldnaam+'|'+veldsortering[i].richting;

  setcookie(cookienaam+"_"+schermnaam+"_veldsortering",s,cookie1year);
}
*/
