-
Order.pm
433 434 25 25 26 26 _payment_filter 27 27 _uid_filter 28 _company_filter 28 29 _manager_filter 29 30 _vault_filter 30 31 _postman_filter … … 74 75 'db_opts' => "not null default 0", 75 76 'default' => 0, 76 77 }, 78 { 79 'attr' => 'company_id', 80 'type' => 'integer', 81 'rusname' => 'ID компании', 82 'hidden' => 1, 83 'db_field' => 'company_id', 84 'db_type' => 'integer', 85 'db_opts' => "not null default 0", 86 'default' => 0, 87 }, 77 88 { # User ID 78 89 'attr' => 'manager_id', 79 90 'type' => 'string', … … 211 222 return &SQL::Common::_generic_int_filter('d.uid', $opts{uid}); 212 223 } 213 224 225 sub _company_filter { 226 my ($self,%opts)=@_; 227 return undef unless ( exists $opts{company_id} ); 228 return &SQL::Common::_generic_int_filter('d.company_id', $opts{company_id}); 229 } 230 214 231 sub _manager_filter { 215 232 my ($self,%opts)=@_; 216 233 return undef unless ( exists $opts{manager} );