I need help finding the string to access c3d point data for a lisp routin

[jmeyer.186809]

Basically what we've always used in our office with ldt is a lisp routin that reads the points in an autocad drawing and changes the description and drops down the correct symbol for that point. So It would have a bunch or points in the drawing and the point would have its point number, elevation and a description which was for example "352.3". So the 352 would be for example "TC" the .3 would be "BC" so then it would change the description of the point to "TC BC" at the same time it would do this for all points and if a point was a Fire hydrant it would move the point to the hydrant layer and drop down a hydrant symbol on top of the node.

Now that we are moving to civil 3d we can't find the string to get access to the point. If that makes sense. Can anyone help me out with this.

[sinc]

This functionality is built in to Civil 3D. It changed and got much better in C3D 2010, so hopefully you are using either 2010 or 2011.

In any case, check into the automated linework functionality. It takes a fair bit of setup, but then works pretty well once you get through that.

[rkmcswain]

Are you just trying to access the DESC part of a C3D point?
If so, try this:

; standard entity selection
(setq sel (entsel "\nSelect Point: "))
; get the entity name
(setq ent (car sel))
; get the entity list
(setq lst (entget ent))
; check to make sure the selection was the expected type
(if (eq "AECC_COGO_POINT" (cdr (assoc 0 lst)))
  ; if so, convert the entity into a VLA-OBJECT
  (setq obj (vlax-ename->vla-object ent))
)
(if obj
  ; get the description of the point
  (setq nam (vlax-get-property obj 'Description))
)
    

[jmeyer.186809]

This functionality is built in to Civil 3D. It changed and got much better in C3D 2010, so hopefully you are using either 2010 or 2011.

In any case, check into the automated linework functionality. It takes a fair bit of setup, but then works pretty well once you get through that.

no this doesn't meet our needs but thank you!

[sinc]

no this doesn't meet our needs but thank you!

What about it doesn't meet your needs?

[rkmcswain]

no this doesn't meet our needs but thank you!

Well, was the lisp code above of any help?

[jmeyer.186809]

Well, was the lisp code above of any help?

Yes thank you much! It got me started.

[jmeyer.186809]

What about it doesn't meet your needs?

It doesn't work with the way our office collects and compiles data.