Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision a85900cb

Von Hans Peter Schlaepfer vor etwa 6 Jahren hinzugefügt

  • ID a85900cb68a578d89090043534ae79664a4070a9
  • Vorgänger 72c4037d
  • Nachfolger e7c11f83

Preview design 4.0

Unterschiede anzeigen:

bin/mozilla/oe.pl
321 321 
        t8('Update'),
322 322 
        submit    => [ '#form', { action => "update" } ],
323 323 
        id        => 'update_button',
324 
        class     => 'inline',
324 325 
        accesskey => 'enter',
325 326 
      ],
326 327 

  		




  ......




  640
  641
  
    
    $TMPL_VAR->{transport_cost_reminder_article} = SL::DB::Part->new(id => $::instance_conf->get_transport_cost_reminder_article_number_id)->load;


  		




  641
  642
  
    
  }


  		




  642
  643
  
    

  		




  
  644
  
    
  # following 4 lines came from form_footer, comments/notes are now in upper part of the page


  		




  
  645
  
    
  my $introws = max 5, $form->numtextrows($form->{intnotes}, 35, 8);


  		




  
  646
  
    

  		




  
  647
  
    
  my $TMPL_VAR = $::request->cache('tmpl_var', {});


  		




  
  648
  
    

  		




  
  649
  
    
  $TMPL_VAR->{notes}    = qq|<textarea name="notes" class="texteditor" wrap="soft" style="width: 300px; height: 150px">| . H($form->{notes}) . qq|</textarea>|;


  		




  
  650
  
    
  $TMPL_VAR->{intnotes} = qq|<textarea name=intnotes rows="$introws" cols="35">| . H($form->{intnotes}) . qq|</textarea>|;


  		




  
  651
  
    

  		




  
  652
  
    

  		




  
  653
  
    

  		




  
  654
  
    

  		




  643
  655
  
    
  print $form->parse_html_template("oe/form_header", {


  		




  644
  656
  
    
    %$TMPL_VAR,


  		




  645
  657
  
    
    %type_check_vars,


  		




  ......




  659
  671
  
    

  		




  660
  672
  
    
  $form->{invtotal} = $form->{invsubtotal};


  		




  661
  673
  
    

  		




  662
  
  
    
  my $introws = max 5, $form->numtextrows($form->{intnotes}, 35, 8);


  		




  
  674
  
    
  #my $introws = max 5, $form->numtextrows($form->{intnotes}, 35, 8);


  		




  663
  675
  
    

  		




  664
  676
  
    
  my $TMPL_VAR = $::request->cache('tmpl_var', {});


  		




  665
  677
  
    

  		




  666
  
  
    
  $TMPL_VAR->{notes}    = qq|<textarea name="notes" class="texteditor" wrap="soft" style="width: 350px; height: 150px">| . H($form->{notes}) . qq|</textarea>|;


  		




  667
  
  
    
  $TMPL_VAR->{intnotes} = qq|<textarea name=intnotes rows="$introws" cols="35">| . H($form->{intnotes}) . qq|</textarea>|;


  		




  
  678
  
    
  #$TMPL_VAR->{notes}    = qq|<textarea name="notes" class="texteditor" wrap="soft" style="width: 350px; height: 150px">| . H($form->{notes}) . qq|</textarea>|;


  		




  
  679
  
    
  #$TMPL_VAR->{intnotes} = qq|<textarea name=intnotes rows="$introws" cols="35">| . H($form->{intnotes}) . qq|</textarea>|;


  		




  668
  680
  
    

  		




  669
  681
  
    
  if( $form->{customer_id} && !$form->{taxincluded_changed_by_user} ) {


  		




  670
  682
  
    
    my $customer = SL::DB::Customer->new(id => $form->{customer_id})->load();


  		












Auch abrufbar als:  Unified diff