public Result Execute(
ExternalCommandData commandData,
ref string message,
ElementSet elements)
{
UIApplication uiapp = commandData.Application;
UIDocument uidoc = uiapp.ActiveUIDocument;
Application app = uiapp.Application;
Document doc = uidoc.Document;
//Handling and Dismissing a Warning Message
//https://thebuildingcoder.typepad.com/blog/2013/03/export-wall-parts-individually-to-dxf.html
uiapp.DialogBoxShowing += new EventHandler <DialogBoxShowingEventArgs>(OnDialogBoxShowing);
IList <string> dWGExportOptions = DWGExportOptions.GetPredefinedSetupNames(doc);
// List<ViewScheduleOption> viewScheduleOptions = Helpers.GetViewScheduleOptions(doc);
//find all the sheet list
List <ViewSchedule> viewSchedule = Helpers.SheetList(doc);
int counter = 0;
try
{
using (var form = new Form1())
{
//set the form export settings
form.CboxExportSettingsDataSource = dWGExportOptions;
//set the form sheets
form.CboxSheetDataSource = viewSchedule;
//set the form title
form.Text = "Mx CADD Export Sheets";
//use ShowDialog to show the form as a modal dialog box.
form.ShowDialog();
//if the user hits cancel just drop out of macro
if (form.DialogResult == winForm.DialogResult.Cancel)
{
return(Result.Cancelled);
}
string destinationFolder = form.TBoxDestinationFolder;
//string[] sheetNumbers = form.tboxSelectedSheets.Split(' ');
string exportSettings = form.TBoxExportSettings;
DWGExportOptions dwgOptions = DWGExportOptions.GetPredefinedOptions(doc, form.TBoxExportSettings);
if (dwgOptions == null)
{
TaskDialog.Show("Error", "Export setting not found");
return(Result.Failed);
}
if (dwgOptions.MergedViews == false)
{
TaskDialog.Show("Error", "Please unselect export view as external reference.");
return(Result.Failed);
}
if (dwgOptions.TargetUnit != ExportUnit.Millimeter)
{
TaskDialog.Show("Error", "Export units not set to Millimeter. Please fix this before exporting.");
return(Result.Failed);
}
ICollection <ElementId> categoryToIsolate = new List <ElementId>();
Categories groups = doc.Settings.Categories;
categoryToIsolate.Add(groups.get_Item(BuiltInCategory.OST_Loads).Id);
//selected Sheet List
ViewSchedule selectedSheetList = form.selectedViewSchedule;
//Sheets in selected sheet list
var selectedSheets = new FilteredElementCollector(doc, selectedSheetList.Id).OfClass(typeof(ViewSheet)).ToElements().Cast <ViewSheet>();
int n = selectedSheets.Count();
string s = "{0} of " + n.ToString() + " sheets exported...";
string caption = "Export Sheets";
var watch = System.Diagnostics.Stopwatch.StartNew();
using (ProgressForm pf = new ProgressForm(caption, s, n))
{
using (Transaction t = new Transaction(doc, "Hide categories"))
{
t.Start();
foreach (ViewSheet vs in selectedSheets)
{
if (pf.abortFlag)
{
break;
}
//ViewSheet vs = allSheets.Where(x => x.SheetNumber == sheetNumber).First();
//if the parameter does not exists use the SheetNumber
string CAADparameter = vs.LookupParameter("CADD File Name").AsString() ?? vs.SheetNumber;
//IList<Parameter> viewParams = vs.GetParameters("CADD File Name");
//string CAADparameter = viewParams.First().AsString();
//remove white spaces from the name
string fileName = Helpers.RemoveWhitespace(CAADparameter);
//select all the views placed on the sheet
ISet <ElementId> views = vs.GetAllPlacedViews();
//select planViewsOnly
List <View> planViewsOnly = Helpers.FilterPlanViewport(doc, views);
//select keynote and exports them before isolating categories
//count the sheets with Floor,Ceiling,Engineering and Area plans
int hasArchOrStrViewports = 0;
foreach (View planView in planViewsOnly)
{
if (form.HideViewportContent)
{
planView.IsolateCategoriesTemporary(categoryToIsolate);
}
hasArchOrStrViewports += 1;
}
if (!Helpers.ExportDWG(doc, vs, exportSettings, fileName, destinationFolder))
{
TaskDialog.Show("Error", "Check that the destination folder exists");
}
else
{
counter += 1;
}
pf.Increment();
}
t.RollBack();
//t.Commit();
}//close using transaction
}
watch.Stop();
var elapsedMinutes = watch.ElapsedMilliseconds / 1000 / 60;
TaskDialog.Show("Done", $"{counter} sheets have been exported in {elapsedMinutes} min.");
}//close using form
return(Result.Succeeded);
}
catch (System.NullReferenceException)
{
TaskDialog.Show("Error", "Check parameter \"CADD File Name exists\" ");
return(Result.Failed);
}
catch (Exception ex)
{
TaskDialog.Show("Error", ex.Message);
return(Result.Failed);
}
finally
{
uiapp.DialogBoxShowing -= new EventHandler <DialogBoxShowingEventArgs>(OnDialogBoxShowing);
}
}
public Result Execute(
ExternalCommandData commandData,
ref string message,
ElementSet elements)
{
try
{
UIApplication uiapp = commandData.Application;
UIDocument uidoc = uiapp.ActiveUIDocument;
Application app = uiapp.Application;
Document doc = uidoc.Document;
string outputFile = @"C:\Temp\reportOversizedVP.csv";
StringBuilder sb = new StringBuilder();
try
{
File.WriteAllText(outputFile,
"Sheet Number," +
"Viewport Name," +
Environment.NewLine
);
}
catch
{
TaskDialog.Show("Error", "Operation cancelled. Please close the log file.");
return(Result.Failed);
}
//List<ViewScheduleOption> viewScheduleOptions = Helpers.GetViewScheduleOptions(doc);
List <ViewSchedule> viewSchedule = Helpers.SheetList(doc);
using (var form = new OversizedViewportForm())
{
//set the form sheets
form.cboxSheetDataSource = viewSchedule;
//se the form title
form.Text = "Check Viewport Oversized";
//use ShowDialog to show the form as a modal dialog box.
form.ShowDialog();
//if the user hits cancel just drop out of macro
if (form.DialogResult == winForm.DialogResult.Cancel)
{
return(Result.Cancelled);
}
//selected Sheet List
ViewSchedule selectedSheetList = form.selectedViewSchedule;
//Sheets in selected sheet list
var selectedSheets = new FilteredElementCollector(doc, selectedSheetList.Id).OfClass(typeof(ViewSheet)).ToElements().Cast <ViewSheet>();
int maxWidth = form.maxWidth;
int maxHeight = form.maxHeight;
int centerX = form.centerX;
int centerY = form.centerY;
int n = selectedSheets.Count();
string s = "{0} of " + n.ToString() + " sheets processed...";
string caption = "Find oversized views";
int countOversizedViewports = 0;
using (ProgressForm pf = new ProgressForm(caption, s, n))
{
foreach (ViewSheet vs in selectedSheets)
{
if (pf.abortFlag)
{
break;
}
ICollection <ElementId> viewports = vs.GetAllViewports();
ISet <ElementId> placedViewsIds = vs.GetAllPlacedViews();
List <View> planViews = Helpers.FilterPlanViewport(doc, placedViewsIds);
foreach (ElementId vpId in viewports)
{
try
{
Viewport vp = doc.GetElement(vpId) as Viewport;
View planView = doc.GetElement(vp.ViewId) as View;
if (Helpers.ViewportIntersectsTitleblock(vp, centerX, centerY, maxWidth, maxHeight))
{
sb.AppendLine($"{vs.SheetNumber},{planView.Name}");
countOversizedViewports += 1;
}
//if (planView.ViewType == ViewType.FloorPlan || planView.ViewType == ViewType.EngineeringPlan || planView.ViewType == ViewType.CeilingPlan)
//{
//XYZ maxPt = vp.GetBoxOutline().MaximumPoint; too slow
//XYZ minPt = vp.GetBoxOutline().MinimumPoint;
//BoundingBoxXYZ bbox = vp.get_BoundingBox(vs);
//XYZ maxPt = bbox.Max;
//XYZ minPt = bbox.Min;
//int width = Convert.ToInt32((maxPt.X - minPt.X) * 304.8);
//int height = Convert.ToInt32((maxPt.Y - minPt.Y) * 304.8);
//int checkWidth = maxWidth;
//int checkHeight = maxHeight;
//if (width > checkWidth || height > checkHeight)
//{
// sb.AppendLine($"{vs.SheetNumber},{vp.Name},{width},{height}");
// countOversizedViewports += 1;
//}
// if (Helpers.ViewportIntersectsTitleblock(vp))
// {
// sb.AppendLine($"{vs.SheetNumber},{vp.Name}");
// countOversizedViewports += 1;
// }
//}
}
catch
{
sb.AppendLine($"{vs.SheetNumber}, ERROR");
}
}
pf.Increment();
} //close foreach
} //close progress form
File.AppendAllText(outputFile, sb.ToString());
TaskDialog myDialog = new TaskDialog("Summary");
myDialog.MainIcon = TaskDialogIcon.TaskDialogIconNone;
myDialog.MainContent = $"Operation completed. {countOversizedViewports} viewports are oversized.";
myDialog.AddCommandLink(TaskDialogCommandLinkId.CommandLink4, $"Open Log File {outputFile}", "");
TaskDialogResult res = myDialog.Show();
if (TaskDialogResult.CommandLink4 == res)
{
System.Diagnostics.Process process = new System.Diagnostics.Process();
process.StartInfo.FileName = outputFile;
process.Start();
}
return(Result.Succeeded);
} //close form
} //close try
catch (Exception ex)
{
TaskDialog.Show("Result", ex.Message);
return(Result.Cancelled);
}
}//close execute
public Result Execute(
ExternalCommandData commandData,
ref string message,
ElementSet elements)
{
//Goal: convert the Viewport centre coordinates on a Sheet to Project Base Point (and then Survey Point) coordinates.
//Solution: Find the Viewport's view centre point which is in PBP coordinates.
//Problem: the Vieport centre does not always match the View centre. Annotations, Matchlines and Grids can affect the extent of the viewport.
//Solution: hide all these categories and find the Viewport centre that matches the View centre. Then find the View centre point in PBP coordinates and translate it
//by the vector from Viewport original centre and the centre of the Viewport with the categories hidden.
//https://thebuildingcoder.typepad.com/blog/2018/03/boston-forge-accelerator-and-aligning-plan-views.html
UIApplication uiapp = commandData.Application;
UIDocument uidoc = uiapp.ActiveUIDocument;
Application app = uiapp.Application;
Document doc = uidoc.Document;
StringBuilder sb = new StringBuilder();
sb.AppendLine($"Sheet Number,View Centre WCS-X,View Centre WCS-Y,View Centre WCS-Z,Angle to North,Viewport Centre-X,Viewport Centre-Y,Viewport Centre-Z,Viewport Width,Viewport Height,Xref name,Group");
string outputFile = "summary.csv";
ProjectLocation pl = doc.ActiveProjectLocation;
Transform ttr = pl.GetTotalTransform().Inverse;
ProjectPosition projPosition = doc.ActiveProjectLocation.GetProjectPosition(new XYZ(0, 0, 0)); //rotation
IEnumerable <ViewSheet> allSheets = new FilteredElementCollector(doc).OfCategory(BuiltInCategory.OST_Sheets)
.WhereElementIsNotElementType().ToElements().Cast <ViewSheet>();
IList <string> dWGExportOptions = DWGExportOptions.GetPredefinedSetupNames(doc);
//List<ViewScheduleOption> viewScheduleOptions = Helpers.GetViewScheduleOptions(doc);
//find all the sheet list
List <ViewSchedule> viewSchedule = Helpers.SheetList(doc);
int counter = 0;
try
{
using (var form = new Form1())
{
form.CboxExportSettingsDataSource = dWGExportOptions;
//set the form sheets
form.CboxSheetDataSource = viewSchedule;
//set the form title
form.Text = "Mx CADD Export Xrefs";
//use ShowDialog to show the form as a modal dialog box.
form.ShowDialog();
//if the user hits cancel just drop out of macro
if (form.DialogResult == winForm.DialogResult.Cancel)
{
return(Result.Cancelled);
}
string destinationFolder = form.TBoxDestinationFolder;
//string[] sheetNumbers = form.tboxSelectedSheets.Split(' ');
//selected Sheet List
ViewSchedule selectedSheetList = form.selectedViewSchedule;
//Sheets in selected sheet list
var selectedSheets = new FilteredElementCollector(doc, selectedSheetList.Id).OfClass(typeof(ViewSheet)).ToElements().Cast <ViewSheet>();
string exportSettings = form.TBoxExportSettings;
int n = selectedSheets.Count();
string s = "{0} of " + n.ToString() + " plans exported...";
string caption = "Export xrefs";
string sheetWithoutArchOrEngViewports = "";
var watch = System.Diagnostics.Stopwatch.StartNew();
using (ProgressForm pf = new ProgressForm(caption, s, n))
{
foreach (ViewSheet vs in selectedSheets)
{
if (pf.abortFlag)
{
break;
}
try
{
//Collect all the viewports on the sheet
ICollection <ElementId> viewportIds = vs.GetAllViewports();
//Collect all views on the sheet
ISet <ElementId> placedViewsIds = vs.GetAllPlacedViews();
//Filter the views that are plans (Floor,Ceiling,Engineering or Area) and exclude Keyplans. I need the
//viewport associate with the view so I cannot reuse this filter
List <View> planViews = Helpers.FilterPlanViewport(doc, placedViewsIds);
//Collect the viewports that shows a Floor Plan (Architecture) or Structural Plan (Engineering).
Dictionary <Viewport, View> viewportViewDict = new Dictionary <Viewport, View>();
//if the sheet does not contain FloorPlan, EngineeringPlan or CeilingPlan, do not export it
int hasArchOrStrViewports = 0;
foreach (ElementId eid in viewportIds)
{
Viewport vport = doc.GetElement(eid) as Viewport;
View planView = doc.GetElement(vport.ViewId) as View;
//Filter the views that are plans (Floor,Ceiling,Engineering or Area)
if (planView.ViewType == ViewType.FloorPlan || planView.ViewType == ViewType.EngineeringPlan || planView.ViewType == ViewType.CeilingPlan || planView.ViewType == ViewType.AreaPlan)
{
//if planview is not a keyplan do not export it
if (Helpers.IsNotKeyplan(planView))
{
viewportViewDict.Add(vport, planView);
//vpPlan.Add(planView);
hasArchOrStrViewports += 1;
}
}
}
if (hasArchOrStrViewports != 0)
{
//if the parameter does not exists use the SheetNumber
string CAADparameter = vs.LookupParameter("CADD File Name").AsString() ?? vs.SheetNumber;
//remove white spaces from the name
string fileName = Helpers.RemoveWhitespace(CAADparameter);
foreach (Viewport vp in viewportViewDict.Keys)
{
View vpPlan = viewportViewDict[vp];
//Get the current Viewport Centre for Autocad Viewport
XYZ unchangedVPcenter = vp.GetBoxCenter();
//Set its Z value to 0
XYZ flattenVPcenter = new XYZ(unchangedVPcenter.X, unchangedVPcenter.Y, 0);
//The current Viewport Centre does not match the view center. Hide all the elements in the view and set the annotation crop to the minimum (3mm). Now the
//Viewport centre will match the View centre. We can then use the unchangedCenter to changedCenter vector to move the view centerpoint to the original
//viewport centre.
//Instead of hiding categories, we can isolate an empty one. Check that this category (OST_Loads) exists in the model or it will throw an error
ICollection <ElementId> categoryToIsolate = new List <ElementId>();
Categories groups = doc.Settings.Categories;
categoryToIsolate.Add(groups.get_Item(BuiltInCategory.OST_Loads).Id);
//This is the new Viewport centre, aligned with the View centre
XYZ changedVPcenter = null;
// This is the View centre
XYZ centroid = null;
double scale = 304.8;
using (Transaction t = new Transaction(doc, "Hide categories"))
{
t.Start();
vpPlan.IsolateCategoriesTemporary(categoryToIsolate);
//Use the annotation crop region to find the view centroid
ViewCropRegionShapeManager vcr = vpPlan.GetCropRegionShapeManager();
//Set the annotation offset to the minimum (3mm)
vcr.BottomAnnotationCropOffset = 3 / scale;
vcr.TopAnnotationCropOffset = 3 / scale;
vcr.LeftAnnotationCropOffset = 3 / scale;
vcr.RightAnnotationCropOffset = 3 / scale;
//Get the Viewport Center. This will match the View centroid
changedVPcenter = vp.GetBoxCenter();
//Find the view centroid using the annotation crop shape (it should always be a rectangle, while the cropbox shape can be a polygon).
CurveLoop cloop = vcr.GetAnnotationCropShape();
List <XYZ> pts = new List <XYZ>();
foreach (Curve crv in cloop)
{
pts.Add(crv.GetEndPoint(0));
pts.Add(crv.GetEndPoint(1));
}
//View centroid with elements hidden
centroid = Helpers.GetCentroid(pts, pts.Count);
t.RollBack();
}
//Set ChangedVP center Z value to 0
XYZ flattenChangedVPcenter = new XYZ(changedVPcenter.X, changedVPcenter.Y, 0);
//This is the vector from the Viewport original centre to Viewport centre with all the elements hidden and the cropbox set to 3mm evenly
XYZ viewPointsVector = (flattenVPcenter - flattenChangedVPcenter) * vpPlan.Scale;
//View center adjusted to Viewport original centre (the one to be used in Autocad)
XYZ translatedCentroid = centroid + viewPointsVector;
//View center per Survey Point coordinates
XYZ viewCentreWCS = ttr.OfPoint(translatedCentroid);
XYZ viewCentreWCSZ = new XYZ(viewCentreWCS.X, viewCentreWCS.Y, vpPlan.get_BoundingBox(vpPlan).Transform.Origin.Z);
//Viewport outline width and height to be used to update the autocad viewport
XYZ maxPt = vp.GetBoxOutline().MaximumPoint;
XYZ minPt = vp.GetBoxOutline().MinimumPoint;
int width = Convert.ToInt32((maxPt.X - minPt.X) * 304.8);
int height = Convert.ToInt32((maxPt.Y - minPt.Y) * 304.8);
//string xrefName = $"{vs.SheetNumber}-{vp.Id}-xref";
//Set the file name to CAAD parameter
string xrefName = $"{fileName}-{vp.Id}-xref";
if (!Helpers.ExportDWG(doc, vpPlan, exportSettings, xrefName, destinationFolder))
{
TaskDialog.Show("Error", "Check that the destination folder exists");
}
else
{
counter += 1;
}
//Check if views are overlapping. If they are, xref should not be bind
string group = "";
// TBC dictionary values are working. Seems to work more accurately than planViews. TBC2 they seem to
// give the same output
//if (Helpers.CheckSingleViewOverlaps(doc, vpPlan, planViews))
if (Helpers.CheckSingleViewOverlaps(doc, vpPlan, viewportViewDict.Values.ToList()))
{
group = "xref";
}
else
{
group = "bind";
}
sb.AppendLine($"{ fileName}," +
$"{ Helpers.PointToString(viewCentreWCSZ)}," +
$"{projPosition.Angle * 180 / Math.PI}," +
$"{Helpers.PointToString(flattenVPcenter)}," +
$"{width.ToString()},{height.ToString()}," +
$"{xrefName}," +
$"{group}");
} //close foreach
} //close if sheet has viewports to export
else
{
sheetWithoutArchOrEngViewports += $"{vs.SheetNumber}\n";
}
pf.Increment();
}
catch (Exception ex)
{
sheetWithoutArchOrEngViewports += $"{vs.SheetNumber}: {ex.Message}\n";
//TaskDialog.Show("r", vs.SheetNumber);
}
}
File.WriteAllText($"{destinationFolder}\\{outputFile}", sb.ToString());
}//close form
watch.Stop();
var elapsedMinutes = watch.ElapsedMilliseconds / 1000 / 60;
TaskDialog.Show("Done", $"{counter} plans have been exported and the csv has been created in {elapsedMinutes} min.\nNot exported:\n{sheetWithoutArchOrEngViewports}");
return(Result.Succeeded);
}//close form
}
catch (Exception ex)
{
TaskDialog.Show("Error", ex.Message);
return(Result.Failed);
}
}
