void crmaccount::sDeleteCharacteristic()
{
q.prepare( "DELETE FROM charass "
"WHERE (charass_id=:charass_id);" );
q.bindValue(":charass_id", _charass->id());
q.exec();
sGetCharacteristics();
}
void address::sDeleteCharacteristic()
{
internalSave();
q.prepare( "DELETE FROM charass "
"WHERE (charass_id=:charass_id);" );
q.bindValue(":charass_id", _charass->id());
q.exec();
sGetCharacteristics();
}
void crmaccount::sEditCharacteristic()
{
ParameterList params;
params.append("mode", "edit");
params.append("charass_id", _charass->id());
characteristicAssignment newdlg(this, "", TRUE);
newdlg.set(params);
if (newdlg.exec() != XDialog::Rejected)
sGetCharacteristics();
}
void crmaccount::sNewCharacteristic()
{
ParameterList params;
params.append("mode", "new");
params.append("crmacct_id", _crmacctId);
characteristicAssignment newdlg(this, "", TRUE);
newdlg.set(params);
if (newdlg.exec() != XDialog::Rejected)
sGetCharacteristics();
}
void address::sNewCharacteristic()
{
internalSave();
ParameterList params;
params.append("mode", "new");
params.append("addr_id", _addr->id());
characteristicAssignment newdlg(this, "", TRUE);
newdlg.set(params);
if (newdlg.exec() != XDialog::Rejected)
sGetCharacteristics();
}
void address::sPopulate()
{
_notes->setText(_addr->notes());
_comments->setId(_addr->id());
sGetCharacteristics();
XSqlQuery usesQ;
usesQ.prepare("SELECT cntct_id, 1, :contact, cntct_first_name, "
" cntct_last_name, crmacct_number, cntct_phone, "
" cntct_phone2, cntct_fax, cntct_email, cntct_webaddr "
"FROM cntct LEFT OUTER JOIN crmacct ON (cntct_crmacct_id=crmacct_id) "
"WHERE (cntct_addr_id=:addr_id) "
"UNION "
"SELECT shipto_id, 2, :shipto, shipto_name, "
" shipto_name, crmacct_number, '',"
" '', '', '', '' "
"FROM shiptoinfo LEFT OUTER JOIN crmacct ON (shipto_cust_id=crmacct_cust_id) "
"WHERE (shipto_addr_id=:addr_id) "
"UNION "
"SELECT vend_id, 3, :vendor, vend_number, "
" vend_name, crmacct_number, '',"
" '', '', '', '' "
"FROM vendinfo LEFT OUTER JOIN crmacct ON (vend_id=crmacct_vend_id) "
"WHERE (vend_addr_id=:addr_id) "
"UNION "
"SELECT vendaddr_id, 4, :vendaddr, vendaddr_code, "
" vendaddr_name, crmacct_number, '',"
" '', '', '', '' "
"FROM vendaddrinfo LEFT OUTER JOIN crmacct ON (vendaddr_vend_id=crmacct_vend_id) "
"WHERE (vendaddr_addr_id=:addr_id) "
"UNION "
"SELECT warehous_id, 5, :whs, warehous_code, "
" warehous_descrip, '', '',"
" '', '', '', '' "
"FROM whsinfo "
"WHERE (warehous_addr_id=:addr_id) "
"ORDER BY 3, 5, 4;");
usesQ.bindValue(":addr_id", _addr->id());
usesQ.bindValue(":contact", tr("Contact"));
usesQ.bindValue(":shipto", tr("Ship-To"));
usesQ.bindValue(":vendor", tr("Vendor"));
usesQ.bindValue(":vendaddr", tr("Vendor Address"));
usesQ.bindValue(":whs", tr("Warehouse"));
usesQ.exec();
_uses->clear();
_uses->populate(usesQ, true); // true => use alt id (to distinguish types)
}
void crmaccount::sPopulate()
{
q.prepare( "SELECT * "
"FROM crmacct "
"WHERE (crmacct_id=:crmacct_id);" );
q.bindValue(":crmacct_id", _crmacctId);
q.exec();
if (q.first())
{
_number->setText(q.value("crmacct_number").toString());
_name->setText(q.value("crmacct_name").toString());
_active->setChecked(q.value("crmacct_active").toBool());
QString acctType = q.value("crmacct_type").toString();
if (acctType == "O")
_organization->setChecked(true);
else if (acctType == "I")
_individual->setChecked(true);
else
qWarning("crmaccount::sPopulate() - acctType '%s' incorrect", acctType.toLatin1().data());
_custId = q.value("crmacct_cust_id").toInt();
_competitorId = q.value("crmacct_competitor_id").toInt();
_partnerId = q.value("crmacct_partner_id").toInt();
_prospectId = q.value("crmacct_prospect_id").toInt();
_vendId = q.value("crmacct_vend_id").toInt();
_taxauthId = q.value("crmacct_taxauth_id").toInt();
_primary->setId(q.value("crmacct_cntct_id_1").toInt());
_secondary->setId(q.value("crmacct_cntct_id_2").toInt());
_notes->setText(q.value("crmacct_notes").toString());
_parentCrmacct->setId(q.value("crmacct_parent_id").toInt());
_comments->setId(_crmacctId);
_documents->setId(_crmacctId);
_primary->setSearchAcct(_crmacctId);
_secondary->setSearchAcct(_crmacctId);
_owner->setUsername(q.value("crmacct_owner_username").toString());
_customer->setDisabled(_customer->isChecked());
_prospect->setChecked(_prospectId > 0);
_prospect->setDisabled(_customer->isChecked());
_taxauth->setChecked(_taxauthId > 0);
if (_custId > 0)
{
_customer->setChecked(true);
if (_privileges->check("MaintainCustomerMasters") ||
_privileges->check("ViewCustomerMasters") )
_customerButton->setEnabled(true);
}
if (_vendId > 0)
{
_vendor->setChecked(true);
_vendorButton->setText("Vendor");
disconnect(_vendorButton, SIGNAL(clicked()), this, SLOT(sEditVendor()));
QMenu * vendorMenu = new QMenu;
QAction *menuItem;
menuItem=vendorMenu->addAction(tr("Edit..."), this, SLOT(sEditVendor()));
menuItem->setEnabled(_privileges->check("MaintainVendors") &&
(_mode == cEdit));
menuItem=vendorMenu->addAction(tr("View..."), this, SLOT(sViewVendor()));
menuItem->setEnabled(_privileges->check("ViewVendors") ||
_privileges->check("MaintainVendors"));
menuItem=vendorMenu->addAction(tr("Workbench..."), this, SLOT(sVendorInfo()));
menuItem->setEnabled(_privileges->check("MaintainVendors"));
_vendorButton->setMenu(vendorMenu);
}
_partner->setChecked(_partnerId > 0);
_competitor->setChecked(_competitorId > 0);
}
else if (q.lastError().type() != QSqlError::NoError)
{
systemError(this, q.lastError().databaseText(), __FILE__, __LINE__);
return;
}
sGetCharacteristics();
sPopulateRegistrations();
_contacts->sFillList();
_todoList->sFillList();
_oplist->sFillList();
}
