kann mir jemand erklären wo bzw. warum das Array nicht gefüllt wird.
Code: Alles auswählen
select 4
if nRechnungsnr1#0
do while nRechnungsnr1 < nRechnungsnr2
locate for field -> rnr = nRechnungsnr1
do while .not. Found()
AAdd( aFehlendeRechung, str(nRechnungsnr1) )
end do
nRechnungsnr1++
end do
endif
if Len( aFehlendeRechung ) = 0
Ffehler()
else
FlisteRechnungen( aFehlendeRechung )
endif
endif