Ach ja,

da war noch was.

Das alles soll in einer Abfrage passieren...

Also erst

/free
SETGT*HIVAL DATW111;
READP DATW111;

.
.
.
***und dann den zweitgrößten Satz***


SETGT(-1)*HIVAL CSTP111;
READP CSTP111;
.
.
.

EXFMT MAIN;
*inlr = *on;
if Not %EOF(CSTP111);
ENDIF;
/end-free


mhh und nun? ´