mirror of
https://github.com/ultimatepp/ultimatepp.git
synced 2026-05-16 06:05:58 -06:00
92 lines
2 KiB
C++
92 lines
2 KiB
C++
#include "Postgres.h"
|
|
|
|
#include <Sql/sch_schema.h>
|
|
#include <Sql/sch_source.h>
|
|
|
|
using namespace Upp;
|
|
|
|
PostgreSQLTest::PostgreSQLTest()
|
|
{
|
|
CtrlLayout(*this, "PostgreSQL Test");
|
|
m_refresh <<= THISBACK(ShowTestData);
|
|
m_array.SetTable(TESTPARTNER);
|
|
m_array.AddKey(TESTPARTNER_ID);
|
|
m_array.AddColumn(TESTPARTNER_NAME, "Name");
|
|
m_array.AddColumn(TESTPARTNER_ADDRESS, "Address");
|
|
}
|
|
|
|
bool PostgreSQLTest::OpenDB()
|
|
{
|
|
if(!m_session.Open("host=localhost dbname=test user=test password=test"))
|
|
{
|
|
Exclamation(Format("Error in open: %s", DeQtf(m_session.GetLastError())));
|
|
return false;
|
|
}
|
|
m_array.SetSession(m_session);
|
|
|
|
#ifdef _DEBUG
|
|
m_session.SetTrace();
|
|
#endif
|
|
|
|
//schema
|
|
Progress p;
|
|
p.SetText(t_("Creating _DEBUG database"));
|
|
SqlSchema sch(POSTGRESS);
|
|
StdStatementExecutor se(m_session);
|
|
All_Tables(sch);
|
|
if(sch.ScriptChanged(SqlSchema::UPGRADE))
|
|
PostgreSQLPerformScript(sch.Upgrade(),se, p);
|
|
if(sch.ScriptChanged(SqlSchema::ATTRIBUTES)) {
|
|
PostgreSQLPerformScript(sch.Attributes(),se, p);
|
|
}
|
|
if(sch.ScriptChanged(SqlSchema::CONFIG)) {
|
|
PostgreSQLPerformScript(sch.ConfigDrop(),se, p);
|
|
PostgreSQLPerformScript(sch.Config(),se, p);
|
|
}
|
|
sch.SaveNormal();
|
|
|
|
return true;
|
|
}
|
|
|
|
bool PostgreSQLTest::InsertTestData()
|
|
{
|
|
Sql sql(m_session);
|
|
sql.ClearError();
|
|
sql.Begin();
|
|
sql * Delete(TESTPARTNER);
|
|
sql * Insert(TESTPARTNER)
|
|
(TESTPARTNER_NAME, "First Partner")
|
|
(TESTPARTNER_ADDRESS, "First Street")
|
|
;
|
|
sql * Insert(TESTPARTNER)
|
|
(TESTPARTNER_NAME, "Second Partner")
|
|
(TESTPARTNER_ADDRESS, "Second Street")
|
|
;
|
|
sql * Insert(TESTPARTNER)
|
|
(TESTPARTNER_NAME, "Third Partner")
|
|
(TESTPARTNER_ADDRESS, "Third Street")
|
|
;
|
|
if(!OkCommit(m_session, "Unable to insert test data."))
|
|
return false;
|
|
|
|
return true;
|
|
}
|
|
|
|
void PostgreSQLTest::ShowTestData()
|
|
{
|
|
m_array.SetOrderBy(TESTPARTNER_NAME);
|
|
m_array.Query();
|
|
}
|
|
|
|
|
|
|
|
|
|
GUI_APP_MAIN
|
|
{
|
|
PostgreSQLTest dlg;
|
|
if(dlg.OpenDB() && dlg.InsertTestData())
|
|
{
|
|
dlg.ShowTestData();
|
|
dlg.Run();
|
|
}
|
|
}
|