| #property strict
|
| #include "../Include/CSQLiteKnowledgeBase.mqh"
|
|
|
| int g_failures=0;
|
|
|
| void Check(bool passed, string message)
|
| {
|
| Print(passed ? "[CSV-TEST PASS] " : "[CSV-TEST FAIL] ", message);
|
| if(!passed) g_failures++;
|
| }
|
|
|
| int OnInit()
|
| {
|
| // Unique files prevent mutation of the user's KB/database.
|
| string token = StringFormat("csv_regression_%I64u", GetMicrosecondCount());
|
| string db_name = token + ".db";
|
| string fixture = "DualEA\\" + token + ".csv";
|
| FolderCreate("DualEA", DUALEA_FILE_COMMON);
|
| if(FileIsExist(fixture, DUALEA_FILE_COMMON) || FileIsExist("DualEA\\Database\\"+db_name, DUALEA_FILE_COMMON))
|
| return INIT_FAILED;
|
|
|
| CSQLiteKnowledgeBase kb(db_name);
|
| if(!kb.Initialize()) return INIT_FAILED;
|
|
|
| int file = FileOpen(fixture, FILE_WRITE|FILE_TXT|DUALEA_FILE_COMMON|FILE_UNICODE);
|
| if(file == INVALID_HANDLE) return INIT_FAILED;
|
| FileWriteString(file, "timestamp,symbol,type,entry_price,stop_loss,take_profit,close_price,profit,strategy_id\r\n");
|
| FileWriteString(file, "2026.10.01 10:00:00,USDCHF,0,0.8,0.79,0.82,0.81,20,Test'Strategy\r\n");
|
| FileWriteString(file, "2026.10.01 11:00:00,USDCHF,0,0.8,0.79,0.82,0.79,-10,Test'Strategy\r\n");
|
| FileClose(file);
|
|
|
| Check(kb.ImportFromCSV(fixture)==2, "UTF-16 native KB schema imports both closed trades");
|
| Check(kb.ImportFromCSV(fixture)==0, "Repeated preload does not double-count matching CSV records");
|
| double wr=0, pf=0, pnl=0;
|
| int total=0;
|
| // Imported names must work in both insertion and downstream queries.
|
| STradeRecord rows[];
|
| int count=kb.GetRecentTrades("Test'Strategy", "USDCHF", rows, 10);
|
| Check(count==2, "Quoted strategy names survive insertion");
|
| if(count==2)
|
| {
|
| Check(rows[0].timestamp==D'2026.10.01 11:00:00', "Formatted timestamps retain their date and time");
|
| Check(MathAbs(rows[0].pnl+10.0)<0.00001, "Imported close P&L is preserved");
|
| }
|
|
|
| // Switch to UTF-8 and canonical names, including a malformed timestamp.
|
| file=FileOpen(fixture, FILE_WRITE|FILE_TXT|DUALEA_FILE_COMMON|FILE_ANSI, 0, CP_UTF8);
|
| if(file == INVALID_HANDLE) return INIT_FAILED;
|
| FileWriteString(file, "timestamp,symbol,strategy,order_type,entry_price,volume,sl,tp,pnl,close_price\r\n");
|
| FileWriteString(file, "1790848800,USDCHF,Canonical,0,0.8,0.1,0.79,0.82,30,0.81\r\n");
|
| FileWriteString(file, "bad,USDCHF,Canonical,0,0.8,0.1,0.79,0.82,30,0.81\r\n");
|
| FileClose(file);
|
| Check(kb.ImportFromCSV(fixture)==1, "UTF-8 canonical schema imports valid row and rejects invalid date");
|
| Check(kb.GetStrategyStats("Canonical", "USDCHF", wr,pf,pnl,total), "Canonical statistics are queryable");
|
| Check(total==1 && MathAbs(pnl-30.0)<0.00001 && MathAbs(wr-1.0)<0.00001, "Closed outcomes contribute to statistics");
|
| kb.Close();
|
| FileDelete(fixture, DUALEA_FILE_COMMON);
|
| FileDelete("DualEA\\Database\\"+db_name, DUALEA_FILE_COMMON);
|
| PrintFormat("[CSV-TEST RESULT] failures=%d", g_failures);
|
| return g_failures==0 ? INIT_SUCCEEDED : INIT_FAILED;
|
| }
|
| void OnTick() {}
|
| double OnTester() { return g_failures==0 ? 1.0 : -1.0; }
|
