%doctype;
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
  <!-- $Id: updind.txt,v 5.14 2008-01-08 11:58:46 ddr Exp $ -->
  <!-- Copyright (c) 1998-2007 INRIA -->
  <meta name="robots" content="none"%/>
  <meta http-equiv="Content-Type" content="text/html; charset=%charset;"%/>
  <meta http-equiv="Content-Style-Type" content="text/css"%/>
  <link rel="shortcut icon" href="%image_prefix;/favicon_gwd.png"%/>
  <title>%nn;
    %if;(evar_m = "MRG_IND_OK" or evar_m = "MRG_MOD_IND_OK")
      [*merge::person/persons]1 # %index;
    %elseif;(evar_m = "MOD_IND" or evar_m = "MOD_IND_OK")
      [*modify::person/persons]0 # %index;
    %else;[*add::person/persons]0%end;
  </title>
  %include.js;
  %include.css;
  %base_header;
</head>
<body%body_prop;>
%message_to_wizard;

<script type="text/javascript">
<!--
function changeCalendar(e,v,m,c) {
  var mv = m;
  switch (m) {
  case "VD": mv = 1; break;
  case "BR": mv = 2; break;
  case "FM": mv = 3; break;
  case "NI": mv = 4; break;
  case "PL": mv = 5; break;
  case "VT": mv = 6; break;
  case "GE": mv = 7; break;
  case "FL": mv = 8; break;
  case "PR": mv = 9; break;
  case "ME": mv = 10; break;
  case "TH": mv = 11; break;
  case "FT": mv = 12; break;
  case "JC": mv = 13; break;
  }
  switch(c.options%[c.selectedIndex%].value) {
  case 'G':
  case 'J':
    document.getElementById(e).innerHTML = '\
<select name="' + v + '">\
<option value=""' + (mv == 0 ? ' selected="selected"' : '') + '>%nn;
-</option>\
<option value="1"' + (mv == 1 ? ' selected="selected"' : '') + '>%nn;
[(month)]0</option>\
<option value="2"' + (mv == 2 ? ' selected="selected"' : '') + '>%nn;
[(month)]1</option>\
<option value="3"' + (mv == 3 ? ' selected="selected"' : '') + '>%nn;
[(month)]2</option>\
<option value="4"' + (mv == 4 ? ' selected="selected"' : '') + '>%nn;
[(month)]3</option>\
<option value="5"' + (mv == 5 ? ' selected="selected"' : '') + '>%nn;
[(month)]4</option>\
<option value="6"' + (mv == 6 ? ' selected="selected"' : '') + '>%nn;
[(month)]5</option>\
<option value="7"' + (mv == 7 ? ' selected="selected"' : '') + '>%nn;
[(month)]6</option>\
<option value="8"' + (mv == 8 ? ' selected="selected"' : '') + '>%nn;
[(month)]7</option>\
<option value="9"' + (mv == 9 ? ' selected="selected"' : '') + '>%nn;
[(month)]8</option>\
<option value="10"' + (mv == 10 ? ' selected="selected"' : '') + '>%nn;
[(month)]9</option>\
<option value="11"' + (mv == 11 ? ' selected="selected"' : '') + '>%nn;
[(month)]10</option>\
<option value="12"' + (mv == 12 ? ' selected="selected"' : '') + '>%nn;
[(month)]11</option>\
</select>\
';
    break;
  case 'F':
    document.getElementById(e).innerHTML = '\
<select name="' + v + '">\
<option value=""' + (mv == 0 ? ' selected="selected"' : '') + '>%nn;
-</option>\
<option value="1"' + (mv == 1 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]0</option>\
<option value="2"' + (mv == 2 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]1</option>\
<option value="3"' + (mv == 3 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]2</option>\
<option value="4"' + (mv == 4 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]3</option>\
<option value="5"' + (mv == 5 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]4</option>\
<option value="6"' + (mv == 6 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]5</option>\
<option value="7"' + (mv == 7 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]6</option>\
<option value="8"' + (mv == 8 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]7</option>\
<option value="9"' + (mv == 9 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]8</option>\
<option value="10"' + (mv == 10 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]9</option>\
<option value="11"' + (mv == 11 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]10</option>\
<option value="12"' + (mv == 12 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]11</option>\
<option value="13"' + (mv == 13 ? ' selected="selected"' : '') + '>%nn;
[(french revolution month)]12</option>\
</select>\
';
    break;
  case 'H':
    document.getElementById(e).innerHTML = '\
<select name="' + v + '">\
<option value=""' + (mv == 0 ? ' selected="selected"' : '') + '>%nn;
-</option>\
<option value="1"' + (mv == 1 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]0</option>\
<option value="2"' + (mv == 2 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]1</option>\
<option value="3"' + (mv == 3 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]2</option>\
<option value="4"' + (mv == 4 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]3</option>\
<option value="5"' + (mv == 5 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]4</option>\
<option value="6"' + (mv == 6 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]5</option>\
<option value="7"' + (mv == 7 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]6</option>\
<option value="8"' + (mv == 8 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]7</option>\
<option value="9"' + (mv == 9 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]8</option>\
<option value="10"' + (mv == 10 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]9</option>\
<option value="11"' + (mv == 11 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]10</option>\
<option value="12"' + (mv == 12 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]11</option>\
<option value="13"' + (mv == 13 ? ' selected="selected"' : '') + '>%nn;
[(hebrew month)]12</option>\
</select>\
';
    break;
  }
}
-->
</script>

<script type="text/javascript">
  function setDead()
  {
    document.forms%[0].death.value = "Death";
  }

  function change_buri(xcnt) {
    var selector = document.getElementById('buri_select' + xcnt);
    var input = document.getElementById('e_name' + xcnt);
    input.value = selector.value;
  }

  function set_buri(xcnt) {
    var selector = document.getElementById('buri_select' + xcnt);
    if (selector.value == "") {
      selector.value = "#buri";
      change_buri(xcnt);
    }
  }

  function change_death(xcnt) {
    var selector = document.getElementById('death_select' + xcnt);
    var input = document.getElementById('e_name' + xcnt);
    if (selector.value != "NotDead" && selector.value != "DontKnowIfDead") {
      input.value = "#deat";
    }
    else {
      input.value = "";
    }
  }

  function set_death_focus(xcnt) {
    var selector = document.getElementById('death_select' + xcnt);
    selector.value = "Death";
    change_death(xcnt);
  }

  function set_burial_focus(xcnt) {
    var selector = document.getElementById('buri_select' + xcnt);
    selector.value = "#buri";
    change_buri(xcnt);
  }

  function set_insert_death(xcnt) {
    var selector = document.getElementById('death_select' + xcnt);
    selector.value = "Death";
    change_death(xcnt);
  }

  function show_pevent_label(xxname, xcnt) {
    var selector = document.getElementById('pevent_select' + xcnt);
    var label = document.getElementById('pevent_label_selector' + xcnt);
    var input = document.getElementById('e_name' + xcnt);
    if (selector.value == "") {
      console.log('IF');
      console.log('selector.value=' + selector.value);
      console.log('input.value=' + input.value);
      if (xxname.charAt(0) == "#") {
        input.value = "";
      }
      else {
        input.value = xxname;
      }
    }
    else {
      console.log('ELSE');
      console.log('selector.value=' + selector.value);
      console.log('input.value=' + input.value);
      input.value = selector.value;
    }
    if (selector.value == "" || selector.value.charAt(0) != "#") {
      label.style.display = 'inline';
    }
    else {
      label.style.display = 'none';
    }
  }


  $(document).ready(function(){
     //show evt perso
     $(".other_evts").each(function(){
       var inp = $(this).find("input").first();
       if(inp.val().charAt(0) != "#" && inp.val() != ""){
         $(this).show();
       }
     });
  });
