FreenetIS

/**

* @author Tomas Dulik

* This function creates new record in the table "accounts".

* @param $attribute_id

* @param $name

* @param $member_id

* @return new object containing the new record model

*/

public static function create($attribute_id, $name, $member_id) {

$account = new Account_Model();

$account->account_attribute_id=$attribute_id;

$account->name=$name;

$account->member_id=$member_id;

$account->save();

return $account;

}

/**

* @author Tomas Dulik

* @return true if the bank transfer was already imported

* @param $data - object containing info about a bank transfer (from the bank account listing)

* parsed_acc_nr => 184932848 //cislo parsovaneho uctu

* parsed_acc_bank_nr=> 2400 //cislo banky parsovaneho uctu

* number => 1 //cislo vypisu

* date_time => 2008-03-25 05:40 //datum a cas

* comment => Rozpis polozek uveden v soupisu prevodu

* name => CESKA POSTA, S.P.

* account_nr => 160987123

* account_bank_nr = 0300

* type => Příchozí platba

* variable_symbol => 9081000001

* constant_symbol => 998

* specific_symbol => 9876543210

* amount => 720.00

* fee => -6.90

*/

public static function exists($data) {

return false;

$q="SELECT * FROM bank_transfers

JOIN transfers ON bank_transfers.transfer_id=transfers.id

AND bank_transfers.datetime=$data->date_time";

return self::$db->query($q)->count();

}

/**

* @author Tomas Dulik

* @param $name - name of the bank account

* @param $account_nr - bank account number

* @param $bank_nr - bank number

* @param $member_id - id of the owner

* @return new object containing the new record model

*/

public static function create($name, $account_nr, $bank_nr, $member_id) {

$bank_acc = new Bank_account_model();

$bank_acc->member_id = $member_id;

$bank_acc->name = $name;

$bank_acc->account_nr = $account_nr;

$bank_acc->bank_nr = $bank_nr;

$bank_acc->save();

return $bank_acc;

}

class Duplicity_Exception extends Exception {}

protected $owner_id = NULL;

// adding account, to do - access rights

//if ($this->acl_check_new(get_class($this), 'accounts', $member_id))

// $acc_grid->add_new_button(url_lang::base().'accounts/add_bank_account/'.$member_id, url_lang::lang('texts.Add new bank account'));

//$grid->order_field('mname')->label(url_lang::lang('texts.Member name'));

$this->owner_id = $member_id;

$this->owner_id = $member_id;

$this->owner_id = $member_id;

if (!$this->gacl_class->acl_check('freenetis', 'edit_own', 'all', $_SESSION['username'],get_class($this),'edit_accounts')) Controller::error(1);

$this->owner_id = $model_account->owner_id;

$form->group('')->label(url_lang::lang('texts.Basic informations'));

$form->input('start_amount')->label(url_lang::lang('texts.Start amount').':')->value((float)$model_account->start_amount);

$form->dropdown('type')->label(url_lang::lang('texts.Account type').':')->options(array('bank'=>url_lang::lang('texts.Bank account'),'analytic'=>url_lang::lang('texts.Double entry account'),'project'=>url_lang::lang('texts.Project account'),'master'=>url_lang::lang('texts.Master bank account'),'operating'=>url_lang::lang('texts.Operating account'),'infrastructure'=>url_lang::lang('texts.Infrastructure account'),'suppliers'=>url_lang::lang('texts.Suppliers account'),'unidentified'=>url_lang::lang('texts.Unidentified acccount')))->callback(array($this, 'callback_acc_type'))->selected($model_account->type);

if (trim($form_data['start_amount'])=='') $model_account->start_amount = '0';

$this->session->set_flash('message', url_lang::lang('texts.Account successfully updated.'));

url::redirect(url_lang::base().'accounts/detail/'.(int)$model_account->id);

$view->content = new View('account_edit');

$view->header->title = url_lang::lang('texts.Account editation');

$view->content->acc_data = $model_account;

* Deletes account. It shouldn't be used. Accounts cannot be deleted.

function new_transfer($account_id = NULL)

