_PHOTBEGI: TAGS (_BIRT, _BIRR, ...)

Beste

Kunnen de TAGS bij _PHOTBEGI vervangen worden door een verzameling van gegevens:

bv
_SETDEF( ArrayGebeurtenis )
_SETADD( ArrayGebeurtenis, "_PERS" )
_SETADD( ArrayGebeurtenis, "_BIRT" )

_SETDEF( ArrayDatum )
_SETADD( ArrayDatum, "_BIRTDATE()" )

_PHOTBEGI( _BIRT) :. Kan ik hier i.p.v. _BIRT de ArrayGebeurtenis(2) = _BIRT gebruiken?
en in
_SETADD(Mat, [:_CODEINTE._FILL("0",5) _BIRTDATE() _MATTITL:]) _BIRTDATE vervangen door ArrayDatum(1)?

In bijlage een voorbeeld.

De bedoeling is de variabelen te gebruiken in een LOOP

Bedankt

Charlie

Charlie,

De TAGS bij _PHOTBEGI kunnen niet door een tekst uit een verzameling vervangen worden.
Het is me niet duidelijk hoe je dit in een loop wil gebruiken, maar misschien heb je iets aan de wetenschap dat je een functie van parameters kunt voorzien. Je kunt b.v. de volgende functie maken (ik heb het niet helemaal uitgewerkt):

_FUNCBEGI( _F_Materiaal, m )
[?_SETORDE(ArrayGebeurtenis, "_BIRT")==m?]?
_BEGI
_PHOTBEGI( _BIRT)
_SETADD(Mat, [:_CODEINTE._FILL("0",5) _F_NaamZonderCR _BIRTDATE() _MATTITL:])
_PHOTEND
_PHOTBEGI(_PHOTNOPUB, _BIRT)
_SETADD(Mat, [:_CODEINTE._FILL("0",5) _F_NaamZonderCR _BIRTDATE() _MATTITL:])
_PHOTEND
_END
:.
[?_SETORDE(ArrayGebeurtenis, "_BIRR")==m?]?
_BEGI
_PHOTBEGI( _BIRR)
_SETADD(Mat, [:_CODEINTE._FILL("0",5) _F_NaamZonderCR _BIRRDATE() _MATTITL:])
_PHOTEND
_PHOTBEGI(_PHOTNOPUB, _BIRR)
_SETADD(Mat, [:_CODEINTE._FILL("0",5) _F_NaamZonderCR _BIRRDATE() _MATTITL:])
_PHOTEND
_END
_FUNCEND

en deze aanroepen met _F_Materiaal(2), corresponderend met _BIRT en _F_Materiaal(3), corresponderend met Geboorteaangifte.

Paul

Paul

Bedankt voor je antwoord.
Ik had een vermoeden dat de TAGS van _PHOTBEGI niet uit een verzameling kom komen.
Met de LOOP bedoelde ik dat ik de functie x-aantal keren (= alle TAGS van _PHOTOBEGI) kon aangeroepen telkens met een andere TAG zodoende ik slechts éénmaal de functie (_PHOTOBEGI, _SETADD, _PHOTEND, ... ) moet gebruikken.

Vriendelijke groeten

Charlie

Aan allen

Nog een laatste poging.
Ik ben een nieuw onderwerp (vervolg) gestart omdat ik een nieuw sjabloon heb toegevoegd.
geen nieuw onderwerp voor hetzelfde dus samengevoegd
webmaster

De bedoeling van het sjabloon is voor elke TAG van _PHOTBEGI een apart TXT-bestand
te maken. Een voorbeeld in bijlage.
Hierin heb ik voor iedere TAG opnieuw dezelfde codes gebruikt alleen met een andere TAG.
Ik zou ook alles in één TXT-bestand kunnen zetten en daarna bv in Excel de gegevens filteren aan de hand van de gebeurtenis (Geboorte, doop, overlijden, ...)

Groeten

Charlie

Dat is dus aardig gelukt.
Je zou kunnen overwegen om er een html rapport van te maken met een tabel-opmaak zodat het makkelijker leesbaar is.
Alles afhankelijk van je doelstelling.

Han

Uiteindelijk is het de bedoeling dat ik van elke gebeurtenis (geboorte, doop, overlijden) kan zien of er materiaal aanwezig is die erbij hoort.

Mocht het zoals in "visual basic" kunnen om dezelfde functie telkenmale met een andere variant te gebruiken had het sjabloon een stuk korter geweest.
Gaan nood, nu lukt het ook.

Alvast bedankt

Groeten

Charlie

Wellicht kun je kijken naar een soortgelijk onderwerp in Bonus rapporten -> Materiaal -> Hoort bij.

Han

Sjabloon "Hoort bij" is de max.
Ga ik zeker gebruiken.

Groeten en tot ...

Charlie