git.oblomov.eu Git - ohcount/blob - test/expected_dir/rexx1.rex/rexx/comment

   1 /* REXX    FLTTBL     Cloned from DUMPTBL 960619 to produce a flat
   2 version (up to 32K characters wide) of any ISPF
   3 table.
   4 Written by Frank Clarke, Oldsmar, FL
   5 Impact Analysis
   6 .    SYSPROC   LA
   7 .    SYSPROC   TRAPOUT
   8 Modification History
   9 19960918 fxc added some error-checking
  10 19970115 fxc upgrade REXXSKEL from v.960606 to v.970113; add
  11 RESTARTability;
  12 19991231 fxc upgrade REXXSKEL from v.970113 to v.19991109;
  13 RXSKLY2K; DECOMM; LRECL reduced from 32K to "min
  14 needed";
  15 /*
  16 .  ----------------------------------------------------------------- */
  17 /*
  18 .  ----------------------------------------------------------------- */
  19 /*
  20 <tblds> was not specified.  Locate the table in ISPTLIB.
  21 .  ----------------------------------------------------------------- */
  22 /*
  23 .  ----------------------------------------------------------------- */
  24 /*
  25 .  ----------------------------------------------------------------- */
  26 /*
  27 .  Given: <namelist> contains all the defined names for this table.
  28 The table has been TOPped.
  29 .  ----------------------------------------------------------------- */
  30 /* add blocks of "var .. varvalue .."     */
  31 /* add a block of "XVARS .. xvarlist .."  */
  32 /* add blocks of "xvar .. xvarvalue .."   */
  33 /*
  34 .  ----------------------------------------------------------------- */
  35 /*
  36 .  ----------------------------------------------------------------- */
  37 /*
  38 .  ----------------------------------------------------------------- */
  39 /*
  40 .  ----------------------------------------------------------------- */
  41 /*   REXXSKEL back-end removed for space   */