process/import/impdefs.i

   1
   2 DEF {1} {2} SHARED VAR old_system  AS CHAR FORMAT 'X(4)'   LABEL 'From'  NO-UNDO.
   3 DEF {1} {2} SHARED VAR file_name   AS CHAR FORMAT 'X(15)'  LABEL 'File name'   NO-UNDO.
   4 DEF {1} {2} SHARED VAR messages    AS CHAR FORMAT 'X(60)' LABEL 'Messages'    NO-UNDO.
   5 DEF {1} {2} SHARED VAR import_type AS CHAR FORMAT 'X(20)'  LABEL 'Import type' NO-UNDO.
   6
   7 DEFINE {1} SHARED FRAME default-frame
   8             import_type old_system file_name messages
   9             WITH DOWN FONT 8 SCROLL 16 SIZE 107 BY 200 SCROLLABLE
  10             USE-TEXT NO-BOX.
  11