Opzoeken van getuigen, datums,… aan de hand van een relatietype

Beste

Aan de hand van een voorbeeld uit de handleiding (_MARW sjabloon 2 getuigen bij huwelijk) tracht ik ook van 2 andere vormen van samenleven (_REGI en _TOGE) de getuigen, de data, … binnen eenzelfde sjabloon op te zoeken. Ook indien er meerdere relatievormen aanwezig zijn voor dezelfde persoon.
Dit lukt me niet echter niet.
Ik ben als volgt te werk gegaan.

1. Is een relatie _RELA?
2. Zoja: Welke relatie(s) _RELATYPE
3. Aan de hand van het(de) relatietype(s) wil de gegvens verzamelen:
Burgerlijk Ondertrouw _MARLDATE(), _MARW, …
Trouw _CIVI, …
Kerkelijk _MARCDATE(), …
Geregistreerd partnerschap _REDEDATE(), …
Samenwonen _CONTDATE(), …


Wie kan me op weg helpen?

Alvast bedankt

Charlie

In de handleiding kunt u per soort asj_voorbeelden toch zien welke u wilt hebben. Kijk dan bij de serie _WITNxxxxx

Han

Ter verduidelijking heb ik drie bestanden toegevoegd:
1. GetuigenBijGeregistrPartnerschap.asj
2. GetuigenBijHuwelijk.asj
3. GetuigenBijSamenwonen.asj

Afzonderlijk werken deze sjablonen.
Hoe kan ik in een sjabloon de sjablonen aanspreken die bij het relatietype van een persoon behoort.
bv Als een persoon "burgerlijk huwelijk" heeft als relatie wil ik sjabloon 2 gebruiken
Als de persoon "samenwonen" als relatie heeft wil ik sjabloon 3 gebruiken
Als een persoon ooit samenwonende was en daarna met een tweede partner gehuwd is wil ik sjabloon 3 en 2 gebruiken

Bedankt

Charlie

Han

Blijkbaar kan ik geen bestanden toevoegen daarom hieronder de codes van de drie sjablonen
:. GetuigenBijGeregistrPartnerschap.asj .:
_VARDEF(X)
[?_RELA(_REGI)?]?
_BEGI
_RELABEGI
_VARSUB(X,X)
[&[?_FIRS?]_SWAPBEGI[::]_NAMEFIRS [: _NAMEPREF:]_SURN _SWAPEND met&]|[&&]
(_NUMB(";A;B;C;D;")) _NAMEFIRS[: _NAMEPREF:] _SURN
[:_RERW():]?
_BEGI
_F_RegistrPartner
_ELSE
GEEN geregistr partner getuigen gevonden
_END
_RELAEND
_END
:.========================================.:
_FUNCBEGI( _F_RegistrPartner)
_BEGI
[&     &]aangifte op _REREDATE() met getuige
_RERWBEGI
_F_GetuigenSamenstellen
_RERWEND
_END
_FUNCEND
:.

---

.:
_FUNCBEGI( _F_GetuigenSamenstellen )
_BEGI
[&    &](_NUMB) _NAMEFIRS[: _NAMEPREF:] _SURN :.
_END
_FUNCEND


:. GetuigenBijSamenwonen.asj .:
_VARDEF(X)
[?_RELA(_TOGE)?]?
_BEGI
_RELABEGI
_VARSUB(X,X)
[&[?_FIRS?]_SWAPBEGI[::]_NAMEFIRS [: _NAMEPREF:]_SURN _SWAPEND met&]|[&&]
(_NUMB(";A;B;C;D;")) _NAMEFIRS[: _NAMEPREF:] _SURN
_F_Samenwonen
_RELAEND
_END
:.========================================.:
_FUNCBEGI( _F_Samenwonen )
[&     &]aangifte op _CONTDATE() te _CONTPLAC
Bon: _CONTSOUR
_FUNCEND

:. GetuigenBijHuwelijk.asj .:
_VARDEF(X)
[?_RELA(_MARR)?]?
_BEGI
_RELABEGI
_VARSUB(X,X)
[&[?_FIRS?]_SWAPBEGI[::]_NAMEFIRS [: _NAMEPREF:]_SURN _SWAPEND met&]|[&&]
(_NUMB(";A;B;C;D;")) _NAMEFIRS[: _NAMEPREF:] _SURN
[:_MARW(_MARL):]?
_BEGI
_F_Ondertrouw
_ELSE
GEEN ondertrouw getuigen gevonden
_END
[:_MARW(_CIVI):]?
_BEGI
_F_BurgerlijkHuwelijk
_ELSE
GEEN burgerlijke huwelijksgetuigen gevonden
_END
[:_MARW(_RELI):]?
_BEGI
_F_KerkelijkHuwelijk
_ELSE
GEEN kerkelijke huwelijksgetuigen gevonden
_END
_RELAEND
_END
:.========================================.:
_FUNCBEGI( _F_Ondertrouw )
_BEGI
[&     &]ondertrouw op _MARLDATE() met getuige
_MARWBEGI(_MARL)
_F_GetuigenSamenstellen
_MARWEND
_END
_FUNCEND
:.

---

.:
_FUNCBEGI( _F_BurgerlijkHuwelijk )
_BEGI
[&     &]huwelijk op _RELASTAR() met getuige
_MARWBEGI(_CIVI)
_F_GetuigenSamenstellen
_MARWEND
_END
_FUNCEND
:.

---

.:
_FUNCBEGI( _F_KerkelijkHuwelijk )
_BEGI
[&     &]kerkelijk huwelijk op _MARCDATE() met getuige
_MARWBEGI(_RELI)
_F_GetuigenSamenstellen
_MARWEND
_END
_FUNCEND

Charlie, je kunt vanuit een asj geen andere asj aanroepen.

Remedie: De asj's samenvoegen tot één asj. Desnoods gebruik maken van asjl's voor de onderhoudbaarheid.

Carel

Helpt dit (niet zelf getest, gewoon wat knip/plak-werk)?

Carel

Ik zou de drie in 1 sjabloon kunnen onderbrengen en in functies plaatsen.
Maar hoe weet ik welke functie in dan moet aanspreken?
Kan ik dit via _RELATYPE ?
Zoja, welke syntax moet ik dan gebruiken?

Charlie

Carel

Zal morgen testen
Laat wel iets weten

Alvast bedankt

Charlie

Aan CAREL

Bedankt voor je script, het werk perfect

Charlie