REPORT YUNIX000 LINE-SIZE 250.          "20000831, Release 3.*, 4.*
*
**********************         HEADER                    **************
*
* Copyright (c) 1999 by xxxx xxx, 44318 Anywhere, http://xxxxx
* or: Copyright (c) 1999 by Luigi Mandas from Engineering Group - Italy
*
*     You can use or modify this report for your own work as long
*               as you don't try to sell or republish it.
*      In no event will the author be liable for indirect, special,
*        Incidental, or consequental damages (if any) arising out of
*                       the use of this report.
*//////////////////////////////////////////////////////////////////////*
DATA:
      BEGIN OF TABL OCCURS 0,
        LINE(200),
      END OF TABL.
DATA:
      PARCOM(180).

PARAMETERS:
      COMMA(30) LOWER CASE,
      FILE1(75) LOWER CASE,
      FILE2(75) LOWER CASE.

START-OF-SELECTION.

  PARCOM+00(30) = COMMA.
  PARCOM+30(75) = FILE1.
  PARCOM+105(75) = FILE2.

  CONDENSE PARCOM.

  PERFORM EXECUNIX.

END-OF-SELECTION.

  EDITOR-CALL FOR TABL DISPLAY-MODE.

*---------------------------------------------------------------------*
*       FORM EXECUNIX                                                 *
*---------------------------------------------------------------------*
*       ........                                                      *
*---------------------------------------------------------------------*
FORM EXECUNIX.
  REFRESH TABL. CLEAR TABL.
  CALL 'SYSTEM' ID 'COMMAND' FIELD PARCOM
                ID 'TAB'     FIELD TABL-*SYS*.
ENDFORM.