home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #30 / NN_1992_30.iso / spool / comp / database / oracle / 2550 < prev    next >
Encoding:
Internet Message Format  |  1992-12-17  |  3.5 KB
  1. Path: sparky!uunet!hayes!fgreene
  2. From: fgreene@hayes.com
  3. Newsgroups: comp.databases.oracle
  4. Subject: Re: Forms 3.0 - How do YOU do this?
  5. Message-ID: <6557.2b30448d@hayes.com>
  6. Date: 17 Dec 92 09:12:45 EDT
  7. References: <1992Dec10.140524.1@ocvaxc.cc.oberlin.edu> <1gnffmINN138@usenet.INS.CWRU.Edu>
  8. Organization: Hayes Microcomputer Products, Norcross, GA
  9. Lines: 82
  10.  
  11. In article <1gnffmINN138@usenet.INS.CWRU.Edu>, cc312@cleveland.Freenet.Edu (Jennifer R. Amon) writes:
  12. > In a previous article, bamon@ocvaxc.cc.oberlin.edu (ME) says:
  13. > 
  14. >>I'm once again faced with a forms change which is always a pain:
  15. >>
  16. >>Project : The users should not be able to modify (without some special
  17. >>          action on their part) field_b in block_1 when field_a is
  18. >>          non-null.
  19. >>
  20. >>This boils down to "don't let them do it by default, but give them a way
  21. >>around the default."
  22. >>
  23. >>In the past, I've set some global when they attempt to make the change, and
  24. >>then I reset it to something else if they press commit in response to a
  25. >>"do you really want to do this?" prompt. Then I reset it again after the
  26. >>commit.
  27. >>
  28. >>It works, but it's always a real trick keeping track of and properly
  29. >>resetting the global variable.
  30. >>
  31. >>Does anybody have a better way to do this?
  32. >>
  33. > _____________________________________________________________________
  34. > -- 
  35. > Jennifer R. Amon       FREENET: aa1190@freenet.lorain.oberlin.edu
  36. > Analyst/Programmer     FREENET: cc312@cleveland.freenet.edu
  37. > Oberlin College       INTERNET: bamon@ocvaxc.cc.oberlin.edu
  38. > Oberlin, OH 44074       BITNET: bamon@ocvaxc.bitnet
  39. As I understand the problem, there are a total of five fields involved:
  40.  
  41.     FIELD1    the (possibly) null field under test
  42.  
  43.     FIELD2     the field you are LEAVING when the test occurs
  44.  
  45.     FIELD3    the actual field under test.  i.e., If FIELD1 is null then
  46.         enter this field -- If FIELD1 is not null and user says yes
  47.         then update this field
  48.  
  49.     FIELD4    the alternate field to enter if FIELD1 is not null and
  50.         user says no
  51.  
  52.     FIELD5    a test point to use to check the users response
  53.  
  54. Also, these conditions can occur from various combinations of these fields,
  55. so:
  56.  
  57.     Attach a KEY-NXTFLD to FIELD2 that contains the following:
  58.  
  59.             if :field1 is null then 
  60.                GO_FIELD('field3');
  61.             else 
  62.                 :global.path1 := 'field3';
  63.                 :global.path2 := 'field4';
  64.                 go_field('field5');
  65.             end if;
  66.  
  67.     FIELD5 is in a pop-up window with appropriate text to prompt 
  68.     the user for a Y or N response.  Attach a KEY-NXTFLD trigger 
  69.     to FIELD5 that says:
  70.  
  71.             if :field5 = 'Y' then
  72.                go_field(name_in('global.path1'));
  73.             elsif :field5 = 'N' then
  74.                go_field(name_in('global.path2'));
  75.         else
  76.            message('*** ERROR - response must be Y or N');
  77.            bell;
  78.                raise form_trigger_failure;
  79.             end if;
  80.  
  81. Hope this helps.
  82.  
  83.   ---------------------------------------------------------------------------
  84.   |      Frank Greene                  |          //////  //////             |
  85.   |      DELPHI SYSTEMS, Inc.          |           ////    ////              |
  86.   |      Telephone [615] 458-6032      |          ////    ////  //////       |
  87.   |      324 Ootsima Way               |         ////    ////    ////        |
  88.   |      Loudon, TN 37774              |        //////  //////  //////       |
  89.   ----------------------------------------------------------------------------
  90.   |         Of course, any opinions or suggestions are strictly my own       |
  91.   ----------------------------------------------------------------------------
  92.  
  93.