</script>

%include_perso_header;

%define;date(xlab,xvar,xdt,xcond)
  <table border="1" width="700px">
    <tr>
      <td>xlab</td>
      <td>
        %if;([ !dates order]0 = "ddmmyy" or [ !dates order]0 = "ddmmyyyy" or [ !dates order]0 = "dmyyyy")
          <label>
            [year/month/day]2
            <input type="text" name="xvar_dd" size="2" maxlength="2" value="%xdt.day;"xcond%/>
          </label>
          <label>
            [year/month/day]1
            <span id="xvar_mm_sel">
              <input type="text" name="xvar_mm" size="2" maxlength="2" value="%xdt.month;"xcond%/>
            </span>
          </label>
          <label>
            [year/month/day]0
            <input type="text" name="xvar_yyyy" size="5" maxlength="6" value="%xdt.year;"xcond%/>
          </label>
        %elseif;([ !dates order]0 = "mmddyyyy")
          <label>
            [year/month/day]1
            <span id="xvar_mm_sel">
              <input type="text" name="xvar_mm" size="2" maxlength="2" value="%xdt.month;"xcond%/>
            </span>
          </label>
          <label>
            [year/month/day]2
            <input type="text" name="xvar_dd" size="2" maxlength="2" value="%xdt.day;"xcond%/>
          </label>
          <label>
            [year/month/day]0
            <input type="text" name="xvar_yyyy" size="5" maxlength="6" value="%xdt.year;"xcond%/>
          </label>
        %else;
          <label>
            [year/month/day]0
            <input type="text" name="xvar_yyyy" size="5" maxlength="6" value="%xdt.year;"xcond%/>
          </label>
          <label>
            [year/month/day]1
            <span id="xvar_mm_sel">
              <input type="text" name="xvar_mm" size="2" maxlength="2" value="%xdt.month;"xcond%/>
            </span>
          </label>
          <label>
            [year/month/day]2
            <input type="text" name="xvar_dd" size="2" maxlength="2" value="%xdt.day;"xcond%/>
          </label>
        %end;
      </td>
      <td>
        ...
        <label>
          [or]0 [text]0
          <input type="text" name="xvar_text" size="15" maxlength="30" value="%xdt.text;"xcond%/>
        </label>
      </td>
    </tr>
  </table>
  <table border="1" width="700px">
    <tr>
      <td>
        [*calendar/calendars]0
        <select name="xvar_cal" onchange="changeCalendar('xvar_mm_sel','xvar_mm','%xdt.month;',this),%nn;
                                          changeCalendar('xvar_ormonth_sel','xvar_ormonth','%xdt.ormonth;',this)"xcond>
          <option value="G" %if;(xdt.calendar = "gregorian") selected="selected"%end;>
            [*gregorian/julian/french/hebrew]0
          </option>
          <option value="J" %if;(xdt.calendar = "julian") selected="selected"%end;>
            [*gregorian/julian/french/hebrew]1
          </option>
          <option value="F" %if;(xdt.calendar = "french") selected="selected"%end;>
            [*gregorian/julian/french/hebrew]2
          </option>
          <option value="H" %if;(xdt.calendar = "hebrew") selected="selected"%end;>
            [*gregorian/julian/french/hebrew]3
          </option>
        </select>
      </td>
      <td>
        [*precision]0
        <select name="xvar_prec"xcond>
          <option value="-" %if;(xdt.prec = "") selected="selected"%end;>-</option>
          <option value="sure" %if;(xdt.prec = "sure") selected="selected"%end;>[*exact]0</option>
          <option value="about" %if;(xdt.prec = "about") selected="selected"%end;>[*about (date)]0</option>
          <option value="maybe" %if;(xdt.prec = "maybe") selected="selected"%end;>[*possibly (date)]0</option>
          <option value="before" %if;(xdt.prec = "before") selected="selected"%end;>[*before (date)]0</option>
          <option value="after" %if;(xdt.prec = "after") selected="selected"%end;>[*after (date)]0</option>
          <option value="oryear" %if;(xdt.prec = "oryear") selected="selected"%end;>&lt;- [*or] -&gt;</option>
          <option value="yearint" %if;(xdt.prec = "yearint") selected="selected"%end;>&lt;- [*between (date)] -&gt;</option>
        </select>
        %if;([ !dates order]0 = "ddmmyy" or [ !dates order]0 = "ddmmyyyy" or [ !dates order]0 = "dmyyyy")
          <label>
            [year/month/day]2
            <input type="text" name="xvar_orday" size="2" maxlength="2" value="%xdt.orday;"xcond%/>
          </label>
          <label>
            [year/month/day]1
            <span id="xvar_ormonth_sel">
              <input type="text" name="xvar_ormonth" size="2" maxlength="2" value="%xdt.ormonth;"xcond%/>
            </span>
          </label>
          <label>
            [year/month/day]0
            <input type="text" name="xvar_oryear" size="5" maxlength="6" value="%xdt.oryear;"xcond%/>
          </label>
        %elseif;([ !dates order]0 = "mmddyyyy")
          <label>
            [year/month/day]1
            <span id="xvar_ormonth_sel">
              <input type="text" name="xvar_ormonth" size="2" maxlength="2" value="%xdt.ormonth;"xcond%/>
            </span>
          </label>
          <label>
            [year/month/day]2
            <input type="text" name="xvar_orday" size="2" maxlength="2" value="%xdt.orday;"xcond%/>
          </label>
          <label>
            [year/month/day]0
            <input type="text" name="xvar_oryear" size="5" maxlength="6" value="%xdt.oryear;"xcond%/>
          </label>
        %else;
          <label>
            [year/month/day]0
            <input type="text" name="xvar_oryear" size="5" maxlength="6" value="%xdt.oryear;"xcond%/>
          </label>
          <label>
            [year/month/day]1
            <span id="xvar_ormonth_sel">
              <input type="text" name="xvar_ormonth" size="2" maxlength="2" value="%xdt.ormonth;"xcond%/>
            </span>
          </label>
          <label>
            [year/month/day]2
            <input type="text" name="xvar_orday" size="2" maxlength="2" value="%xdt.orday;"xcond%/>
          </label>
        %end;
      </td>
    </tr>
  </table>
%end;

%define;source(xx)
  <table border="1" width="700px">
    <tr>
      <td><label for="xx_src">[*source/sources]0</label></td>
      <td>
        <input type="text" name="xx_src" size="90" maxlength="200" value="%xx_src;" id="xx_src"%/>
      </td>
    </tr>
  </table>
%end;

%define;note(xx)
  <table border="1" width="700px">
    <tr>
      <td><label for="xx_note">[*note/notes]0</label></td>
      <td><input type="text" name="xx_note" size="74" maxlength="200" value="%xx_note;" id="xx_note"%/></td>
    </tr>
  </table>
%end;

