Seite 1 von 1

ASort Problem [erledigt]

Verfasst: Mo, 13. Apr 2020 18:08
von Wolfgang_B
Hi,
ich habe ein kleines ASort-Problem. Kann mir jemand das Verhalten erklären?

Code: Alles auswählen

aArray := ASort[aArray)
aArray ist ein Array mit 7 Zahlen

Vor ASort
4580
4683
4713
4860
5003
5156
5097

Nach Asort:
0
4580
4683
4713
4860
5003
5097

Re: ASort Problem

Verfasst: Mo, 13. Apr 2020 18:13
von Bertram Hansen
Wolfgang,
zeige doch mal den Quellcode, wie du das Array füllst.

Re: ASort Problem

Verfasst: Mo, 13. Apr 2020 18:33
von Wolfgang_B
FUNCTION CALC_STAT( nStartJahr, nAnzahlJahr)

LOCAL aCount := ARRAY(nAnzahlJahr)

IF !net_use2("vwstat",.F.,5,"Y","VS5")
MsgBox("STATISTIKTABELLE gesperrt")
RETURN( NIL )
ENDIF
SET DELETED ON

FOR i = 1 TO nAnzahlJahr
LOCATE FOR statyear = nStartJahr
aCount := VS5->austritt
nStartJahr++
NEXT

DBCLOSEALL()

RETURN( aCount )
// ENDFUNCTION CALC_STAT()


Geht bestimmt eleganter. Ist ein Uraltteil. List aus mehreren Jahren Mitgliederzahlen aus einer Tabelle ein.

Re: ASort Problem

Verfasst: Mo, 13. Apr 2020 18:42
von Bertram Hansen
Wolfang,

und wie füllst du das Array? Wo ist dein AADD(aArry)?

Re: ASort Problem

Verfasst: Mo, 13. Apr 2020 18:54
von Wolfgang_B
sorry eigene Dummheit. Das Array ist 8 Zeilen groß nicht 7. Damit sehe ich natürlich den letzten Wert nicht :banghead: :banghead:

AADD brauche ich hier nicht.Es kommt ja nur in jede Zeile ein Wert aus der Tabelle rein. Das Array wird mit nStatJahr++ hochgezählt.

Trotzdem danke für die Antwort ..