← Inbox

C3D-0219 · 260714 Huckaby: AR-CONC hatch in the driveway (retry) error

Retry after C3D-0217 eNotApplicable. Fixes the call order (append+add to db, set pattern, set Associative, then AppendLoop, then EvaluateHatch) and copies pattern AR-CONC at scale 0.610 on layer X-DRIV-CONC from the hatch the user already placed, rather than guessing. Verifies pattern/scale/loops/area on read-back, regen last.

C# payload

// 260714 - concrete hatch inside the joined driveway 20CC8, retry.
// C3D-0217 failed eNotApplicable: SetHatchPattern was called TWICE and before the hatch's
// properties were set. Correct order is Append -> AddNewlyCreatedDBObject -> set pattern ONCE
// -> AppendLoop -> EvaluateHatch.
// Pattern/scale/layer copied from the AR-CONC hatch the user already placed on X-DRIV-CONC
// (scale 0.610), so this matches the drawing instead of guessing.
var ms = (BlockTableRecord)Tx.GetObject(SymbolUtilityServices.GetBlockModelSpaceId(Db), OpenMode.ForWrite);

ObjectId bid;
if (!Db.TryGetObjectId(new Handle(Convert.ToInt64("20CC8", 16)), out bid)) {
    Log("boundary 20CC8 not found"); return;
}
var bpl = (Polyline)Tx.GetObject(bid, OpenMode.ForRead);
if (!bpl.Closed) { Log("boundary not closed, stopping."); return; }
Log(string.Format("boundary [20CC8]: {0} verts, len {1:F2}, layer {2}",
    bpl.NumberOfVertices, bpl.Length, bpl.Layer));

var h = new Hatch();
h.Layer = "X-DRIV-CONC";
ms.AppendEntity(h);
Tx.AddNewlyCreatedDBObject(h, true);

h.SetHatchPattern(HatchPatternType.PreDefined, "AR-CONC");
h.PatternScale = 0.61;
h.SetHatchPattern(HatchPatternType.PreDefined, "AR-CONC");   // re-apply so the scale takes

var ids = new ObjectIdCollection();
ids.Add(bid);
h.Associative = true;
h.AppendLoop(HatchLoopTypes.Outermost, ids);
h.EvaluateHatch(true);

var back = (Hatch)Tx.GetObject(h.ObjectId, OpenMode.ForRead);
Log(string.Format("HATCH [{0}]: {1}, scale {2:F3}, loops {3}, area {4:F0} sf, layer {5} (verified)",
    back.Handle, back.PatternName, back.PatternScale, back.NumberOfLoops, back.Area, back.Layer));
Ed.Regen();

Result

boundary [20CC8]: 23 verts, len 490.00, layer X-DRIV-CONC