Ocean for Petrel Plugin Creation - Ocean - Schlumberger

Protected override void
InvokeSimpleCore(WellFromPoints.Arguments argumentPackage)
{
// Set up input argument variables from argumentPackage
PointSet pointset = argumentPackage.InputPoints;
Borehole result = argumentPackage.Result;
String boreholename = argumentPackage.Name;
BoreholeCollection folder = argumentPackage.BoreholeCollection;
// Start a transaction for the process
using (ITransaction trans = DataManager.NewTransaction())
{
// If a not specified, create a new Borehole
if (result == null)
{
if (folder == null)
{
Project p = PetrelProject.PrimaryProject;
folder = BoreholeCollection.GetRootBoreholeCollection(p);
}
trans.Lock(folder);
// if not supplied, set Borehole name to “wildcat”
if (boreholename == null) boreholename = "wildcat";
result = folder.CreateBorehole(boreholename);
// New Borehole is locked implicitly.
}
else {
// Lock the Borehole since we’ll be modifying it
trans.Lock(result);
}
// Set the Kelly Bushing value for the well.
result.KellyBushing = 100.0f;
// Set the location of the well as the first point in the set
foreach (Point3 p in pointset.Points)
{
result.WellHead = new Point2(p.X, p.Y);
}
break;
}
}
// Make a polyline from the points and append it to the well.
// Note that this is an append, so executing the workstep twice
// on the same well will loop and duplicate the trajectory.
// When replacing the trajectory of an existing Borehole,
// set Trajectory.Polyline, instead of calling AppendPolyline
IPolyline3 polyline = new Polyline3(pointset.Points);
result.Trajectory.AppendPolyline(polyline);
wildCat.AppendPolylineTrajectory(polyline);
// Commit the data created in the transaction to the data store.
trans.Commit();
// Set the output argument to the new borehole.
argumentPackage.Result = result;
Figure 3-7 WellsFromPoints InvokeSimpleCore method code.
15. Build the solution to make sure it compiles. We’ll describe the running of
the process later.
34