Topic: Extracting data from hatches and blocks

[sauron-83]

Hi all,
one more time I need your help...
Could anyone help me with extraction data (extended entity data) from objects as in file I've attached?
I think data I need is stored in dictionaries but I haven't dug so deep

Is there quick way to extract all those data as texts/mtexts somewhere in the middle of such objects?
I mean exact those three data from the picture I also attached here: parcels (KOMMUNNAMN, TRAKT and BLOCKENHET).

I dont know how original file was created, but file attached  here   is only small part of it to show how it looks like.

Thanks in advance for any clues,
Chris

[sauron-83]

OK, I've got help.
It was created in MAP 3D and with this simple code I am able to get this data.

Code: [Select]

;Lists Site, Property and Number for a selected hatch.

(defun c:go( / obj recno)

  (setq obj (car (entsel "\nSelect hatch: ")))

  (setq recno (ade_odgetrecord obj "Ytor" 0))
  (setq Site (ade_odgetrecfield recno "KOMMUNNAMN"))
  (setq PropName (ade_odgetrecfield recno "TRAKT"))
  (setq ParcelNum (ade_odgetrecfield recno "BLOCKENHET"))


  (prompt (strcat "\nSite: " Site))
  (prompt (strcat "\nProperty Name: " PropName))
  (prompt (strcat "\nNumber: " ParcelNum))
  (princ)
  );endI'll do rest by myself.
Great thanks Tim Corey.

sauron