%define;dlist(z1)
%end;
%apply;dlist("fn")
%apply;dlist("sn")
%apply;dlist("place")
%apply;dlist("occu")
%apply;dlist("src")
%nl;
%if;(evar_m = "MOD_IND" or evar_m = "MOD_IND_OK" or evar_m = "MRG_IND_OK" or evar_m = "MRG_MOD_IND_OK")
%nl;
%else;
%nl;
%end;%nl;