Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision bc0e2eda

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

  • ID bc0e2edad8e8f94f85f2a59ceb784b8eb0cda97c
  • Vorgänger 09c8c053
  • Nachfolger 8858a05b

Presenter: Neue Struktur in weiteren Belegen

Unterschiede anzeigen:

bin/mozilla/ar.pl
51 51 
use SL::DB::Tax;
52 52 
use SL::Helper::Flash qw(flash);
53 53 
use SL::Locale::String qw(t8);
54 
use SL::Presenter::Tag;
55 
use SL::Presenter::Chart;
54 56 
use SL::ReportGenerator;
55 57 

  		




  56
  58
  
    
require "bin/mozilla/common.pl";


  		




  ......




  423
  425
  
    
    my $selected_taxchart = $taxchart_to_use->id . '--' . $taxchart_to_use->rate;


  		




  424
  426
  
    

  		




  425
  427
  
    
    $transaction->{selectAR_amount} =


  		




  426
  
  
    
        $::request->presenter->chart_picker("AR_amount_chart_id_$i", $amount_chart_id, style => "width: 400px", type => "AR_amount", class => ($form->{initial_focus} eq "row_$i" ? "initial_focus" : ""))


  		




  427
  
  
    
      . $::request->presenter->hidden_tag("previous_AR_amount_chart_id_$i", $amount_chart_id);


  		




  
  428
  
    
        SL::Presenter::Chart::picker("AR_amount_chart_id_$i", $amount_chart_id, style => "width: 400px", type => "AR_amount", class => ($form->{initial_focus} eq "row_$i" ? "initial_focus" : ""))


  		




  
  429
  
    
      . SL::Presenter::Tag::hidden_tag("previous_AR_amount_chart_id_$i", $amount_chart_id);


  		




  428
  430
  
    

  		




  429
  431
  
    
    $transaction->{taxchart} =


  		




  430
  432
  
    
      NTI($cgi->popup_menu('-name' => "taxchart_$i",


  		




  ......




  1004
  1006
  
    
  $href = build_std_url('action=ar_transactions', grep { $form->{$_} } @hidden_variables);


  		




  1005
  1007
  
    

  		




  1006
  1008
  
    
  my %column_defs = (


  		




  1007
  
  
    
    'ids'                     => { raw_header_data => $::request->presenter->checkbox_tag("", id => "check_all", checkall => "[data-checkall=1]"), align => 'center' },


  		




  
  1009
  
    
    'ids'                     => { raw_header_data => SL::Presenter::Tag::checkbox_tag("", id => "check_all", checkall => "[data-checkall=1]"), align => 'center' },


  		




  1008
  1010
  
    
    'transdate'               => { 'text' => $locale->text('Date'), },


  		




  1009
  1011
  
    
    'id'                      => { 'text' => $locale->text('ID'), },


  		




  1010
  1012
  
    
    'type'                    => { 'text' => $locale->text('Type'), },


  		




  ......




  1182
  1184
  
    
      . "&id=" . E($ar->{id}) . "&callback=${callback}";


  		




  1183
  1185
  
    

  		




  1184
  1186
  
    
    $row->{ids} = {


  		




  1185
  
  
    
      raw_data =>  $::request->presenter->checkbox_tag("id[]", value => $ar->{id}, "data-checkall" => 1),


  		




  
  1187
  
    
      raw_data =>  SL::Presenter::Tag::checkbox_tag("id[]", value => $ar->{id}, "data-checkall" => 1),


  		




  1186
  1188
  
    
      valign   => 'center',


  		




  1187
  1189
  
    
      align    => 'center',


  		




  1188
  1190
  
    
    };


  		












  

    
      bin/mozilla/gl.pl
    
  





  49
  49
  
    
use SL::Webdav;


  		




  50
  50
  
    
use SL::Locale::String qw(t8);


  		




  51
  51
  
    
use SL::Helper::GlAttachments qw(count_gl_attachments);


  		




  
  52
  
    
use SL::Presenter::Tag;


  		




  
  53
  
    
use SL::Presenter::Chart;


  		




  52
  54
  
    
require "bin/mozilla/common.pl";


  		




  53
  55
  
    
require "bin/mozilla/reportgenerator.pl";


  		




  54
  56
  
    

  		




  ......




  836
  838
  
    
    my $selected_taxchart = $taxchart_to_use->id . '--' . $taxchart_to_use->rate;


  		




  837
  839
  
    

  		




  838
  840
  
    
    my $accno = qq|<td>| .


  		




  839
  
  
    
      $::request->presenter->chart_picker("accno_id_$i", $accno_id, style => "width: 300px") .


  		




  840
  
  
    
      $::request->presenter->hidden_tag("previous_accno_id_$i", $accno_id)


  		




  
  841
  
    
      SL::Presenter::Chart::picker("accno_id_$i", $accno_id, style => "width: 300px") .


  		




  
  842
  
    
      SL::Presenter::Tag::hidden_tag("previous_accno_id_$i", $accno_id)


  		




  841
  843
  
    
      . qq|</td>|;


  		




  842
  844
  
    
    my $tax_ddbox = qq|<td>| .


  		




  843
  845
  
    
      NTI($cgi->popup_menu('-name' => "taxchart_$i",


  		












  

    
      bin/mozilla/rp.pl
    
  





  44
  44
  
    
use SL::RP;


  		




  45
  45
  
    
use SL::Iconv;


  		




  46
  46
  
    
use SL::Locale::String qw(t8);


  		




  
  47
  
    
use SL::Presenter::Tag;


  		




  47
  48
  
    
use SL::ReportGenerator;


  		




  48
  49
  
    
use Data::Dumper;


  		




  49
  50
  
    
use List::MoreUtils qw(any);


  		




  ......




  1008
  1009
  
    
  my @columns = qw(statement ct invnumber transdate duedate amount open);


  		




  1009
  1010
  
    

  		




  1010
  1011
  
    
  my %column_defs = (


  		




  1011
  
  
    
    'statement' => { raw_header_data => $::request->presenter->checkbox_tag("checkall", checkall => '[name^=statement_]'), 'visible' => $form->{ct} eq 'customer' ? 'HTML' : 0, align => "center" },


  		




  
  1012
  
    
    'statement' => { raw_header_data => SL::Presenter::Tag::checkbox_tag("checkall", checkall => '[name^=statement_]'), 'visible' => $form->{ct} eq 'customer' ? 'HTML' : 0, align => "center" },


  		




  1012
  1013
  
    
    'ct'        => { 'text' => $form->{ct} eq 'customer' ? $locale->text('Customer') : $locale->text('Vendor'), },


  		




  1013
  1014
  
    
    'invnumber' => { 'text' => $locale->text('Invoice'), },


  		




  1014
  1015
  
    
    'transdate' => { 'text' => $locale->text('Date'), },


  		












Auch abrufbar als:  Unified diff