Sätze einer Datei zählen

[Ursus]

Wer kann mir bei einem kleinen aber diffizielen Probelm weiterhelfen ?

Situation : In einem RPG IV Dialog-Programm können vom Anwender verschiedene Selektionskriterien zur Anzeige von Sätzen einer Datei eingegeben werden (z.B. Kundennummer = xxx und Artikelgruppe = yyy und Lieferdatum > zzz).
Da die Anzeige nicht in einem Subfile erfolgen darf möchte ich VOR der Anzeige des ersten Datensatzes die Anzahl der Sätze ermitteln, die den Selektionskriterien entsprechen.
Gibt es einen einfachen Weg, die Anzahl der Sätze zu ermitteln, ohne die Verarbeitung mit einem Zähler vor der ersten Anzeige bereits durchlaufen zu lassen ??

Vielen Dank für Eure Hilfen,

Marc

[B.Hauser]

Hallo Marc,

ich würde die Anzahl der Sätze über ein SQL-Command wie folgt ermitteln:

XXX = Hostvariable (hier Eingabe-Felder)
YYY = Hostvariable
ZZZ = Hostvariable

verwendete Hostvariablen werden im SQL mit : gekennzeichnet.

D $Anzahl S 9 0

C/EXEC SQL
c+ select count(*)
c+ into :$Anzahl
c+ from Datei
c+ where Knd_Nr = :XXX
C+ and Art_Grp = :YYY
C+ and Lief_D > :ZZZ
C/END-EXEC

Vielleicht kommst Du damit weiter.
Achtung Quellenart muss auf SQLRPGLE geändert werden.

Birgitta