FreenetIS

'bank_accounts/add/1', 'Add new bank account of association'

->label('ID');

->label('Account name');

$baa_grid->callback_field('type')

->callback('callback::bank_account_type');

->label('Member name');

$actions->add_conditional_action('id')

->condition('is_import_of_statement_available')

if ($this->acl_check_edit('Accounts_Controller', 'bank_accounts'))

{

$actions->add_conditional_action('id')

->icon_action('edit')

->url('bank_accounts/edit');

}

$grid->add_new_button('bank_accounts/add', 'Add new bank account');

->label('Account name');

->label('Account number');

->label('Bank code');

->label('Member name');

public function add($member_id = NULL)

if (!isset($member_id) || $member_id != Member_Model::ASSOCIATION)

$form = new Forge('bank_accounts/add/' . $member_id);

$form->dropdown('type')

->options(Bank_account_Model::get_type_names())

->style('width:200px');

// determinig type

if ($member_id == Member_Model::ASSOCIATION)

{

$type = $form_data["type"];

}

else

{

$type = Bank_account_Model::TYPE_OTHER;

}

$bank_account->name = $form_data['account_name'];

$bank_account->member_id = $member_id;

$bank_account->type = $type;

$bank_account->account_nr = $form_data['account_nr'];

$bank_account->bank_nr = $form_data['bank_nr'];

$bank_account->IBAN = $form_data['IBAN'];

$bank_account->SWIFT = $form_data['SWIFT'];

$doubleentry_bank_account->name = $form_data['account_name'];

$bank_fees_account->name = $form_data['account_name'].' - '.__('Bank fees');

$bank_interests_account->name = $form_data['account_name'].' - '.__('Bank interests');

$view->render(TRUE);

/**

* Enables to edit bank account of association.

*

* @param integer $bank_account_id

public function edit($bank_account_id = NULL)

// param

if (!intval($bank_account_id))

{

self::warning(PARAMETER);

}

// access

if (!$this->acl_check_edit('Accounts_Controller', 'bank_accounts'))

{

self::error(ACCESS);

}

$bank_account = new Bank_account_Model($bank_account_id);

// exists?

if (!$bank_account || !$bank_account->id ||

$bank_account->member_id != Member_Model::ASSOCIATION)

{

self::error(RECORD);

}

try

{

$ba_driver = Bank_Account_Settings::factory($bank_account->type);

$ba_driver->loadColumnData($bank_account->settings);

}

catch (InvalidArgumentException $e)

{

$ba_driver = NULL;

}

// form

$form = new Forge();

$form->group('Basic information');

$form->dropdown('type')

->options(Bank_account_Model::get_type_names())

->selected($bank_account->type)

->style('width:200px');

$form->input('IBAN')

->value($bank_account->IBAN);

$form->input('SWIFT')

->value($bank_account->SWIFT);

// bank account settings

if ($ba_driver && count($ba_driver->getColumnFields()))

$form->group('Settings');

$columns = $ba_driver->getColumnFields();

foreach ($columns as $column => $info)

$input = $form->input($column)->value($ba_driver->$column);

if (isset($info['name']))

$input->label($info['name']);

if (isset($info['help']))

$input->help(help::hint($info['help']));

if (isset($info['rules']))

$input->rules($info['rules']);

}

// submit button

$form->submit('Edit');

// validation

if ($form->validate())

{

$form_data = $form->as_array();

// real bank account

$bank_account->type = $form_data['type'];

$bank_account->IBAN = $form_data['IBAN'];

$bank_account->SWIFT = $form_data['SWIFT'];

if ($ba_driver && count($ba_driver->getColumnFields()))

{

unset($form_data['type']);

unset($form_data['IBAN']);

unset($form_data['SWIFT']);

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

{

$ba_driver->$key = $value;

}

$bank_account->settings = $ba_driver->getColumnData();

$bank_account->save();

// redirection

url::redirect('bank_accounts/show_all');

$headline = __('Edit bank account');

// breadcrubs

$breadcrumbs = breadcrumbs::add()

->link('members/show/1', 'Profile of association',

$this->acl_check_view('Members_Controller', 'members'))

->link('bank_accounts/show_all', 'Bank accounts')

->disable_translation()

->text($bank_account->account_nr . '/' . $bank_account->bank_nr)

->text($headline)

->html();

// view

$view->title = $headline;

$view->breadcrumbs = $breadcrumbs;

$view->content->headline = $headline;

$view->content->form = $form->html();

$view->render(TRUE);

}

/**

* Types of import documents (supported bank listings)

*

* @var array

*/

