projekt kivitendo

use Rose::Object::MakeMethods::Generic

(

  scalar                  => [ qw(item visible_item visible_section clicked_item sections) ],

);

__PACKAGE__->run_before('check_auth');

#

sub action_ajax_list {

  if (!$::form->{clicked_id}) {

    # Clicked on "sections" in the tree. Do nothing.

  }

  my $clicked_item = SL::DB::RequirementSpecItem->new(id => $::form->{clicked_id})->load;

  $self->item($clicked_item->section);

  if (!$self->visible_section || ($self->visible_section->id != $self->item->id)) {

  } else {

  }

}

sub insert_new_item_in_section_view {

  my $new_type  = $self->item->item_type;

  my $id_prefix = $new_type eq 'sub-function-block' ? 'sub-' : '';

  my $next_item = $self->item->get_next_in_list;

  if ($next_item) {

  } else {

    my $parent_is_section = $self->item->parent->item_type eq 'section';

  }

}

sub action_dragged_and_dropped {

    $self->item->add_to_list(position => $position, reference => $::form->{dropped_id} || undef);

  });

  $self->item(SL::DB::RequirementSpecItem->new(id => $self->item->id)->load);

  my $new_section         = $self->item->section;

  my $new_type            = $self->item->item_type;

  my $new_visible_section = SL::DB::RequirementSpecItem->new(id => $self->visible_item->id)->load->section;

  # From here on $old_visible_section is definitely set.

  if ($old_visible_section->id != $new_visible_section->id) {

    # The currently visible item has been dragged to a different section.

      ->render($self);

  }

  if ($old_visible_section->id == $old_section->id) {

    my $id_prefix = $old_type eq 'sub-function-block' ? 'sub-' : '';

    if ($old_type eq 'sub-function-block') {

    } elsif (0 == scalar(@{ $old_section->children })) {

    }

  }

  if ($old_visible_section->id == $new_section->id) {

  }

}

sub action_ajax_add_section {

  my $insert_after = $::form->{id} ? SL::DB::RequirementSpecItem->new(id => $::form->{id})->load->section->id : undef;

  my $html         = $self->render('requirement_spec_item/_section_form', { output => 0 }, id_base => 'new_section', insert_after => $insert_after);

    ->remove('#new_section_form')

    ->hide('#column-content > *')

    ->appendTo($html, '#column-content')

sub action_ajax_create {

  my ($self, %params) = @_;

  my $prefix          = $::form->{form_prefix} || die "Missing parameter 'form_prefix'";

  my $attributes      = $::form->{$prefix}     || die "Missing parameter group '${prefix}'";

  my $insert_after    = delete $attributes->{insert_after};

  my @errors = $self->item(SL::DB::RequirementSpecItem->new(%{ $attributes }))->validate;

  $self->item->save;

  $self->item->add_to_list(position => 'after', reference => $insert_after) if $insert_after;

  if ($type eq 'section') {

    my $node = $self->presenter->requirement_spec_item_jstree_data($self->item);

      ->jstree->create_node('#tree', $insert_after ? ('#fb-' . $insert_after, 'after') : ('#sections', 'last'), $node)

      ->jstree->select_node('#tree', '#fb-' . $self->item->id)

      ->render($self);

  my $html     = $self->render($template, { output => 0 }, requirement_spec_item => $self->item, id_prefix => $type eq 'function-block' ? '' : 'sub-');

  my $node     = $self->presenter->requirement_spec_item_jstree_data($self->item);

}

sub action_ajax_edit {

  $self->item(SL::DB::RequirementSpecItem->new(id => $::form->{id})->load);

  if (!$self->is_item_visible) {

    # Show section/item to edit if it is not visible.

    my $html = $self->render('requirement_spec_item/_section', { output => 0 }, requirement_spec_item => $self->item->section);

  }

  if ($self->item->item_type =~ m/section/) {

    # Edit the section header, not an item.

    my $html = $self->render('requirement_spec_item/_section_form', { output => 0 });

    return;

  }

  my $id_base               = 'edit_function_block_' . $self->item->id;

  my $content_top_id        = '#' . $self->item->item_type . '-content-top-' . $self->item->id;

}

sub action_ajax_update {

  my ($self, %params) = @_;

  my $prefix     = $::form->{form_prefix} || die "Missing parameter 'form_prefix'";

  my $attributes = $::form->{$prefix}     || {};

  }

  my @errors = $self->item->assign_attributes(%{ $attributes })->validate;

  $self->item->save;

    my $html = $self->render('requirement_spec_item/_section_header', { output => 0 }, requirement_spec_item => $self->item);

      ->remove('#edit_section_form')

      ->html('#section-header-' . $self->item->id, $html)

      ->show('#section-header-' . $self->item->id)

  my $html_top     = $self->render('requirement_spec_item/_function_block_content_top',    { output => 0 }, requirement_spec_item => $self->item, id_prefix => $id_prefix);

  $id_prefix      .= 'function-block-content-';

    ->remove('#' . $prefix . '_form')

    ->replaceWith('#' . $id_prefix . 'top-' . $self->item->id, $html_top)

    ->jstree->rename_node('#tree', '#fb-' . $self->item->id, $::request->presenter->requirement_spec_item_tree_node_title($self->item));

}

sub action_ajax_delete {

  my ($self) = @_;

  my $full_list = $self->item->get_full_list;

  $self->item->delete;

    my $new_section = first { $_->id != $self->item->id } @{ $self->item->requirement_spec->sections };

    if ($new_section) {

    } else {

      my $html = $self->render('requirement_spec_item/_no_section', { output => 0 });

    }

  } elsif ($self->is_item_visible) {

    # Item in currently visible section is deleted.

    my $type = $self->item->item_type;

    if (1 == scalar @{ $full_list }) {

      if ($type eq 'function-block') {

      } elsif ($type eq 'sub-function-block') {

      }

    }

  }

}

