  var aMyPaard = [];
  
  function doSubmitForm(id) {
    obj = document.getElementById(id);
    if (obj) {
      obj.submit();
    }
  }

  function MyPaardAdd(id, naam, afstamv, afstamvm, eigenaar, combinummer) {
    var aPaard = [naam, afstamv, afstamvm, eigenaar, combinummer];
    aMyPaard[id] = aPaard;
  }
  
  
  function ClearPaardFields(blockid) {
    obj = document.getElementById('pnaam'+blockid);
    if (obj) { obj.value=''; }
    obj = document.getElementById('pafstamv'+blockid);
    if (obj) { obj.value=''; }
    obj = document.getElementById('pafstamvm'+blockid);
    if (obj) { obj.value=''; }
    obj = document.getElementById('peigenaar'+blockid);
    if (obj) { obj.value=''; }
    obj = document.getElementById('pcombinummer'+blockid);
    if (obj) { obj.value=''; }
  }
  
  function MyPaardToFields(paardid, blockid) {
    aPaard = aMyPaard[paardid];
    obj = document.getElementById('pnaam'+blockid);
    if (obj) { obj.value=aPaard[0]; }
    obj = document.getElementById('pafstamv'+blockid);
    if (obj) { obj.value=aPaard[1]; }
    obj = document.getElementById('pafstamvm'+blockid);
    if (obj) { obj.value=aPaard[2]; }
    obj = document.getElementById('peigenaar'+blockid);
    if (obj) { obj.value=aPaard[3]; }
    obj = document.getElementById('pcombinummer'+blockid);
    if (obj) { obj.value=aPaard[4]; }
  }
  
  function OpenPaardBlock(blockid) {

    obj = document.getElementById('pnaam'+blockid);
    if (obj) { obj.readOnly = false; obj.style.color=''; obj.style.border='1px solid #666666'; obj.disabled=false }
    obj = document.getElementById('pafstamv'+blockid);
    if (obj) { obj.readOnly = false; obj.style.color=''; obj.style.border='1px solid #666666'; }
    obj = document.getElementById('pafstamvm'+blockid);
    if (obj) { obj.readOnly = false; obj.style.color=''; obj.style.border='1px solid #666666'; }
    obj = document.getElementById('peigenaar'+blockid);
    if (obj) { obj.readOnly = false; obj.style.color=''; obj.style.border='1px solid #666666'; }
    obj = document.getElementById('pcombinummer'+blockid);
    if (obj) { obj.readOnly = false; obj.style.color=''; obj.style.border='1px solid #666666'; }
    obj = document.getElementById('rpbewaar'+blockid);
    if (obj) { obj.style.display='block'; }
  }

  function LockPaardBlock(blockid) {
    obj = document.getElementById('pnaam'+blockid);
    if (obj) { obj.readOnly = true; obj.style.color='#666666'; obj.style.border='0px'; obj.disabled=false }
    obj = document.getElementById('pafstamv'+blockid);
    if (obj) { obj.readOnly = true; obj.style.color='#666666'; obj.style.border='0px'; }
    obj = document.getElementById('pafstamvm'+blockid);
    if (obj) { obj.readOnly = true; obj.style.color='#666666'; obj.style.border='0px'; }
    obj = document.getElementById('peigenaar'+blockid);
    if (obj) { obj.readOnly = true; obj.style.color='#666666'; obj.style.border='0px'; }
    obj = document.getElementById('pcombinummer'+blockid);
    if (obj) { obj.readOnly = true; obj.style.color='#666666'; obj.style.border='0px'; }
    obj = document.getElementById('rpbewaar'+blockid);
    if (obj) { obj.style.display='none'; }
  }

  
  function LockRuiterBlock() {
    LockField('ir_voornaam');
    LockField('ir_tussenvoegsel');
    LockField('ir_achternaam');
    LockField('ir_adres');
    LockField('ir_postcode');
    LockField('ir_plaats');
    LockField('ir_telefoon');
    LockField('ir_mobiel');
    LockField('ir_email');
    LockField('ir_persnum');
  }

  function LockField(elid) {
    obj = document.getElementById(elid);
    if (obj) { obj.readOnly = true; obj.style.color='#666666'; obj.style.border='0px'; obj.disabled=false }
  }

  function OpenField(elid) {
    obj = document.getElementById(elid);
    if (obj) { obj.readOnly = false; obj.style.color=''; obj.style.border=''; }
  }
         
     
  function ifPaardSelect(blockid) {
    obj = document.getElementById('pselect'+blockid);
    if (obj) {
      paardid = obj.value;
      if (paardid < 0) {
        ClearPaardFields(blockid);
        OpenPaardBlock(blockid);
        ShowNextPBlock(blockid);
      }
      else
      if (paardid == 0) {
        ClearPaardFields(blockid);
        LockPaardBlock(blockid);
      }
      else {
        LockPaardBlock(blockid);
        MyPaardToFields(paardid, blockid);
        ShowNextPBlock(blockid);
      }
    }
  }
  
  function ifPaardInit(blockid) {
    // return blockid if active
    obj = document.getElementById('pselect'+blockid);
    if (obj) {
      paardid = obj.value;
      if (paardid < 0) {
        ShowBlock('pblock'+blockid);
        OpenPaardBlock(blockid);
        return blockid;
      }
      else
      if (paardid == 0) {
        LockPaardBlock(blockid);
        return 0;
      }
      else {
        ShowBlock('pblock'+blockid);
        LockPaardBlock(blockid);
        return blockid;
      }
    }
  }  
  
  function doDNMAction(objid) {
    obj = document.getElementById('dnmactionselect'+objid);
    if (obj) {
      val = obj.value;
      obj = document.getElementById('dnmactiongroepselect'+objid);
      if (val == 4) 
        ShowBlock('dnmactiongroepblock'+objid);
      else
        HideBlock('dnmactiongroepblock'+objid);
    }
  }
  
  function HideBlock(blockid) {
    obj = document.getElementById(blockid);
    if (obj) { obj.style.display='none'; }
  }
  
  function ShowBlock(blockid) {
    obj = document.getElementById(blockid);
    if (obj) { obj.style.display='block'; }
  }
 
  function ShowNextPBlock(blockid) {
    blockid++;
    obj = document.getElementById('pblock'+blockid);
    if (obj) { obj.style.display='block'; }
  }
  
  function doIFDBlock(blockid) {
    obj = document.getElementById('ifdc_el'+blockid);
    if (obj) {
      val = obj.checked == true;
      obj = document.getElementById('ifd_el'+blockid);
      if (obj) {
        if (val) obj.style.display='block';
        else obj.style.display='none';
      }
    }
  }
      
  function doOipblk(blockid) {
    HideBlock('toipblk'+blockid);  
    ShowBlock('eoipblk'+blockid);
  }
