source: trunk/Modules/Subject/Subject.php@ 738

<?php

class ModuleSubject extends AppModule
{
  function __construct($System)
  {
    parent::__construct($System);
    $this->Name = 'Subject';
    $this->Version = '1.0';
    $this->Creator = 'Chronos';
    $this->License = 'GNU/GPL';
    $this->Description = 'Subject management';
    $this->Dependencies = array('User');
  }

  function DoStart()
  {
    $this->System->FormManager->RegisterClass('Subject', array(
      'Title' => 'Subjekty',
      'Table' => 'Subject',
      'DefaultSortColumn' => 'Name',
      'Items' => array(
        'Id' => array('Type' => 'Integer', 'Caption' => 'Identifikace', 'Default' => '', 'ReadOnly' => true),
        'Name' => array('Type' => 'String', 'Caption' => 'Celé jméno', 'Default' => ''),
        'AddressStreet' => array('Type' => 'String', 'Caption' => 'Ulice', 'Default' => ''),
        'AddressTown' => array('Type' => 'String', 'Caption' => 'Město', 'Default' => ''),
        'AddressPSC' => array('Type' => 'String', 'Caption' => 'PSČ', 'Default' => ''),
        'AddressCountry' => array('Type' => 'TCountry', 'Caption' => 'Země', 'Default' => ''),
        'IC' => array('Type' => 'String', 'Caption' => 'IČ', 'Default' => ''),
        'DIC' => array('Type' => 'String', 'Caption' => 'DIČ', 'Default' => ''),
        'MapPosition' => array('Type' => 'TMapPosition', 'Caption' => 'Pozice na mapě', 'Default' => '', 'Null' => true),
        'WWW' => array('Type' => 'Hyperlink', 'Caption' => 'WWW', 'Default' => ''),
        'Note' => array('Type' => 'String', 'Caption' => 'Poznámka', 'Default' => ''),
        'Customer' => array('Type' => 'TMemberListSubject', 'Caption' => 'Členové', 'Default' => ''),
        'Operations' => array('Type' => 'TFinanceOperationListSubject', 'Caption' => 'Platby', 'Default' => ''),
        'Invoices' => array('Type' => 'TFinanceInvoiceListSubject', 'Caption' => 'Faktury', 'Default' => ''),
        'Payment' => array('Type' => 'Float', 'Caption' => 'Placení', 'Default' => '',
          'ReadOnly' => true, 'Suffix' => 'Kč', 'SQL' => 'IFNULL((SELECT SUM(`FinanceOperation`.`Value` * `FinanceOperation`.`Direction`) FROM `FinanceOperation` '.
          'WHERE `FinanceOperation`.`Subject`=#Id), 0) - IFNULL((SELECT SUM(`FinanceInvoice`.`Value` * `FinanceInvoice`.`Direction`) FROM `FinanceInvoice` '.
          'WHERE `FinanceInvoice`.`Subject`=#Id), 0)'),
        'BankAccounts' => array('Type' => 'TFinanceBankAccountListSubject', 'Caption' => 'Bankovní účety', 'Default' => ''),
      ),
    ));
    $this->System->FormManager->RegisterFormType('TFinanceBankAccountListSubject', array(
      'Type' => 'ManyToOne',
      'Table' => 'FinanceBankAccount',
      'Id' => 'Id',
      'Ref' => 'Subject',
      'Filter' => '1',
    ));
    $this->System->FormManager->RegisterClass('SubjectReport', array(
      'Title' => 'Přehled subjektů',
      'Table' => 'SubjectReport',
      'DefaultSortColumn' => 'Id',
      'SQL' => '(SELECT Id FROM Subject)',
      'Items' => array(
        'Id' => array('Type' => 'TSubject', 'Caption' => 'Subjekt', 'Default' => '', 'ReadOnly' => true),
        'Income' => array('Type' => 'Integer', 'Caption' => 'Příjmy', 'Default' => '0', 'Suffix' => 'Kč', 'ReadOnly' => true,
          'SQL' => '(SELECT ROUND(SUM(`FinanceOperation`.`Value` * `FinanceOperation`.`Direction`)) FROM `FinanceOperation` WHERE (`FinanceOperation`.`Subject` = TX.`Id`) '.
          'AND (`FinanceOperation`.`Direction` = 1))'),
        'Spending' => array('Type' => 'Integer', 'Caption' => 'Výdaje', 'Default' => '0', 'Suffix' => 'Kč', 'ReadOnly' => true,
          'SQL' => '(SELECT -ROUND(SUM(`FinanceOperation`.`Value` * `FinanceOperation`.`Direction`)) FROM `FinanceOperation` WHERE (`FinanceOperation`.`Subject` = TX.`Id`) '.
          'AND (`FinanceOperation`.`Direction` = -1))'),
        'OperationBalance' => array('Type' => 'Integer', 'Caption' => 'Zisk', 'Default' => '0', 'Suffix' => 'Kč', 'ReadOnly' => true,
          'SQL' => '(SELECT ROUND(SUM(`FinanceOperation`.`Value` * `FinanceOperation`.`Direction`)) FROM `FinanceOperation` WHERE (`FinanceOperation`.`Subject` = TX.`Id`) '.
          ')'),
      ),
    ));
    $this->System->FormManager->RegisterFormType('TContactCategory', array(
      'Type' => 'Reference',
      'Table' => 'ContactCategory',
      'Id' => 'Id',
      'Name' => 'Name',
      'Filter' => '1',
    ));
    $this->System->FormManager->RegisterFormType('TContactListCategory', array(
      'Type' => 'ManyToOne',
      'Table' => 'Contact',
      'Id' => 'Id',
      'Ref' => 'Category',
      'Filter' => '1',
    ));
    $this->System->FormManager->RegisterFormType('TContactListUser', array(
      'Type' => 'ManyToOne',
      'Table' => 'Contact',
      'Id' => 'Id',
      'Ref' => 'User',
      'Filter' => '1',
    ));
    $this->System->FormManager->RegisterClass('Contact', array(
      'Title' => 'Kontakty',
      'Table' => 'Contact',
      'Items' => array(
        'Category' => array('Type' => 'TContactCategory', 'Caption' => 'Druh', 'Default' => ''),
        'Value' => array('Type' => 'String', 'Caption' => 'Hodnota', 'Default' => ''),
        'User' => array('Type' => 'TUser', 'Caption' => 'Uživatel', 'Default' => '', 'Null' => true),
        'Subject' => array('Type' => 'TSubject', 'Caption' => 'Subject', 'Default' => '', 'Null' => true),
        'Description' => array('Type' => 'String', 'Caption' => 'Popis', 'Default' => ''),
        'Receive' => array('Type' => 'Boolean', 'Caption' => 'Přijímat zprávy', 'Default' => '0'),
      ),
    ));
    $this->System->FormManager->RegisterClass('ContactCategory', array(
      'Title' => 'Druh kontaktu',
      'Table' => 'ContactCategory',
      'Items' => array(
        'Name' => array('Type' => 'String', 'Caption' => 'Jméno', 'Default' => ''),
        'Items' => array('Type' => 'TContactListCategory', 'Caption' => 'Kontakty'),
      ),
    ));
    $this->System->FormManager->RegisterFormType('TSubject', array(
      'Type' => 'Reference',
      'Table' => 'Subject',
      'Id' => 'Id',
      'Name' => 'Name',
      'Filter' => '1',
    ));
  }
}