DEFINITION MODULE FileReq; FROM ARP IMPORT FileRequester; FROM SYSTEM IMPORT ADDRESS; TYPE FileString=ARRAY[0..256] OF CHAR; FileRequestData= RECORD fr: FileRequester; h,f,d: FileString; END; PROCEDURE MakeFRD( header,deffile,defdir: FileString; reqwindow: ADDRESS; x,y: INTEGER; VAR frd: FileRequestData); PROCEDURE FileReq(VAR frd: FileRequestData; VAR name: FileString); END FileReq.