%doctype;
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
  <!-- $Id: updmenu.txt,v 5.10 2007-07-25 15:01:02 ddr Exp $ -->
  <!-- Copyright (c) 1998-2007 INRIA -->
  <title>[*update]</title>
  <meta name="robots" content="none"%/>
  <meta http-equiv="Content-Type" content="text/html; charset=%charset;"%/>
  <meta http-equiv="Content-Style-Type" content="text/css"%/>
  %include.favicon;
  %include.css;
  %base_header;
</head>
<body%body_prop;>
%message_to_wizard;

<h1>%nn;
  [*update]:<br%/>
  %first_name;
  .%if;(first_name = "?" or surname = "?")%index;%else;%occ;%end; %surname;
</h1>

%if;not cancel_links;
  <table style="float:%right;"><tr><td>
    %if;(referer != "")
      <a href="%referer;"><img
       src="%image_prefix;/left.png"%wid_hei;left.png; 
       alt="&lt;&lt;" title="&lt;&lt;"%/></a>
    %end;
    <a href="%prefix;"><img%sp;
    src="%image_prefix;/up.png"%wid_hei;up.png; 
    alt="^^" title="^^"%/></a>
  </td></tr></table>
%end;

<table border="%border;" width="90%%">
<tr align="%left;">
  <th align="%left;" style="color:%highlight;">[*family/families]1</th>
</tr>
<tr align="%left;">
  <td valign="top">
    %foreach;family;
      %if;(family_cnt != 1)
        <a href="%prefix;m=INV_FAM;i=%index;;f=%family.index;
         ">[*invert]</a>
        <br%/>
        %if;(family.father.index = prev_family.father.index
         and family.mother.index = prev_family.mother.index)
          <a href=%nn;
          "%prefix;m=MRG_FAM;i=%prev_family.index;;i2=%family.index;
          ;ip=%index;">%nn;
          [*merge::]</a>
          <br%/>
        %end;
      %end;
      <a href="%prefix;m=MOD_FAM;i=%family.index;;ip=%index;
       "%if;(nb_families = 1) accesskey="F"%end;>%nn;
      [*modify::family/families]0%if;(nb_families = 1) %end;</a>
      <em>[with] %spouse.first_name;.%spouse.occ; %spouse.surname;</em>
      <br%/>
      <a href="%prefix;m=DEL_FAM;i=%family.index;;ip=%index">%nn;
      [*delete::family/families]0</a>
      <em>[with] %spouse.first_name;.%spouse.occ; %spouse.surname;</em>
      <br%/>
    %end;
    <br%/>
    %if;((first_name = "?" or surname = "?") and
         (nb_families != 0 or has_parents))
    %elseif;(not is_male and not is_female)
      <a href="%prefix;m=ADD_FAM;ip=%index;;sex=M">%nn;
      [*add::marriage/marriages]0 ([M/F]0)</a>
      <br%/>
      <a href="%prefix;m=ADD_FAM;ip=%index;;sex=F">%nn;
      [*add::marriage/marriages]0 ([M/F]1)</a>
      <br%/>
    %else;
      <a href="%prefix;m=ADD_FAM;ip=%index;" accesskey="A">%nn;
      [*add::marriage/marriages]0 </a>
      <br%/>
    %end;
    %if;(nb_children != 0)
      <br%/>
      <a href="%prefix;m=CHG_CHN;ip=%index;">[*change children's names]</a>
    %end;      
    %if;has_possible_duplications;
      <br%/>
      <a href="%prefix;m=MRG_DUP;ip=%index;">%sq;
      [*merge::possible duplications]</a>
    %end;      
  </td>
</tr>
</table>

%define;hint(xx)
  [*to add a child to a family, use "%s":::xx]
%end;

%if;(nb_families != 0)
  <p>
    %apply;hint([*modify::family/families]0)
    <br%/>
  </p>
%end;

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