{

if (isset($account_id))

{

$this->account_id = $account_id;

$account = new Account_Model($account_id);

// access control

if (!$this->acl_check_new(get_class($this),'transfers',$account->member_id)) Controller::error(1);

$arr_users = array();

$user_model = new User_Model;

$users = $user_model->select('member_id','name','surname','login')->orderby('surname, name')->where('type!=','user')->find_all();

$arr_users[0] = '----- '.url_lang::lang('texts.Select the member').' -----';

foreach ($users as $user) {

$arr_users[$user->member_id] = $user->surname.' '.$user->name.' - '.$user->login;

}

// asort($arr_users);

$form = new Forge(url_lang::base().'accounts/add/'.$account_id, '', 'POST', array('id' => 'article_form'));

$form->set_attr('class', 'form_class')->set_attr('method', 'post');

$form->input('amount')->label(url_lang::lang('texts.Amount').':')->rules('required|length[0,50]|valid_numeric')->value('0')->callback(array($this, 'callback_amount'));

$form->dropdown('username')->label(url_lang::lang('texts.Send to member').':')->options($arr_users)->onchange('ajax_get_accounts(this.value,'.$account_id.')')->callback(array($this, 'callback_username'));

$form->dropdown('account')->label(url_lang::lang('texts.Members account').':')->options(array('0'=>'----- '.url_lang::lang('texts.Select the account').' -----'))->callback(array($this, 'callback_account'));

$form->textarea('comment')->label(url_lang::lang('texts.Comment').':')->rules('length[0,250]');

special::required_forge_style($form, ' *', 'required');

if($form->validate())

{

$form_data = $form->as_array();

$transfer = new Transfer_Model();

foreach($form_data as $key => $value)

{

$form_data->$key = htmlspecialchars($value);

}

$transfer->origin_id = $account->id;

$transfer->destination_id = $form_data['account'];

$transfer->text = $form_data['comment'];

$transfer->amount = (float)$form_data['amount'];

if ($transfer->save())

{

if ($account->type=='analytic')

{

$member = new Member_Model($account->member_id);

$member->current_credit = (float)$member->current_credit - (float)$form_data['amount'];

$member->save();

unset($model_members);

}

$account2 = new Account_Model($form_data['account']);

if ($account2->type=='analytic')

{

$member = new Member_Model($account2->owner_id);

$member->current_credit = (float)$member->current_credit + (float)$form_data['amount'];

$member->save();

}

$this->session->set_flash('message', url_lang::lang('texts.The transfer successfully done.'));

}

else

{

$this->session->set_flash('message', url_lang::lang('texts.Error - cant do the transfer.'));

}

url::redirect(url_lang::base().'accounts/transfers/'.(int)$account->member_id);

}

else

{

$view->form = new View('registration');

$view = new View('template');

$view->header = new View('base/header');

$view->content = new View('transfers_new');

$view->footer = new View('base/footer');

$view->header->menu = Controller::render_menu();

$view->header->title = url_lang::lang('texts.New transfer');

$view->content->form = $form->html('forge/new_transfer',TRUE);

$view->content->acc_data = $account;

//$view->content->acc_id = $acc_id;

$view->render(TRUE);

}

}

else

{

Controller::warning(1);;

}

} // end of new_transfer function

$try_default=true;

case "0300":

$try_default=false;

break;

case "5500":

default:

} // switch

}

if ($try_default) $this->parse_ebank_account(null, $form->listing->value);

static $bank_fees;

if (in_array($data->parsed_acc_bank_nr, array("2400","5500")))

$bank_nr="5500(2400)";

else $bank_nr=$data->parsed_acc_bank_nr;

$acc_name="$data->parsed_acc_nr/$bank_nr";

$parsed_acc = Account_Model::create(Account_attribute_Model::$bank,

"$acc_name - analytický", 1);

$this->parsed_bank_acc=Bank_account_Model::create($acc_name, $data->parsed_acc_nr,

$data->parsed_acc_bank_nr, 1);

$parsed_acc->add_bank_account($this->parsed_bank_acc);

if ($parsed_acc===FALSE)

// tohle by normálně nemělo nastat.

// může se to stát pouze pokud někdo smaže vazbu bank. účet sdružení

// s podvojným účtem přes tabulku accounts_bank_accounts

throw new Kohana_User_Exception('Kritická chyba', 'V tabulce accounts_bank_accounts chybí vazba bankovního a podvojného účtu sdružení');

$bank_interests = $this->parsed_bank_acc->get_related_account_by_attribute_id(

Account_attribute_Model::$bank_interests);

