Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 25000c1e

Von Moritz Bunkus vor mehr als 7 Jahren hinzugefügt

  • ID 25000c1e78ff40c097ea0872d46a9a8da4608313
  • Vorgänger aae306cd
  • Nachfolger 012f8a7f

Verkaufswertbericht: keine Multibox mehr nutzen

Unterschiede anzeigen:

bin/mozilla/vk.pl
36 36 
use List::Util qw(sum first);
37 37 

  		




  38
  38
  
    
use SL::AM;


  		




  
  39
  
    
use SL::DB::Employee;


  		




  39
  40
  
    
use SL::VK;


  		




  40
  41
  
    
use SL::IS;


  		




  41
  42
  
    
use SL::ReportGenerator;


  		




  ......




  57
  58
  
    

  		




  58
  59
  
    
  my ($customer);


  		




  59
  60
  
    

  		




  60
  
  
    
  # setup customer selection


  		




  61
  
  
    
  $form->all_vc(\%myconfig, "customer", "AR");


  		




  
  61
  
    
  $::request->layout->add_javascripts("autocomplete_project.js");


  		




  62
  62
  
    

  		




  63
  63
  
    
  $form->{title}    = $locale->text('Sales Report');


  		




  64
  64
  
    

  		




  65
  
  
    
  $form->get_lists("projects"        => { "key" => "ALL_PROJECTS", "all" => 1 },


  		




  66
  
  
    
                   "departments"     => "ALL_DEPARTMENTS",


  		




  
  65
  
    
  $form->get_lists("departments"     => "ALL_DEPARTMENTS",


  		




  67
  66
  
    
                   "business_types"  => "ALL_BUSINESS_TYPES",


  		




  68
  67
  
    
                   "salesmen"        => "ALL_SALESMEN",


  		




  69
  
  
    
                   'employees'       => 'ALL_EMPLOYEES',


  		




  70
  
  
    
                   'partsgroup'      => 'ALL_PARTSGROUPS',


  		




  71
  
  
    
                   "customers"       => "ALL_VC");


  		




  
  68
  
    
                   'partsgroup'      => 'ALL_PARTSGROUPS');


  		




  
  69
  
    

  		




  
  70
  
    
  $form->{ALL_EMPLOYEES} = SL::DB::Manager::Employee->get_all_sorted;


  		




  
  71
  
    

  		




  72
  72
  
    
  $form->{CUSTOM_VARIABLES_IC}                  = CVar->get_configs('module' => 'IC');


  		




  73
  73
  
    
  ($form->{CUSTOM_VARIABLES_FILTER_CODE_IC},


  		




  74
  74
  
    
   $form->{CUSTOM_VARIABLES_INCLUSION_CODE_IC}) = CVar->render_search_options('variables'      => $form->{CUSTOM_VARIABLES_IC},


  		




  ......




  80
  80
  
    
   $form->{CUSTOM_VARIABLES_INCLUSION_CODE_CT}) = CVar->render_search_options('variables'      => $form->{CUSTOM_VARIABLES_CT},


  		




  81
  81
  
    
                                                                           'include_prefix' => 'l_',


  		




  82
  82
  
    
                                                                           'include_value'  => 'Y');


  		




  83
  
  
    
  $form->{vc_keys}   = sub { "$_[0]->{name}--$_[0]->{id}" };


  		




  84
  
  
    
  $form->{employee_labels} = sub { $_[0]->{"name"} || $_[0]->{"login"} };


  		




  85
  
  
    
  $form->{salesman_labels} = $form->{employee_labels};


  		




  86
  
  
    

  		




  87
  83
  
    
  $form->header;


  		




  88
  84
  
    
  print $form->parse_html_template('vk/search_invoice', { %myconfig });


  		




  89
  85
  
    

  		












Auch abrufbar als:  Unified diff