void Deleteitem::deleteItem()
{
Win::HourGlassCursor hgc(true);
const int selectedIndex= lvItems.GetSelectedIndex();
if(selectedIndex<0) return; //_____________________________Nothing is selected
//_________________________________________________________Ask the user
if(this->MessageBox(L"Are you sure you want to delete the selected item?", L"Delete item",
MB_YESNO|MB_ICONQUESTION)!=IDYES) return;
//________________________________________________________Delete;
Sql::SqlConnection conn;
wstring cmd;
const int item_id= lvItems.Items[selectedIndex].Data; //Get the Primary Key;
int rows = 0;
try
{
//conn.OpenSession(DSN, USERNAME, PASSWORD); //Control Panel>Administrative Tools>Data Sources (ODBC)>Create dsn_myDatabase
conn.OpenSession(hWnd, CONNECTION_STRING);
Sys::Format(cmd, L"DELETE FROM item WHERE item_id= %d", item_id);
rows = conn.ExecuteNonQuery(cmd);
if (rows!=1)
{
this->MessageBox(Sys::Convert::ToString(rows), L"Error: number of deleted rows", MB_OK | MB_ICONERROR);
}
}
catch (Sql::SqlException e)
{
this->MessageBox(e.GetDescription(), L"Error", MB_OK | MB_ICONERROR);
}
fillListView();
}
void BrandManager::updateListview()
{
//if(lvBrand.GetSelectedIndex<0) return;
//int selectedIndex;
//const int brand_id= lvBrand.Items[selectedIndex].Data;
Sql::SqlConnection conn;
Win::HourGlassCursor hgc(true);
wstring cmd;
try
{
toolbMain.EnableButton(IDM_EDIT, false);
lvBrand.SetRedraw(false);
lvBrand.Items.DeleteAll();
//
conn.OpenSession(hWnd, CONNECTION_STRING);
Sys::Format(cmd, L"SELECT brand_id, descr FROM brand");
conn.ExecuteSelect(cmd, 100, lvBrand);
//
lvBrand.SetRedraw(true);
}
catch(Sql::SqlException ex)
{
this->MessageBox(ex.GetDescription(), L"Error", MB_OK | MB_ICONERROR);
}
}
void HgGeneralConfigWidget::saveConfig()
{
HgConfig hgc(m_configType);
hgc.setUsername(m_userEdit->text());
hgc.setEditor(m_editorEdit->text());
hgc.setMerge(m_mergeEdit->text());
if (m_verboseCheck->checkState() == Qt::Checked) {
hgc.setProperty(QLatin1String("ui"), QLatin1String("verbose"),
QLatin1String("True"));
}
else {
hgc.setProperty(QLatin1String("ui"), QLatin1String("verbose"),
QLatin1String("False"));
}
}
void HgGeneralConfigWidget::loadConfig()
{
HgConfig hgc(m_configType);
m_userEdit->setText(hgc.username());
m_editorEdit->setText(hgc.editor());
m_mergeEdit->setText(hgc.merge());
QString verbose = hgc.property(QLatin1String("ui"), QLatin1String("verobose"));
if (verbose.isEmpty() || verbose == "False") {
m_verboseCheck->setChecked(false);
}
else if (verbose == "True") {
m_verboseCheck->setChecked(true);
}
}
void TeethX::deleteItem()
{
toolbMain.EnableButton(IDM_DELETE,false);
Win::HourGlassCursor hgc(true);
const int selectedIndex= lvMain.GetSelectedIndex();
if(selectedIndex<0) return; //_____________________________Nothing is selected
//_________________________________________________________Ask the user
if(this->MessageBox(L"Are you sure you want to delete the selected item?", L"Delete item",
MB_YESNO|MB_ICONQUESTION)!=IDYES) return;
//________________________________________________________Delete;
Sql::SqlConnection conn;
wstring cmd;
const int item_id= lvMain.Items[selectedIndex].Data; //Get the Primary Key;
int rows = 0;
try
{
//conn.OpenSession(DSN, USERNAME, PASSWORD); //Control Panel>Administrative Tools>Data Sources (ODBC)>Create dsn_myDatabase
conn.OpenSession(hWnd, CONNECTION_STRING);
if(tabSelection.SelectedData==0)
{Sys::Format(cmd, L"DELETE FROM patient WHERE patient_id= %d", item_id);}
else if(tabSelection.SelectedData==1)
{Sys::Format(cmd, L"DELETE FROM transactionz WHERE transactionz_id= %d", item_id);}
else if(tabSelection.SelectedData==2)
Sys::Format(cmd, L"DELETE FROM transactionz WHERE transactionz_id= %d", item_id);
else if(tabSelection.SelectedData==3)
{Sys::Format(cmd, L"DELETE FROM dental_procedure WHERE dental_procedure_id= %d", item_id);}
else if(tabSelection.SelectedData==4)
{Sys::Format(cmd, L"DELETE FROM userz WHERE userz_id= %d", item_id);}
rows = conn.ExecuteNonQuery(cmd);
if (rows!=1)
{
this->MessageBox(Sys::Convert::ToString(rows), L"ERROR: number of deleted rows", MB_OK | MB_ICONERROR);
}
}
catch (Sql::SqlException ex)
{
this->MessageBox(ex.GetDescription(), L"ERROR", MB_OK | MB_ICONERROR);
}
fillListView();
}
MinimumState MnHesse::operator()(const MnFcn& mfcn, const MinimumState& st, const MnUserTransformation& trafo, unsigned int maxcalls) const {
const MnMachinePrecision& prec = trafo.precision();
// make sure starting at the right place
double amin = mfcn(st.vec());
double aimsag = sqrt(prec.eps2())*(fabs(amin)+mfcn.up());
// diagonal elements first
unsigned int n = st.parameters().vec().size();
if(maxcalls == 0) maxcalls = 200 + 100*n + 5*n*n;
MnAlgebraicSymMatrix vhmat(n);
MnAlgebraicVector g2 = st.gradient().g2();
MnAlgebraicVector gst = st.gradient().gstep();
MnAlgebraicVector grd = st.gradient().grad();
MnAlgebraicVector dirin = st.gradient().gstep();
MnAlgebraicVector yy(n);
if(st.gradient().isAnalytical()) {
InitialGradientCalculator igc(mfcn, trafo, theStrategy);
FunctionGradient tmp = igc(st.parameters());
gst = tmp.gstep();
dirin = tmp.gstep();
g2 = tmp.g2();
}
MnAlgebraicVector x = st.parameters().vec();
for(unsigned int i = 0; i < n; i++) {
double xtf = x(i);
double dmin = 8.*prec.eps2()*(fabs(xtf) + prec.eps2());
double d = fabs(gst(i));
if(d < dmin) d = dmin;
for(unsigned int icyc = 0; icyc < ncycles(); icyc++) {
double sag = 0.;
double fs1 = 0.;
double fs2 = 0.;
for(unsigned int multpy = 0; multpy < 5; multpy++) {
x(i) = xtf + d;
fs1 = mfcn(x);
x(i) = xtf - d;
fs2 = mfcn(x);
x(i) = xtf;
sag = 0.5*(fs1+fs2-2.*amin);
if(sag > prec.eps2()) goto L30; // break;
if(trafo.parameter(i).hasLimits()) {
if(d > 0.5) goto L26;
d *= 10.;
if(d > 0.5) d = 0.51;
continue;
}
d *= 10.;
}
L26:
std::cout<<"MnHesse: 2nd derivative zero for parameter "<<i<<std::endl;
std::cout<<"MnHesse fails and will return diagonal matrix "<<std::endl;
for(unsigned int j = 0; j < n; j++) {
double tmp = g2(j) < prec.eps2() ? 1. : 1./g2(j);
vhmat(j,j) = tmp < prec.eps2() ? 1. : tmp;
}
return MinimumState(st.parameters(), MinimumError(vhmat, MinimumError::MnHesseFailed()), st.gradient(), st.edm(), mfcn.numOfCalls());
L30:
double g2bfor = g2(i);
g2(i) = 2.*sag/(d*d);
grd(i) = (fs1-fs2)/(2.*d);
gst(i) = d;
dirin(i) = d;
yy(i) = fs1;
double dlast = d;
d = sqrt(2.*aimsag/fabs(g2(i)));
if(trafo.parameter(i).hasLimits()) d = std::min(0.5, d);
if(d < dmin) d = dmin;
// see if converged
if(fabs((d-dlast)/d) < tolerstp()) break;
if(fabs((g2(i)-g2bfor)/g2(i)) < tolerg2()) break;
d = std::min(d, 10.*dlast);
d = std::max(d, 0.1*dlast);
}
vhmat(i,i) = g2(i);
if(mfcn.numOfCalls() > maxcalls) {
//std::cout<<"maxcalls " << maxcalls << " " << mfcn.numOfCalls() << " " << st.nfcn() << std::endl;
std::cout<<"MnHesse: maximum number of allowed function calls exhausted."<<std::endl;
std::cout<<"MnHesse fails and will return diagonal matrix "<<std::endl;
for(unsigned int j = 0; j < n; j++) {
double tmp = g2(j) < prec.eps2() ? 1. : 1./g2(j);
vhmat(j,j) = tmp < prec.eps2() ? 1. : tmp;
}
return MinimumState(st.parameters(), MinimumError(vhmat, MinimumError::MnHesseFailed()), st.gradient(), st.edm(), mfcn.numOfCalls());
}
}
if(theStrategy.strategy() > 0) {
// refine first derivative
HessianGradientCalculator hgc(mfcn, trafo, theStrategy);
FunctionGradient gr = hgc(st.parameters(), FunctionGradient(grd, g2, gst));
grd = gr.grad();
}
//off-diagonal elements
for(unsigned int i = 0; i < n; i++) {
x(i) += dirin(i);
for(unsigned int j = i+1; j < n; j++) {
x(j) += dirin(j);
double fs1 = mfcn(x);
double elem = (fs1 + amin - yy(i) - yy(j))/(dirin(i)*dirin(j));
vhmat(i,j) = elem;
x(j) -= dirin(j);
}
x(i) -= dirin(i);
}
//verify if matrix pos-def (still 2nd derivative)
MinimumError tmp = MnPosDef()(MinimumError(vhmat,1.), prec);
vhmat = tmp.invHessian();
int ifail = invert(vhmat);
if(ifail != 0) {
std::cout<<"MnHesse: matrix inversion fails!"<<std::endl;
std::cout<<"MnHesse fails and will return diagonal matrix."<<std::endl;
MnAlgebraicSymMatrix tmpsym(vhmat.nrow());
for(unsigned int j = 0; j < n; j++) {
double tmp = g2(j) < prec.eps2() ? 1. : 1./g2(j);
tmpsym(j,j) = tmp < prec.eps2() ? 1. : tmp;
}
return MinimumState(st.parameters(), MinimumError(tmpsym, MinimumError::MnHesseFailed()), st.gradient(), st.edm(), mfcn.numOfCalls());
}
FunctionGradient gr(grd, g2, gst);
// needed this ? (if posdef and inversion ok continue. it is like this in the Fortran version
// if(tmp.isMadePosDef()) {
// std::cout<<"MnHesse: matrix is invalid!"<<std::endl;
// std::cout<<"MnHesse: matrix is not pos. def.!"<<std::endl;
// std::cout<<"MnHesse: matrix was forced pos. def."<<std::endl;
// return MinimumState(st.parameters(), MinimumError(vhmat, MinimumError::MnMadePosDef()), gr, st.edm(), mfcn.numOfCalls());
// }
//calculate edm
MinimumError err(vhmat, 0.);
VariableMetricEDMEstimator estim;
double edm = estim.estimate(gr, err);
return MinimumState(st.parameters(), err, gr, edm, mfcn.numOfCalls());
}
