killallxdrc.il

来自「Allegro常用skill」· IL 代码 · 共 40 行

; Written by: 	John Horner
;		Cadence Design Systems
;		[e-mail]
;
;		Run with Application: Allegro, APD
;		Tested against versions 11 through 15
;		June 16/2004 - Ron Guthrie
;		Remove X-DCR markers even if they are not visible.
;
;		July 15/2004 - Ron Guthrie
;		Clear selection set to remove temp highlights
;
; This routine will remove all Externally generated DRCs from the design
axlCmdRegister( "rmxdrc" `_jbhrmvallxDRCs)
; ########################################
; Define the routine to remove the markers
; ########################################
;
(defun _jbhrmvallxDRCs ()
 
   axlClearSelSet()
   axlDBRefreshId(axlDBGetDesign())
 
   ; ###############################
   ; Remove any existing DRC markers
   ; ###############################
 
   axlSetFindFilter( ?enabled '(noall drcs invisible) ?onButtons '(drcs))
   Markers=axlGetSelSet(axlAddSelectAll())
   axlClearSelSet()
   (foreach Drc Markers
      (if Drc->name == "Externally Determined Violation" then
            axlDeleteObject(Drc)
      ); end if Drc->name == "....
   ); end foreach Drc Markers
   axlFlushDisplay()
); end defun _jbhrmvallxDRCs