%define;selector_pevent(xcnt)
  <select id="pevent_selectxcnt" onchange="show_pevent_label($('#e_namexcnt').prop('defaultValue'), 'xcnt')">
    <option value="">-</option>
    <option value="#acco" %if;(event.e_name = "#acco") selected="selected" %end;>[*accomplishment]</option>
    <option value="#acqu" %if;(event.e_name = "#acqu") selected="selected" %end;>[*acquisition]</option>
    <option value="#adhe" %if;(event.e_name = "#adhe") selected="selected" %end;>[*adhesion]</option>
    <option value="#barm" %if;(event.e_name = "#barm") selected="selected" %end;>[*bar mitzvah]</option>
    <option value="#basm" %if;(event.e_name = "#basm") selected="selected" %end;>[*bat mitzvah]</option>
    <option value="#bles" %if;(event.e_name = "#bles") selected="selected" %end;>[*benediction]</option>
    <option value="#chgn" %if;(event.e_name = "#chgn") selected="selected" %end;>[*change name]</option>
    <option value="#circ" %if;(event.e_name = "#circ") selected="selected" %end;>[*circumcision]</option>
    <option value="#conf" %if;(event.e_name = "#conf") selected="selected" %end;>[*confirmation]</option>
    <option value="#awar" %if;(event.e_name = "#awar") selected="selected" %end;>[*decoration]</option>
    <option value="#demm" %if;(event.e_name = "#demm") selected="selected" %end;>[*demobilisationMilitaire]</option>
    <option value="#degr" %if;(event.e_name = "#degr") selected="selected" %end;>[*diploma]</option>
    <option value="#dist" %if;(event.e_name = "#dist") selected="selected" %end;>[*distinction]</option>
    <option value="#endl" %if;(event.e_name = "#endl") selected="selected" %end;>[*dotation]</option>
    <option value="#educ" %if;(event.e_name = "#educ") selected="selected" %end;>[*education]</option>
    <option value="#elec" %if;(event.e_name = "#elec") selected="selected" %end;>[*election]</option>
    <option value="#emig" %if;(event.e_name = "#emig") selected="selected" %end;>[*emigration]</option>
    <option value="#exco" %if;(event.e_name = "#exco") selected="selected" %end;>[*excommunication]</option>
    <option value="#fcom" %if;(event.e_name = "#fcom") selected="selected" %end;>[*firstCommunion]</option>
    <option value="#fune" %if;(event.e_name = "#fune") selected="selected" %end;>[*funeral]</option>
    <option value="#grad" %if;(event.e_name = "#grad") selected="selected" %end;>[*graduate]</option>
    <option value="#hosp" %if;(event.e_name = "#hosp") selected="selected" %end;>[*hospitalisation]</option>
    <option value="#illn" %if;(event.e_name = "#illn") selected="selected" %end;>[*illness]</option>
    <option value="#immi" %if;(event.e_name = "#immi") selected="selected" %end;>[*immigration]</option>
    <option value="#lpas" %if;(event.e_name = "#lpas") selected="selected" %end;>[*listePassenger]</option>
    <option value="#mdis" %if;(event.e_name = "#mdis") selected="selected" %end;>[*militaryDistinction]</option>
    <option value="#mpro" %if;(event.e_name = "#mpro") selected="selected" %end;>[*militaryPromotion]</option>
    <option value="#mser" %if;(event.e_name = "#mser") selected="selected" %end;>[*militaryService]</option>
    <option value="#mobm" %if;(event.e_name = "#mobm") selected="selected" %end;>[*mobilisationMilitaire]</option>
    <option value="#natu" %if;(event.e_name = "#natu") selected="selected" %end;>[*naturalisation]</option>
    <option value="#occu" %if;(event.e_name = "#occu") selected="selected" %end;>[*occupation/occupations]0</option>
    <option value="#ordn" %if;(event.e_name = "#ordn") selected="selected" %end;>[*ordination]</option>
    <option value="#prop" %if;(event.e_name = "#prop") selected="selected" %end;>[*property]</option>
    <option value="#cens" %if;(event.e_name = "#cens") selected="selected" %end;>[*recensement]</option>
    <option value="#resi" %if;(event.e_name = "#resi") selected="selected" %end;>[*residence]</option>
    <option value="#reti" %if;(event.e_name = "#reti") selected="selected" %end;>[*retired]</option>
    <option value="#vteb" %if;(event.e_name = "#vteb") selected="selected" %end;>[*venteBien]</option>
    <option value="#will" %if;(event.e_name = "#will") selected="selected" %end;>[*will]</option>
    <option value="#bapl" %if;(event.e_name = "#bapl") selected="selected" %end;>[*baptismLDS]</option>
    <option value="#conl" %if;(event.e_name = "#conl") selected="selected" %end;>[*confirmation LDS]</option>
    <option value="#dotl" %if;(event.e_name = "#dotl") selected="selected" %end;>[*dotationLDS]</option>
    <option value="#flkl" %if;(event.e_name = "#flkl") selected="selected" %end;>[*familyLinkLDS]</option>
    <option value="#slgc" %if;(event.e_name = "#slgc") selected="selected" %end;>[*scellentChildLDS]</option>
    <option value="#slgp" %if;(event.e_name = "#slgp") selected="selected" %end;>[*scellentParentLDS]</option>
    <option value="#slgs" %if;(event.e_name = "#slgs") selected="selected" %end;>[*scellentSpouseLDS]</option>
  </select>
%end;

%define;insert_pevent(xcnt)
  <table border="1">
    <tr>
      <td>
        <label>[*insert::|<input type="text" name="ins_eventxcnt_n" size="1" maxlength="1" value="1"%/></label>
        <label> | event/events]<input type="checkbox" name="ins_eventxcnt" value="on"%/></label>
      </td>
    </tr>
  </table>
%end;

%define;insert_witness(xcnt, wcnt, evt_name)
  <table border="1">
    <tr>
      <td>
        <label>
        <label>[*insert::|<input type="text" name="excnt_ins_witnwcnt_n" size="1" maxlength="1" value="1"%/></label>
        <label> | witness/witnesses]<input type="checkbox" name="excnt_ins_witnwcnt" value="on"%/></label>
        %(
        [*insert]&nbsp;
        <input type="text" name="excnt_ins_witnwcnt_n" size="1" maxlength="1" value="1" onkeydown= "if(event.keyCode == 13) document.getElementById('excnt_ins_witnwcnt').value = 'on';" %/>
        </label> [nouveau(x)::witness/witnesses]0 %if;("evt_name" = "#bapt")/ [godfather/godmother/godparents]2%end;
        <input type="hidden" name="excnt_ins_witnwcnt" id="excnt_ins_witnwcnt" readonly/>
        <input type="submit" onclick="%if;("evt_name" = "buri_or_crem")set_buri(xcnt);%end; %if;("evt_name" = "#deat")set_insert_death(xcnt);%end; document.forms['form_pers'].action += '#witn';document.getElementById('excnt_ins_witnwcnt').value = 'on'" value="ok" readonly/>
        %)
      </td>
    </tr>
  </table>
%end;

