projekt kivitendo

  my $form                    = $::form;

  my $change_never            = $::instance_conf->get_is_changeable == 0;

  my $change_on_same_day_only = $::instance_conf->get_is_changeable == 2 && ($form->current_date(\%::myconfig) ne $form->{gldate});

  for my $bar ($::request->layout->get('actionbar')) {

    $bar->add(

        submit    => [ '#form', { action => "update" } ],

        disabled  => $form->{locked} ? t8('The billing period has already been locked.') : undef,

        id        => 'update_button',

        accesskey => 'enter',

      ],

        action => [

          t8('Post'),

          submit   => [ '#form', { action => "post" } ],

          disabled => $form->{locked}                           ? t8('The billing period has already been locked.')

                    : $form->{storno}                           ? t8('A canceled invoice cannot be posted.')

                    : ($form->{id} && $change_never)            ? t8('Changing invoices has been disabled in the configuration.')

        action => [

          t8('Post Payment'),

          submit   => [ '#form', { action => "post_payment" } ],

          disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef,

        ],

        action => [ t8('Mark as paid'),

        action => [ t8('Storno'),

          submit   => [ '#form', { action => "storno" } ],

          confirm  => t8('Do you really want to cancel this invoice?'),

          disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef,

        ],

        action => [ t8('Delete'),

          submit   => [ '#form', { action => "delete" } ],

          confirm  => t8('Do you really want to delete this object?'),

          disabled => !$form->{id}             ? t8('This invoice has not been posted yet.')

                    : $form->{locked}          ? t8('The billing period has already been locked.')

                    : $change_never            ? t8('Changing invoices has been disabled in the configuration.')

        action => [

          t8('Use As New'),

          submit   => [ '#form', { action => "use_as_new" } ],

          disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef,

        ],

        action => [

          t8('Credit Note'),

          submit   => [ '#form', { action => "credit_note" } ],

          disabled => $form->{type} eq "credit_note" ? t8('Credit notes cannot be converted into other credit notes.')

                    : !$form->{id}                   ? t8('This invoice has not been posted yet.')

                    :                                  undef,

        action => [

          t8('Sales Order'),

          submit   => [ '#form', { action => "order" } ],

          disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef,

        ],

      ], # end of combobox "Workflow"

        action => [

          ($form->{id} ? t8('Print') : t8('Preview')),

          call     => [ 'kivi.SalesPurchase.show_print_dialog', $form->{id} ? 'print' : 'preview' ],

          disabled => !$form->{id} && $form->{locked} ? t8('The billing period has already been locked.') : undef,

        ],

        action => [ t8('Print and Post'),

          call     => [ 'kivi.SalesPurchase.show_print_dialog', $form->{id} ? 'print' : 'print_and_post' ],

          disabled => $form->{id} ? t8('This invoice has already been posted.') : undef,,

        ],

        action => [ t8('E Mail'),

          call     => [ 'kivi.SalesPurchase.show_email_dialog' ],

          disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef,

        ],

      ], # end of combobox "Export"

      ], # end of combobox "more"

    );

  }

}

sub form_header {

        </tr>

        <tr>

          <th align="right">[% 'Transaction description' | $T8 %]</th>

        </tr>

      </table>

    </td>