home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1993 #2 / Image.iso / database / p4w_all.zip / TI1309.ASC < prev    next >
Text File  |  1993-05-04  |  4KB  |  133 lines
  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7.   PRODUCT  :  Paradox for Windows                   NUMBER  :  1309
  8.   VERSION  :  1.0
  9.        OS  :  WIN
  10.      DATE  :  May 4, 1993                              PAGE  :  1/2
  11.  
  12.     TITLE  :  Scan Loop to Convert an Entire Field to Upper or
  13.               Lower Case
  14.  
  15.  
  16.  
  17.  
  18.   This document demonstrates a script that uses SCAN to change a
  19.   field named "FLDNAME" to upper case.  If you wish to change your
  20.   field to lower case, substitute the word "lower" for "upper" in
  21.   the script below.  You will need to modify the script and
  22.   substitute your own table name for TBLNAME and the field name
  23.   that you wish to change for FLDNAME.
  24.  
  25.   Before making global changes to your table, it is a good idea to
  26.   first make a backup copy.
  27.  
  28.   Creating the Script
  29.  
  30.   Choose File | New | Script.  Your script should ultimately
  31.   resemble the following:
  32.  
  33.       method run(var eventInfo Event)
  34.       var
  35.          tc   TCursor
  36.          tv   TableView
  37.       endVar
  38.  
  39.       tc.open("TBLNAME")                  ; Change TBLNAME to your
  40.                                           ;   table name and
  41.                                           ;   enclose it in quotes.
  42.       tc.edit()
  43.  
  44.       scan tc:
  45.          tc."FLDNAME" = upper(tc."FLDNAME") ; Change FLDNAME to
  46.                                             ;   your field name
  47.                                             ;   and enclose it
  48.                                             ;   in quotes.
  49.                                             ; Change upper() to
  50.                                             ;   lower() to convert
  51.                                             ;   field to lower
  52.                                             ;   case.
  53.       endScan
  54.  
  55.       tc.close()
  56.       tv.open("TBLNAME")                    ; View the table.
  57.       tv.bringToTop()
  58.       endmethod
  59.    
  60.  
  61.  
  62.  
  63.  
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70.  
  71.  
  72.  
  73.   PRODUCT  :  Paradox for Windows                   NUMBER  :  1309
  74.   VERSION  :  1.0
  75.        OS  :  WIN
  76.      DATE  :  May 4, 1993                              PAGE  :  2/2
  77.  
  78.     TITLE  :  Scan Loop to Convert an Entire Field to Upper or
  79.               Lower Case
  80.  
  81.  
  82.  
  83.  
  84.   NOTE: The semicolon ";" indicates that a comment follows.  The
  85.         comment will not be processed when when you play the
  86.         script.
  87.  
  88.  
  89.   Check the Syntax
  90.  
  91.   After you have typed in the script on the previous page, choose
  92.   Language | Check Syntax.  The compiler examines the code and
  93.   identifies if there are syntax errors in the method.  It displays
  94.   a message in the status line of the open Editor window, such as
  95.   "No syntax errors" or a description of the syntax error.  If
  96.   there is a syntax error, Paradox positions the cursor at the
  97.   point of the first error.  Before you can run the script, you
  98.   will need to correct your code and choose Language | Check Syntax
  99.   again until there are no remaining syntax errors.
  100.  
  101.   When there are no syntax errors:
  102.  
  103.      1.  Choose File | Save, type in a filename in the edit box,
  104.          then choose OK.
  105.  
  106.      2.  To run the script, press F8.  Your script will play, and
  107.          display your table in View mode.
  108.  
  109.  
  110.   Suggested Reading:
  111.  
  112.   scan              ObjectPAL Reference Guide, Chapter 3
  113.   TCursor           ObjectPAL Developer's Guide, Chapter 10
  114.   upper()           ObjectPAL Reference Guide, Chapter 4
  115.  
  116.  
  117.   DISCLAIMER: You have the right to use this technical information
  118.   subject to the terms of the No-Nonsense License Statement that
  119.   you received with the Borland product to which this information
  120.   pertains.
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.  
  130.  
  131.  
  132.  
  133.