combobox dependent on another combobox virtuoso skill

Hi,

You need to set up the callback of the nodes combo box so as it repopulates the choices of the rules combo box:

(let (techNodes rules theForm)
 
   techNodes = (hiCreateCyclicField
                  ?name 'techNodes
                  ?prompt     "Tech Nodes"
                  ?choices    (list "40nm" "60nm")
                  ?callback   (lambda (fld form node)
                                 (println node)
                                 (case node
                                    ("40nm"
                                       theForm->rules->choices = (list "Rule1" "Rule2" "Rule3"))
                                    ("60nm"
                                       theForm->rules->choices = (list "Rule1" "Rule4")))))

   rules = (hiCreateCyclicField
                  ?name 'rules
                  ?prompt     "Rules"
                  ?choices    (list "Rule1" "Rule2" "Rule3"))

   theForm = (hiCreateAppForm
      ?name 'myForm
      ?formTitle "Just playing..."
      ?fields (list techNodes rules))
 
   (hiDisplayForm theForm)
)

Thanks mbracht,
I got the flow..one more thing , I have to ask to suppose if I have to define it for 20+ tech nodes and the same as more than 20+rules...how we can define it in as code length will be much longer if I pick each node and define the rule in front of them...How can we list and define by that?

I'm not sure whether I understand what you mean - so I'm just guessing.  I take it that you have a long list of nodes and each one has their own rules and you don't want to hard code that in the case statement in the callback - am I correct? In that case I would accomodate the node/rule relation ship in a SKILL table which is essentially a hash table.

rules = (makeTable 'nodesTbl nil)
rules("40nm") = (list "rule1" "rule2" ...)
rules("60nm") = (list "rule1" "rule4" ...)
.....

...and then in the callback replace the entire case statement against:

theForm->rules->choices = rules[node]

But maybe I just don't understand your problem.

Max

Thanks Max for quick reply,

you guess it partially right..let me elaborate you.

Suppose i have long list of nodes as well as long list of rules...so if i define different rule in each single node then runtime and syntax length  will be more?I have tried this way..pls correct where am wrong.

(let (techNodes rules theForm)

techNodes = (hiCreateCyclicField
?name 'techNodes
?prompt "Tech Nodes"
?choices (list "40nm" "60nm")
?callback (lambda (fld form node)
(println node)
theForm->rules->choices = rules[node]))

rules = (makeTable 'nodesTbl nil)
rules("40nm"  "80nm" "120nm" "100nm"  "150nm" "140nm"= (list "rule3 "rule2" "rule7"...)
rules("60nm" "50nm" "90nm" "110nm"  "130nm" "180nm") = (list "rule1" "rule4"  "rule9"...)

theForm = (hiCreateAppForm
?name 'myForm
?formTitle "Just playing..."
?fields (list techNodes rules))

(hiDisplayForm theForm)
)

The way you assign key/value pairs to the table in your code is not valid SKILL syntax. I assume what you wanted to do is this:

rules["60nm"] = rules["50nm"] = ... = rules["90nm"]  = (list "rule1" "rule4"  "rule9"...)

ok...

here is correction i have done

(let (techNodes rules theForm)

techNodes = (hiCreateCyclicField
?name 'techNodes
?prompt "Tech Nodes"
?choices (list "40nm" "60nm" "50nm" "90nm" "10nm" "80nm" )
?callback (lambda (fld form node)
(println node)
theForm->rules->choices = rules[node]))

rules = (makeTable 'nodesTbl nil)
rules["60nm"] = rules["50nm"] =rules["90nm"] = (list "rule7" "rule2" "rule9")
rules("10nm") = rules["40nm"] =rules["80nm"] = (list "rule1" "rule4")

theForm = (hiCreateAppForm
?name 'myForm
?formTitle "Just playing..."
?fields (list techNodes rules))

(hiDisplayForm theForm)
)

While running above file in CIW window am getting an error of -

*Error* putprop: argument #3 should be either a string or a symbol (type template = "ggS") - nil

You have two problems in your code - for one you create just one of the two combo boxes and then in hiCreateAppForm() you are adding the SKILL table as a field. Here's a working example:

(let (techNodes rules rulesTbl)

   rulesTbl = (makeTable 'rulesTbl nil)
   rulesTbl["60nm"] = rulesTbl["50nm"] =rulesTbl["90nm"] = (list "rule7" "rule2" "rule9")
   rulesTbl["10nm"] = rulesTbl["40nm"] =rulesTbl["80nm"] = (list "rule1" "rule4")

   techNodes = (hiCreateCyclicField
                  ?name 'techNodes
                  ?prompt     "Tech Nodes"
                  ?choices    (list "10nm" "40nm" "50nm" "60nm" "80nm" "90nm")
                  ?callback   (lambda (fld form node)
                                 theForm->rules->choices = rulesTbl[node]))

   rules = (hiCreateCyclicField
                  ?name 'rules
                  ?prompt     "Rules"
                  ?choices    (list "rule1" "rule4"))

   theForm = (hiCreateAppForm
      ?name 'myForm
      ?formTitle "Just playing..."
      ?fields (list techNodes rules))

   (hiDisplayForm theForm)
)

You have two problems in your code - for one you create just one of the two combo boxes and then in hiCreateAppForm() you are adding the SKILL table as a field. Here's a working example:

(let (techNodes rules rulesTbl)

   rulesTbl = (makeTable 'rulesTbl nil)
   rulesTbl["60nm"] = rulesTbl["50nm"] =rulesTbl["90nm"] = (list "rule7" "rule2" "rule9")
   rulesTbl["10nm"] = rulesTbl["40nm"] =rulesTbl["80nm"] = (list "rule1" "rule4")

   techNodes = (hiCreateCyclicField
                  ?name 'techNodes
                  ?prompt     "Tech Nodes"
                  ?choices    (list "10nm" "40nm" "50nm" "60nm" "80nm" "90nm")
                  ?callback   (lambda (fld form node)
                                 theForm->rules->choices = rulesTbl[node]))

   rules = (hiCreateCyclicField
                  ?name 'rules
                  ?prompt     "Rules"
                  ?choices    (list "rule1" "rule4"))

   theForm = (hiCreateAppForm
      ?name 'myForm
      ?formTitle "Just playing..."
      ?fields (list techNodes rules))

   (hiDisplayForm theForm)
)

Thanks alot Max ...i got the flow