%doctype; [*update] %include;css %include;hed %message_to_wizard;

%nn; [*update] %first_name; .%if;(first_name = "?" or surname = "?")%index;%else;%occ;%end; %surname;

[*person/persons]0 [*family/families]1
[*modify::] (P) %if;(bvar.can_send_image != "no" and image = "" and first_name != "?" and surname != "?") [*send::image/images]0 %if;(auto_image_file_name != "") [*delete::image/images]0 %end; %end; [*delete::] [*merge::] %if;(not has_parents and first_name != "?" and surname != "?") [*add::parents] %end; %foreach;family; %if;(family_cnt != 1) [*invert::] %if;(family.father.index = prev_family.father.index and family.mother.index = prev_family.mother.index) %nn; [*merge::] %end; %end; %nn; [*modify::family/families]0%if;(nb_families = 1) (F)%end; [with] %spouse.first_name;.%spouse.occ; %spouse.surname; %nn; [*delete::family/families]0 [with] %spouse.first_name;.%spouse.occ; %spouse.surname; %end; %if;((first_name = "?" or surname = "?") and (nb_families != 0 or has_parents)) %elseif;(is_male or is_female) %nn; [*add::family/families]0 (A) %end; %if;(nb_children != 0) [*change children's names] %end; %if;has_possible_duplications; [*merge::possible duplications] %end;
%define;hint(xx) [*to add a child to a family, use "%s":::xx] %end; %if;(nb_families != 0)

%apply;hint([*modify::family/families]0)

%end; %include;trl %include;copyr