forum.lissyara.su

Код: Выделить всё

$sth = $dbh->prepare( "SELECT count(*) FROM table where $self->{SQL}->{LIKE}");
$sth->execute();

Код: Выделить всё

$self->{SQL}->{LIKE} = join (" AND ", map { "text LIKE ".$dbh->quote('%'.$_.'%') } @search );

Код: Выделить всё

sub edit {
}
sub add {
}

Код: Выделить всё

package AddressBook::Controller::Address;
use strict;
use warnings;
use base qw(Catalyst::Controller::FormBuilder Catalyst::Controller::
BindLex');
sub add : Local Form('/address/edit') {
    my ($self, $c, $person_id) = @_;
    $c->stash->{template} = 'address/edit.tt2';
    $c->forward('edit', [undef, $person_id]);
}

sub edit : Local Form {
     my ($self, $c, $address_id, $person_id) = @_;
     my $address : Stashed;
     if(!$address_id && $person_id){
         # we're adding a new address to $person
         # check that person exists
         my $person = $c->model('AddressDB::People')->
                                      find({id => $person_id});
	          if(!$person){
	             $c->stash->{error} = 'No such person!';
	             $c->detach('/person/list');
	          }
         # create the new address
	          $address = $c->model('AddressDB::Addresses')->
	                                    new({person => $person});
	
     }
     else {
         $address = $c->model('AddressDB::Addresses')->
                                   find({id => $address_id});
         if(!$address){
             $c->stash->{error} = 'No such address!';
	            $c->detach('/person/list');
         }
     }
     if ($c->form->submitted && $c->form->validate){
	          # transfer data from form to database
         $address->location($c->form->field('location'));
         $address->postal ($c->form->field('postal' ));
         $address->phone    ($c->form->field('phone'    ));
         $address->email    ($c->form->field('email'    ));
         $address->insert_or_update;
         $c->stash->{message} =
             ($address_id > 0 ? 'Updated ' : 'Added new ').
                         'address for '. $address->person->name;
         $c->detach('/person/list');
   }
   else {
       # transfer data from database to form
       if(!$address_id){
            $c->stash->{message} = 'Adding a new address ';
       }

             else {
                 $c->stash->{message} = 'Updating an address ';
             }
             $c->stash->{message} .= ' for '. $address->person->name;
             $c->form->field(name => 'location',
                                  value => $address->location);
             $c->form->field(name => 'postal',
                                  value => $address->postal);
             $c->form->field(name => 'phone',
                                  value => $address->phone);
             $c->form->field(name => 'email',
                                  value => $address->email);
         }
     }
     sub delete : Local {
           my ($self, $c, $address_id) = @_;
           my $address = $c->model('AddressDB::Addresses')->
                                            find({id => $address_id});
           if($address){
     	         # "Deleted First Last's Home address"
     	         $c->stash->{message} =
     	               'Deleted ' . $address->person->name. q{'s }.
     	                     $address->location. ' address';
     	         $address->delete;
           }
           else {
     	         $c->stash->{error} = 'No such address';
           }
           $c->forward('/person/list');
     }
     1;

Код: Выделить всё

    SELECT
    sum(rs.hits) as hits,
    sum(rs.hits * rs.price * o.percent*0.000001) AS hits_amount,
    0 as 'co_author'
    FROM ownership o
    LEFT JOIN read_stats rs ON rs.art = o.art 
        LEFT JOIN ownership o1 ON o1.art = o.art
        JOIN copyrights c ON c.person = o1.person 
    WHERE o.person = ? AND o.relation = ?    AND rs.time >= ? AND rs.time <= ?    AND c.user = ?
    AND o.percent != 0 AND o1.percent != 0 AND o.person = o1.person
    UNION ALL
    SELECT
    sum(rs.hits) as hits,
    sum(rs.hits * rs.price * o.percent*0.000001) AS hits_amount,
    1 as 'co_author'
    FROM ownership o
    LEFT JOIN read_stats rs ON rs.art = o.art 
        LEFT JOIN ownership o1 ON o1.art = o.art
        JOIN copyrights c ON c.person = o1.person 
    WHERE o.person = ? AND o.relation = ?    AND rs.time >= ? AND rs.time <= ?    AND c.user = ?
    AND o.percent != 0 AND o1.percent != 0 AND o.person <> o1.person