LiveCode Forums.

Code: Select all

=IF(G4="Private", IF(G6>2000000.01,7%,IF(G6>1000000.01,5%,IF(G6>=500000.01,4%,IF(G6>250000.01,3%,1%)))),15%)

Code: Select all

...
repeat for each word tWord in tList

    ## With IF THEN:
    if char -1 of tWord = "!" OR char -1 of tWord = "," OR char -1 of tWord = "$" then
      do something
    end if
    
    ## With SWITCH, more redable, especially when it comes to even more "comparisons"!
    switch char -1 of tWord
      case "!"
      case "%"
      case ","
        do something
        break
    end switch
  end repeat

Code: Select all

=IF(G4="Private", IF(G6>2000000.01,7%,IF(G6>1000000.01,5%,IF(G6>=500000.01,4%,IF(G6>250000.01,3%,1%)))),15%)

Code: Select all

on mouseUp
   -- make some values, picked from an arbitrary definition as fields on the card
   -- how you provide values to the function is up to you
   put field "fldG4" into tG4
   put field "fldG6" into tG6
   put myFunction (tG4, tG6) into field "fldResult"
   put mySwitchFunction (tG4, tG6) into field "fldSwitchResult"
   -- both functions, using either nested if or switch structures should produce the same result
end mouseUp

function myFunction pG4, pG6
   
   if pG4 = "Private" then
      if pG6 > 2000000.01 then
         return "7%"
      else if pG6 > 1000000.01 then
         return "5%"
      else if pG6 > 500000.01 then
         return "4%"
      else if pG6 > 250000.01 then
         return "3%"
      else
         return "1%"
      end if
   else
      return "15%"
   end if
   
end myFunction

function mySwitchFunction pG4, pG6
   local tReturnVal
   switch
      case pG4 = "Private"
         switch
            case pG6 > 2000000.01
               put "7%" into tReturnVal
               break
            case pG6 > 1000000.01
               put "5%" into tReturnVal
               break
            case pG6 > 500000.01
               put "4%" into tReturnVal
               break
            case pG6 > 250000.01
               put "3%" into tReturnVal
               break
            default 
               put "1%" into tReturnVal
         end switch
         break
      default 
         put "15%" into tReturnVal
   end switch
   return tReturnVal
end mySwitchFunction

Code: Select all

 put btn "Purchase type" into tG4
   put field "Price Input" into tG6
   if btn "Purchase type"  = "Private" then
      if fld "Price Input" > 2000000.01 then
         return "7%"
      else if fld "Price Input" > 1000000.01 then
         return "5%"
      else if fld "Price Input" > 500000.01 then
         return "4%"
      else if fld "Price Input" > 250000.01 then
         return "3%"
      else
         return "1%"
      end if
   else
      return "15%"
   end if
   put WhatdoIputhere? (tG4, tG6) into field "UO %age"

Code: Select all

on mouseUp
   -- get the values from the fields and put into variables
   -- simply to make it easier to pass them to the function
   put field "Purchase Type" into tG4
   put field "Price Input" into tG6
   
   -- pass those values to the function and take the returned value from the function
   -- and store it in the destination field 
   put calculatePercentage (tG4, tG6) into field "UO %age"
   -- this sends the values in variables tG4 and tG6 to the calculatePercentage function
   -- it amounts to the same as hardcoding
   -- put calculatePercentage ("Private", 565000) into field "UO %age" 
   -- given the values mentioned
end mouseUp


function calculatePercentage pG4, pG6
   -- when you invoked the function you passed the variables tG4 and tG6 to be used
   -- as parameter values to process
   -- these are referred to within the scope of this function as pG4 and pG6 because
   -- that was what we defined these parameter placeholder names as in the declaration
   -- of the function right here
   -- so given that we passed the variable tG4 containing the value "Private" to the function
   -- then within the scope of this function the parameter pG4 will contain the value "Private"
   -- (unless you change its value within the function, of course - but this one doesn't)
   

   -- so now all the function has to do is to determine which value to return
   -- with a few tests of the two conditions, we will return one of the values back to the
   -- invoking command in the mouseUp handler
   -- back when we said
   -- put [the value returned from the function] calculatePercentage ("Private", 565000) into field "UO %age" 
   -- [the value returned from the function] is of course just here for implicit clarity
   -- it's not part of the syntax

   -- check if the pG4 parameter was "Private" or not
   if pG4 = "Private" then
      -- yes it is, so do our other checks on pG6 and return a value accordingly
      if pG6 > 2000000.01 then
         return "7%"
      else if pG6 > 1000000.01 then
         return "5%"
      else if pG6 > 500000.01 then
         return "4%"
      else if pG6 > 250000.01 then
         return "3%"
      else
         return "1%"
      end if
   else
      -- no pG4 was not "Private" so return the appropriate value
      return "15%"
   end if
   
end calculatePercentage

Code: Select all

  -- say the menu choices are "Private" and "Corporate" and "Other" (in that order)
  -- and the latest selected choice is "Private"
  -- we get the line number
  put the menuHistory of button "Purchase Type" into tPTline
  -- tPTline should now contain 1
  -- we can then get that line of text for our purposes
  -- the text of button "Purchase Type" is the list of all the menu choices
  -- now that we know which line of the text it is we want, we can
  put line tPTline of the text of button "Purchase Type" into tG4

Code: Select all

on menuPick pItemName
   -- put the current choice into a visible field
   put pItemName into field "Purchase Type"
  -- or set a custom property
   set the currentChoice of me to pItemName
end menuPick

Code: Select all

put the currentChoice of button "Purchase Type" into tG4

Code: Select all

  put the currentChoice of button "Purchase Type" into tG4
   put field "Price Input" into tG6
   if btn "Purchase type"  = "Private" then
      if fld "Price Input" > 2000000.01 then
         return "7%"
      else if fld "Price Input" > 1000000.01 then
         return "5%"
      else if fld "Price Input" > 500000.01 then
         return "4%"
      else if fld "Price Input" > 250000.01 then
         return "3%"
      else
         return "1%"
      end if
   else
      return "15%"
   end if
   put  (tG4, tG6) into field "UO %age"