Index: Order.pm =================================================================== --- Order.pm (revision 412) +++ Order.pm (revision 413) @@ -23,6 +23,7 @@ _previous_days_filter _s_filter + _payment_filter _uid_filter _manager_filter _vault_filter @@ -157,6 +158,16 @@ 'db_field' => 'status', 'db_type' => 'integer', }, + { + 'attr' => 'payment', + 'type' => 'checkbox', + 'postshow' => 1, + 'facilshow' => 1, + 'column' => 8, + 'rusname' => 'Оплачен', + 'db_field' => 'payment', + 'db_type' => 'integer', + }, ); # ---------------------------------------------------------------------------- @@ -188,6 +199,12 @@ return undef; } +sub _payment_filter { + my ($self,%opts)=@_; + return undef unless ( exists $opts{payment} ); + return &SQL::Common::_generic_int_filter('d.payment', $opts{payment}); +} + sub _uid_filter { my ($self,%opts)=@_; return undef unless ( exists $opts{uid} );