%define;one_witness(xcnt, wcnt, evt_name)
  <table border="1" width="700px">
    <tr>
      <td>[*witness/witnesses]0</td>
      <td>
        <select name="excnt_witnwcnt_kind" %if;("evt_name" != "#bapt")style="display:none;"%end;>
          <option value="godp" %if;(witness_kind = "godp" or "evt_name" = "#bapt") selected="selected" %end;>[*godfather/godmother/godparents]2</option>
          <option value="" %if;(witness_kind = "") selected="selected" %end;>[*witness/witnesses]0</option>
        </select>
      </td>
    </tr>
    <tr>
      <td><label for="excnt_witnwcnt_fn">[*first name/first names]0</label></td>
      <td>
        <input type="text" name="excnt_witnwcnt_fn" size="40" maxlength="200" value="%witness.first_name;" id="excnt_witnwcnt_fn"%/>
      </td>
      <td align="%right;"><label for="excnt_witnwcnt_occ">[*number]</label></td>
      <td>
        <input type="text" name="excnt_witnwcnt_occ" size="5" maxlength="8" value="%witness.occ;" id="excnt_witnwcnt_occ"%/>
      </td>
      <td>
        <select name="excnt_witnwcnt_p">
          <option value="link"%if;(witness.create = "link") selected="selected"%end;>[*link]0</option>
          <option value="create"%if;(witness.create = "create") selected="selected"%end;>[*create]0</option>
        </select>
      </td>
    </tr>
    <tr>
      <td><label for="excnt_witnwcnt_sn">[*surname/surnames]0</label></td>
      <td colspan="3">
        <input type="text" name="excnt_witnwcnt_sn" size="40" maxlength="200" value="%witness.surname;" id="excnt_witnwcnt_sn"%/>
      </td>
      <td>
        <label>
          <input type="radio" name="excnt_witnwcnt_sex" value="N" %if;(witness.create.sex = "neuter") checked="checked"%end;%/>?
        </label>
        <label>
          <input type="radio" name="excnt_witnwcnt_sex" value="M" %if;(witness.create.sex = "male") checked="checked"%end;%/>[M/F]0
        </label>
        <label>
          <input type="radio" name="excnt_witnwcnt_sex" value="F" %if;(witness.create.sex = "female") checked="checked"%end;%/>[M/F]1
        </label>
      </td>
    </tr>
  </table>
%end;

%define;one_empty_witness(xcnt, wcnt, evt_name)
  <br%/>
  <table border="1" width="700px">
    <tr>
      <td><b><i>[*witness/witnesses]0</i></b></td>
      <td colspan="2">
        <table border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td>
              <select name="excnt_witnwcnt_p">
                <option value="create"%if;(witness.create)%sp;
                 selected="selected"%end;>[*create]0</option>
                <option value="link"%if;(witness.link)%sp;
                 selected="selected"%end;>[*link]0</option>
              </select>
              <select name="excnt_witnwcnt_kind" %if;("evt_name" != "#bapt")style="display:none;"%end;>
                <option value="" selected="selected">[*witness/witnesses]0</option>
                <option value="godp" %if;("evt_name" = "#bapt") selected="selected" %end;>[*godfather/godmother/godparents]2</option>
              </select>
            </td>
            <td>
              <label>
              <input type="radio" name="excnt_witnwcnt_sex" value="N"%nn;
               %if;(witness.create.sex = "neuter") checked="checked"%end;%/>?
              </label><label>
              <input type="radio" name="excnt_witnwcnt_sex" value="M"%nn;
               %if;(witness.create.sex = "male") checked="checked"%end;%/>[M/F]0
              </label><label>
              <input type="radio" name="excnt_witnwcnt_sex" value="F"%nn;
               %if;(witness.create.sex = "female") checked="checked"%end;%/>[M/F]1
              </label>
            </td>
          </tr>
        </table>
      </td>
      <td><a class="astuce" onmouseover="show_explain('updind','relcre',event)" onmouseout="hide_explain('updind',event)">&nbsp;</a></td>
    </tr>
    <tr>
      <td><label for="excnt_witnwcnt_sn">[*surname/surnames]0</label></td>
      <td colspan="3">
        <input type="text" name="excnt_witnwcnt_sn" size="40" maxlength="200"%sp;
         value="" id="excnt_witnwcnt_sn"%/>
      </td>
    </tr>
    <tr>
      <td><label for="excnt_witnwcnt_fn">[*first name/first names]1</label></td>
      <td>
        <input type="text" name="excnt_witnwcnt_fn" size="40" maxlength="200"%sp;
         value="" id="excnt_witnwcnt_fn"%/>
      </td>
      <td align="%right;"><label for="excnt_witnwcnt_occ">[*number]</label></td>
      <td>
        <input type="text" name="excnt_witnwcnt_occ" size="5" maxlength="8"%sp;
         value="" id="excnt_witnwcnt_occ"%/>
      </td>
    </tr>
  </table>
%end;

%define;one_pevent(xcnt)
  %if;(event.e_name != "#birt" and event.e_name != "#bapt" and event.e_name != "#deat" and event.e_name != "#buri" and event.e_name != "#crem")
    <input type="hidden" name="e_weightxcnt" size="30" value="%event_weight;" id="e_weightxcnt" />
    <table border="1" width="700px">
      <tr>
        <td><label for="e_namexcnt">[*event/events]0</label></td>
        <td>
          %apply;selector_pevent(xcnt)
          <label id="pevent_label_selectorxcnt" style="display:none" class="other_evts">
            [or]0 [text]0
            <input type="text" name="e_namexcnt" size="40" maxlength="200" value="%event.e_name;" id="e_namexcnt"%/>
          </label>
        </td>
      </tr>
      <tr>
        <td><label for="e_placexcnt">[*place]0</label></td>
        <td>
          <input type="text" name="e_placexcnt" size="74" value="%event.e_place;"%sp; id="e_placexcnt"%/>
          <a class="astuce" onmouseover="show_explain('updind','place',event)" onmouseout="hide_explain('updind',event)">&nbsp;</a>
        </td>
      </tr>
    </table>
    %apply;date([*date/dates]0, "e_datexcnt", "event_date", "")
    <table border="1" width="700px">
      <tr>
        <td><label for="e_notexcnt">[*note/notes]1</label></td>
        <td>
          <textarea name="e_notexcnt" rows="2" cols="74" id="e_notexcnt">%event.e_note;</textarea>
        </td>
      </tr>
      <tr>
        <td><label for="e_srcxcnt">[*source/sources]0</label></td>
        <td>
          <input type="text" name="e_srcxcnt" size="90" value="%event.e_src;"%sp; id="e_srcxcnt"%/>
        </td>
      </tr>
    </table>
    %if;has_witness;
      <p></p>
      %foreach;witness;
        %apply;one_witness(xcnt, wcnt, "")
        %if;is_last;%apply;insert_witness(xcnt, wcnt, "")%end;
      %end;
    %else;
      %apply;insert_witness(xcnt, "0", "")
    %end;
    <br%/><br%/>
  %end;
%end