private static $file_types = array

(

Bank_account_Model::TYPE_RAIFFEISENBANK => 'HTML Raiffeisenbank',

Bank_account_Model::TYPE_FIO => 'Fio CSV',

Bank_account_Model::TYPE_UNICREDIT => 'Unicredit CSV'

);

try

{

$ba_drive = Bank_Account_Settings::factory($bank_acc_model->type);

$ba_drive->loadColumnData($bank_acc_model->settings);

}

catch (InvalidArgumentException $e)

{

$ba_drive = NULL;

}

if (!$ba_drive || !$ba_drive->canImportStatements())

Controller::error(RECORD);

$form->group(__('File') . ' - ' . self::$file_types[$bank_acc_model->type]);

switch ($bank_acc_model->type)

case Bank_account_Model::TYPE_RAIFFEISENBANK:

case Bank_account_Model::TYPE_FIO:

case Bank_account_Model::TYPE_UNICREDIT:

$statement->type = self::$file_types[Bank_account_Model::TYPE_FIO];

$statement->type = self::$file_types[Bank_account_Model::TYPE_RAIFFEISENBANK];

$statement->type = self::$file_types[Bank_account_Model::TYPE_UNICREDIT];

* Bank account type field.

*

* @param object $item

* @param string $name

*/

public static function bank_account_type($item, $name)

{

echo Bank_account_Model::get_type_name($item->$name);

}

/**

/**

* Checks whether the given bank account has capability for automatical

* sownload of bank statements.

*

* @param object $item

* @return boolean

*/

public static function is_automatical_down_of_statement_available($item)

{

try

{

$bas = Bank_Account_Settings::factory($item->type);

return $bas->canDownloadStatementsAutomatically();

}

catch (InvalidArgumentException $e)

{

return FALSE;

}

}

/**

* Checks whether the given bank account has capability for importing of

* bank statement.

*

* @param object $item

* @return boolean

*/

public static function is_import_of_statement_available($item)

{

try

{

$bas = Bank_Account_Settings::factory($item->type);

return $bas->canImportStatements();

}

catch (InvalidArgumentException $e)

{

return FALSE;

}

}

class guid

