Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 0aa885f4

Von Sven Schöling vor etwa 7 Jahren hinzugefügt

  • ID 0aa885f4f0bb531a7691a641f954ff296ffa04a5
  • Vorgänger 6ef53d3f
  • Nachfolger 9c29f718

Presenter: Neue Struktur in Belegen umgesetzt

Unterschiede anzeigen:

bin/mozilla/io.pl
53 53 
use SL::IO;
54 54 
use SL::File;
55 55 
use SL::PriceSource;
56 
use SL::Presenter::Part;
56 57 

  		




  57
  58
  
    
use SL::DB::Contact;


  		




  58
  59
  
    
use SL::DB::Customer;


  		




  ......




  308
  309
  
    

  		




  309
  310
  
    

  		




  310
  311
  
    
    $column_data{partnumber}    = $cgi->textfield(-name => "partnumber_$i",    -id => "partnumber_$i",    -size => 12, -value => $form->{"partnumber_$i"});


  		




  311
  
  
    
    $column_data{type_and_classific} = $::request->presenter->type_abbreviation($form->{"part_type_$i"}).


  		




  312
  
  
    
                                       $::request->presenter->classification_abbreviation($form->{"classification_id_$i"}) if $form->{"id_$i"};


  		




  
  312
  
    
    $column_data{type_and_classific} = SL::Presenter::Part::type_abbreviation($form->{"part_type_$i"}).


  		




  
  313
  
    
                                       SL::Presenter::Part::classification_abbreviation($form->{"classification_id_$i"}) if $form->{"id_$i"};


  		




  313
  314
  
    
    $column_data{description} = (($rows > 1) # if description is too large, use a textbox instead


  		




  314
  315
  
    
                                ? $cgi->textarea( -name => "description_$i", -id => "description_$i", -default => $form->{"description_$i"}, -rows => $rows, -columns => 30)


  		




  315
  316
  
    
                                : $cgi->textfield(-name => "description_$i", -id => "description_$i",   -value => $form->{"description_$i"}, -size => 30))


  		












Auch abrufbar als:  Unified diff