Om je wat verder op weg te helpen:
1. Stel je hebt iemand met beroep Boer. Vul dat dan niet in in de Feitencategorie "Beroep", maar maak zelf twee Overige feiten aan bij die persoon. De feitsoort is dan dus "Overig", en de twee categorienamen zijn: [NL]Beroep en [EN]Profession. Zet in de inhoud van [NL]Beroep: Boer, en zet in de inhoud van [EN]Profession: Farmer.
2. Zet de onderstaande sjablooncode in een bestand met b.v. de naam Feiten_Internationaal.asj, en sla dit bestand op in de map Aldfaer Sjablonen. Wat er op de regels na :. staat is toelichtend commentaar. Zorg er voor dat dat op één regel blijft.
3. Ga in Aldfaer naar Tonen, Rapporten, Overige rapporten. Daar zie je nu staan Feiten_Internationaal. Klik dat aan en klik op Toon Rapport. Dan krijg je een lijst van personen met hun Engelse feiten en een lijst van personen met hun Nederlandse feiten.
Daarmee heb je de feiten weliswaar nog niet in de Engelse rapporten, maar het geeft hopelijk wel een idee hoe dat zou kunnen.
:. -------------------------------------------------------------------------------------
:.
_FUNCBEGI(Feiten_EN) :. functie die de interne code, categorienaam en het feit afdrukt van de overige feiten waarvan de categorienaam begint met [EN]
_SETDEF(fact_cat) :. definieert een verzameling fact_cat
_FACTBEGI(_MISC) :. doorloop de Overige feiten
_SETCLR(fact_cat) :. maak de verzameling fact_cat leeg
_SETFILL(fact_cat,[:_FACTCAT:],4) :. zet een element met de eerste vier letters van de categorienaam in fact_cat
[?_SETEXP(fact_cat,1,_SETSTRI) == [EN]?]?
_BEGI :. test of dit element gelijk is aan [EN], dwz test of de categorienaam begint met [EN]; zo ja:
_SETCLR(fact_cat) :. maak de verzameling fact_cat leeg
_SETFILL(fact_cat,[:_FACTCAT:],"[EN]") :. splits de categorienaam in [EN] en de rest
_CODEINTE _SETEXP(fact_cat,5,_SETSTRI) _FACTNOTE<br /> :. druk de code van de persoon af, de categorienaam zonder [EN] en de inhoud van het feit
_END
_FACTEND
_FUNCEND
_FUNCBEGI(Feiten_NL) :. functie die de interne code, categorienaam en het feit afdrukt van de overige feiten waarvan de categorienaam begint met [NL]
_SETDEF(fact_cat)
_FACTBEGI(_MISC)
_SETCLR(fact_cat)
_SETFILL(fact_cat,[:_FACTCAT:],4)
[?_SETEXP(fact_cat,1,_SETSTRI) == [NL]?]?
_BEGI
_SETCLR(fact_cat)
_SETFILL(fact_cat,[:_FACTCAT:],"[NL]")
_CODEINTE _SETEXP(fact_cat,5,_SETSTRI) _FACTNOTE<br />
_END
_FACTEND
_FUNCEND
_WRITBEGI
<html>
_SETDEF(alles) :. definieer een set van personen
_SETFILL(alles,_FAMIFILE) :. vul deze set met alle personen
Engelse feiten:<br />
_SETBEGI(alles) :. druk van alle personen in het bestand de Overige feiten af die beginnen met [EN]
[:Feiten_EN:]
_SETEND
<br />
Nederlands feiten:<br />
_SETBEGI(alles)
[:Feiten_NL:] :. druk van alle personen in het bestand de Overige feiten af die beginnen met [NL]
_SETEND
</html>
_WRITEND
Paul