if ($bank_interests===FALSE) { // pokud ucet uroku neexistuje, pak si jej vytvorime

$bank_interests=Account_Model::create(Account_attribute_Model::$bank_interests,

"Úroky z $parsed_acc->name", 1);

$bank_interests->add_bank_account($this->parsed_bank_acc);

$bank_fees = $this->parsed_bank_acc->get_related_account_by_attribute_id(

Account_attribute_Model::$bank_fees);

if ($bank_fees===FALSE) { // pokud ucet poplatku neexistuje, pak jej vytvorime

$bank_fees=Account_Model::create(Account_attribute_Model::$bank_fees,

"Poplatky z $parsed_acc->name", 1);

$bank_fees->add_bank_account($this->parsed_bank_acc);

}

throw new Kohana_User_Exception('Kritická chyba', 'V DB chybí účet member_fees, suppliers nebo operating');

$first_pass=FALSE;

// vytvoříme transakci "bankovní poplatek z 221000 (bank. účty) na 549001 (bank. poplatky)

//a bankovní transakci z parsovaného účtu na null

$this->create_transfers($parsed_acc, $bank_fees, abs($data->fee), $time_now,

$this->parsed_bank_acc, null, $data);

// a bankovní transakci z null na parsovaný účet

$this->create_transfers($bank_interests, $parsed_acc, $data->amount, $time_now,

null, $this->parsed_bank_acc, $data);

$bank_acc->clear();

// $bank_acc->add_account($member_fees); //tuto vazbu bych tvořil jen pokud bych chtěl evidovat pohyby na bank. účtech členů

$id=$this->create_transfers($parsed_acc, $suppliers, abs($data->amount), $time_now,

$this->parsed_bank_acc, $bank_acc, $data);

// vytvoříme transakci "bankovní poplatek z 221000 (bank. účty) na 549001 (bank. poplatky)

//a bankovní transakci z parsovaného účtu na null

$this->create_transfers($parsed_acc, $bank_fees, abs($data->fee), $time_now,

$this->parsed_bank_acc, null, $data);

// členský příspěvek - vytvoříme:

// - podvojnou transakci z 684000 na 221000

// - bankovní transakci z bank. účtu člena na bank. účet sdružení

$id=$this->create_transfers($member_fees, $parsed_acc, $data->amount, $time_now,

$bank_acc, $this->parsed_bank_acc, $data);

// bankovní poplatek - vytvoříme:

// - podvojnou transakci z 221000 (bank. účty) na 549001 (bank. poplatky)

// - bankovní transakci z parsovaného účtu na null

$this->create_transfers($parsed_acc, $bank_fees, abs($data->fee), $time_now,

$this->parsed_bank_acc, null, $data);

$credit_acc->clear();

$credit_acc->account_attribute_id = Account_attribute_Model::$credit;

$credit_acc->member_id = $member->id;

$credit_acc->name = $member->name;

$credit_acc->save();

$amount=$data->amount-abs($data->fee);

$this->create_transfer($parsed_acc, $acc_model,

$amount, $time_now, "Přiřazení platby");

$this->create_transfer($credit_acc, $operating,

$fee->fee-$data->fee, $time_now, "Transakční poplatek");

static $transfer;

if (!isset($transfer)) $transfer=new Transfer_Model();

$transfer->clear();

$transfer->amount = $amount;

$transfer->datetime = $datetime;

$transfer->origin_id = $src->id;

$transfer->destination_id = $dst->id;

$transfer->text= $text;

$transfer->previous_transfer_id = $prev_id;

$transfer->save();

return $transfer->id;

private function create_transfers($src_acc, $dst_acc, $amount, $time_now,

$src_bank_acc, $dst_bank_acc, $data) {

static $transfer;

static $bank_transfer;

if (!isset($transfer)) {

$transfer=new Transfer_Model();

$bank_transfer=new Bank_transfer_Model();

}

// nejdriv zkontroluj, jestli uz tuto transakci nemame od minuleho importu

if ($bank_transfer->exists($data)) throw new Duplicity_Exception();

$transfer->clear();

$transfer->amount = $amount;

$transfer->datetime = $time_now;

$transfer->origin_id = $src_acc->id;

$transfer->destination_id = $dst_acc->id;

$transfer->text= $data->comment;

$transfer->save();

$bank_transfer->clear();

$bank_transfer->datetime=$data->date_time;

$bank_transfer->transfer_id = $transfer->id;

$bank_transfer->origin_id = isset($src_bank_acc)? $src_bank_acc->id : null;

$bank_transfer->destination_id = isset($dst_bank_acc)? $dst_bank_acc->id : null;

$bank_transfer->variable_symbol = $data->variable_symbol;

$bank_transfer->constant_symbol = $data->constant_symbol;

$bank_transfer->specific_symbol = $data->specific_symbol;

$bank_transfer->save();

return $transfer->id;

}

try {

$parser->parse($url);

} catch (Duplicity_Exception $ex) {

// v případě duplicity commitujeme vše do výskytu duplicity a hned skončíme

echo "Duplicita!!!!";

}

$owner_id = ($this->input->get('account')!=0) ? 'id!='.$this->input->get('account').' AND ' : '';

$accounts = $model_account->where($owner_id.'type!=\'master\' AND type!=\'bank\' AND owner_id='.$acc_id)->find_all();

if ($model_account->acc_type_exist($input->value, $this->owner_id, $this->acc_id) || trim($input->value)=='')

if (!$model_account->acc_type_exist('analytic', $this->owner_id, $this->acc_id) && $input->value != 'analytic')

$owner_id = ($this->acc_id) ? 'id!='.$this->acc_id.' AND ' : '';

$accounts = $model_account->where($owner_id.'type!=\'master\' AND type!=\'bank\' AND owner_id='.$this->sel_member)->find_all();