private void profitDetailMenu_Click(object sender, EventArgs e)
{
try
{
common.controls.baseDataGridView resultDataGrid = this.CurrentDataGridView;
if (resultDataGrid == null || resultDataGrid.CurrentRow == null || resultDataGrid.CurrentCell == null)
{
return;
}
if (resultDataGrid.CurrentCell.ColumnIndex <= 0)
{
return;
}
string stockCode = resultTab.SelectedTab.Name;
data.tmpDS.stockCodeRow stockCodeRow = DataAccess.Libs.myStockCodeTbl.FindBycode(stockCode);
if (stockCodeRow == null)
{
return;
}
application.Strategy.Meta meta = application.Strategy.Libs.FindMetaByName(resultDataGrid.CurrentRow.Cells[0].Value.ToString());
int colId = resultDataGrid.CurrentCell.ColumnIndex;
AppTypes.TimeRanges timeRange = AppTypes.TimeRangeFromCode(resultDataGrid.Columns[colId].DataPropertyName);
ShowTradeTransactions(stockCodeRow, meta.Code, timeRange, timeScaleCb.myValue);
}
catch (Exception er)
{
this.ShowError(er);
}
}
private void addToWatchListMenuItem_Click(object sender, EventArgs e)
{
try
{
common.controls.baseDataGridView resultDataGrid = this.CurrentDataGridView;
if (resultDataGrid == null)
{
return;
}
string stockCode = resultTab.SelectedTab.Name;
StringCollection strategyCodes = new StringCollection();
for (int idx = 0; idx < resultDataGrid.SelectedRows.Count; idx++)
{
if (resultDataGrid.SelectedRows[idx] == null)
{
continue;
}
application.Strategy.Meta meta = application.Strategy.Libs.FindMetaByName(resultDataGrid.SelectedRows[idx].Cells[0].Value.ToString());
strategyCodes.Add(meta.Code);
}
if (strategyCodes.Count > 0)
{
this.AddStockToWatchList(stockCode, strategyCodes, timeScaleCb.myValue);
}
}
catch (Exception er)
{
this.ShowError(er);
}
}
private void EditScreeningOption(string code)
{
application.Strategy.Meta meta = application.Strategy.Libs.FindMetaByCode(code);
if (meta == null)
{
return;
}
application.Strategy.Libs.ShowStrategyForm(meta);
}
private void allProfitDetailMenu_Click(object sender, EventArgs e)
{
try
{
using (new DataAccess.PleaseWait())
{
common.controls.baseDataGridView resultDataGrid = this.CurrentDataGridView;
if (resultDataGrid == null)
{
return;
}
string stockCode = resultTab.SelectedTab.Name;
data.tmpDS.stockCodeRow stockCodeRow = DataAccess.Libs.myStockCodeTbl.FindBycode(stockCode);
if (stockCodeRow == null)
{
return;
}
if (resultDataGrid.SelectedRows.Count > 0)
{
for (int rowId = 0; rowId < resultDataGrid.SelectedRows.Count; rowId++)
{
application.Strategy.Meta meta = application.Strategy.Libs.FindMetaByName(resultDataGrid.SelectedRows[rowId].Cells[0].Value.ToString());
for (int idx = 1; idx < resultDataGrid.ColumnCount; idx++)
{
AppTypes.TimeRanges timeRange = AppTypes.TimeRangeFromCode(resultDataGrid.Columns[idx].DataPropertyName);
ShowTradeTransactions(stockCodeRow, meta.Code, timeRange, timeScaleCb.myValue);
}
}
}
else
{
if (resultDataGrid.CurrentRow != null)
{
application.Strategy.Meta meta = application.Strategy.Libs.FindMetaByName(resultDataGrid.CurrentRow.Cells[0].Value.ToString());
for (int idx = 1; idx < resultDataGrid.ColumnCount; idx++)
{
AppTypes.TimeRanges timeRange = AppTypes.TimeRangeFromCode(resultDataGrid.Columns[idx].DataPropertyName);
ShowTradeTransactions(stockCodeRow, meta.Code, timeRange, timeScaleCb.myValue);
}
}
}
}
}
catch (Exception er)
{
this.ShowError(er);
}
}
//[ServiceKnownType(typeof(TradePointInfo[]))]
public TradePointInfo[] Analysis(string dataKey, string strategyCode)
{
TradePointInfo[] tradePointList = new TradePointInfo[0];
AnalysisData data = GetAnalysisData(dataKey);
if (data == null)
{
return(tradePointList);
}
application.Strategy.Meta meta = application.Strategy.Libs.FindMetaByCode(strategyCode);
if (meta == null)
{
return(tradePointList);
}
return(application.Strategy.Libs.ToTradePointInfo(application.Strategy.Libs.Analysis(data, meta)));
}
public void PlotStrategyTradepoints(application.Strategy.Meta meta, bool showEstimation)
{
ShowMessage("");
EstimateOptions estOption = new EstimateOptions();
data.tmpDS.tradeEstimateDataTable tbl = new data.tmpDS.tradeEstimateDataTable();
TradePointInfo[] tradePoints = DataAccess.Libs.GetTradePointWithEstimationDetail(myData.DataTimeRange, myData.DataTimeScale.Code, myData.DataStockCode, meta.Code,
estOption, out tbl);
/// Estimate trade points and set tradepoint's [isValid] property to mark whether a tradepoint is valid or not.
for (int idx = 0; idx < tradePoints.Length; idx++)
{
tradePoints[idx].isValid = !tbl[idx].ignored;
}
PlotStrategyTradepoints(application.Strategy.Libs.ToTradePoints(tradePoints), pricePanel);
//Call estimation handler if any.
if (showEstimation && myEstimateTradePoints != null)
{
myEstimateTradePoints(this, meta.Code, estOption, tbl);
}
}
private void LoadScreeningCodes()
{
tmpDS.screeningCode.Clear();
tmpDS.screeningCriteria.Clear();
string[] screeningKeys = application.Strategy.Data.MetaList.Keys;
object[] screeningValues = application.Strategy.Data.MetaList.Values;
Data.tmpDataSet.screeningCodeRow row;
for (int idx = 0; idx < screeningKeys.Length; idx++)
{
application.Strategy.Meta meta = (application.Strategy.Meta)screeningValues[idx];
if (meta.Type != AppTypes.StrategyTypes.Screening)
{
continue;
}
row = tmpDS.screeningCode.NewscreeningCodeRow();
row.code = meta.Code;
row.description = meta.Name;
tmpDS.screeningCode.AddscreeningCodeRow(row);
//As default add all criteria to allow users select what they need more quickly.
AddCriteria(row.code, false);
}
}
private void profitDetailMenu_Click(object sender, EventArgs e)
{
try
{
common.controls.baseDataGridView resultDataGrid = this.CurrentDataGridView;
if (resultDataGrid == null || resultDataGrid.CurrentRow == null || resultDataGrid.CurrentCell == null)
{
return;
}
//TUAN - 29 Sept 2012 fix bug profit detail and all profit details
if (resultDataGrid.CurrentCell.ColumnIndex < 0)
{
return;
}
//TUAN - 29 Sept 2012 fix bug profit detail and all profit details
string stockCode = resultTab.SelectedTab.Name;
databases.tmpDS.stockCodeRow stockCodeRow = DataAccess.Libs.myStockCodeTbl.FindBycode(stockCode);
if (stockCodeRow == null)
{
return;
}
application.Strategy.Meta meta = application.Strategy.Libs.FindMetaByName(resultDataGrid.CurrentRow.Cells[0].Value.ToString());
//TUAN - 29 Sept 2012 fix bug profit detail and all profit details
int colId = resultDataGrid.CurrentCell.ColumnIndex == 0 ? 1 : resultDataGrid.CurrentCell.ColumnIndex;
//TUAN - 29 Sept 2012 fix bug profit detail and all profit details
DataParams dataParam = new DataParams(timeScaleCb.myValue.Code, AppTypes.TimeRangeFromCode(resultDataGrid.Columns[colId].DataPropertyName), 0);
ShowTradeTransactions(stockCodeRow, meta.Code, dataParam);
}
catch (Exception er)
{
this.ShowError(er);
}
}
//public static int CreateTradeAlert()
//{
// CreateTradeAlert(null, null, null);
//}
public static int CreateTradeAlert(onProcessStart onStartFunc, onProcessItem onProcessItemFunc, onProcessEnd onEndFunc)
{
DateTime frDate = common.Consts.constNullDate;
DateTime toDate = DateTime.Now;
//Run all strategy analysis for all stocks.
databases.tmpDS.stockCodeDataTable stockCodeTbl = new databases.tmpDS.stockCodeDataTable();
databases.DbAccess.LoadData(stockCodeTbl, AppTypes.CommonStatus.Enable);
application.AnalysisData data = new application.AnalysisData();
data.DataTimeRange = AppTypes.TimeRanges.None;
data.DataMaxCount = Settings.sysGlobal.AlertDataCount;
TradeAlertItem[] tradeAlertList = new TradeAlertItem[0];
StringCollection strategyList = new StringCollection();
for (int idx = 0; idx < application.Strategy.Data.MetaList.Values.Length; idx++)
{
application.Strategy.Meta meta = (application.Strategy.Meta)application.Strategy.Data.MetaList.Values[idx];
if (meta.Type != AppTypes.StrategyTypes.Strategy)
{
continue;
}
strategyList.Add(((application.Strategy.Meta)application.Strategy.Data.MetaList.Values[idx]).Code);
}
if (onStartFunc != null)
{
onStartFunc(stockCodeTbl.Count);
}
DateTime alertDate;
DateTime alertFrDate = toDate.Date;
DateTime alertToDate = toDate;
for (int stockCodeIdx = 0; stockCodeIdx < stockCodeTbl.Count; stockCodeIdx++)
{
if (onProcessItemFunc != null)
{
if (!onProcessItemFunc(stockCodeTbl[stockCodeIdx].code))
{
break;
}
}
//foreach (AppTypes.TimeScale timeScale in AppTypes.myTimeScales) //???
AppTypes.TimeScale timeScale = AppTypes.TimeScaleFromType(AppTypes.TimeScaleTypes.Day);
{
data.DataStockCode = stockCodeTbl[stockCodeIdx].code;
data.DataTimeScale = timeScale;
data.LoadData();
for (int strategyIdx = 0; strategyIdx < strategyList.Count; strategyIdx++)
{
application.Strategy.Data.ClearCache();
application.Strategy.Data.TradePoints advices = application.Strategy.Libs.Analysis(data, strategyList[strategyIdx].Trim());
if ((advices == null) || (advices.Count == 0))
{
continue;
}
//Only check the last advices for alert
TradePointInfo tradeInfo = (TradePointInfo)advices[advices.Count - 1];
alertDate = DateTime.FromOADate(data.DateTime[tradeInfo.DataIdx]);
//Ignore alerts that out of date range.
if (alertDate < alertFrDate || alertDate > alertToDate)
{
continue;
}
Array.Resize(ref tradeAlertList, tradeAlertList.Length + 1);
tradeAlertList[tradeAlertList.Length - 1] = new TradeAlertItem(stockCodeTbl[stockCodeIdx].code.Trim(), strategyList[strategyIdx].Trim(),
timeScale, alertDate,
data.Close[tradeInfo.DataIdx],
data.Volume[tradeInfo.DataIdx], tradeInfo);
}
}
}
//Create alerts in the day
int noAlertCreated = CreateTradeAlert(tradeAlertList);
//Save last lun date
//SaveLastRunTime(toDate);
if (onEndFunc != null)
{
onEndFunc();
}
stockCodeTbl.Dispose();
return(noAlertCreated);
}
private void allProfitDetailMenu_Click(object sender, EventArgs e)
{
try
{
using (new DataAccess.PleaseWait())
{
common.controls.baseDataGridView resultDataGrid = this.CurrentDataGridView;
if (resultDataGrid == null)
{
return;
}
string stockCode = resultTab.SelectedTab.Name;
databases.tmpDS.stockCodeRow stockCodeRow = DataAccess.Libs.myStockCodeTbl.FindBycode(stockCode);
if (stockCodeRow == null)
{
return;
}
DataParams dataParam = new DataParams(timeScaleCb.myValue.Code, AppTypes.TimeRanges.None, 0);
//TUAN - 29 Sept 2012 fix bug profit detail and all profit details
int min = int.MaxValue;
int max = -1;
for (int i = 0; i < resultDataGrid.SelectedCells.Count; i++)
{
if (resultDataGrid.SelectedCells[i].RowIndex > max)
{
max = resultDataGrid.SelectedCells[i].RowIndex;
}
if (resultDataGrid.SelectedCells[i].RowIndex < min)
{
min = resultDataGrid.SelectedCells[i].RowIndex;
}
}
//if (resultDataGrid.SelectedRows.Count > 0)
if (min < max)
{
for (int rowId = min; rowId <= max; rowId++)
{
application.Strategy.Meta meta = application.Strategy.Libs.FindMetaByName(resultDataGrid.Rows[rowId].Cells[0].Value.ToString());
for (int idx = 1; idx < resultDataGrid.ColumnCount; idx++)
{
dataParam.TimeRange = AppTypes.TimeRangeFromCode(resultDataGrid.Columns[idx].DataPropertyName);
ShowTradeTransactions(stockCodeRow, meta.Code, dataParam);
}
}
//for (int rowId = 0; rowId < resultDataGrid.SelectedRows.Count; rowId++)
//{
// application.Strategy.Meta meta = application.Strategy.Libs.FindMetaByName(resultDataGrid.SelectedRows[rowId].Cells[0].Value.ToString());
// for (int idx = 1; idx < resultDataGrid.ColumnCount; idx++)
// {
// dataParam.TimeRange = AppTypes.TimeRangeFromCode(resultDataGrid.Columns[idx].DataPropertyName);
// ShowTradeTransactions(stockCodeRow, meta.Code, dataParam);
// }
//}
}
//TUAN - 29 Sept 2012 fix bug profit detail and all profit details
else
{
if (resultDataGrid.CurrentRow != null)
{
application.Strategy.Meta meta = application.Strategy.Libs.FindMetaByName(resultDataGrid.CurrentRow.Cells[0].Value.ToString());
for (int idx = 1; idx < resultDataGrid.ColumnCount; idx++)
{
dataParam.TimeRange = AppTypes.TimeRangeFromCode(resultDataGrid.Columns[idx].DataPropertyName);
ShowTradeTransactions(stockCodeRow, meta.Code, dataParam);
}
}
}
}
}
catch (Exception er)
{
this.ShowError(er);
}
}