%define;one_empty_pevent(xcnt)
  <table border="1" width="700px">
    <tr>
      <td><label for="e_namexcnt">[*event/events]0</label></td>
      <td>
        %apply;selector_pevent(xcnt)
        <label id="pevent_label_selectorxcnt" style="display:none">
          [or]0 [text]0
          <input type="text" name="e_namexcnt" size="40" maxlength="200" value="%event.e_name;" id="e_namexcnt"%/>
        </label>
      </td>
    </tr>
    <tr>
      <td><label for="e_placexcnt">[*place]0</label></td>
      <td>
        <input type="text" name="e_placexcnt" size="90" value="" id="e_placexcnt"%/>
        <a class="astuce" onmouseover="show_explain('updind','place',event)" onmouseout="hide_explain('updind',event)">&nbsp;</a>
      </td>
    </tr>
    %apply;date([*date/dates]0, "e_datexcnt", "event_date", "")
    <tr>
      <td><label for="e_notexcnt">[*note/notes]1</label></td>
      <td>
        <textarea name="e_notexcnt" rows="2" cols="74" id="e_notexcnt"></textarea>
      </td>
    </tr>
    <tr>
      <td><label for="e_srcxcnt">[*source/sources]0</label></td>
      <td>
        <input type="text" name="e_srcxcnt" size="90" value="" id="e_srcxcnt"%/>
      </td>
    </tr>
  </table>
  %apply;insert_witness(xcnt, "0", "")
%end;

