:.
_METAPATH( "_FILEPATH[::]namenlijst\" , "g" )
_METAPRIVATE("priv", "0")
:.
_USES( DutchDateFormat, ";;;;") :.
_SETDEF( pk )
_SETFILL( pk , _FAMIFILE )
_FILEMODE( "html", ifNewer )
_FILENAME( "pk.html" )
:.
_WRITBEGI
_SETBEGI( pk)
_END
_SETEND
_WRITEND
:. ================================================================================
_FILEMODE( ".html", "ifNewer" )
_FILENAME( "index.dat" )
_SETSORT(pk, _SURN, _NAMEFIRS, _BIRTDATE)
_WRITBEGI
_SETBEGI( pk )
_LINK^& _PRIV? _BEGI _NAMEPREF _SURN^& _NAMEFIRS^& _ELSE _NAMEPREF _SURN^& _NAMEFIRS^& _NAMENICK?_BEGI _NAMENICK _END^& _BIRTDATE?_BEGI _BIRTDATE _END^& _END _DEATDATE?_BEGI _DEATDATE _END^& _PHOT? _BEGI _PHOT _END^& [:_MODIDATE([:DD-MM-YYYY:]):]|[:_CREADATE([:DD-MM-YYYY:]):] ^&
_SETEND
_WRITEND
:.