VBA Microstation: Build Dimensioned Map
A few days ago it showed how to generate Print layouts using Microstation. Before there was this option for handling sheets and models, it was necessary to do it the old way by generating blocks (cells) and clipping content.
Back from my minute sabbatical, The example I show you on this occasion is an application developed on Visual Basic de Microstation, in which a bounded map is generated, or as some cadastral certificate call it. Ideal for cadastre departments, which must generate a map on request, at scale, a service for which they charge but which, if not automated, takes a long time.
Ante had a video that I removed temporarily, but for educational purposes here I leave the way it was developed and customized.
The inputs.
- A dgn, linked at farm level
- An Access database, which contained the area column, perimeter, and range coordinates. Then a join to another database that had the names of the taxpayers (people), from the cadastral key.
- A .cel file containing the frame cell (block), scaled 1: 100, north symbol, and nodes to aggregate data from the database. This must be put in the place where the registered libraries are stored (workspace / configuration / cell)
In the VBA a capture form was made with a mask format according to the cadastral code of the municipality that was going to use it. It has a space to add observations and options to be inserted as Annotations The names of the owners, the cadastral keys or the property number only.
How to run.
Once the characteristics are designated, the button "generate certificate" is pressed and the system does normal operations that would be done manually in case of not having the application.
Since it is executed on a new file (work), the system does the following:
- Referenced map refers to the bound map containing the plot
- Calculate the range from the coordinates that contain the plot, to establish the appropriate scale
- Then create a fence around the property, with the size equivalent to six lots, so you do not have to work with the entire map
- Then make a clip Which contains only the necessary layers, building boundaries, building numbers, block boundaries and street names. In this process, the operation with the example is delayed because the topological criteria are not very adequate in these maps, instead of ligating the centroid bounded the boundaries, forcing to make a transfer from ligue of boundary to centroid and the fact of Managing a single map instead of zone or quadrant files makes the analysis cumbersome.
- Then it calculates the scale, making a reference of the size of the block (scale) 1: 100 to know if it occupies to make it bigger or smaller and places the cell.
- It then generates a fence within the frame of the bounded map, and cuts the surplus.
The result.
There we have it, a cadastral certificate, in whose module have been inserted data like the executing institution of the project, the logo of the municipality, the calculated area, the scale, leaf number and the description that we indicate.
On a second sheet, generate the table of coordinates of the different stations, distances and bearings that were generated on the fly from an internal fence on the property, placing a point and a number of vertex in a clockwise direction from where it is located. further west. If necessary, because the polygon has many vertices, generate the necessary sheets.
For extreme cases, of parcels that come out too close, that are next to a very wide street, then the options were created to force the following scale or to generate a scale 1: 125 from which the system calculated. The case of the example requires doing this, because they see that the neighbors on the other side of the street do not come out at that scale.
The application works on Microstation Geographics V8, although over time this was done and a thousand other things for that process that one day I hope to speak.
It does not exist for download. But if you contact us, we can adjust it to your needs.
Editor@geofumadas.com
Could you tell me where I can buy that macro? And the cosnto of it please? A hug thanks for the attention paid
It makes me that it was a headache I like that to be able to leave the bounded map exact true excellent process jajajjaja