关于hiCreateAppForm的问题求助

dilyyao

我写了个小脚本，希望能把转换工艺的脚本用menu来实现，目前能弹出form，但是form却没法关联程序 replace_dev()，请帮忙看看哪里有问题，本人才刚学skill,  没人指导，自己摸索的：
            proceduce( firstformDefineFields()
                             myWorkLib=hiCreateStringField(
                             ?name 'myWorkLib
                             ?prompt "my work Lib"
                             ?value  " “
                             ?callback  "replace_dev(myWorkLib source_lib source_dev target_lib target_dev)"
                             ?editable  t
                             )
                            source_lib=hiCreateStringField(
                             ?name 'source_lib
                             ?prompt "source lib"
                             ?value  " “
                             ?callback  "replace_dev(myWorkLib source_lib source_dev target_lib target_dev)"
                             ?editable  t
                             )
                            source_dev=hiCreateStringField(
                             ?name 'source_dev
                             ?prompt "source cell"
                             ?value  " “
                             ?callback  "replace_dev(myWorkLib source_lib source_dev target_lib target_dev)"
                             ?editable  t
                             )
                            target_lib=hiCreateStringField(
                             ?name 'target_lib
                             ?prompt "target lib"
                             ?value  " “
                             ?callback  "replace_dev(myWorkLib source_lib source_dev target_lib target_dev)"
                             ?editable  t
                             )
                            target_dev=hiCreateStringField(
                             ?name 'target_dev
                             ?prompt "target cell"
                             ?value  " “
                             ?callback  "replace_dev(myWorkLib source_lib source_dev target_lib target_dev)"
                             ?editable  t
                             )
                          list( myWorkLib source_lib source_dev target_lib target_dev )
                     )
         proceduce( myreplacedevform()
                          replacedevForm = hiCreateAppForm(
                            ?name 'replacedevForm
                            ?fields firstformDefineFields()
                            ?formTitle "replace dev Form"
                            ?buttonlayout 'OKCancelApply
                            ?callback  "replace_dev(myWorkLib source_lib source_dev target_lib target_dev)"   
                               )
                        replacedevForm     
                       )
          proceduce(  myreplacedevformdisplayform()
                             myreplacedevform()      
                             hiDisplayForm( 'replacedevForm )
                          )
          procedure(replace_dev(myWorkLib source_lib source_dev target_lib target_dev)
let((cell_list sch_cv targetId w l)
cell_list=ddGetObj(myWorkLib)~>cells~>name
foreach(cell cell_list
   sch_cv = dbOpenCellViewByType(myWorkLlib cell "schematic" "schematic" "a")
   if(sch_cv then
      foreach(inst sch_cv~>instances
        if(inst~>cellName == source_dev && inst~>libName == source_lib then
          targetId=dbOpenCellViewByType(target_lib target_dev "symbol"  ""  "r")
          if(targetId then
             w=inst~>w
             l=inst~>l
             inst~>master=targetId
             inst~>w=w
             ;;need trigger callback for "w"
             inst~>l=l
            ;;need trigger callback  for "l“
           cdfgData = cdfGetInstCDF(instance)       ;;取CDF数据
           (foreach pName list("fw" "l" "m")            ;;要触发callBack的参数列表
            param = cdfFindParamByName(cdfgData pName)
           (when param~>callback
               evalstring(param~>callback)       ;;挨个触发
    )      
)
            dbClose(targetId)
          );if
        );if
        );foreach
     dbSave(sch_cv)
     dbClose(sch_cv)
   );if
);foreach
);let
);procedure
       弹出窗口如下图：点击OK未能运行 replace_dev(myWorkLib source_lib source_dev target_lib target_dev) ，求指教！！！谢谢

dilyyao

弹出窗口如下图：点击OK未能运行 replace_dev(myWorkLib source_lib source_dev target_lib target_dev) ，求指教！！！谢谢
                  

着着着火了

replace_dev(myWorkLib source_lib source_dev target_lib target_dev)里的参数都需要你自己从field里取出来的，不是名字对上了就行，而且这些field好像没什么必要写callback

freshworker

你应该写一个比如button的Field，把button的callback写成替换device的procedure，这些stringFileld是不需要callback的，然后要把各个stringField的值通过formID->fieldID->Value的方式抓出来赋值给procedure对应的参数，点击button之后就会触发你的procedure

dilyyao

freshworker 发表于 2023-6-6 19:38
你应该写一个比如button的Field，把button的callback写成替换device的procedure，这些stringFileld是不需要 ...

谢谢回复，确实是因为没有赋值给stringfield引起的，只需要在AppForm的callback里面把stringfield->value就可以了。

mitchell0001

Any final code ??