{

public static function getGUID()

{

mt_srand((double) microtime() * 10000);

$charid = strtoupper(md5(uniqid(rand(), true)));

$hyphen = chr(45); // "-"

$uuid = substr($charid, 0, 8) . $hyphen

. substr($charid, 8, 4) . $hyphen

. substr($charid, 12, 4) . $hyphen

. substr($charid, 16, 4) . $hyphen

. substr($charid, 20, 12);

return $uuid;

}

'edit bank account' => 'Upravit bankovní účet',

'this token can be obtain in the administration of this bank account' => 'Tento token můžete získat v administraci tohoto bankovního účtu',

'token for api' => 'Token pro API',

<?php defined('SYSPATH') or die('No direct script access.');

/*

* This file is part of open source system FreenetIS

* and it is released under GPLv3 licence.

*

* More info about licence can be found:

* http://www.gnu.org/licenses/gpl-3.0.html

*

* More info about project can be found:

* http://www.freenetis.org/

*

*/

/**

* Bank account settings enables to store different types of settings to

* bank account (e.g. API key) in order to type of the bank account.

*

* types of bank account are specified at Bank_Account_Model database entity.

*

* @author Ondrej Fibich

* @see Bank_Account_Model

*/

abstract class Bank_Account_Settings

{

/**

* Dir with driver classes

*/

const DIR = 'bank_account_settings';

// Type constants

/** Integer type */

const FIELD_TYPE_INT = 'integer';

/** String type */

const FIELD_TYPE_STRING = 'string';

/** Data of settings */

private $data = array();

/**

* Creates bank account setting for bank account with given type.

* If an new bank account type will be added, it must be added also

* to this method.

*

* @param integer $type type of bank account (from ORM model)

* @return BankAccountSettings An instance of driver

* @throws InvalidArgumentException On unknown type

*/

public static function factory($type)

{

// class path dir

$cp_dir = dirname(__FILE__) . '/' . self::DIR . '/';

// require class and return it

switch ($type)

{

case Bank_account_Model::TYPE_FIO:

require_once $cp_dir . 'Fio_Bank_Account_Settings.php';

return new Fio_Bank_Account_Settings();

case Bank_account_Model::TYPE_UNICREDIT:

require_once $cp_dir . 'Unicredit_Bank_Account_Settings.php';

return new Unicredit_Bank_Account_Settings();

case Bank_account_Model::TYPE_RAIFFEISENBANK:

require_once $cp_dir . 'Raiffeisenbank_Bank_Account_Settings.php';

return new Raiffeisenbank_Bank_Account_Settings();

}

// invalid type

throw new InvalidArgumentException('Unknown driver for type: ' . $type);

}

/**

* Can be bank statements automatically downloaded (using API) in this

* type of bank?

*

* @return boolean

*/

public abstract function canDownloadStatementsAutomatically();

/**

* Can be bank statements imported in this type of bank?

*

* @return boolean

*/

public abstract function canImportStatements();

/**

* Gets fields array (key is a name of field and value contains a another

* array with fields type, name, help, rules, etc.)

*

* @return array Fields array

*/

public abstract function getColumnFields();

/**

* Gets settings data in JSON format. This method is used for retrieving

* new value in order to store it into a database table.

*

* @return array Settings

*/

public function getColumnData()

{

return json_encode($this->data);

}

/**

* Loads data settings from a given JSON data.

*

* @param string JSON data

*/

public function loadColumnData($json)

{

// init columns

$columns = $this->getColumnFields();

foreach ($columns as $column => $type)

{

$this->data[$column] = NULL;

}

// laod values (only if not empty)

if (!empty($json))

{

$data = json_decode($json, TRUE);

if (!$data)

{

$m = 'Wrong data settings in the database: ' . $json;

throw new InvalidArgumentException($m);

}

foreach ($data as $column => $value)

{

$this->$column = $value; // call setter

}

}

}

/**

* Gets value from the column data.

*

* @param string $column Column name

* @throws InvalidArgumentException On invalid column

*/

public function __get($column)

{

$columns = $this->getColumnFields();

if (!array_key_exists($column, $columns))

{

throw new InvalidArgumentException('Column not founded: ' . $column);

}

return $this->data[$column];

}

/**

* Sets value from the column data.

*

* @param string $column Column name

* @param mixed $data

* @throws InvalidArgumentException On invalid column or invalid data format

*/

public function __set($column, $data)

{

$columns = $this->getColumnFields();

if (!array_key_exists($column, $columns))

{

throw new InvalidArgumentException('Column not founded: ' . $column);

}

if (!empty($data) && isset($columns[$column]['type']))

{

switch ($columns[$column]['type'])

{

case self::FIELD_TYPE_INT:

if (!preg_match('/^[0-9]+$/', $data))

{

$m = 'Invalid integer format: ' . data;

throw new InvalidArgumentException($m);

}

$data = intval($data);

break;

case self::FIELD_TYPE_STRING:

$data = strval($data);

break;

}

$this->data[$column] = $data;

}

else

{

$this->data[$column] = NULL;

}

}

}

<?php defined('SYSPATH') or die('No direct script access.');

/*

* This file is part of open source system FreenetIS

* and it is released under GPLv3 licence.

*

* More info about licence can be found:

* http://www.gnu.org/licenses/gpl-3.0.html

*

* More info about project can be found:

* http://www.freenetis.org/

*

*/

/**

* Bank setting for FIO accounts.

*/

class Fio_Bank_Account_Settings extends Bank_Account_Settings

{

/*

* @Override

*/

public function canImportStatements()

{

return TRUE;

}

/*

* @Override

*/

public function canDownloadStatementsAutomatically()

{

return TRUE;

}

/*

* @Override

*/

public function getColumnFields()

{

return array

(

// API token

'api_token' => array

(

'name' => __('Token for API'),

'help' => __('This token can be obtain in the administration of this bank account'),

'type' => self::FIELD_TYPE_STRING,

)

);

}

}

<?php defined('SYSPATH') or die('No direct script access.');

/*

* This file is part of open source system FreenetIS

* and it is released under GPLv3 licence.

*

* More info about licence can be found:

* http://www.gnu.org/licenses/gpl-3.0.html

*

* More info about project can be found:

* http://www.freenetis.org/

*

*/

/**

* Bank setting for Reiffeisenbank accounts.

*/

class Raiffeisenbank_Bank_Account_Settings extends Bank_Account_Settings

{

/*

* @Override

*/

public function canImportStatements()

{

return TRUE;

}

/*

* @Override

*/

public function canDownloadStatementsAutomatically()

{

return TRUE;

}

/*

* @Override

*/

public function getColumnFields()

{

return array();

}

}

<?php defined('SYSPATH') or die('No direct script access.');

/*

* This file is part of open source system FreenetIS

* and it is released under GPLv3 licence.

*

* More info about licence can be found:

* http://www.gnu.org/licenses/gpl-3.0.html

*

* More info about project can be found:

* http://www.freenetis.org/

*

*/

/**

* Bank setting for UniCredit accounts.

*/

class Unicredit_Bank_Account_Settings extends Bank_Account_Settings

{

/*

* @Override

*/

public function canImportStatements()

{

return TRUE;

}

/*

* @Override

*/

public function canDownloadStatementsAutomatically()

{

return TRUE;

}

/*

* @Override

*/

public function getColumnFields()

{

return array();

}

}

* @property integer $type

* @property string $settings

// type of bank account (bank)

/** Other (unknown) bank account */

const TYPE_OTHER = 0;

/* FIO bank account */

const TYPE_FIO = 1;

/** Unicredit bank account */

const TYPE_UNICREDIT = 2;

/** Raiffeisenbank */

const TYPE_RAIFFEISENBANK = 3;

/**

* Type message names

*

* @var array

*/

private static $type_name = array

(

self::TYPE_OTHER => '',

self::TYPE_FIO => 'FIO',

self::TYPE_UNICREDIT => 'UniCredit',

self::TYPE_RAIFFEISENBANK => 'Raiffeisebank'

);

// db relations

/**

* Get settings driver for managing of bank account settings.

*

* @return BankAccountSettings

* @throws InvalidArgumentException On unsuported type of bank account

*/

public function getSettingsDriver()

{

$driver = Bank_Account_Settings::factory($this->type);

$driver->loadColumnData($this->settings);

return $driver;

}

/**

* Types of bank account (key is type, value is name).

*

* @return array

*/

public static function get_type_names()

{

return self::$type_name;

}

/**

* Type of bank account type name.

*

* @return array

*/

public static function get_type_name($type)

{

if (isset(self::$type_name[$type]))

{

return self::$type_name[$type];

}

return self::NULL;

}

CONCAT(ba.account_nr, '/', ba.bank_nr) AS account_number,

ba.type, ba.settings

m.name AS member_name, ba.member_id, ba.type, ba.settings

<?php defined('SYSPATH') or die('No direct script access.');

/*

* This file is part of open source system FreenetIS

* and it is released under GPLv3 licence.

*

* More info about licence can be found:

* http://www.gnu.org/licenses/gpl-3.0.html

*

* More info about project can be found:

* http://www.freenetis.org/

*

*/

/**

* This upgrade is not equal to any of previos upgrades

*

* @author Ondřej Fibich <ondrej.fibich@gmail.com>

*/

$upgrade_equal_to['1.1.0~alpha35'] = array();

/**

* Columns for bank account settings.

*

* @author Ondřej Fibich <ondrej.fibich@gmail.com>

*/

$upgrade_sql['1.1.0~alpha35'] = array

(

"ALTER TABLE `bank_accounts` ADD `type` INT NOT NULL DEFAULT '0' AFTER `bank_nr`;",

"ALTER TABLE `bank_accounts` ADD `settings` TEXT NULL COMMENT 'JSON' AFTER `type`;"

);

<table cellspacing="4" class="form" style="background: #F1F1F1">

define('FREENETIS_VERSION', '1.1.0~alpha35');