#include <origin.h>
#include <GetNBox.h>
#include <xfutils.h>

//put additional include files here

//put your own support static functions here

/// Calculate the volume beneath the matrix surface from zero panel.

void marea(const MatrixObject& im, const int& missing, double& area)
{
	
	if (!im.IsValid())
	{
		XF_THROW(XFERR_INVALID_MATOBJ);
	}
	MatrixLayer ml;
	im.GetParent(ml);
	if (is_sheet_empty(ml))
		XF_THROW(CER_NO_DATA);
	
	int nRows = im.GetNumRows();
	int nCols = im.GetNumCols();
	
	double dXMin, dYMin, dXMax, dYMax;
	im.GetXY(dXMin, dYMin, dXMax, dYMax);
	
	matrix mat = im.GetDataObject();
	
	vector vTmpX, vTmpY;
	vTmpX.Data(dXMin, dXMax, (dXMax-dXMin)/(nCols-1));
	vTmpY.Data(dYMin, dYMax, (dYMax-dYMin)/(nRows-1));
	ASSERT( vTmpY.GetSize() == nRows );
	ASSERT( vTmpX.GetSize() == nCols );	
	
	int nRet;
	double dArea;	
	if(missing)
	{
		nRet = ocmath_2d_remove_missingvalue(vTmpX, vTmpY, mat, nRows, nCols);
		if(nRet != OE_NOERROR)
		{
			area = NANUM;
			return;
		}
	}
	
	nRet = ocmath_3d_surface_area_grid(vTmpX, vTmpY, mat, nRows, nCols, &dArea);
	if(nRet != OE_NOERROR)
	{
		dArea = NANUM;
	}
	
	area = dArea;
	
}

//nEventID < 0 on event, like GETNE_ON_INIT, GETNE_ON_OK etc, >0 on change from control
//return 0 to do nothing, return PEVENT_GETN_RET_TO_CLOSE to close dialog
//dwEnables = bOKEnable, bBTN1Enable, bBTN2Enable, bBTN3Enable, , can set to false to disable OK/Apply buttons
//lpcszNodeName = the trGetN TreeNode tag name that generates the event, or is  if GETNE_ON_OK etc
//strAux = optional string for XF Wizard Bar, like DLG_NEED_CHANGE_GRID etc, it will be invalid if from internal node value change event
//strErrMsg = allowing messages to be shown
int marea_event1(TreeNode& trGetN, int nRow, int nEventID, DWORD& dwEnables, LPCSTR lpcszNodeName, WndContainer& DynaCntrlContainer, string& strAux, string& strErrMsg)
{
	if( xf_is_extended_event(nEventID) )
		return marea_event1_ex(trGetN, nRow, nEventID, dwEnables, lpcszNodeName, DynaCntrlContainer, strAux, strErrMsg);
	DECLARE_BUTTON_ENABLES
	/// Max 5/13/08 Easwar suggests to add info to indicate where the result goes
	string srtOutputInfo = _L("The area will be put in Results Log window");
	strErrMsg = srtOutputInfo;
	//---
	return false;	

}

int marea_make_tree(TreeNode& tr, LPCSTR lpcszVarName)
{
	return false;
}
//nGetNDialog = 0,1,2, corresponding to the XF GetN dropdown, 0 = dialog is not used
//you can change nRet to be one of XFEVT_PROCEED (defualt), XFEVT_ABORT, XFEVT_PROCEED_NO_DLG or XFEVT_PROCEED_WITH_DLG(when nGetNDialog = 0)
//nGetNDialog = -1 when Ok on GetN dialog to allow handler to preocess <auto> etc variables
//dwCntrl is combination of bits
//LTXF_FROM_GUI_MENU, LTXF_FROM_GUI_PROMPT, LTXF_FROM_AUTO_UPDATE, LTXF_FROM_FUNCTION, LTXF_THEME_USED, LTXF_CHANGE_PARAM
void marea_before_execute(TreeNode& trGetN, int nGetNDialog, int& nRet, int dwCntrl)
{
	
	
}
//nEventID < 0 on event, like GETNE_ON_INIT, GETNE_ON_OK etc, >0 on change from control
//return 0 to do nothing, return PEVENT_GETN_RET_TO_CLOSE to close dialog
//dwEnables = bOKEnable, bBTN1Enable, bBTN2Enable, bBTN3Enable, , can set to false to disable OK/Apply buttons
//lpcszNodeName = the trGetN TreeNode tag name that generates the event, or is  if GETNE_ON_OK etc
//strAux = optional string for XF Wizard Bar, like DLG_NEED_CHANGE_GRID etc, it will be invalid if from internal node value change event
//strErrMsg = allowing messages to be shown
int marea_event1_ex(TreeNode& trGetN, int nRow, int nEventID, DWORD& dwEnables, LPCSTR lpcszNodeName, WndContainer& DynaCntrlContainer, string& strAux, string& strErrMsg)
{
	return false;
}
