home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #18 / NN_1992_18.iso / spool / comp / database / oracle / 1303 < prev    next >
Encoding:
Internet Message Format  |  1992-08-16  |  2.0 KB
  1. Path: sparky!uunet!dtix!darwin.sura.net!paladin.american.edu!news.univie.ac.at!bmwf1f.bmwf.gv.at!hatzinger_m
  2. From: hatzinger_m@bmwf1f.bmwf.gv.at
  3. Newsgroups: comp.databases.oracle
  4. Subject: Re: SUBSTRING FUNCTION IN FORMS 3.0
  5. Message-ID: <1992Aug17.080204.32@bmwf1f.bmwf.gv.at>
  6. Date: 17 Aug 92 08:51:21 GMT
  7. References: <1992Aug13.081954.279@falcon.navsses.navy.mil>
  8. Organization: (Klaus-Michael Hatzinger), BMWF, Vienna
  9. Lines: 42
  10.  
  11. In article <1992Aug13.081954.279@falcon.navsses.navy.mil>, mdipilla@falcon.navsses.navy.mil writes:
  12. > TO WHOMOVER KNOWS WHATEVER,
  13. > 
  14. >     WOULD ANYONE KNOW IF THERE IS A SUBSTRING FUNCTION IN FORMS.
  15. > WE BASICALLY HAVE A FIELD WHICH THE USER WOULD INPUT.  HE WILL BE
  16. > TYPING IN A "-" SOMEWHERE IN HIS FIELD.  IT CAN BE IN THE THIRD POSITION
  17. > XX-XXXX OR IT CAN BE IN THE FOURTH POSITION XXX-XXXX.  HOW CAN I REMOVE
  18. > THIS HYPHEN.
  19. > 
  20. > THANK YOUR VERY MUCH
  21.  
  22. Create a Trigger (POST-CHANGE, POST-FIELD or ON-VALIDATE-FIELD) ..
  23.  
  24. - Forms V3
  25.  
  26. IF :Field != REPLACE(:Field,'-','') THEN
  27.    :Field := REPLACE(:Field,'-','');
  28. END IF;
  29.  
  30. - Forms V2
  31.  
  32.   SELECT REPLACE(:Field,'-','') INTO :Field 
  33.     FROM dual
  34.    WHERE REPLACE(:Field,'-','') != :Field
  35.  
  36. or if you have ORACLE V5 you can take TRANSLATE instad of REPLACE for one
  37. character.
  38.  
  39.  
  40.  
  41. -- 
  42.  
  43. ================================================================================
  44.                                                                           ^
  45.  Federal Ministry of Science and Research                               B | M
  46. <-------------------------------------------------------------------------+---->
  47.  Computer Center                                                        W | F
  48.                                                                           |
  49.  Klaus-Michael Hatzinger            mail: hatzinger_m@bmwf1f.bmwf.gv.at   |
  50.  Bangkasse 1/209                   phone: 0043-222-53120/5188             |
  51.  1014 Vienna, Austria                fax: 0043-222-53120/5155             V
  52. ================================================================================
  53.