Hallo Jacky
Dat is mogelijk met een sjabloon. Dit komt niet voor bij de Bonus rapporten! Hier een kopie dat je kunt copieren en plakken ineen testverwerker, het een naam geven en opslaan in je map sjablonen,desgevallend in een submap er van .
_FUNCBEGI( _Versie )1.3 _FUNCEND
Sjabloon 'kwartierstaten12' Versie _Versie
:. Dit sjabloon is gemaakt door Meije van Slageren (mtvanslageren@hetnet.nl) 3-7-2004
:. Op verzoek van Henk Laarhoven via extra gebruikersgroep Aldfaer
:. versie 1.1
:. kwartiernummer 1, 2 en 3 gecentreerd weergegeven
:. aantal personen in kwartierstaat vermelden op de index.
:. versie 1.2
:. - geboorte en overlijden gegevens niet meer bold.
:. - tor < teken voor naam kwartiernr 11 verwijderd.
:. - Begr. gewijzigd in [].
:. - Welkom pagina voorzien van Instellingen gegevens die van belang zijn voor het sjabloon.
:. versie 1.3
:. - beroep Italic in plaats van Bold ter betere onderschijding van naam t.o.v. beroep.
:. - Indien voorouder onbekend, wordt op het vak met kader getoond.
:. - In achternaam, tussenvoegsel of voornaam is nu slash toegestaan.
:. - Indien onbekende plaatsnaam bij *, ~, [], crem., verm. en tbs geen komma.
:. - Verbeterd relatie onderzoek.
:. - Legenda toegevoegd aan index.
:.
COMMENTAAR
[?_METAINFO
_METAPATH([:_FILEPATH:])
_SETDEF( MOEDERSET )
_SETFILL( MOEDERSET, _ASCE )
_USES( Basis ) :. Standaard functies
_USES( DutchDateFormat ):. Datum formatering
_SETDEF( mijnmoeder ):. Vastleggen wie de moeder is
_FILEMODE( ".html", "ifNewer" )
_FILENAME( "naam.html" )
_FILENAME
?]_WRITBEGI
<HTML>
<HEAD>
<TITLE>Personenlijst</TITLE>
<STYLE type=text/css>
<!--
body { background: #FFFFCC; font-family: MS Sans Serif; font-size: 8pt; }
a:link { color: #0000FF; text-decoration: none; }
a:visited { color: #800080; text-decoration: none; }
a:active { color: #800080; text-decoration: none; }
a:hover { color: #FF0000; text-decoration: none; }
div, font, li, ul, p, td
{ color: #080000; font-size: 8pt; font-family: MS Sans Serif, Arial, Helvetica, sans-serif; }
h3 { color: #080000; font-family: MS Sans Serif, Arial, Helvetica, sans-serif; }
h2 { color: #080000; font-family: MS Sans Serif, Arial, Helvetica, sans-serif; }
-->
</STYLE>
<body>
<center><a href="legende.html" target="kaart"><b>LEGENDA</b></a></center><br>
_SETBEGI( MOEDERSET )
_FIRS?_BEGI <b>Aantal personen in kwartierstaat _AMOU</br></b>_END
_SETEND
_SETBEGI( MOEDERSET )
_LINK?_BEGI
_ASCENUM <a href="_CODEINTE.html" TARGET="kaart">_NAMEFIRS._QUOT[: _NAMEPREF._QUOT:] _SURN._QUOT </a><br>
_ELSE
_ASCENUM _NAMEFIRS._QUOT[: _NAMEPREF._QUOT:] _SURN._QUOT<br>
_END
_SETEND
</body>
</HTML>
_WRITEND
naam.html gereed
[?_FILEMODE( ".html", "ifNewer" )
_FILENAME( "legende.html" )
_FILENAME
?]_WRITBEGI
<html>
<head>
<TITLE>Personenlijst</TITLE>
<style type=text/css> body,td{ font-family: [:_PREFFONT,:] Helvetica, sans-serif; font-size: [:_PREFFONTSIZE:]|[&10&]pt }
:.table {background-color:#DDDDAA}
body {background-color:#FFFFCC}
a:link { color: #0000FF; text-decoration: none; }
a:visited { color: #000099; text-decoration: none; }
a:active { color: #000099; text-decoration: none; }
a:hover { color: #FF0000; text-decoration: none; }
</style>
</head>
<body>
<b>LEGENDA</b>
<table>
<tr><td>X</td><td>Huwelijk</td></tr>
<tr><td>Kx</td><td>Kerkelijkhuwelijk</td></tr>
<tr><td>Ox</td><td>Ondertrouw</td></tr>
<tr><td>Gp.</td><td>Geregistreerd partnerschap</td></tr>
<tr><td>Gp. a</td><td>Aangifte geregistreed partnerschap</td></tr>
<tr><td>Sl.</td><td>Samenleven</td></tr>
<tr><td>Sl. c</td><td>Contract samenleven</td></tr>
<tr><td>Rel.</td><td>Relatie</td></tr>
<tr><td>*</td><td>Geboren</td></tr>
<tr><td>~</td><td>Gedoopt</td></tr>
<tr><td>† </td><td>Overleden</td></tr>
<tr><td>[]</td><td>Begraven</td></tr>
<tr><td>crem.</td><td>Cremeren</td></tr>
<tr><td>verm.</td><td>Vermist</td></tr>
<tr><td>tbs.</td><td>Ter beschikking stellen</td></tr>
</table>
</body>
</html>
_WRITEND
legende.html gereed
_SETBEGI( MOEDERSET ).[?_FILENAME( "_CODEINTE.html" )
_FILEMODE( ".html", "ifNewer" )
?]_WRITBEGI
<HTML>
<head>
<META HTTP-EQUIV="Content-Style-Type" CONTENT="text/css">
<TITLE>kwartierblad _NAMEFIRS _NAMEPREF _SURN</TITLE>
<style type=text/css> body,td{ font-family: [:_PREFFONT,:] Helvetica, sans-serif; font-size: [:_PREFFONTSIZE:]|[&10&]pt }
table {background-color:#DDDDAA}
body {background-color:#AAAA99}
a:link { color: #0000FF; text-decoration: none; }
a:visited { color: #000099; text-decoration: none; }
a:active { color: #000099; text-decoration: none; }
a:hover { color: #FF0000; text-decoration: none; }
</style>
</head>
:. begin functies
:.
_FUNCBEGI( persoonsnaam )
<b>_NAMEFIRS[: _NAMEPREF:] _SURN</b></br>
_FUNCEND
:.
_FUNCBEGI( beroep )
[&<i>[?_PREFFACTOCCU?]_FACTBEGI(_OCCU)[:_FACTOCCU[::]_LAST(", ;")[:[?_LAST?]</br>:]:]_FACTEND</i>&]
_FUNCEND
:.
_FUNCBEGI( gebdoop )
[&
[:* [&[:_BIRTPLAC, :]<nobr>_BIRTDATE( [:DATEFORMAT1:] )</nobr></br>&]:]|
[:* _BIRTPLAC</br>:]|
[:~ [&[:_BAPTPLAC, :]<nobr>_BAPTDATE( [:DATEFORMAT1:] )</nobr></br>&]:]|
[:~ _BAPTPLAC</br>:]|
[&&]
&]
_FUNCEND
:.
_FUNCBEGI( ovlbeg )
[&
[:† [&[:_DEATPLAC, :]<nobr>_DEATDATE( [:DATEFORMAT1:] )</nobr>&]:]|
[:† _DEATPLAC:]|
[&[?_BURI?][] [&[:_BURIPLAC, :]<nobr>_BURIDATE( [:DATEFORMAT1:] )</nobr>&]&]|
[&[?_BURI?][] [:_BURIPLAC:]&]|
[&[?_SCIE?]tbs. [&[:_BURIPLAC, :]<nobr>_BURIDATE( [:DATEFORMAT1:] )</nobr>&]&]|
[&[?_SCIE?]tbs. [:_BURIPLAC:]&]|
[&[?_LOST?]vrm. [&[:_BURIPLAC, :]<nobr>_BURIDATE( [:DATEFORMAT1:] )</nobr>&]&]|
[&[?_LOST?]vrm. [:_BURIPLAC:]&]|
[&[?_CREM?]crem. [&[:_BURIPLAC, :]<nobr>_BURIDATE( [:DATEFORMAT1:] )</nobr>&]&]|
[&[?_CREM?]crem. [:_BURIPLAC:]&]|
[&&]
&]
_FUNCEND
:.
_FUNCBEGI( gnreldata )<p align="center">\____/</p>_FUNCEND
:.
_FUNCBEGI( gnreldata1 )<p align="center">|</p>_FUNCEND
:.
_FUNCBEGI( relatietest )
_MOTH?_BEGI _MOTHBEGI
_SETADD( mijnmoeder )
_MOTHEND
_FATHBEGI
_RELABEGI[&
[?_SETBEGI( mijnmoeder )_NAMEFIRS _SURN _SETEND == _NAMEFIRS _SURN ?]
_RELATYPE("1;;;")?
_BEGI
[&x [:_RELAPLAC, :][:<nobr>_RELASTAR( [:DATEFORMAT1:] )</nobr>:]&]|
[&x [:_RELAPLAC:]&]|
[&x [:_RELASTAR( [:DATEFORMAT1:] ):]&]|
[&[? _MARC ?]Kx [: _MARCPLAC, :][:<nobr>_MARCDATE( [:DATEFORMAT1:] )</nobr>:]&]|
[&[? _MARC ?]Kx [: _MARCPLAC:]&]|
[&[? _MARC ?]Kx [: _MARCDATE( [:DATEFORMAT1:] ):]&]|
[&[? _MARL ?]Ox [:_MARLPLAC, :][:<nobr>_MARLDATE( [:DATEFORMAT1:] )</nobr>:]&]|
[&[? _MARL ?]Ox [:_MARLPLAC:]&]|
[&[? _MARL ?]Ox [:_MARLDATE( [:DATEFORMAT1:] ):]&]|
[&_RELATYPE("X;Gp.;Sl.;Rel.")&]
_ELSE
_RELATYPE(";1;;")?
_BEGI
[&Gp. [:_RELAPLAC, :][:<nobr>_RELASTAR( [:DATEFORMAT1:] )</nobr>:]&]|
[&Gp. [:_RELAPLAC:]&]|
[&Gp. [:_RELASTAR( [:DATEFORMAT1:] ):]&]|
[&[? _RERE ?]Gp. a [: _REREPLAC, :][:<nobr>_REREDATE( [:DATEFORMAT1:] )</nobr>:]&]|
[&[? _RERE ?]Gp. a [: _REREPLAC:]&]|
[&[? _RERE ?]Gp. a [: _REREDATE( [:DATEFORMAT1:] ):]&]|
[&_RELATYPE("X;Gp.;Sl.;Rel.")&]
_ELSE
_RELATYPE(";;1;")?
_BEGI
[&Sl. [:_RELAPLAC, :][:<nobr>_RELASTAR( [:DATEFORMAT1:] )</nobr>:]&]|
[&Sl. [:_RELAPLAC:]&]|
[&Sl. [:_RELASTAR( [:DATEFORMAT1:] ):]&]|
[&[? _RELACONT ?]Sl. c [: _CONTPLAC, :][:<nobr>_CONTDATE( [:DATEFORMAT1:] )</nobr>:]&]|
[&[? _RELACONT ?]Sl. c [: _CONTPLAC:]&]|
[&[? _RELACONT ?]Sl. c [: _CONTDATE( [:DATEFORMAT1:] ):]&]|
[&_RELATYPE("X;Gp.;Sl.;Rel.")&]
_ELSE
_RELATYPE(";;;1")?
_BEGI
[&rel.") [:_RELAPLAC, :]_RELASTAR( [:DATEFORMAT1:] )&]|
[&_RELATYPE("X;Gp.;Sl.;Rel.")&]
_END
_END
_END
_END
&]
_RELAEND
_FATHEND
_ELSE
gnreldata
_END
_SETCLR( mijnmoeder )
_FUNCEND
:.
_FUNCBEGI( EEE )_E(";na;vóór;omstreeks")_FUNCEND
:.
_FUNCBEGI( DATEFORMAT1 )[:[&[?[&_D _M _Y&]?][:EEE :]|[&[?_PREFDAYNAME?]DDDD &]|[&&][&[?_PREFMONTNAME?]D MMMM &]|[:DD-MM-:]YYYY&]|
[&[?[&_M _Y&]?][:EEE :]|[&[?_PREFMONTNAME?]&]|[&&][&[?_PREFMONTNAME?]een onbekende dag in MMMM &]|[:MM-:]YYYY&]|
[&[?[&_D _Y&]?][:EEE :]|[&op &][&[?_PREFMONTNAME?]de D[&e&] van een onbekende maand in&]|[&DD-?-&]YYYY&]|
[&[?[&_M _D&]?][:EEE :]|[&op &][&[?_PREFMONTNAME?]D MMMM &]|[:DD-MM :](jaar onbekend)&]|
[&[:EEE :]|[&&]YYYY&]|
[&[:EEE :]|[&&][&[?_PREFMONTNAME?]MMMM &]|[:maand MM :](jaar onbekend)&]|
[&[:EEE :]|[&op &]de D[:e:]&]:]_FUNCEND
:.
_FUNCBEGI( COMMENTAAR )Bibliotheek: 'Basis' [:Versie BasisVersie:]|[&NIET GEVONDEN!&]|[&&]
[::] 'DutchDateFormat' [:Versie DutchDateFormatVersie:]|[&NIET GEVONDEN!&]|[&&]
Stuur je e-mail voor vragen en opmerkingen naar:
</small><p>
</body>
</html>
_WRITEND
start.html gereed
[?_FILEMODE( ".html", "ifNewer" )
_FILENAME( "index.html" )
_FILENAME
?]_WRITBEGI
<html>
<head>
<!-- Created with Aldfaer _CURRVERS -->
<title>Stamboom familie _NAME _NAMEPREF _SURN</title>
<link rel="stylesheet" href="aldfaer.css">
</head>
<frameset cols="160,*" border="0" frameborder="No" framespacing="0">
<frame src="naam.html" name="index" >
<frame src="start.html" name="kaart">
</frameset>
<noframes>
<body bgcolor ="#FFFFCC">
</body></noframes></html>
_WRITEND
index.html gereed
[?_METAEND?]
alles gereed
Victor
