(#541) Exporting well name as part of well info to LAS file

This commit is contained in:
Pål Hagen 2015-10-16 11:15:04 +02:00
parent 7bcbb80691
commit 3ecd6d8da7
6 changed files with 21 additions and 2 deletions

View File

@ -404,7 +404,7 @@ QString RimWellLogExtractionCurve::createCurveName()
if (m_addWellNameToCurveName && m_wellPath) if (m_addWellNameToCurveName && m_wellPath)
{ {
generatedCurveName += m_wellPath->name(); generatedCurveName += wellName();
} }
if (m_addCaseNameToCurveName && m_case()) if (m_addCaseNameToCurveName && m_case())
@ -503,3 +503,11 @@ QString RimWellLogExtractionCurve::wellLogChannelName() const
return name; return name;
} }
//--------------------------------------------------------------------------------------------------
///
//--------------------------------------------------------------------------------------------------
QString RimWellLogExtractionCurve::wellName() const
{
return m_wellPath->name();
}

View File

@ -46,6 +46,7 @@ public:
void setWellPath(RimWellPath* wellPath); void setWellPath(RimWellPath* wellPath);
void setPropertiesFromView(RimView* view); void setPropertiesFromView(RimView* view);
virtual QString wellName() const;
virtual QString wellLogChannelName() const; virtual QString wellLogChannelName() const;
protected: protected:

View File

@ -227,7 +227,7 @@ QString RimWellLogFileCurve::createCurveName()
{ {
QString txt; QString txt;
txt += m_wellPath()->name(); txt += wellName();
txt += " : "; txt += " : ";
txt += m_wellLogChannnelName; txt += m_wellLogChannnelName;
@ -256,3 +256,10 @@ QString RimWellLogFileCurve::wellLogChannelName() const
return m_wellLogChannnelName; return m_wellLogChannnelName;
} }
//--------------------------------------------------------------------------------------------------
///
//--------------------------------------------------------------------------------------------------
QString RimWellLogFileCurve::wellName() const
{
return m_wellPath->name();
}

View File

@ -46,6 +46,7 @@ public:
// Overrides from RimWellLogPlotCurve // Overrides from RimWellLogPlotCurve
virtual void updatePlotData(); virtual void updatePlotData();
virtual QString wellName() const;
virtual QString wellLogChannelName() const; virtual QString wellLogChannelName() const;
protected: protected:

View File

@ -61,6 +61,7 @@ public:
void updateCurveName(); void updateCurveName();
void updatePlotTitle(); void updatePlotTitle();
virtual QString wellName() const = 0;
virtual QString wellLogChannelName() const = 0; virtual QString wellLogChannelName() const = 0;
virtual void updatePlotData() = 0; virtual void updatePlotData() = 0;

View File

@ -270,6 +270,7 @@ bool RigWellLogFile::exportToLasFile(const RimWellLogPlotCurve* curve, const QSt
wellLogChannelName.replace(".", "_"); wellLogChannelName.replace(".", "_");
NRLib::LasWell lasFile; NRLib::LasWell lasFile;
lasFile.addWellInfo(QString("WELL .%1 :").arg(curve->wellName()).toStdString());
lasFile.AddLog("DEPTH", "M", "Depth in meters", curveData->measuredDepths()); lasFile.AddLog("DEPTH", "M", "Depth in meters", curveData->measuredDepths());
lasFile.AddLog(wellLogChannelName.toStdString(), "NO_UNIT", "", wellLogValues); lasFile.AddLog(wellLogChannelName.toStdString(), "NO_UNIT", "", wellLogValues);
lasFile.SetMissing(absentValue); lasFile.SetMissing(absentValue);