home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / FINCAL2.DMS / in.adf / FCrexx.lha / Column_Titles_to_Months.rexx next >
Encoding:
OS/2 REXX Batch file  |  1995-03-04  |  803 b   |  46 lines
  1. /* FinalCalc script to make column titles reflect Months */
  2. /* by Ed Vishoot - 1 Mar 95 */
  3.  
  4. options results
  5.  
  6. quiet on
  7.  
  8. REQUEST '"This script will change column titles to months (from Jan to Dec) starting at the current cursor location."' '"Go Ahead."' '"Forget It!"'
  9.  
  10. returned = result
  11.  
  12. if returned = 1 then
  13.  do
  14.   QUERY CELL
  15.   StartedHere = result
  16.  
  17.   COLUMN TITLE "Jan"
  18.   CURSOR RIGHT
  19.   COLUMN TITLE "Feb"
  20.   CURSOR RIGHT
  21.   COLUMN TITLE "Mar"
  22.   CURSOR RIGHT
  23.   COLUMN TITLE "Apr"
  24.   CURSOR RIGHT
  25.   COLUMN TITLE "May"
  26.   CURSOR RIGHT
  27.   COLUMN TITLE "Jun"
  28.   CURSOR RIGHT
  29.   COLUMN TITLE "Jul"
  30.   CURSOR RIGHT
  31.   COLUMN TITLE "Aug"
  32.   CURSOR RIGHT
  33.   COLUMN TITLE "Sep"
  34.   CURSOR RIGHT
  35.   COLUMN TITLE "Oct"
  36.   CURSOR RIGHT
  37.   COLUMN TITLE "Nov"
  38.   CURSOR RIGHT
  39.   COLUMN TITLE "Dec"
  40.  
  41.   CELL StartedHere
  42.  
  43.  end
  44.  
  45. quiet off
  46.