schrijven in eerste lege repetition

[deplasse]

Hoi,

 

Waarschijnlijk is dit voor jullie FM specialisten een makkie. Kan iemand mij een hint geven hoe ik scriptgewijs een waarde kan wegschrijven in de eerste lege repetition van een veld. Ik kan zonder problemen vinden wat de laatst ingevulde repetition is, maar hoe kan ik via een set field vertellen dat ik repetition x (een variabele dus) wil instellen.

 

Wat ik heb:

Set Field (tblTopics::Interesse[3];Get(Username))

 

Wat ik graag zou hebben:

Set Field (tblTopics::Interesse[x];Get(Username)) waarbij x een (globale?) variabele is, gelijk aan de eerstvolgende lege repetition.

 

Alvast bedankt!!

 

David

[rmw]

Dat kan alleen in FM8. Die heeft een bereken knop naast het herhalingveld in de veldlijst bij SetField.

 

FM7 kan dat (helaas) nog niet.

 

rmw

[RON7]

Zoek hier en vind een zeer mooie customfunctie

http://www.clarify.net/viewtopic.php?p=14479#14479

 

Scripten kan zo bvb

Variabele instellen [$Teller ; Waarde:1]

Loop

Exit loop if [isEmpty ( GetRepetition ( Herhalend veld;$Teller ) ) ]

Variabele instellen [$Teller; Waarde: $Teller + 1]

End Loop

Veld instellen(Herhalend veld[$Teller];Waarde)

[RON7]

Custom wordt het bvb :

 

GetEmptyRepetition(HerhalendVeld;1)

 

Let ( x = If ( x < 1 ; 1 ; x );

If ( not IsEmpty ( GetRepetition ( HerhalendVeld ; x ) ) ;

GetEmptyRepetition ( HerhalendVeld ; x + 1 ) ; x )

)

[Koen Van Hulle]

Leuke custom functie, maar als alle repetities zijn opgevuld loopt je custom functie in de mist.

 

Hierbij een kleine aanpassing:

 

Let

(

x = If ( x < 1 ; 1 ; x )

;

If ( not IsEmpty ( GetRepetition ( HerhalendVeld ; x ) ) and IsValid(GetRepetition ( HerhalendVeld ; x )) ;

GetEmptyRepetition ( HerhalendVeld ; x + 1 ) ; x )

)

 

 

Koen

[Koen Van Hulle]

En bij deze versie geeft hij een 0 terug als alle repetities zijn opgebruikt

 

Let

(

x = If ( x < 1 ; 1 ; x )

;

If ( not IsEmpty ( GetRepetition ( HerhalendVeld ; x ) ) and IsValid(GetRepetition ( HerhalendVeld ; x )) ;

GetEmptyRepetition ( HerhalendVeld ; x + 1 ) ; if(not IsEmpty ( GetRepetition ( HerhalendVeld ; x ) );0 ; x) )

)

 

 

 

Koen

[RON7]

maar als alle repetities zijn opgevuld loopt je custom functie in de mist.

Idd Koen,had enkel het nodige bekeken en getest in een herhaling van 100.Maar thx en bravo voor je aanpassing en de bijkomende custom.Kan handig worden in 8 daar de herhalende velden eigenlijk verschillende velden kunnen vervangen.(Globale herhalingen bvb)