Revision 492 (by vperunova, 2015/05/06 12:26:37) |
Data objects for cards |
package payments::Card;
use base "Contenido::Document";
sub extra_properties
{
return (
{ 'attr' => 'status', 'type' => 'status', 'rusname' => 'Статус карты оплаты',
'cases' => [
[0, 'Карта не активна'],
[1, 'Карта активна'],
[2, 'Истек срок действия карты'],
[3, 'Карта заблокирована'],
],
},
{ 'attr' => 'type', 'type' => 'status', 'rusname' => 'Тип карты оплаты',
'cases' => [
[0, 'MasterCard'],
[1, 'Visa'],
],
},
)
}
sub class_name
{
return 'Payments: Банковская карта';
}
sub class_description
{
return 'Payments: Карта';
}
sub class_table
{
return 'payments::SQL::CardsTable';
}
1;