Topic: ssget multiple entities and a specific extended data entity

[csgoh]

I am trying to use ssget to select from the database for LWPOLYLINE or POLYLINE or LINE
POINT entities and a specific extended data entity but unsuccessful.
Below is my coding and hope to get some help.

Code: [Select]

          (setq  XdataAppName "WG_XD_PLOTNO"
                   filterlist    (list '(-4 . "<AND")
                                         '(-4 . "<OR")
                                           '(0 . "LWPOLYLINE")
                                           '(0 . "POLYLINE")
                                           '(0 . "LINE")
                                           '(0 . "POINT")
                                          '(-4 . "OR>")
                                      '(-4 . "AND>")
                                (list -3 (list XdataAppName)))
                 SS (ssget "x" FilterList)
         )


[Kerry]

I'm not near a lisp engine at the moment, but you could try something like ;-

'( (0 . "LWPOLYLINE,POLYLINE,LINE,POINT") (CONS -3 XdataAppName) )

// kwb

                                           

[Jürg Menzi]

Try this one:

Code: [Select]

(setq XdataAppName "WG_XD_PLOTNO"
      filterlist   (list
                   '(0 . "LWPOLYLINE,POLYLINE,LINE,POINT")
                    (list -3 (list XdataAppName))
                   )
                SS (ssget "x" FilterList)
)

[ElpanovEvgeniy]

(setq SS (ssget "_X" (list '(0 . "PO[LI]*,L[IW]*") '(-3 ("WG_XD_PLOTNO")))))

[Jürg Menzi]

(setq SS (ssget "_X" (list '(0 . "PO[LI]*,L[IW]*") '(-3 ("WG_XD_PLOTNO")))))

Евгений,
cool solution your filter, but doesn't work if XdName is a variable...

[ElpanovEvgeniy]

(setq SS (ssget "_X" (list '(0 . "PO[LI]*,L[IW]*") '(-3 ("WG_XD_PLOTNO")))))

Евгений,
cool solution your filter, but doesn't work if XdName is a variable...

I wanted to show, the working filter - as I use it...
csgoh - Itself correctly used XdataAppName!
Thank for the correction

Code: [Select]

(setq SS (ssget "_X" (list '(0 . "PO[LI]*,L[IW]*") (list -3 (list XdataAppName)))))

[csgoh]

Thanks guys.

csgoh

[ElpanovEvgeniy]

Code: [Select]

(setq SS (ssget "_X" (list '(0 . "[lp]*[et]") (list -3 (list XdataAppName)))))

[StoneDWG]

How get the entities ,they have not  a specific extended data

[Jürg Menzi]

Code: [Select]

(ssget "_X" (list '(-4 . "<NOT") (list -3 (list "*")) '(-4 . "NOT>")))or if you wanna filter objects they have no extended data with the names 'MyXdata1' 'MyXdata2':

Code: [Select]

(ssget "_X" (list '(-4 . "<NOT") (list -3 (list "MyXdata1" "MyXdata2")) '(-4 . "NOT>")))