DEFINITION MODULE Report; FROM SYSTEM IMPORT ADDRESS; CONST DefId = '$Id: Report.def,v 1.16 2001/05/04 08:55:28 mladen Exp $'; TYPE T; What = ( Header, SubHeader, DataLine, SubFooter, Footer, NewPage ); Type = ( Text, PostScript ); Types = SET OF Type; Uslov = PROCEDURE (T, ADDRESS): BOOLEAN; While = Uslov; Multi = PROCEDURE(T, What, Type, ADDRESS, VAR CARDINAL); Option = ( Condensed, AddFF ); Options = SET OF Option; Paper = ( A3, A4, B5, ZutiRacun ); Lens = ARRAY Type, What OF CARDINAL; END Report.