You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
kmymoney/kmymoney2/dialogs/knewaccountdlg.cpp

1210 lines
39 KiB

/***************************************************************************
knewaccountdlg.cpp
-------------------
copyright : (C) 2000 by Michael Edwardes
2004 by Thomas Baumgart
email : mte@users.sourceforge.net
ipwizard@users.sourceforge.net
***************************************************************************/
/***************************************************************************
* *
* This program is free software; you can redistribute it and/or modify *
* it under the terms of the GNU General Public License as published by *
* the Free Software Foundation; either version 2 of the License, or *
* (at your option) any later version. *
* *
***************************************************************************/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
// ----------------------------------------------------------------------------
// QT Includes
#include <tqpixmap.h>
#include <tqpushbutton.h>
#include <tqlabel.h>
#include <tqheader.h>
#include <tqtooltip.h>
#include <tqcheckbox.h>
#include <tqtimer.h>
#include <tqtabwidget.h>
#include <tqbuttongroup.h>
#include <tqradiobutton.h>
#include <tqtextedit.h>
#include <tqlayout.h>
#include <tqtabwidget.h>
// ----------------------------------------------------------------------------
// KDE Headers
#include <klocale.h>
#include <kglobal.h>
#include <kmessagebox.h>
#include <kcombobox.h>
#include <tdelistview.h>
#include <kstandarddirs.h>
#include <kiconloader.h>
#include <kpushbutton.h>
#include <kled.h>
#include <kdebug.h>
#include <kglobalsettings.h>
// ----------------------------------------------------------------------------
// Project Includes
#include "knewaccountdlg.h"
#include <kmymoney/kmymoneyedit.h>
#include <kmymoney/kmymoneydateinput.h>
#include <kmymoney/mymoneyexception.h>
#include <kmymoney/mymoneyfile.h>
#include <kmymoney/kmymoneyaccounttree.h>
#include <kmymoney/kmymoneyglobalsettings.h>
#include <kmymoney/mymoneyreport.h>
#include <kmymoney/kguiutils.h>
#include <kmymoney/kmymoneycombo.h>
#include "../widgets/kmymoneycurrencyselector.h"
#include "../widgets/kmymoneyaccountselector.h"
#include "../mymoney/mymoneyexception.h"
#include "../mymoney/mymoneykeyvaluecontainer.h"
#include "../dialogs/knewbankdlg.h"
#include "../views/kmymoneyfile.h"
#include "../kmymoneyutils.h"
#include "../reports/kreportchartview.h"
#include "../reports/pivottable.h"
// in KOffice version < 1.5 KDCHART_PROPSET_NORMAL_DATA was a static const
// but in 1.5 this has been changed into a #define'd value. So we have to
// make sure, we use the right one.
#ifndef KDCHART_PROPSET_NORMAL_DATA
#define KMM_KDCHART_PROPSET_NORMAL_DATA KDChartParams::KDCHART_PROPSET_NORMAL_DATA
#else
#define KMM_KDCHART_PROPSET_NORMAL_DATA KDCHART_PROPSET_NORMAL_DATA
#endif
KNewAccountDlg::KNewAccountDlg(const MyMoneyAccount& account, bool isEditing, bool categoryEditor, TQWidget *parent, const char *name, const TQString& title)
: KNewAccountDlgDecl(parent,name,true),
m_account(account),
m_bSelectedParentAccount(false),
m_categoryEditor(categoryEditor),
m_isEditing(isEditing)
{
TQString columnName = ( (categoryEditor) ? i18n("Categories") : i18n("Accounts") );
m_qlistviewParentAccounts->setRootIsDecorated(true);
m_qlistviewParentAccounts->setAllColumnsShowFocus(true);
m_qlistviewParentAccounts->setSectionHeader(columnName);
m_qlistviewParentAccounts->setMultiSelection(false);
m_qlistviewParentAccounts->header()->setResizeEnabled(true);
m_qlistviewParentAccounts->setColumnWidthMode(0, TQListView::Maximum);
m_qlistviewParentAccounts->setEnabled(false);
// never show the horizontal scroll bar
m_qlistviewParentAccounts->setHScrollBarMode(TQScrollView::AlwaysOff);
m_subAccountLabel->setText(i18n("Is a sub account"));
m_qlistviewParentAccounts->header()->setFont(KMyMoneyGlobalSettings::listHeaderFont());
accountNameEdit->setText(account.name());
descriptionEdit->setText(account.description());
typeCombo->setEnabled(true);
MyMoneyFile *file = MyMoneyFile::instance();
// load the price mode combo
m_priceMode->insertItem(i18n("default price mode", "<default>"), 0);
m_priceMode->insertItem(i18n("Price per share"), 1);
m_priceMode->insertItem(i18n("Total for all shares"), 2);
int priceMode = 0;
if(m_account.accountType() == MyMoneyAccount::Investment) {
m_priceMode->setEnabled(true);
if(!m_account.value("priceMode").isEmpty())
priceMode = m_account.value("priceMode").toInt();
}
m_priceMode->setCurrentItem(priceMode);
bool haveMinBalance = false;
bool haveMaxCredit = false;
if (categoryEditor)
{
// get rid of the tabs that are not used for categories
TQWidget* tab = m_tab->page(m_tab->indexOf(m_institutionTab));
if(tab)
m_tab->removePage(tab);
tab = m_tab->page(m_tab->indexOf(m_limitsTab));
if(tab)
m_tab->removePage(tab);
//m_qlistviewParentAccounts->setEnabled(true);
startDateEdit->setEnabled(false);
accountNoEdit->setEnabled(false);
m_institutionBox->hide();
m_qcheckboxNoVat->hide();
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::Income));
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::Expense));
// Hardcoded but acceptable
switch (account.accountType())
{
case MyMoneyAccount::Income:
typeCombo->setCurrentItem(0);
break;
case MyMoneyAccount::Expense:
default:
typeCombo->setCurrentItem(1);
break;
}
m_currency->setEnabled(true);
if (m_isEditing)
{
typeCombo->setEnabled(false);
m_currency->setDisabled(MyMoneyFile::instance()->isReferenced(m_account));
}
m_qcheckboxPreferred->hide();
m_qcheckboxTax->setChecked(account.value("Tax") == "Yes");
loadVatAccounts();
}
else
{
// get rid of the tabs that are not used for accounts
TQWidget* taxtab = m_tab->page(m_tab->indexOf(m_taxTab));
if (taxtab) {
if(m_account.isAssetLiability()) {
m_vatCategory->setText(i18n( "VAT account"));
m_vatAssignmentFrame->hide();
m_qcheckboxTax->setChecked(account.value("Tax") == "Yes");
} else {
m_tab->removePage(taxtab);
}
}
switch(m_account.accountType()) {
case MyMoneyAccount::Savings:
case MyMoneyAccount::Cash:
haveMinBalance = true;
break;
case MyMoneyAccount::Checkings:
haveMinBalance = true;
haveMaxCredit = true;
break;
case MyMoneyAccount::CreditCard:
haveMaxCredit = true;
break;
default:
// no limit available, so we might get rid of the tab
TQWidget* tab = m_tab->page(m_tab->indexOf(m_limitsTab));
if(tab)
m_tab->removePage(tab);
// don't try to hide the widgets we just wiped
// in the next step
haveMaxCredit = haveMinBalance = true;
break;
}
if(!haveMaxCredit) {
m_maxCreditLabel->setEnabled(false);
m_maxCreditLabel->hide();
m_maxCreditEarlyEdit->hide();
m_maxCreditAbsoluteEdit->hide();
}
if(!haveMinBalance) {
m_minBalanceLabel->setEnabled(false);
m_minBalanceLabel->hide();
m_minBalanceEarlyEdit->hide();
m_minBalanceAbsoluteEdit->hide();
}
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::Checkings));
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::Savings));
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::Cash));
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::CreditCard));
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::Loan));
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::Investment));
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::Asset));
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::Liability));
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::Stock));
/*
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::CertificateDep));
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::MoneyMarket));
typeCombo->insertItem(KMyMoneyUtils::accountTypeToString(MyMoneyAccount::Currency));
*/
// Hardcoded but acceptable
switch (account.accountType())
{
default:
case MyMoneyAccount::Checkings:
typeCombo->setCurrentItem(0);
break;
case MyMoneyAccount::Savings:
typeCombo->setCurrentItem(1);
break;
case MyMoneyAccount::Cash:
typeCombo->setCurrentItem(2);
break;
case MyMoneyAccount::CreditCard:
typeCombo->setCurrentItem(3);
break;
case MyMoneyAccount::Loan:
typeCombo->setCurrentItem(4);
break;
case MyMoneyAccount::Investment:
typeCombo->setCurrentItem(5);
break;
case MyMoneyAccount::Asset:
typeCombo->setCurrentItem(6);
break;
case MyMoneyAccount::Liability:
typeCombo->setCurrentItem(7);
break;
case MyMoneyAccount::Stock:
m_institutionBox->hide();
typeCombo->setCurrentItem(8);
break;
/*
case MyMoneyAccount::CertificateDep:
typeCombo->setCurrentItem(5);
break;
case MyMoneyAccount::MoneyMarket:
typeCombo->setCurrentItem(7);
break;
case MyMoneyAccount::Currency:
typeCombo->setCurrentItem(8);
break;
*/
}
if(!m_account.openingDate().isValid())
m_account.setOpeningDate(TQDate::currentDate());
startDateEdit->setDate(m_account.openingDate());
accountNoEdit->setText(account.number());
m_qcheckboxPreferred->setChecked(account.value("PreferredAccount") == "Yes");
m_qcheckboxNoVat->setChecked(account.value("NoVat") == "Yes");
loadKVP("iban", ibanEdit);
loadKVP("minBalanceAbsolute", m_minBalanceAbsoluteEdit);
loadKVP("minBalanceEarly", m_minBalanceEarlyEdit);
loadKVP("maxCreditAbsolute", m_maxCreditAbsoluteEdit);
loadKVP("maxCreditEarly", m_maxCreditEarlyEdit);
// reverse the sign for display purposes
if(!m_maxCreditAbsoluteEdit->lineedit()->text().isEmpty())
m_maxCreditAbsoluteEdit->setValue(m_maxCreditAbsoluteEdit->value()*MyMoneyMoney(-1,1));
if(!m_maxCreditEarlyEdit->lineedit()->text().isEmpty())
m_maxCreditEarlyEdit->setValue(m_maxCreditEarlyEdit->value()*MyMoneyMoney(-1,1));
loadKVP("lastNumberUsed", m_lastCheckNumberUsed);
// we do not allow to change the account type once an account
// was created. Same applies to currency if it is referenced.
if (m_isEditing)
{
typeCombo->setEnabled(false);
m_currency->setDisabled(MyMoneyFile::instance()->isReferenced(m_account));
}
if(m_account.isInvest()) {
typeCombo->setEnabled(false);
m_qcheckboxPreferred->hide();
m_currencyText->hide();
m_currency->hide();
} else {
// use the old field and override a possible new value
if(!MyMoneyMoney(account.value("minimumBalance")).isZero()) {
m_minBalanceAbsoluteEdit->setValue(MyMoneyMoney(account.value("minimumBalance")));
}
}
// m_qcheckboxTax->hide(); TODO should only be visible for VAT category/account
}
m_currency->setSecurity(file->currency(account.currencyId()));
// Load the institutions
// then the accounts
TQString institutionName;
try
{
if (m_isEditing && !account.institutionId().isEmpty())
institutionName = file->institution(account.institutionId()).name();
else
institutionName = TQString();
}
catch (MyMoneyException *e)
{
tqDebug("exception in init for account dialog: %s", e->what().latin1());
delete e;
}
initParentWidget(account.parentAccountId(), account.id());
if(m_account.isInvest())
m_qlistviewParentAccounts->setEnabled(false);
if (!categoryEditor)
slotLoadInstitutions(institutionName);
accountNameEdit->setFocus();
if (title)
setCaption(title);
// load button icons
TDEIconLoader* il = TDEGlobal::iconLoader();
cancelButton->setGuiItem(KStdGuiItem::cancel());
createButton->setGuiItem(KStdGuiItem::ok());
connect(cancelButton, TQT_SIGNAL(clicked()), TQT_SLOT(reject()));
connect(createButton, TQT_SIGNAL(clicked()), this, TQT_SLOT(okClicked()));
connect(m_qlistviewParentAccounts, TQT_SIGNAL(selectionChanged(TQListViewItem*)),
this, TQT_SLOT(slotSelectionChanged(TQListViewItem*)));
connect(m_qbuttonNew, TQT_SIGNAL(clicked()), this, TQT_SLOT(slotNewClicked()));
connect(typeCombo, TQT_SIGNAL(activated(const TQString&)),
this, TQT_SLOT(slotAccountTypeChanged(const TQString&)));
connect(accountNameEdit, TQT_SIGNAL(textChanged(const TQString&)), this, TQT_SLOT(slotCheckFinished()));
connect(m_vatCategory, TQT_SIGNAL(toggled(bool)), this, TQT_SLOT(slotVatChanged(bool)));
connect(m_vatAssignment, TQT_SIGNAL(toggled(bool)), this, TQT_SLOT(slotVatAssignmentChanged(bool)));
connect(m_vatCategory, TQT_SIGNAL(toggled(bool)), this, TQT_SLOT(slotCheckFinished()));
connect(m_vatAssignment, TQT_SIGNAL(toggled(bool)), this, TQT_SLOT(slotCheckFinished()));
connect(m_vatRate, TQT_SIGNAL(textChanged(const TQString&)), this, TQT_SLOT(slotCheckFinished()));
connect(m_vatAccount, TQT_SIGNAL(stateChanged()), this, TQT_SLOT(slotCheckFinished()));
connect(m_minBalanceEarlyEdit, TQT_SIGNAL(valueChanged(const TQString&)), this, TQT_SLOT(slotAdjustMinBalanceAbsoluteEdit(const TQString&)));
connect(m_minBalanceAbsoluteEdit, TQT_SIGNAL(valueChanged(const TQString&)), this, TQT_SLOT(slotAdjustMinBalanceEarlyEdit(const TQString&)));
connect(m_maxCreditEarlyEdit, TQT_SIGNAL(valueChanged(const TQString&)), this, TQT_SLOT(slotAdjustMaxCreditAbsoluteEdit(const TQString&)));
connect(m_maxCreditAbsoluteEdit, TQT_SIGNAL(valueChanged(const TQString&)), this, TQT_SLOT(slotAdjustMaxCreditEarlyEdit(const TQString&)));
connect(m_qcomboboxInstitutions, TQT_SIGNAL(activated(const TQString&)), this, TQT_SLOT(slotLoadInstitutions(const TQString&)));
m_vatCategory->setChecked(false);
m_vatAssignment->setChecked(false);
// make sure our account does not have an id and no parent assigned
// and certainly no children in case we create a new account
if(!m_isEditing) {
m_account.clearId();
m_account.setParentAccountId(TQString());
TQStringList::ConstIterator it;
while((it = m_account.accountList().begin()) != m_account.accountList().end())
m_account.removeAccountId(*it);
if(m_parentItem == 0) {
// force loading of initial parent
m_account.setAccountType(MyMoneyAccount::UnknownAccountType);
MyMoneyAccount::_accountTypeE type = account.accountType();
if(type == MyMoneyAccount::UnknownAccountType)
type = MyMoneyAccount::Checkings;
slotAccountTypeChanged(KMyMoneyUtils::accountTypeToString(type));
}
} else {
if(!m_account.value("VatRate").isEmpty()) {
m_vatCategory->setChecked(true);
m_vatRate->setValue(MyMoneyMoney(m_account.value("VatRate"))*MyMoneyMoney(100,1));
} else {
if(!m_account.value("VatAccount").isEmpty()) {
TQString accId = m_account.value("VatAccount").latin1();
try {
// make sure account exists
MyMoneyFile::instance()->account(accId);
m_vatAssignment->setChecked(true);
m_vatAccount->setSelected(accId);
m_grossAmount->setChecked(true);
if(m_account.value("VatAmount") == "Net")
m_netAmount->setChecked(true);
} catch(MyMoneyException *e) {
delete e;
}
}
}
}
slotVatChanged(m_vatCategory->isChecked());
slotVatAssignmentChanged(m_vatAssignment->isChecked());
slotCheckFinished();
kMandatoryFieldGroup* requiredFields = new kMandatoryFieldGroup (TQT_TQOBJECT(this));
requiredFields->setOkButton(createButton); // button to be enabled when all fields present
requiredFields->add(accountNameEdit);
// using a timeout is the only way, I got the 'ensureItemVisible'
// working when creating the dialog. I assume, this
// has something to do with the delayed update of the display somehow.
TQTimer::singleShot(50, this, TQT_SLOT(timerDone()));
}
void KNewAccountDlg::timerDone(void)
{
if(m_accountItem) m_qlistviewParentAccounts->ensureItemVisible(m_accountItem);
if(m_parentItem) m_qlistviewParentAccounts->ensureItemVisible(m_parentItem);
// KNewAccountDlgDecl::resizeEvent(0);
m_qlistviewParentAccounts->setColumnWidth(m_qlistviewParentAccounts->nameColumn(), m_qlistviewParentAccounts->visibleWidth());
m_qlistviewParentAccounts->repaintContents(false);
}
void KNewAccountDlg::setOpeningBalance(const MyMoneyMoney& balance)
{
m_openingBalanceEdit->setValue(balance);
}
void KNewAccountDlg::setOpeningBalanceShown(bool shown)
{
m_openingBalanceEdit->setShown(shown);
}
void KNewAccountDlg::okClicked()
{
MyMoneyFile* file = MyMoneyFile::instance();
TQString accountNameText = accountNameEdit->text();
if (accountNameText.isEmpty())
{
KMessageBox::error(this, i18n("You have not specified a name.\nPlease fill in this field."));
accountNameEdit->setFocus();
return;
}
MyMoneyAccount parent = parentAccount();
if (parent.name().length() == 0)
{
KMessageBox::error(this, i18n("Please select a parent account."));
return;
}
if (!m_categoryEditor)
{
TQString institutionNameText = m_qcomboboxInstitutions->currentText();
if (institutionNameText != i18n("<No Institution>"))
{
try
{
MyMoneyFile *file = MyMoneyFile::instance();
TQValueList<MyMoneyInstitution> list = file->institutionList();
TQValueList<MyMoneyInstitution>::ConstIterator institutionIterator;
for (institutionIterator = list.begin(); institutionIterator != list.end(); ++institutionIterator)
{
if ((*institutionIterator).name() == institutionNameText)
m_account.setInstitutionId((*institutionIterator).id());
}
}
catch (MyMoneyException *e)
{
tqDebug("Exception in account institution set: %s", e->what().latin1());
delete e;
}
}
else
{
m_account.setInstitutionId(TQString());
}
}
m_account.setName(accountNameText);
m_account.setNumber(accountNoEdit->text());
storeKVP("iban", ibanEdit);
storeKVP("minBalanceAbsolute", m_minBalanceAbsoluteEdit);
storeKVP("minBalanceEarly", m_minBalanceEarlyEdit);
// the figures for credit line with reversed sign
if(!m_maxCreditAbsoluteEdit->lineedit()->text().isEmpty())
m_maxCreditAbsoluteEdit->setValue(m_maxCreditAbsoluteEdit->value()*MyMoneyMoney(-1,1));
if(!m_maxCreditEarlyEdit->lineedit()->text().isEmpty())
m_maxCreditEarlyEdit->setValue(m_maxCreditEarlyEdit->value()*MyMoneyMoney(-1,1));
storeKVP("maxCreditAbsolute", m_maxCreditAbsoluteEdit);
storeKVP("maxCreditEarly", m_maxCreditEarlyEdit);
if(!m_maxCreditAbsoluteEdit->lineedit()->text().isEmpty())
m_maxCreditAbsoluteEdit->setValue(m_maxCreditAbsoluteEdit->value()*MyMoneyMoney(-1,1));
if(!m_maxCreditEarlyEdit->lineedit()->text().isEmpty())
m_maxCreditEarlyEdit->setValue(m_maxCreditEarlyEdit->value()*MyMoneyMoney(-1,1));
storeKVP("lastNumberUsed", m_lastCheckNumberUsed);
// delete a previous version of the minimumbalance information
storeKVP("minimumBalance", TQString(), TQString());
MyMoneyAccount::accountTypeE acctype;
if (!m_categoryEditor)
{
acctype = KMyMoneyUtils::stringToAccountType(typeCombo->currentText());
// If it's a loan, check if the parent is asset or liability. In
// case of asset, we change the account type to be AssetLoan
if(acctype == MyMoneyAccount::Loan
&& parent.accountGroup() == MyMoneyAccount::Asset)
acctype = MyMoneyAccount::AssetLoan;
#if 0
// we do allow the same name for different accounts, so
// we don't need this check anymore.
if(!file->nameToAccount(accountNameText).isEmpty()
&& (file->nameToAccount(accountNameText) != m_account.id())) {
KMessageBox::error(this, TQString("<qt>")+i18n("An account named <b>%1</b> already exists. You cannot create a second account with the same name.").arg(accountNameText)+TQString("</qt>"));
return;
}
#endif
}
else
{
acctype = parent.accountGroup();
TQString newName;
if(!MyMoneyFile::instance()->isStandardAccount(parent.id())) {
newName = MyMoneyFile::instance()->accountToCategory(parent.id()) + MyMoneyFile::AccountSeperator;
}
newName += accountNameText;
if(!file->categoryToAccount(newName, acctype).isEmpty()
&& (file->categoryToAccount(newName, acctype) != m_account.id())) {
KMessageBox::error(this, TQString("<qt>")+i18n("A category named <b>%1</b> already exists. You cannot create a second category with the same name.").arg(newName)+TQString("</qt>"));
return;
}
}
m_account.setAccountType(acctype);
m_account.setDescription(descriptionEdit->text());
if (!m_categoryEditor)
{
m_account.setOpeningDate(startDateEdit->date());
m_account.setCurrencyId(m_currency->security().id());
if(m_qcheckboxPreferred->isChecked())
m_account.setValue("PreferredAccount", "Yes");
else
m_account.deletePair("PreferredAccount");
if(m_qcheckboxNoVat->isChecked())
m_account.setValue("NoVat", "Yes");
else
m_account.deletePair("NoVat");
if(m_minBalanceAbsoluteEdit->isVisible()) {
m_account.setValue("minimumBalance", m_minBalanceAbsoluteEdit->value().toString());
}
}
else
{
if(KMyMoneyGlobalSettings::hideUnusedCategory() && !m_isEditing) {
KMessageBox::information(this, i18n("You have selected to suppress the display of unused categories in the KMyMoney configuration dialog. The category you just created will therefore only be shown if it is used. Otherwise, it will be hidden in the accounts/categories view."), i18n("Hidden categories"), "NewHiddenCategory");
}
}
if ( m_qcheckboxTax->isChecked())
m_account.setValue("Tax", "Yes");
else
m_account.deletePair("Tax");
m_account.deletePair("VatAccount");
m_account.deletePair("VatAmount");
m_account.deletePair("VatRate");
if(m_vatCategory->isChecked()) {
m_account.setValue("VatRate", (m_vatRate->value().abs() / MyMoneyMoney(100,1)).toString());
} else {
if(m_vatAssignment->isChecked()) {
m_account.setValue("VatAccount", m_vatAccount->selectedItems().first());
if(m_netAmount->isChecked())
m_account.setValue("VatAmount", "Net");
}
}
accept();
}
void KNewAccountDlg::loadKVP(const TQString& key, kMyMoneyEdit* widget)
{
if(!widget)
return;
if(m_account.value(key).isEmpty()) {
widget->clearText();
} else {
widget->setValue(MyMoneyMoney(m_account.value(key)));
}
}
void KNewAccountDlg::loadKVP(const TQString& key, KLineEdit* widget)
{
if(!widget)
return;
widget->setText(m_account.value(key));
}
void KNewAccountDlg::storeKVP(const TQString& key, const TQString& text, const TQString& value)
{
if(text.isEmpty())
m_account.deletePair(key);
else
m_account.setValue(key, value);
}
void KNewAccountDlg::storeKVP(const TQString& key, kMyMoneyEdit* widget)
{
storeKVP(key, widget->lineedit()->text(), widget->text());
}
void KNewAccountDlg::storeKVP(const TQString& key, KLineEdit* widget)
{
storeKVP(key, widget->text(), widget->text());
}
const MyMoneyAccount& KNewAccountDlg::account(void)
{
// assign the right currency to the account
m_account.setCurrencyId(m_currency->security().id());
// and the price mode
switch(m_priceMode->currentItem()) {
case 0:
m_account.deletePair("priceMode");
break;
case 1:
case 2:
m_account.setValue("priceMode", TQString("%1").arg(m_priceMode->currentItem()));
break;
}
return m_account;
}
const MyMoneyAccount& KNewAccountDlg::parentAccount(void)
{
if (!m_bSelectedParentAccount)
{
MyMoneyFile *file = MyMoneyFile::instance();
switch (m_account.accountGroup())
{
case MyMoneyAccount::Asset:
m_parentAccount = file->asset();
break;
case MyMoneyAccount::Liability:
m_parentAccount = file->liability();
break;
case MyMoneyAccount::Income:
m_parentAccount = file->income();
break;
case MyMoneyAccount::Expense:
m_parentAccount = file->expense();
break;
case MyMoneyAccount::Equity:
m_parentAccount = file->equity();
break;
default:
tqDebug("Seems we have an account that hasn't been mapped to the top five");
if(m_categoryEditor)
m_parentAccount = file->income();
else
m_parentAccount = file->asset();
}
}
return m_parentAccount;
}
void KNewAccountDlg::initParentWidget(TQString parentId, const TQString& accountId)
{
MyMoneyFile *file = MyMoneyFile::instance();
MyMoneyAccount liabilityAccount = file->liability();
MyMoneyAccount assetAccount = file->asset();
MyMoneyAccount expenseAccount = file->expense();
MyMoneyAccount incomeAccount = file->income();
MyMoneyAccount equityAccount = file->equity();
m_parentItem = 0;
m_accountItem = 0;
// Determine the parent account
try
{
m_parentAccount = file->account(parentId);
}
catch (MyMoneyException *e)
{
m_bSelectedParentAccount = false;
m_parentAccount = MyMoneyAccount();
if(m_account.accountType() != MyMoneyAccount::UnknownAccountType) {
parentAccount();
parentId = m_parentAccount.id();
}
delete e;
}
m_bSelectedParentAccount = true;
// extract the account type from the combo box
MyMoneyAccount::accountTypeE type;
MyMoneyAccount::accountTypeE groupType;
type = KMyMoneyUtils::stringToAccountType(typeCombo->currentText());
groupType = MyMoneyAccount::accountGroup(type);
m_qlistviewParentAccounts->clear();
// Now scan all 4 account roots to load the list and mark the parent
try
{
if (!m_categoryEditor)
{
if(groupType == MyMoneyAccount::Asset || type == MyMoneyAccount::Loan) {
// Asset
KMyMoneyAccountTreeBaseItem *assetTopLevelAccount = new KMyMoneyAccountTreeItem(m_qlistviewParentAccounts, assetAccount);
if(m_parentAccount.id().isEmpty()) {
m_parentAccount = assetAccount;
parentId = m_parentAccount.id();
}
if (parentId == assetAccount.id())
m_parentItem = assetTopLevelAccount;
assetTopLevelAccount->setOpen(true);
for ( TQStringList::ConstIterator it = assetAccount.accountList().begin();
it != assetAccount.accountList().end();
++it )
{
MyMoneyAccount acc = file->account(*it);
if(acc.isClosed())
continue;
KMyMoneyAccountTreeBaseItem *accountItem = new KMyMoneyAccountTreeItem(assetTopLevelAccount, acc);
if(parentId == acc.id()) {
m_parentItem = accountItem;
} else if(accountId == acc.id()) {
if(m_isEditing)
accountItem->setSelectable(false);
m_accountItem = accountItem;
}
TQStringList subAccounts = acc.accountList();
if (subAccounts.count() >= 1)
{
showSubAccounts(subAccounts, accountItem, parentId, acc.id());
}
}
}
if(groupType == MyMoneyAccount::Liability) {
// Liability
KMyMoneyAccountTreeBaseItem *liabilityTopLevelAccount = new KMyMoneyAccountTreeItem(m_qlistviewParentAccounts, liabilityAccount);
if(m_parentAccount.id().isEmpty()) {
m_parentAccount = liabilityAccount;
parentId = m_parentAccount.id();
}
if (parentId == liabilityAccount.id())
m_parentItem = liabilityTopLevelAccount;
liabilityTopLevelAccount->setOpen(true);
for ( TQStringList::ConstIterator it = liabilityAccount.accountList().begin();
it != liabilityAccount.accountList().end();
++it )
{
MyMoneyAccount acc = file->account(*it);
if(acc.isClosed())
continue;
KMyMoneyAccountTreeBaseItem *accountItem = new KMyMoneyAccountTreeItem(liabilityTopLevelAccount, acc);
if(parentId == acc.id()) {
m_parentItem = accountItem;
} else if(accountId == acc.id()) {
if(m_isEditing)
accountItem->setSelectable(false);
m_accountItem = accountItem;
}
TQStringList subAccounts = acc.accountList();
if (subAccounts.count() >= 1)
{
showSubAccounts(subAccounts, accountItem, parentId, acc.id());
}
}
}
}
else
{
if(groupType == MyMoneyAccount::Income) {
// Income
KMyMoneyAccountTreeBaseItem *incomeTopLevelAccount = new KMyMoneyAccountTreeItem(m_qlistviewParentAccounts,
incomeAccount);
if(m_parentAccount.id().isEmpty()) {
m_parentAccount = incomeAccount;
parentId = m_parentAccount.id();
}
if (parentId == incomeAccount.id())
m_parentItem = incomeTopLevelAccount;
incomeTopLevelAccount->setOpen(true);
for ( TQStringList::ConstIterator it = incomeAccount.accountList().begin();
it != incomeAccount.accountList().end();
++it )
{
KMyMoneyAccountTreeBaseItem *accountItem = new KMyMoneyAccountTreeItem(incomeTopLevelAccount,
file->account(*it));
TQString id = file->account(*it).id();
if(parentId == id) {
m_parentItem = accountItem;
} else if(accountId == id) {
if(m_isEditing)
accountItem->setSelectable(false);
m_accountItem = accountItem;
}
TQStringList subAccounts = file->account(*it).accountList();
if (subAccounts.count() >= 1)
{
showSubAccounts(subAccounts, accountItem, parentId, accountId);
}
}
}
if(groupType == MyMoneyAccount::Expense) {
// Expense
KMyMoneyAccountTreeBaseItem *expenseTopLevelAccount = new KMyMoneyAccountTreeItem(m_qlistviewParentAccounts,
expenseAccount);
if(m_parentAccount.id().isEmpty()) {
m_parentAccount = expenseAccount;
parentId = m_parentAccount.id();
}
if (parentId == expenseAccount.id())
m_parentItem = expenseTopLevelAccount;
expenseTopLevelAccount->setOpen(true);
for ( TQStringList::ConstIterator it = expenseAccount.accountList().begin();
it != expenseAccount.accountList().end();
++it )
{
KMyMoneyAccountTreeBaseItem *accountItem = new KMyMoneyAccountTreeItem(expenseTopLevelAccount,
file->account(*it));
TQString id = file->account(*it).id();
if(parentId == id) {
m_parentItem = accountItem;
} else if(accountId == id) {
if(m_isEditing)
accountItem->setSelectable(false);
m_accountItem = accountItem;
}
TQStringList subAccounts = file->account(*it).accountList();
if (subAccounts.count() >= 1)
{
showSubAccounts(subAccounts, accountItem, parentId, accountId);
}
}
}
}
}
catch (MyMoneyException *e)
{
tqDebug("Exception in assets account refresh: %s", e->what().latin1());
delete e;
}
m_qlistviewParentAccounts->setColumnWidth(0, m_qlistviewParentAccounts->width());
if (m_parentItem)
{
m_subAccountLabel->setText(i18n("Is a sub account of %1").arg(m_parentAccount.name()));
m_parentItem->setOpen(true);
m_qlistviewParentAccounts->setSelected(m_parentItem, true);
}
m_qlistviewParentAccounts->setEnabled(true);
}
void KNewAccountDlg::showSubAccounts(TQStringList accounts, KMyMoneyAccountTreeBaseItem *parentItem,
const TQString& parentId, const TQString& accountId)
{
MyMoneyFile *file = MyMoneyFile::instance();
for ( TQStringList::ConstIterator it = accounts.begin(); it != accounts.end(); ++it )
{
KMyMoneyAccountTreeBaseItem *accountItem = new KMyMoneyAccountTreeItem(parentItem,
file->account(*it));
TQString id = file->account(*it).id();
if(parentId == id) {
m_parentItem = accountItem;
} else if(accountId == id) {
if(m_isEditing)
accountItem->setSelectable(false);
m_accountItem = accountItem;
}
TQStringList subAccounts = file->account(*it).accountList();
if (subAccounts.count() >= 1)
{
showSubAccounts(subAccounts, accountItem, parentId, accountId);
}
}
}
void KNewAccountDlg::resizeEvent(TQResizeEvent* e)
{
m_qlistviewParentAccounts->setColumnWidth(0, m_qlistviewParentAccounts->width());
// call base class resizeEvent()
KNewAccountDlgDecl::resizeEvent(e);
}
void KNewAccountDlg::slotSelectionChanged(TQListViewItem *item)
{
KMyMoneyAccountTreeBaseItem *accountItem = dynamic_cast<KMyMoneyAccountTreeBaseItem*>(item);
try
{
MyMoneyFile *file = MyMoneyFile::instance();
//tqDebug("Selected account id: %s", accountItem->accountID().data());
m_parentAccount = file->account(accountItem->id());
m_subAccountLabel->setText(i18n("Is a sub account of %1").arg(m_parentAccount.name()));
if(m_qlistviewParentAccounts->isEnabled()) {
m_bSelectedParentAccount = true;
}
}
catch (MyMoneyException *e)
{
tqDebug("This shouldn't happen! : %s", e->what().latin1());
delete e;
}
}
void KNewAccountDlg::loadVatAccounts(void)
{
TQValueList<MyMoneyAccount> list;
MyMoneyFile::instance()->accountList(list);
TQValueList<MyMoneyAccount>::Iterator it;
TQStringList loadListExpense;
TQStringList loadListIncome;
TQStringList loadListAsset;
TQStringList loadListLiability;
for(it = list.begin(); it != list.end(); ++it) {
if(!(*it).value("VatRate").isEmpty()) {
if((*it).accountType() == MyMoneyAccount::Expense)
loadListExpense += (*it).id();
else if((*it).accountType() == MyMoneyAccount::Income)
loadListIncome += (*it).id();
else if((*it).accountType() == MyMoneyAccount::Asset)
loadListAsset += (*it).id();
else if((*it).accountType() == MyMoneyAccount::Liability)
loadListLiability += (*it).id();
}
}
AccountSet vatSet;
if(!loadListAsset.isEmpty())
vatSet.load(m_vatAccount, i18n("Asset"), loadListAsset, true);
if(!loadListLiability.isEmpty())
vatSet.load(m_vatAccount, i18n("Liability"), loadListLiability, false);
if(!loadListIncome.isEmpty())
vatSet.load(m_vatAccount, i18n("Income"), loadListIncome, false);
if(!loadListExpense.isEmpty())
vatSet.load(m_vatAccount, i18n("Expense"), loadListExpense, false);
}
void KNewAccountDlg::slotLoadInstitutions(const TQString& name)
{
int id=-1, counter=0;
m_qcomboboxInstitutions->clear();
TQString bic;
// Are we forcing the user to use institutions?
m_qcomboboxInstitutions->insertItem(i18n("<No Institution>"));
m_bicValue->setText(" ");
ibanEdit->setEnabled(false);
accountNoEdit->setEnabled(false);
try
{
MyMoneyFile *file = MyMoneyFile::instance();
TQValueList<MyMoneyInstitution> list = file->institutionList();
TQValueList<MyMoneyInstitution>::ConstIterator institutionIterator;
for (institutionIterator = list.begin(), counter=1; institutionIterator != list.end(); ++institutionIterator, counter++)
{
if ((*institutionIterator).name() == name) {
id = counter;
ibanEdit->setEnabled(true);
accountNoEdit->setEnabled(true);
m_bicValue->setText((*institutionIterator).value("bic"));
}
m_qcomboboxInstitutions->insertItem((*institutionIterator).name());
}
if (id != -1)
{
m_qcomboboxInstitutions->setCurrentItem(id);
}
}
catch (MyMoneyException *e)
{
tqDebug("Exception in institution load: %s", e->what().latin1());
delete e;
}
}
void KNewAccountDlg::slotNewClicked()
{
MyMoneyInstitution institution;
KNewBankDlg dlg(institution, this);
if (dlg.exec())
{
MyMoneyFileTransaction ft;
try
{
MyMoneyFile *file = MyMoneyFile::instance();
institution = dlg.institution();
file->addInstitution(institution);
ft.commit();
slotLoadInstitutions(institution.name());
}
catch (MyMoneyException *e)
{
delete e;
KMessageBox::information(this, i18n("Cannot add institution"));
}
}
}
void KNewAccountDlg::slotAccountTypeChanged(const TQString& typeStr)
{
MyMoneyAccount::accountTypeE type;
MyMoneyAccount::accountTypeE oldType;
MyMoneyFile* file = MyMoneyFile::instance();
type = KMyMoneyUtils::stringToAccountType(typeStr);
try {
oldType = m_account.accountType();
if(oldType != type) {
TQString parentId;
switch(MyMoneyAccount::accountGroup(type)) {
case MyMoneyAccount::Asset:
parentId = file->asset().id();
break;
case MyMoneyAccount::Liability:
parentId = file->liability().id();
break;
case MyMoneyAccount::Expense:
parentId = file->expense().id();
break;
case MyMoneyAccount::Income:
parentId = file->income().id();
break;
default:
tqWarning("Unknown account group in KNewAccountDlg::slotAccountTypeChanged()");
break;
}
initParentWidget(parentId, TQString());
m_account.setAccountType(type);
}
} catch(MyMoneyException *e) {
delete e;
tqWarning("Unexpected exception in KNewAccountDlg::slotAccountTypeChanged()");
}
}
void KNewAccountDlg::slotCheckFinished(void)
{
bool showButton = true;
if(accountNameEdit->text().length() == 0) {
showButton = false;
}
if(m_vatCategory->isChecked() && m_vatRate->value() <= MyMoneyMoney(0)) {
showButton = false;
} else {
if(m_vatAssignment->isChecked() && m_vatAccount->selectedItems().isEmpty())
showButton = false;
}
createButton->setEnabled(showButton);
}
void KNewAccountDlg::slotVatChanged(bool state)
{
if(state) {
m_vatCategoryFrame->show();
m_vatAssignmentFrame->hide();
} else {
m_vatCategoryFrame->hide();
if(!m_account.isAssetLiability()) {
m_vatAssignmentFrame->show();
}
}
}
void KNewAccountDlg::slotVatAssignmentChanged(bool state)
{
m_vatAccount->setEnabled(state);
m_amountGroup->setEnabled(state);
}
void KNewAccountDlg::adjustEditWidgets(kMyMoneyEdit* dst, kMyMoneyEdit* src, char mode, int corr)
{
MyMoneyMoney factor(corr, 1);
if(m_account.accountGroup() == MyMoneyAccount::Asset)
factor = -factor;
switch(mode) {
case '<':
if(src->value()*factor < dst->value()*factor)
dst->setValue(src->value());
break;
case '>':
if(src->value()*factor > dst->value()*factor)
dst->setValue(src->value());
break;
}
}
void KNewAccountDlg::slotAdjustMinBalanceAbsoluteEdit(const TQString&)
{
adjustEditWidgets(m_minBalanceAbsoluteEdit, m_minBalanceEarlyEdit, '<', -1);
}
void KNewAccountDlg::slotAdjustMinBalanceEarlyEdit(const TQString&)
{
adjustEditWidgets(m_minBalanceEarlyEdit, m_minBalanceAbsoluteEdit, '>', -1);
}
void KNewAccountDlg::slotAdjustMaxCreditAbsoluteEdit(const TQString&)
{
adjustEditWidgets(m_maxCreditAbsoluteEdit, m_maxCreditEarlyEdit, '>', 1);
}
void KNewAccountDlg::slotAdjustMaxCreditEarlyEdit(const TQString&)
{
adjustEditWidgets(m_maxCreditEarlyEdit, m_maxCreditAbsoluteEdit, '<', 1);
}
void KNewAccountDlg::addTab(TQWidget* w, const TQString& name)
{
if(w) {
w->reparent(m_tab, TQPoint(0,0));
m_tab->addTab(w, name);
}
}
#include "knewaccountdlg.moc"
// vim:cin:si:ai:et:ts=2:sw=2: