Como listar todos os lotes de um loteamento do Civil 3D com seus números, ids e áreas usando a classe Parcel da AutoCAD Civil 3D .NET API

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

using Autodesk.AutoCAD.Runtime;
using Autodesk.Civil.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.Civil.DatabaseServices;

namespace Estudos {
  public class Class1 : IExtensionApplication {
    [CommandMethod("Parcels")]
    public void Parcels() {
      // vamos obter uma referência ao documento atual do Civil 3D
      CivilDocument doc = CivilApplication.ActiveDocument;
      Editor editor = Application.DocumentManager.MdiActiveDocument.Editor;

      // vamos pesquisar um loteamento chamado "LOTEAMENTO SETOR SUL"
      string nome = "LOTEAMENTO SETOR SUL";

      // vamos iniciar um nova transação
      using (Transaction ts = Application.DocumentManager.MdiActiveDocument.
        Database.TransactionManager.StartTransaction()) {
        try {
          // efetuamos uma chamada ao método GetSiteByName() passando
          // o documento atual do AutoCAD Civil 3D e o nome do site
          // que queremos encontrar
          Site site = GetSiteByName(doc, nome);

          // e mostramos o resultado
          if (site == null) {
            editor.WriteMessage("\nO loteamento não foi encontrado.");
          }
          else {
            // encontramos o loteamento. Agora vamos retornar a lista
            // de lotes encontrados
            ObjectIdCollection lotes = site.GetParcelIds();

            // vamos percorrer os lotes e mostrar os seus números, ids e áreas
            foreach (ObjectId id_lote in lotes) {
              Parcel lote = id_lote.GetObject(OpenMode.ForRead) as Parcel;
              // vamos mostrar o número, id e área desse lote
              editor.WriteMessage("\nNúmero: " + lote.Number + "; Id: " + 
                lote.Id + "; Área: " + lote.Area);
            }
          }
        }
        catch (System.Exception e) {
          // handle bad file path 
          editor.WriteMessage("Erro: {0}", e.Message);
        }
      }
    }

    // função C# que retorna site por nome, ou null em
    // caso de não encontrar o site desejado
    public Site GetSiteByName(CivilDocument doc, string nome) {
      // vamos declarar um objeto da classe Site 
      Site site = null;

      // agora vamos obter os ids de todos os sites
      ObjectIdCollection sites = doc.GetSiteIds();

      // vamos percorrer todos os ids de sites retornados
      foreach (ObjectId id_site in sites) {
        site = id_site.GetObject(OpenMode.ForRead) as Site;
        // encontramos o site
        if (site.Name.Equals(nome)) {
          return site;
        }
      }

      // retorna null se o site não for encontrado
      return null;
    }

    public void Initialize() {
      // pode deixar em branco
    }

    public void Terminate() {
      // pode deixar em branco
    }
  }
}