Lesen einer log. File mit spezieler Sortierfolge

[jajonowak]

wenn es eine dds beschriebene Datei ist, kann man auch
K KBBSJH DESCEND
K KBBSJJ DESCEND
K KBBSMM DESCEND
verwenden (hier: Jahrhundert;Jahrzehnt;Monat - jüngster Eintrag zuerst)

[AKS1]

wenn es eine dds beschriebene Datei ist, kann man auch
K KBBSJH DESCEND
K KBBSJJ DESCEND
K KBBSMM DESCEND
verwenden (hier: Jahrhundert;Jahrzehnt;Monat - jüngster Eintrag zuerst)

Wenn Lager 05 das Lager 01 wäre, könnte man absteigend lesen.
Ist es aber nicht.
Aus Prod.-Gründen dürfen Rohstoffe (ArtNr,Chargen) nur zuletzt aus dem Lager 05 entnommen werden.

[BenderD]

... wenns nur um das lager 05 geht, hilft auch trick 17
select abs(l.lager_nr - 5) sortfield , l.* from lager l
order by sortfield desc

mit ein wenig Gehirnschmalz lässt sich da eigentlich fast jede Sortierung rausentwickeln.

D*B

[B.Hauser]

Du brauchst weder die physische Datei zu ändern, noch musst Du dein Programm umstricken:
Du musst lediglich einen neuen (SQL)Index generieren und die logische Datei in Deinem Programm durch den Index ersetzen und neu umwandeln.
SQL Indices können mit native I/O genauso verarbeitet werden wie geschlüsselte logische Dateien.
Bei Änderungen musst Du lediglich den Index ändern.

Das Erstellungsstatement für den SQL-Index sollte in etwa so aussehen:

Create Index YourSchema.YourTable
     (Firma, ArtNr, Charge, Sortierung, 
      Case When Lager = 5 Then 1000
           Else Lager End as SortLager,
      Raum, Fach, Platz)
Rcdfmt RCDFMTX Add All Columns;

Im Übrigen kann SQL (seit 7.1) auch solche derived Indices verwenden, vorausgesetzt die Syntax in dem SELECT-Statement stimmt genau mit der Syntax im Index überein.

Birgitta