← Inbox

C3D-0413 · Delete the 7 layers the way that worked: move content to HIDDEN then delete [C3D-KILL5] done

Moves all content (top-level and guts) on WATER_LINE_PTS, SS-0-FRAME, the 4 SEWER_EASEMENT layers and PDF2_E IPF-SET to the frozen HIDDEN layer, then deletes the emptied layers. No erase, no current-layer or freeze fiddling - the same move-then-delete that succeeded on every prior ticket.

Script file
C3D-0413.cs
Target
ACAD-260612-C-Store As-Built 60 H2O wPROFILE.dwg · model space
Author
claude
Approved
yes · auto-auth
Timeout
180s

C# payload

// Delete the 7 layers the way the earlier tickets did: MOVE all their content off (guts and
// top-level -> HIDDEN), then delete the emptied layers. No erase, no touching the current layer,
// no freeze changes. HIDDEN stays frozen.
var kill = new List<string>{
    "WATER_LINE_PTS", "SS-0-FRAME",
    "SEWER_EASEMENT 1 ORNAGE", "SEWER_EASEMENT 1 YELLOW",
    "SEWER_EASEMENT E2", "SEWER_EASEMENT RED"
};
const string TARGET = "HIDDEN";
Log("drawing: " + Db.Filename);
var bt = (BlockTable)Tx.GetObject(Db.BlockTableId, OpenMode.ForRead);
var lt = (LayerTable)Tx.GetObject(Db.LayerTableId, OpenMode.ForWrite);
foreach (ObjectId id in lt){ var l=(LayerTableRecord)Tx.GetObject(id,OpenMode.ForRead); if(l.Name.StartsWith("PDF",StringComparison.OrdinalIgnoreCase) && !kill.Contains(l.Name)) kill.Add(l.Name); }
var kset = new HashSet<string>(kill, StringComparer.OrdinalIgnoreCase);

ObjectId targetId;
if (lt.Has(TARGET)) targetId=lt[TARGET];
else { var nl=new LayerTableRecord(); nl.Name=TARGET; targetId=lt.Add(nl); Tx.AddNewlyCreatedDBObject(nl,true); }
{ var t=(LayerTableRecord)Tx.GetObject(targetId,OpenMode.ForWrite); t.IsFrozen=false; t.IsOff=false; t.IsLocked=false; }

// move ALL content on the target layers to HIDDEN (top-level and guts)
int moved=0;
foreach (ObjectId bid in bt){
    var def=(BlockTableRecord)Tx.GetObject(bid,OpenMode.ForRead);
    var ids=new List<ObjectId>(); foreach (ObjectId sid in def) ids.Add(sid);
    foreach (var sid in ids){
        var probe=Tx.GetObject(sid,OpenMode.ForRead) as Autodesk.AutoCAD.DatabaseServices.Entity;
        if (probe==null || probe.IsErased || !kset.Contains(probe.Layer)) continue;
        var e=(Autodesk.AutoCAD.DatabaseServices.Entity)Tx.GetObject(sid,OpenMode.ForWrite);
        e.Layer=TARGET; moved++;
    }
}
Log("moved " + moved + " entities to " + TARGET);
{ var t=(LayerTableRecord)Tx.GetObject(targetId,OpenMode.ForWrite); t.IsFrozen=true; }

// delete the now-empty layers (skip whichever is current; the user set it to 0)
int deleted=0, kept=0;
foreach (var n in kill){
    if(!lt.Has(n)) continue;
    int still=0; foreach (ObjectId bid in bt){ var def=(BlockTableRecord)Tx.GetObject(bid,OpenMode.ForRead); foreach (ObjectId sid in def){ var e=Tx.GetObject(sid,OpenMode.ForRead) as Autodesk.AutoCAD.DatabaseServices.Entity; if(e!=null && !e.IsErased && e.Layer.Equals(n,StringComparison.OrdinalIgnoreCase)) still++; } }
    if (still>0){ kept++; Log("  KEPT " + n + " (" + still + ")"); continue; }
    try { ((LayerTableRecord)Tx.GetObject(lt[n],OpenMode.ForWrite)).Erase(); deleted++; Log("  deleted " + n); }
    catch (System.Exception ex){ kept++; Log("  keep " + n + ": " + ex.Message); }
}
Log(string.Format("deleted {0}, kept {1}", deleted, kept));
Ed.Regen();

Result

Status
success
Drawing file
C:\Users\sanja\OneDrive\_SurveyDisco\260613 - 5030 E Lake Pkwy, Stockbridge, GA 30281, USA\ACAD-260612-C-Store As-Built 60 H2O wPROFILE.dwg
Message
Executed C3D-0413 (0 entities touched).
Entities
Duration
581 ms
Civil 3D
25.0.0.0

Log

drawing: C:\Users\sanja\OneDrive\_SurveyDisco\260613 - 5030 E Lake Pkwy, Stockbridge, GA 30281, USA\ACAD-260612-C-Store As-Built 60 H2O wPROFILE.dwg
moved 86 entities to HIDDEN
  deleted WATER_LINE_PTS
  deleted SS-0-FRAME
  deleted SEWER_EASEMENT 1 ORNAGE
  deleted SEWER_EASEMENT 1 YELLOW
  deleted SEWER_EASEMENT E2
  deleted SEWER_EASEMENT RED
  deleted PDF2_E IPF-SET
deleted 7, kept 0

Notes

What worked, what didn't, job-specific gotchas — flagged notes feed the recipes.

No notes yet.