ich sehe ja auch keinen Fehler - darum war es ja auch nicht so leicht zu finden!
Ich sehe es eher als Schwachstelle (Garbage Collector?)!
Beispiel:
Code: Alles auswählen
for nI := start to ende
C := alltrim( str( nI ) )
if .not. empty( g&dateiname->tag&c )
bla := 0
s&dateiname->( DbClearFilter() )
s&dateiname->( DbSetFilter( {|| ( ( .not. empty( jugendna12 ) ) .and. ( jtag12 == nI ) ) }, "( ( .not. empty( jugendna12 ) ) .and. ( jtag12 == nI ) )" ) )
goto top
...
Code: Alles auswählen
if .not. empty( g&dateiname->tag1 )
bla := 0
s&dateiname->( DbClearFilter() )
s&dateiname->( DbSetFilter( {|| ( ( .not. empty( jugendna12 ) ) .and. ( jtag12 == 1 ) ) }, "( ( .not. empty( jugendna12 ) ) .and. ( jtag12 == 1 ) )" ) )
goto top
....
if .not. empty( g&dateiname->tag2 )
bla := 0
s&dateiname->( DbClearFilter() )
s&dateiname->( DbSetFilter( {|| ( ( .not. empty( jugendna12 ) ) .and. ( jtag12 == 2 ) ) }, "( ( .not. empty( jugendna12 ) ) .and. ( jtag12 == 2 ) )" ) )
goto top
....
if .not. empty( g&dateiname->tag3 )
bla := 0
s&dateiname->( DbClearFilter() )
s&dateiname->( DbSetFilter( {|| ( ( .not. empty( jugendna12 ) ) .and. ( jtag12 == 3 ) ) }, "( ( .not. empty( jugendna12 ) ) .and. ( jtag12 == 3 ) )" ) )
goto top
....
Martin