%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;

%include;css %include;js_upd %include;updind_updfam %(%) %let;l_r_father; placeholder="M" %in; %let;l_r_mother; placeholder="F" %in; %define;load_focus() onload="oL1(); %nn; %if;(evar_m = "MOD_IND") %if;(not is_male and not is_female) sIV('sex1')%nn; %elseif;(birth.prec != "sure") sIV('lpc2')%nn; %elseif;(birth.year < "1900" and death.prec != "sure") sIV('lpc3')%nn; %else; sIV('notes')%nn; %end; %end; "%nn; %end; %define;one_title(z1)
%apply;date("t_date_startz1","title_date_start","","") %apply;date("t_date_endz1","title_date_end","","")
%end; %define;relations(z1)
%apply;one_relation("z1","fath","r_father","0") %apply;relation_type("z1")
%apply;one_relation("z1","moth","r_mother","1")
%end; %define;relation_type(z1)
%end; %define;one_relation(z1,z2,z3,z4) %let;l1;rz1_z2%in; %end; %(%) %include;hed
%message_to_wizard;

[!dates order]0 %hidden; %include;upd_datalist %if;(evar_m = "MRG_IND_OK" or evar_m = "MRG_MOD_IND_OK") %if;(evar_i2 != "") %end; %if;(evar_ini1 != "" and evar_ini2 != "") %end; %if;(evar.iexcl != "" or evar.fexcl != "") %if;(evar.iexcl != "") %end; %if;(evar.fexcl != "") %end; %end; %elseif;(evar_m = "MOD_IND" or evar_m = "MOD_IND_OK") %else; %end; %let;l_s;%if;(is_male)M%elseif;(is_female)F%else;N%end;%in; %let;l_s1;%if;(is_male)0%elseif;(is_female)1%else;2%end;%in; %let;l_s2;%if;(is_male)M%elseif;(is_female)F%else;N%end;%in; %let;lt1;#%in; %let;lt2;[date/dates]0%in; %let;lt3;title="%ak2;"%in; %let;lt4;title="%ak1;%ak3;%ak5;"%in; %let;lt5;title="%ak3;%ak7;"%in; %apply;hevent("birth","birth") %apply;hevent("bapt","bapt") %apply;hevent("death","death") %apply;hevent("burial","burial") %( marche pas : "NotDead" "DontKnowIfDead" "Death" "DeadYoung" "OfCourseDead" %)

%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;
%lpc1; [first name/first names]0 [surname/surnames]0
[public name]
%if;has_qualifiers; %foreach;qualifier; %let;cnt1;%expr(cnt+1)%in; [qualifier]0 %cnt1; + %end; %elseif;(bvar.propose_qualifier != "no") [qualifier]0 1 + %end; %if;has_aliases; %foreach;alias; %let;cnt1;%expr(cnt+1)%in; [alias]0 %cnt1; + %end; %elseif;(bvar.propose_alias != "no") [alias]0 1 + %end; %if;has_first_names_aliases; %foreach;first_name_alias; %let;cnt1;%expr(cnt+1)%in; [first name alias]0 %cnt1; + %end; %else; [first name alias]0 1 + %end; %if;has_surnames_aliases; %foreach;surname_alias; %let;cnt1;%expr(cnt+1)%in; [surname alias]0 %cnt1; + %end; %else; [surname alias]0 1 + %end;
%if;(occupation="") %lpcP; [occupation/occupations]0 %else; %lpcP; [occupation/occupations]0%occupation; %end;
[source/sources]0 [person/persons]0 %if;(sources="") %else; %sources; %end; [image/images]0
[access]0 [if titles]0 [public]0 [private]0
[*note/notes]1 %notes;%sq;
– …
%include;accent
[*event/events]1 ⇳ %if;(not has_pevent_birth)%apply;one_event(next_pevent,"#birt","witness")%incr_next_pevent;%end; %if;has_pevents;%foreach;pevent;%apply;one_event(cnt,"","witness")%end;%end; %if;(not has_pevent_death)%apply;one_event(next_pevent,"","witness")%incr_next_pevent;%end;

+ [event/events]0 %lpc4; # %lt2; [place] [note/notes]1 [source/sources]1

%incr_next_pevent;
[*relation/relations]1

# | [first name/first names]0 | [surname/surnames]0 | MF |
%if;has_relations; %foreach;relation;%apply;relations(cnt)%end; %else; %apply;relations("1") %end;
+ |

[*title/titles]1

# | [title/titles]0 | [estate] | [name] | [nth]0 | [begin] / [end][:] %lt2;
%if;has_titles; %foreach;title;%apply;one_title(cnt)%end; %else; %apply;one_title("1") %end;
+ |

%base_trailer; %include;copyr
%include;js