%include;css
%include;hed
%define;pline(znz,zocz,zfnz,zsnz,zbdz,zparamz)
|
|
|
|
zbdz |
sosa_ref |
%end;
%define;sline(znz,zocz,zfnz,zsnz,zbdz,zsz,zparamz)
|
zocz |
zfnz |
zsnz |
zbdz |
|
%end;
%define;one_p_line(zz)
%let;tmp;
%if;pvar.zz.has_birth_date; %pvar.zz.slash_birth_date;
%elseif;pvar.zz.has_baptism_date; %pvar.zz.slash_baptism_date;
%end;
%sp;-%sp;%nn;
%if;pvar.zz.has_death_date;%pvar.zz.slash_death_date;
%elseif;pvar.zz.has_burial_date;%pvar.zz.slash_burial_date;
%elseif;pvar.zz.has_cremation_date;%pvar.zz.slash_cremation_date;
%end;
%in;
%apply;pline("zz", pvar.zz.occ, pvar.zz.first_name, pvar.zz.surname, tmp, "")
%end;
%define;one_s_line(zz)
%if(evar.szz != "")
%let;tmp;
%if;svar.zz.has_birth_date; %svar.zz.slash_birth_date;
%elseif;svar.zz.has_baptism_date; %svar.zz.slash_baptism_date;
%end;
%sp;-%sp;%nn;
%if;svar.zz.has_death_date;%svar.zz.slash_death_date;
%elseif;svar.zz.has_burial_date;%svar.zz.slash_burial_date;
%elseif;svar.zz.has_cremation_date;%svar.zz.slash_cremation_date;
%end;
%in;
%apply;sline("zz", svar.zz.occ, svar.zz.first_name, svar.zz.surname, tmp, evar.szz, "")
%end;
%end;
%define;one_svar(zz)
%if(evar.izz != "" or evar.pzz != "")
%apply;one_p_line("zz")
%apply;one_s_line("zz")
%apply;one_svar(zz+1)
%elseif(evar.szz != "" and "zz" != "1")
%apply;one_s_line("zz")
%apply;one_svar(zz+1)
%end;
%end;
%define;my_hidden(xx)
%if(evar.xx != "")%end;
%end;
%if(not cancel_links)
%include;trl
%include;copyr
%end;
%include;js