Wanted to update the Padstack Definition for existing Padstacks

Programmatically, you cannot modify a padstack, as it is read-only. So, you need to copy the pads and then make modifications. The function to copy a pad is shown below. You need to find the layer of the pad and decide the parameters to copy depending on whether the figureName is FLASH or not. For FLASH, copy the name to ?flash; else, copy inPad ->figureName to figure.

(procedure copyPad(inPad)
(let (layer subClassName className)
layer = parseString(inPad ->layer "/")
;printf("layer is %L\n" layer)
className = car(layer)
subClassName = cadr(layer)
size=getPadFigureSize(inPad)
(if inPad->figureName == "FLASH" then
newPad = make_axlPadStackPad(?layer subClassName,
?type inPad ->type
?figureSize size
?figure 'FLASH
?flash inPad ->flash
?offset inPad ->offset
)
else
newPad = make_axlPadStackPad(?layer
subClassName,
?type inPad ->type,
?figureSize size
?figure inPad ->figureName
?offset inPad ->offset
)
);if
newPad
);let
);procedure