Добавление вершин к AcDb3dPolyline :=(

  static void AddVertex(void)
  {
    // Add your code for command InsertNewpoint.AddVertex here
    ads_point p; ads_name  entPoly;
    resbuf view; acedGetVar ("VIEWSIZE", &view);
    double gsize = view.resval.rreal * 0.03;
    AcDbObjectId vertexAfterId;
    AcGePoint3d  pointAfter;
    if (acedEntSel("\nSelect 3DPoly: ", entPoly, p) == RTNORM) {
      AcDbObjectId pObjId;
      if (acdbGetObjectId(pObjId,entPoly) == Acad::eOk) {
        AcDbObjectPointer<AcDb3dPolyline> poly3d(pObjId,AcDb::kForWrite);
        if (poly3d.openStatus() != Acad::eOk) return;
        AcDbObjectIterator *pVertIter= poly3d->vertexIterator();
        AcDbObjectId vertexObjId;
        for (;!pVertIter->done();pVertIter->step()) {
          vertexObjId = pVertIter->objectId();
          AcDbObjectPointer<AcDb3dPolylineVertex> pVertex(vertexObjId,AcDb::kForRead);
          AcGePoint3d vPts = pVertex->position();
          acdbWcs2Ucs(asDblArray(vPts),asDblArray(vPts),0);
          acedGrDraw(asDblArray(vPts - AcGeVector3d(gsize,gsize,0)),asDblArray(vPts + AcGeVector3d(gsize,gsize,0)),1,1);
          acedGrDraw(asDblArray(vPts - AcGeVector3d(gsize,-gsize,0)),asDblArray(vPts + AcGeVector3d(gsize,-gsize,0)),1,1);
          acedInitGet(RSG_OTHER,"Yes No _ Yes No");
          char ans[512];
          int rc = 0;
          if ((rc = acedGetKword("\nInsert new vertex after this vertex? [Yes/No] <No>: ",ans)) == RTNORM) {
            if (!strcmp(ans,"") || !stricmp(ans,"YES")) {
              vertexAfterId = vertexObjId;
              pointAfter = vPts;
              acedRedraw(NULL,1);
              break;
            }
          } else if (rc == RTCAN) {
            acedRedraw(NULL,1);
            break;
          }
          acedRedraw(NULL,1);
        }
        delete pVertIter;
        if (!vertexAfterId.isNull()) {
          acedInitGet(1,NULL);
          if (acedGetPoint(asDblArray(pointAfter),"\nSelect point: ",asDblArray(pointAfter)) == RTNORM) {
            acdbUcs2Wcs(asDblArray(pointAfter),asDblArray(pointAfter),0);
            AcDb3dPolylineVertex *vertex = new AcDb3dPolylineVertex(pointAfter);
            AcDbObjectId newVertexId;
            poly3d->insertVertexAt(newVertexId,vertexAfterId,vertex);
            vertex->close();
          }
        }
      }
    }
  }

Command: 3dpoly
Specify start point of polyline: 1000,0,100
Specify endpoint of line or [Undo]: 2000,500,-200
Specify endpoint of line or [Undo]: 2600,1200,300
Specify endpoint of line or [Close/Undo]: 1200,1500,-400
Specify endpoint of line or [Close/Undo]:
Command: addvertex
Select 3DPoly:  <Snap off>
Insert new vertex after this vertex? [Yes/No] <No>: N
Insert new vertex after this vertex? [Yes/No] <No>: Y
Select point:  <Coords on> 1350,1005,500
Command:  ADDVERTEX
Select 3DPoly:
Insert new vertex after this vertex? [Yes/No] <No>: n
Insert new vertex after this vertex? [Yes/No] <No>: n
Insert new vertex after this vertex? [Yes/No] <No>: Y
Select point: 1010,1225,-300
Command: ArxDbgTestCurve
Testing getClosestPointTo(const AcGePoint3d& givenPoint, AcGePoint3d&
pointOnCurve, Adesk::Boolean extend = Adesk::kFalse)...
Select AcDbCurve:
Point:
PT                   : (1083, 1224, -273)
Select AcDbCurve:
Point:
PT                   : (1142, 1139, 11)
Select AcDbCurve:
Point:
PT                   : (1530, 865, 306)
Select AcDbCurve:
Point: _endp of
PT                   : (1010, 1225, -300)
Select AcDbCurve:
Point: _endp of
PT                   : (1350, 1005, 500)
Select AcDbCurve: