EXEC SQL
DECLARE SQLCUR2 CURSOR FOR SELECT LAUFNR, BIBLIOTHEK,
OBJEKT, OBJEKTTYP, BESCHREIB, LASTUSEDAT, ABTEILUNG,
PRIRORITA, TEVBEBRAU, DATMUT, MUTUSER, TYP, RECORDGEL,
RELEVANT FROM AIGDBA1F01 WHERE BIBLIOTHEK LIKE
trim(:W-D1BIBLIO)
AND OBJEKT LIKE
trim(:W-D5OBJEKT)
AND BESCHREIB LIKE
trim(:W-D5BESCHR)
ORDER BY BIBLIOTHEK, OBJEKT
END-EXEC.