sub action_ajax_flag {

  $self->item->update_attributes(is_flagged => !$self->item->is_flagged);

   ->action_if($self->is_item_visible, 'toggleClass', '#' . $self->item->item_type . '-' . $self->item->id, 'flagged')

   ->toggleClass('#fb-' . $self->item->id, 'flagged')

   ->render($self);

  my ($self, %params) = @_;

  SL::Clipboard->new->copy($self->item);

}

sub determine_paste_position {

}

sub create_and_insert_node_rec {

  my $node = $self->presenter->requirement_spec_item_jstree_data($item);

}

sub action_ajax_paste {

  my ($self, %params) = @_;

  my $copied = SL::Clipboard->new->get_entry(qr/^RequirementSpecItem$/);

  if (!$copied) {

  }

  $self->item($self->assign_requirement_spec_id_rec($copied->to_object));

  $self->sections($req_spec->sections);

  if (($self->item->item_type ne 'section') && !@{ $self->sections }) {

  }

  $self->clicked_item($::form->{id} ? SL::DB::RequirementSpecItem->new(id => $::form->{id})->load : undef);

  $self->item->add_to_list(position => 'after', reference => $insert_after) if $insert_after;

  # Update the tree: create the node for all pasted objects.

  # Pasting the very first section?

  if (!@{ $self->sections }) {

    my $html = $self->render('requirement_spec_item/_section', { output => 0 }, requirement_spec_item => $self->item);

  }

  # Update the current view if required.

}

#

  return SL::DB::Manager::RequirementSpecRisk->get_all_sorted;

}

sub replace_bottom {

  my $item      = (ref($item_or_id) ? $item_or_id : SL::DB::RequirementSpecItem->new(id => $item_or_id))->load;

  my $id_prefix = $item->item_type eq 'function-block' ? '' : 'sub-';

  my $html      = $self->render('requirement_spec_item/_function_block_content_bottom', { output => 0 }, requirement_spec_item => $item, id_prefix => $id_prefix);

}

sub render_list {

  my $html = $self->render('requirement_spec_item/_section', { output => 0 }, requirement_spec_item => $item);

}

sub select_node {

}

sub create_dependency_item {

    insert_after          => $insert_position eq 'insertAfter' ? $insert_reference : undef,

  );

  my $new_section = $self->item->section;

  if (!$self->is_item_visible) {

    # Show section/item to edit if it is not visible.

    $html = $self->render('requirement_spec_item/_section', { output => 0 }, requirement_spec_item => $new_section);

  }

  # $::lxdebug->message(0, "alright! clicked ID " . $::form->{id} . " type $clicked_type new_type $new_type insert_pos $insert_position ref " . ($insert_reference // '<undef>') . " parent $parent_id display_ref $display_reference");

}

sub is_item_visible {