%define;one_specific_pevent(xcnt, evt_name)
  %if;(event.e_name = "evt_name")
    <table border="1" width="700px">
      %if;("evt_name" = "#deat")
        <tr>
          <td>&nbsp;</td>
          <td>
            <select name="death" id="death_selectxcnt" onchange="change_death('xcnt')">
              %if;(not has_birth_date and dont_know_if_dead)
                <option value="Auto" selected="selected"> -</option>
              %end;
              <option value="NotDead" %if;not_dead; selected="selected"%end;>[*non decede]</option>
              <option value="DontKnowIfDead" %if;(dont_know_if_dead and has_birth_date)%sp;selected="selected"%end;>[*don't know]0%nl;</option>
              <option value="Death" %if;(death.year != "" or death.text != "" or dead_dont_know_when) selected="selected"%end;>[*died]2...</option>
              <option value="DeadYoung" %if;died_young; selected="selected"%end;>[*died young]2</option>
              <option value="OfCourseDead" %if;of_course_dead; selected="selected"%end;>[*of course dead]</option>
            </select>
          </td>
        </tr>
      %end;
      %if;("evt_name" = "#buri" or "evt_name" = "#crem")
        <tr>
          <td>&nbsp;</td>
          <td>
            <select id="buri_selectxcnt" onchange="change_buri('xcnt')">
              <option value="" %if;("evt_name" = "") selected="selected" %end;>-</option>
              <option value="#buri" %if;("evt_name" = "#buri") selected="selected" %end;>[*buried]2</option>
              <option value="#crem" %if;("evt_name" = "#crem") selected="selected" %end;>[*cremated]2</option>
            </select>
          </td>
        </tr>
      %end;
      <tr style = "display:none;">
        <td><label for="e_namexcnt">[*event/events]0</label></td>
        <td>
          <input type="text" name="e_namexcnt" size="30" value="%event.e_name;" id="e_namexcnt"%/>
          <input type="hidden" name="e_weightxcnt" size="30" value="%event_weight;" id="e_weightxcnt"%/>
        </td>
      </tr>
      <tr>
        <td><label for="e_placexcnt">[*place]</label></td>
        <td>
          <input type="text" name="e_placexcnt" size="90" maxlenght="200" value="%event.e_place;"%sp; id="e_placexcnt" %if;("evt_name" = "#deat") onfocus='set_death_focus(xcnt)'%end;%/>
        </td>
      </tr>
    </table>
    %apply;date([*date/dates]0, "e_datexcnt", "event_date", "%if;('evt_name' = '#deat')onfocus='set_death_focus(xcnt)'%end;")
    <table border="1" width="700px">
      <tr>
        <td><label for="e_notexcnt">[*note/notes]1</label></td>
        <td>
          <textarea name="e_notexcnt" rows="2" cols="74" id="e_notexcnt">%event.e_note;</textarea>
        </td>
      </tr>
      <tr>
        <td><label for="e_srcxcnt">[*source/sources]0</label></td>
        <td>
          <input type="text" name="e_srcxcnt" size="90" value="%event.e_src;" id="e_srcxcnt"%/>
        </td>
      </tr>
    </table>
    %if;(has_witness)
      %foreach;witness;
        <p></p>
        %apply;one_witness(xcnt, wcnt, "evt_name")
        %if;is_last;%apply;insert_witness(xcnt, wcnt, "evt_name")%end;
      %end;
    %else;
      %apply;insert_witness(xcnt, "0", "evt_name")
    %end;
  %end;
%end

%define;one_empty_specific_pevent(xcnt, evt_name)
  <table border="1" width="700px">
    %if;("evt_name" = "#deat")
      <tr>
        <td>&nbsp;</td>
        <td>
          <select name="death" id="death_selectxcnt" onchange="change_death('xcnt')">
            %if;(not has_birth_date and dont_know_if_dead)
              <option value="Auto" selected="selected"> -</option>
            %end;
            <option value="NotDead" %if;not_dead; selected="selected"%end;>[*non decede]</option>
            <option value="DontKnowIfDead" %if;(dont_know_if_dead and has_birth_date)%sp;selected="selected"%end;>[*don't know]0%nl;</option>
            <option value="Death" %if;(death.year != "" or death.text != "" or dead_dont_know_when) selected="selected"%end;>[*died]2...</option>
            <option value="DeadYoung" %if;died_young; selected="selected"%end;>[*died young]2</option>
            <option value="OfCourseDead" %if;of_course_dead; selected="selected"%end;>[*of course dead]</option>
          </select>
        </td>
      </tr>
    %end;
    %if;("evt_name" = "#buri" or "evt_name" = "#crem" or "evt_name" = "buri_or_crem")
      <tr>
        <td>&nbsp;</td>
        <td>
          <select id="buri_selectxcnt" onchange="change_buri('xcnt')">
            <option value="" %if;("evt_name" = "buri_or_crem") selected="selected" %end;>-</option>
            <option value="#buri" %if;("evt_name" = "#buri") selected="selected" %end;>[*buried]2</option>
            <option value="#crem" %if;("evt_name" = "#crem") selected="selected" %end;>[*cremated]2</option>
          </select>
        </td>
      </tr>
    %end;
    <tr style="display:none;">
      <td><label for="e_namexcnt">[*event/events]0</label></td>
      <td>
        <input type="text" name="e_namexcnt" size="30" value="%if;("evt_name" != "buri_or_crem")%if;("evt_name" != "#deat" or (not not_dead and not dont_know_if_dead))evt_name%end;%end;" id="e_namexcnt"%/>
      </td>
    </tr>
    <tr>
      <td><label for="e_placexcnt">[*place]0</label></td>
      <td>
        <input type="text" name="e_placexcnt" size="90" maxlength="200" value=""%sp; id="e_placexcnt" %if;("evt_name" = "#deat") onfocus='set_death_focus(xcnt)'%elseif;("evt_name" = "buri_or_crem") onfocus='set_burial_focus(xcnt)'%end;%/>
        <a class="astuce" onmouseover="show_explain('updind','place',event)" onmouseout="hide_explain('updind',event)">&nbsp;</a>
      </td>
    </tr>
  </table>
  %if;("evt_name"="#deat")
    %apply;date([*date/dates]0, "e_datexcnt", "event_date", "onfocus='set_death_focus(xcnt)'")
  %elseif("evt_name"="buri_or_crem")
    %apply;date([*date/dates]0, "e_datexcnt", "event_date", "onfocus='set_burial_focus(xcnt)'")
  %else;
    %apply;date([*date/dates]0, "e_datexcnt", "event_date", "")
  %end;
  <table border="1" width="700px">
    <tr>
      <td><label for="e_notexcnt">[*note/notes]1</label></td>
      <td>
        <textarea name="e_notexcnt" rows="2" cols="74" id="e_notexcnt"></textarea>
      </td>
    </tr>
    <tr>
      <td><label for="e_srcxcnt">[*source/sources]0</label></td>
      <td>
        <input type="text" name="e_srcxcnt" size="90" value=""%sp; id="e_srcxcnt"%/>
      </td>
    </tr>
  </table>
  %(
  %if;("evt_name" = "#bapt")
    %apply;one_empty_witness(xcnt, "1", "evt_name")
    %apply;one_empty_witness(xcnt, "2", "evt_name")
  %end;
  %if;("evt_name" = "#bapt")
    %apply;insert_witness(xcnt, "1", "evt_name")
  %else;
    %apply;insert_witness(xcnt, "0", "evt_name")
  %end;
  %)
  %apply;insert_witness(xcnt, "0", "evt_name")
%end

<h1>%nn;
  %if;(evar_m = "MRG_IND_OK" or evar_m = "MRG_MOD_IND_OK")
    [*merge::person/persons]1 : %first_name; %surname;
    %if;(first_name != "?" and surname != "?")
      %sp;<span class="reference">([reference key]: %first_name;.%if;(occ = "")0%else;%occ;%end; %surname)</span>
    %end;
  %elseif;(evar_m = "MOD_IND" or evar_m = "MOD_IND_OK")
    [*modify::person/persons]0 : %first_name; %surname;
    %if;(first_name != "?" and surname != "?")
      %sp;<span class="reference">([reference key]: %first_name;.%if;(occ = "")0%else;%occ;%end; %surname)</span>
    %end;
  %else;
    [*add::person/persons]0%end;
</h1>

<p>
  <b>[*other action] : </b>
  <a href="%prefix;m=MRG;i=%index;">[*merge::]</a> | <a href="%prefix;m=DEL_IND;i=%index;">[*delete::]</a>
</p>

<form method="post" action="%action;">
  <p>
    %hidden;
    <input type="hidden" name="digest" value="%digest;"%/>
    <input type="hidden" name="i" value="%index;"%/>
    %if;(evar_m = "MRG_IND_OK" or evar_m = "MRG_MOD_IND_OK")
      %if;(evar_i2 != "")
        <input type="hidden" name="i2" value="%evar_i2;">
      %end;
      %if;(evar_ini1 != "" and evar_ini2 != "")
        <input type="hidden" name="ini1" value="%evar_ini1;"%/>
        <input type="hidden" name="ini2" value="%evar_ini2;"%/>
      %end;
      %if;(evar.iexcl != "" or evar.fexcl != "")
        <input type="hidden" name="ip" value="%evar.ip;"%/>
        %if;(evar.iexcl != "")
          <input type="hidden" name="iexcl" value="%evar.iexcl;"%/>
        %end;
        %if;(evar.fexcl != "")
          <input type="hidden" name="fexcl" value="%evar.fexcl;"%/>
        %end;
      %end;
      <input type="hidden" name="m" value="MRG_MOD_IND_OK"%/>
    %elseif;(evar_m = "MOD_IND" or evar_m = "MOD_IND_OK")
      <input type="hidden" name="m" value="MOD_IND_OK"%/>
    %else;
      <input type="hidden" name="m" value="ADD_IND_OK"%/>
    %end;
  </p>

  <table border="1" width="700px">
    <tr>
      <td><label for="first_name">[*first name/first names]0</label></td>
      <td>
        <input type="text" name="first_name" size="40" maxlength="200" value="%first_name;" id="first_name"%/>
      </td>
      <td><label for="occ">[*number]0</label></td>
      <td>
        <input type="text" name="occ" size="5" maxlength="8" value="%occ;" id="occ"%/>
      </td>
    </tr>
    <tr>
      <td><label for="surname">[*surname/surnames]0</label></td>
      <td>
        <input type="text" name="surname" size="40" maxlength="200" value="%surname;" id="surname"%/>
      </td>
      <td>[*sex]</td>
      <td>
        <input type="radio" name="sex" value="M" id="sexM" %if;is_male;checked="checked"%end;%/>
        <label for="sexM">[M/F]0</label>
        <input type="radio" name="sex" value="F" id="sexF" %if;is_female;checked="checked"%end;%/>
        <label for="sexF">[M/F]1</label>
        <input type="radio" name="sex" value="N" id="sexU" %if;not(is_male or is_female)checked="checked"%end;%/>
        <label for="sexU">?</label>
        </td>
    </tr>
    <tr>
      <td><label for="public_name">[*public name]</label></td>
      <td colspan="3">
        <input type="text" name="public_name" size="40" value="%public_name;" id="public_name"%/>
      </td>
    </tr>
    <tr>
      <td><label for="image">[*image/images]0</label></td>
      <td colspan="3">
        <input type="text" name="image" size="40" value="%image;" id="image"%/>
      </td>
    </tr>
  </table>

  <p></p>

  <table border="1" width="700px">
    %if;has_qualifiers;
      %foreach;qualifier;
        <tr>
          <td><label for="qualifier%cnt;">[*qualifier]0</label></td>
          <td><input type="text" name="qualifier%cnt;" size="30" value="%qualifier;" id="qualifier%cnt;"%/></td>
          <td><label for="add_qualifier%cnt;">[*insert::qualifier]</label></td>
          <td><input type="checkbox" name="add_qualifier%cnt;" value="on" id="add_qualifier%cnt;"%/></td>
        </tr>
      %end;
    %elseif;(bvar.propose_qualifier != "no")
      <tr>
        <td><label for="qualifier0">[*qualifier]0</label></td>
        <td><input type="text" name="qualifier0" size="30" value="" id="qualifier0"%/></td>
        <td><label for="add_qualifier0">[*insert::qualifier]</label></td>
        <td><input type="checkbox" name="add_qualifier0" value="on" id="add_qualifier0"%/></td>
      </tr>
    %end;
    %if;has_aliases;
      %foreach;alias;
        <tr>
          <td><label for="alias%cnt;">[*alias]0</label></td>
          <td><input type="text" name="alias%cnt;" size="30" value="%alias;" id="alias%cnt;"%/></td>
          <td><label for="add_alias%cnt;">[*insert::alias]</label></td>
          <td><input type="checkbox" name="add_alias%cnt;" value="on" id="add_alias%cnt;"%/></td>
        </tr>
      %end;
    %elseif;(bvar.propose_alias != "no")
      <tr>
        <td><label for="alias0">[*alias]0</label></td>
        <td><input type="text" name="alias0" size="30" value="" id="alias0"%/></td>
        <td><label for="add_alias0">[*insert::alias]</label></td>
        <td><input type="checkbox" name="add_alias0" value="on" id="add_alias0"%/></td>
      </tr>
    %end;
    %if;has_first_names_aliases;
      %foreach;first_name_alias;
        <tr>
          <td><label for="first_name_alias%cnt;">[*first name alias]0</label></td>
          <td>
            <input type="text" name="first_name_alias%cnt;" size="30" value="%first_name_alias;" id="first_name_alias%cnt;"%/>
          </td>
          <td><label for="add_first_name_alias%cnt;">[*insert::first name alias]</label></td>
          <td><input type="checkbox" name="add_first_name_alias%cnt;" value="on" id="add_first_name_alias%cnt;"%/></td>
        </tr>
      %end;
    %else;
      <tr>
        <td><label for="first_name_alias0">[*first name alias]0</label></td>
        <td><input type="text" name="first_name_alias0" size="30" value="" id="first_name_alias0"%/></td>
        <td><label for="add_first_name_alias0">[*insert::first name alias]</label></td>
        <td><input type="checkbox" name="add_first_name_alias0" value="on" id="add_first_name_alias0"%/></td>
      </tr>
    %end;
    %if;has_surnames_aliases;
      %foreach;surname_alias;
        <tr>
          <td>[*surname alias]0</td>
          <td>
            <input type="text" name="surname_alias%cnt;" size="30" value="%surname_alias;"%/>
          </td>
          <td>[*insert::surname alias]</td>
          <td><input type="checkbox" name="add_surname_alias%cnt;" value="on"%/></td>
        </tr>
      %end;
    %else;
      <tr>
        <td><label for="surname_alias0">[*surname alias]0</label></td>
        <td><input type="text" name="surname_alias0" size="30" value="" id="surname_alias0"%/></td>
        <td><label for="add_surname_alias0">[*insert::surname alias]</label></td>
        <td><input type="checkbox" name="add_surname_alias0" value="on" id="add_surname_alias0"%/></td>
      </tr>
    %end;
  </table>

  <h4><a name="birth">[*birth]</a></h4>
  <div style="display:none;">
    <table border="1" width="700px">
      <tr>
        <td>[*born]2...</td>
        <td><label for="birth_place">[*place]</label></td>
        <td>
          <input type="text" name="birth_place" size="90" maxlength="200" value="%birth_place;" id="birth_place"%/>
        </td>
      </tr>
    </table>
    %apply;date([*date/dates]0, "birth", "birth", "")
    %apply;note("birth")
    %apply;source("birth")
  </div>
  %if;has_pevent_birth;
    %foreach;pevent;
      %apply;one_specific_pevent(cnt, "#birt")
    %end;
  %else;
    %apply;one_empty_specific_pevent%with;%next_pevent;%and;#birt%end;
    %incr_next_pevent;
  %end;

  <p></p>

  <h4><a name="baptism">[*baptism]</a></h4>
  <div style="display:none;">
    <table border="1" width="700px">
      <tr>
        <td>[*baptized]2...</td>
        <td><label for="bapt_place">[*place]</label></td>
        <td>
          <input type="text" name="bapt_place" size="90" maxlength="200" value="%bapt_place;" id="bapt_place"%/>
        </td>
      </tr>
    </table>
    %apply;date([*date/dates]0, "bapt", "bapt", "")
    %apply;note("bapt")
    %apply;source("bapt")
  </div>
  %if;has_pevent_baptism;
    %foreach;pevent;
      %apply;one_specific_pevent(cnt, "#bapt")
    %end;
  %else;
    %apply;one_empty_specific_pevent%with;%next_pevent;%and;#bapt%end;
    %incr_next_pevent;
  %end;

  <h4><a name="death">[*death]</a></h4>
  <div style="display:none;">
    <table border="1" width="700px">
      <tr>
        <td>
          <select name="old_death" id="death_selectxcnt" onchange="change_death('xcnt')">
            %if;(not has_birth_date and dont_know_if_dead)
              <option value="Auto" selected="selected"> -</option>
            %end;
            <option value="NotDead" %if;not_dead; selected="selected"%end;>[*non decede]</option>
            <option value="DontKnowIfDead" %if;(dont_know_if_dead and has_birth_date)%sp;selected="selected"%end;>[*don't know]0%nl;</option>
            <option value="Death" %if;(death.year != "" or death.text != "" or dead_dont_know_when) selected="selected"%end;>[*died]2...</option>
            <option value="DeadYoung" %if;died_young; selected="selected"%end;>[*died young]2</option>
            <option value="OfCourseDead" %if;of_course_dead; selected="selected"%end;>[*of course dead]</option>
          </select>
        </td>
        <td>
          <label>[*place]0
            <input type="text" name="death_place" size="90" maxlength="200" value="%death_place;" onfocus='setDead()'%/></label>
        </td>
      </tr>
    </table>
    %apply;date([*date/dates]0, "death", "death", "onfocus='setDead()'")
    <table border="1" width="700px">
      <tr>
        <td>
          <label>
            <input type="radio" name="death_reason" value="Killed"%if;dr_killed; checked="checked"%end; onclick='setDead()'%/>[*killed (in action)]2
          </label><label>
            <input type="radio" name="death_reason" value="Murdered"%if;dr_murdered; checked="checked"%end; onclick='setDead()'%/>[*murdered]2
          </label><label>
            <input type="radio" name="death_reason" value="Executed"%if;dr_executed; checked="checked"%end; onclick='setDead()'%/>[*executed (legally killed)]2
          </label><label>
            <input type="radio" name="death_reason" value="Disappeared"%if;dr_disappeared; checked="checked"%end; onclick='setDead()'%/>[*disappeared]2
          </label><label>
            <input type="radio" name="death_reason" value="Unspecified"%if;dr_unspecified; checked="checked"%end; onclick='setDead()'%/>[*unspecified]2
          </label>
        </td>
      </tr>
    </table>
    %apply;note("death")
    %apply;source("death")
  </div>
  %if;has_pevent_death;
    %foreach;pevent;
      %apply;one_specific_pevent(cnt, "#deat")
    %end;
  %else;
    %apply;one_empty_specific_pevent%with;%next_pevent;%and;#deat%end;
    %incr_next_pevent;
  %end;

  <h4>[*burial]</h4>
  <div style="display:none;">
    <table border="1" width="700px">
      <tr>
        <td>
          <select name="burial">
            <option value="UnknownBurial"%if;bt_unknown_burial; selected="selected"%end;>-</option>
            <option value="Buried"%if;bt_buried; selected="selected"%end;>[*buried]2</option>
            <option value="Cremated"%if;bt_cremated; selected="selected"%end;>[*cremated]2</option>
          </select>
        </td>
        <td>
          <label>[*place]0
            <input type="text" name="burial_place" size="90" maxlength="200" value="%burial_place;"%/>
          </label>
        </td>
      </tr>
    </table>
    %apply;date([*date/dates]0, "burial", "burial", "")
    %apply;note("burial")
    %apply;source("burial")
  </div>
  %if;has_pevent_burial;
    %foreach;pevent;
      %apply;one_specific_pevent(cnt, "#buri")
    %end;
  %end;
  %if;has_pevent_cremation;
    %if;has_pevent_burial;<p></p>%end;
    %foreach;pevent;
      %apply;one_specific_pevent(cnt, "#crem")
    %end;
  %end;
  %if;(not has_pevent_burial and not has_pevent_cremation)
    %apply;one_empty_specific_pevent%with;%next_pevent;%and;buri_or_crem%end;
    %incr_next_pevent;
  %end;

  <h4><label for="occu">[*occupation/occupations]1</label></h4>

  <table border="1" width="700px">
    <tr>
      <td>
        <input type="text" name="occu" size="90" maxlength="200" value="%occupation;" id="occu"%/>
      </td>
    </tr>
  </table>

  <h4>[*relation/relations]1</h4>

%define;insert_relation(xx)
  <table border="1">
    <tr>
      <td>
        <label>[*insert::relation/relations]0
          <input type="checkbox" name="add_relationxx" value="on"%/></label>
      </td>
    </tr>
  </table>
%end;

%define;relation_type(xx)
  <table border="1">
    <tr>
      <td>
        <select name="rxx_type">
          <option value="Undef"%if;relation.rt_empty; selected="selected"%end;> -</option>
          <option value="Adoption"%if;relation.rt_adoption; selected="selected"%end;>%sp;[*adoptive father/adoptive mother/adoptive parents]2</option>
          <option value="Recognition"%if;relation.rt_recognition;%sp;selected="selected"%end;>%sp;[*recognizing father/recognizing mother/recognizing parents]2</option>
          <option value="CandidateParent"%if;relation.rt_candidate_parent;%sp;selected="selected"%end;> [*candidate father/candidate mother/candidate parents]2</option>
          <option value="GodParent"%if;relation.rt_godparent;%sp;selected="selected"%end;>%sp;[*godfather/godmother/godparents]2</option>
          <option value="FosterParent"%if;relation.rt_foster_parent;%sp;selected="selected"%end;>%sp;[*foster father/foster mother/foster parents]2</option>
        </select>
      </td>
    </tr>
  </table>
%end;

%define;one_relation(xcnt,xvar,xrel,xsex)
  <table border="1" width="700px">
    <tr>
      <td><label for="rxcnt_xvar_fn">[*first name/first names]0</label></td>
      <td>
        <input type="text" name="rxcnt_xvar_fn" size="23" maxlength="200"%sp;value="%relation.xrel.first_name;" id="rxcnt_xvar_fn"%/>
      </td>
      <td align="right"><label for="rxcnt_xvar_occ">[*number]</label></td>
      <td>
        <input type="text" name="rxcnt_xvar_occ" size="5" maxlength="8"%sp;value="%relation.xrel.occ;" id="rxcnt_xvar_occ"%/>
      </td>
      <td>
        <select name="rxcnt_xvar_p">
          <option value="link"%if;relation.xrel.link;%sp;selected="selected"%end;>[*link]0</option>
          <option value="create"%if;relation.xrel.create;%sp;selected="selected"%end;>[*create]0</option>
        </select>
      </td>
    </tr>
    <tr>
      <td><label for="rxcnt_xvar_sn">[*surname/surnames]0</label></td>
      <td colspan="4">
        <input type="text" name="rxcnt_xvar_sn" size="40" maxlength="200"%sp;value="%relation.xrel.surname;" id="rxcnt_xvar_sn"%/>([sex]0 = xsex)
      </td>
    </tr>
  </table>
%end;

  %apply;insert_relation("0")
  <p></p>
  %if;has_relations;
    %foreach;relation;
      %apply;relation_type(cnt)
      <p></p>
      %apply;one_relation(cnt,"fath","r_father",[M/F]0)
      %apply;one_relation(cnt,"moth","r_mother",[M/F]1)
      <p></p>
      %apply;insert_relation(cnt)
      <p></p>
    %end;
  %else;
    %apply;relation_type("1")
    <p></p>
    %apply;one_relation("1","fath","r_father",[M/F]0)
    %apply;one_relation("1","moth","r_mother",[M/F]1)
    <p></p>
    %apply;insert_relation("1")
    <p></p>
  %end;

  <h4>[*title/titles]1</h4>

%define;insert_title(xx)
  <table border="1">
    <tr>
      <td>
        <label>[*insert::|<input type="text" name="ins_titlexx_n" size="1" maxlength="1"%sp;value="1"%/></label>
        <label> | title/titles]<input type="checkbox" name="ins_titlexx" value="on"%/></label>
      </td>
    </tr>
  </table>
%end;

%define;one_title(xcnt)
  <table border="1" width="700px">
    <tr>
      <td><label for="t_identxcnt">[*title/titles]0</label></td>
      <td>
        <input type="text" name="t_identxcnt" size="20" value="%title.t_ident;"%sp;id="t_identxcnt"%/>
      </td>
      <td><label for="t_placexcnt">[*estate]0</label></td>
      <td colspan="2">
        <input type="text" name="t_placexcnt" size="30" value="%title.t_estate;"%sp;id="t_placexcnt"%/>
      </td>
    </tr>
    <tr>
      <td><label for="t_namexcnt">[*name]0</label></td>
      <td>
        <input type="text" name="t_namexcnt" size="20" value="%title.t_name;"%sp;id="t_namexcnt"%/>
      </td>
      <td><label for="t_nthxcnt">[*nth]0</label></td>
      <td>
        <input type="text" name="t_nthxcnt" size="3" value="%title.t_nth;"%sp;id="t_nthxcnt"%/>
      </td>
      <td>
        <label>
          [*main title]0
          <input type="checkbox" name="t_main_titlexcnt" value="on"%sp;%if;title.t_main; checked="checked"%end;%/>
        </label>
      </td>
    </tr>
  </table>
  %apply;date([*begin]0, "t_date_startxcnt", "title_date_start", "")
  %apply;date([*end]0, "t_date_endxcnt", "title_date_end", "")
%end

  %apply;insert_title("0")
  <p></p>
  %if;has_titles;
    %foreach;title;
      %apply;one_title(cnt)
      <p></p>
      %apply;insert_title(cnt)
      <p></p>
    %end;
  %else;
    %apply;one_title("1")
    <p></p>
    %apply;insert_title("1")
    <p></p>
  %end;

  <h4>[*event/events]0</h4>
  %if;has_secondary_pevents;
    %foreach;pevent;
      %apply;one_pevent(cnt)
    %end;
    %apply;insert_pevent%with%next_pevent;%end;
    %incr_next_pevent;
  %else;
    %apply;insert_pevent%with%next_pevent;%end;
    %incr_next_pevent;
  %end;

  <p></p>

  <table border="1">
    <tr>
      <td>[*access]0</td>
      <td>
        <label>
          <input type="radio" name="access"%sp;value="IfTitles"%if;acc_if_titles; checked="checked"%end;%/>
          [*if titles]0
        </label>
        <label>
          <input type="radio" name="access"%sp;value="Public"%if;acc_public; checked="checked"%end;%/>
          [*public]0
        </label>
        <label>
          <input type="radio" name="access"%sp;value="Private"%if;acc_private; checked="checked"%end;%/>
          [*private]0
        </label>
      </td>
    </tr>
  </table>

  <h4><label for="notes">[*note/notes]1</label></h4>
  <div id="toolbar">
    %let;name;notes%in;
    %include.toolbar;
  </div>
  <p>
    <table>
      <tr>
        <td>
          <textarea name="notes" rows="12" cols="80" id="notes">%sq;
            %notes;%sq;
          </textarea>%sq;
        </td>
      </tr>
      <tr>
        <td>
          %let;name;notes%in;
          %include.accent;
        </td>
      </tr>
    </table>
  </p>

  <h4><label for="src">[*source/sources]0</label></h4>

  <table border="1" width="700px">
    <tr>
      <td>
        <input type="text" name="src" size="90" maxlength="300"%sp; value="%sources;"%sp;id="src"%/>
      </td>
    </tr>
  </table>

  <p>
    <input type="submit" value="Ok"%/>
  </p>
</form>

%base_trailer;
%copyright;
</body>
</html>
