error while using the function dbCreateParamInstByMaster

Without knowing what parameters your via supports, answering this is rather hard. Maybe you can do:

viaMaster=dbOpenCellViewByType("REFLIB24" "V1" "layout")
foreach(mapcar param viaMaster~>parameters~>value list(param~>name param~>valueType))

And post here the output?

Andrew.

hi Andrew,

Thanks for your reply, actually i was out for vacation so could not reply on time. here is the output

 (("yNumber" "int") 
     ("xNumber" "int") 
     ("ByNumber" "boolean") 
     ("PlaceCenter" "boolean") 
     ("Y" "float")
     ("X" "float") 
    ("V1_purpose" "string") 
    ("y_layer" "string") 
  ("x_layer" "string") 
     ("Type" "string")
)

That suggests it ought to work. There must be something wrong - because this is basic functionality - so either the pcell is not really responsive to that parameter value - or something wierd is going on.

I suggest you log a service request with Cadence Customer Support.

Regards,

Andrew.

hi Andrew,

Can you please check the code ?? Actually it is a very basic script and i have made it to start in skill, Please suggest me any modification if you can ???

procedure(decision(b)
 if(b != nil then
 cv = geGetEditCellView()
 a=list(b b)
 let((m1 m0 m2 m1b m0b m2b nwbx cnt ctr x y via)
 m1 = dbGetTrueOverlaps(cv  a list("M1" "drawing") 32)
 m0 = dbGetTrueOverlaps(cv  a list("M0" "drawing") 32)
 m2 = dbGetTrueOverlaps(cv  a list("M2" "drawing") 32)
 m1b=car(m1~>bBox)
 m0b=car(m0~>bBox)
 m2b=car(m2~>bBox)
if(m0 && m1 && m2 then
 choiceGUI()
  else
  if( m0 && m1 && !m2  then
   nwbx=bbox(m0b m1b); to get bbox of the overlap area
 cnt=centreAndWL(nwbx)
 ctr=car(cnt)
 x=nth(1 cnt)
 y=nth(2 cnt)
 via=dbCreateParamInstByMasterName(cv "REFLIB" "V1"  "layout" nil ctr "R0" 1 list(list("X" "float" x) list("Y" "float" y)))
  else if(!m0 && m1 && m2 then
   nwbx=bbox(m1b m2b); to get bbox of the overlap area
 cnt=centreAndWL(nwbx)
 ctr=car(cnt)
 dbCreateParamInstByMasterName(cv "REFLIB" "V2" "layout" nil ctr "R90" 1)
  else
  println("no overlap found")))
  );if
  ); first if
)); procedure to make desicion

procedure(bbox(mo m1)
 let((mox1 moy1 mox2 moy2 m1x1 m1y1 m1x2 m1y2 lx ly rx ry)
  mox1=xCoord(lowerLeft(mo))
  moy1=yCoord(lowerLeft(mo))
  mox2=xCoord(upperRight(mo))
  moy2=yCoord(upperRight(mo))
  m1x1=xCoord(lowerLeft(m1))
  m1y1=yCoord(lowerLeft(m1))
  m1x2=xCoord(upperRight(m1))
  m1y2=yCoord(upperRight(m1))

 if(mox1>=m1x1
  then lx=mox1
 else lx=m1x1);if for lowerleft x value
 if(moy1>=m1y1
 then ly=moy1
 else ly=m1y1);if for lowerleft y value

 if(mox2<=m1x2
 then rx=mox2
 else rx=m1x2);if for upperright x value

 if(moy2<=m1y2
 then ry=moy2
 else ry=m1y2);if for upperright y value

 newbbox=list(list(lx ly) list(rx ry))
 );let
);procedure for getting bbox of overlap

procedure(getlocation()
let((pts)
pts=enterPoint(
 ?prompts list("Enter a point.")
       );enterpoint 
        if(pts != nil  then
        decision(pts) ;
        getlocation())
        )     
           ); procedure to get click point
   
   
procedure(centreAndWL(ox)
let((w w1 w2 l1 l2 l cy cx cy1 cx1 c out)
l1=xCoord(upperRight(ox))
l2=xCoord(lowerLeft(ox))
w1=yCoord(upperRight(ox))
w2=yCoord(lowerLeft(ox))
l=l1-l2
w=w1-w2
if(minusp(l)
then l=(-1)*w
else w=w); if w is negative
if(minusp(l)
then l=(-1)*l
else l=l); if l is negative
cy1=w/2
cy=w1-cy1
cx1=l/2
cx=l1-cx1
c=list(cx cy)
out=list(c w l)
)
);procedure
procedure(choiceGUI()
let((VIA)
  
  rf = hiCreateRadioField(
                    ?name        'Vselect
      ?prompt      "Select the Via Needed"
      ?choices     list("VIA1" "VIA2" "Both")
      ?defValue    "Both"
      )
      
      
 myform = hiCreateAppForm(?name 'myform
                 ?formTitle "Shashi"

    ?fields list(
    list(rf       0:20 220:20 200)
    ))
  
      
  
  hiDisplayForm(myform)
  choiceVia=myform->Vselect->value
  );let
  );procedure for display of choice    

There's not much I can advise without seeing the actual REFLIB to know how the via is defined. 

The only thing I would point out is that your code could do with some indentation, and also having sensible names for the functions with prefixes to ensure they are unique and don't clash with somebody else who also writes a function bbox or getlocation...

The reason I suggested logging a service request is that then you might be able to share the technology data so that one of our support team can take a look armed with sufficient data to be able to diagnose the problem.

Regards,

Andrew.