Got the info I needed -
Code:
; Jason Piercey . July 24th, 2003
; performs a wildcard match between the second
; element in dxf code 2 and [entry] for each
; entry defined in [table].
; [table] - string, table name
; [entry] - string, entry name
; return - list, list of entity lists
; example: (wcTblnext "dimstyle" "stan*")
(defun wcTblnext (table entry / data rtn)
(setq table (strcase table))
(setq entry (strcase entry))
(while (setq data (tblnext table (null data)))
(if (wcmatch (strcase (cdr (assoc 2 data))) entry)
(setq rtn (cons data rtn))
)
)
(reverse rtn)
)