my $data = 0;
my $j = 0;
my $anykey;
$calls->{'call_'.raised_num()}->{'main'}{$_}{'selected'} and $anykey = $_ for (keys %{$calls->{'call_'.raised_num()}->{'main'}});
foreach (@{$calls->{'call_'.raised_num()}->{'main'}{$anykey}{'value'}}) {
	# ... $calls->{'call_'.raised_num()}->{'main_ordered'}
	my $pane_counter_2 = 0;
	if ($shown_rows > $j) {
		foreach my $column (@{$calls->{'call_'.raised_num()}->{'main_ordered'}}) {
			foreach my $hashname (@{$calls->{'call_'.raised_num()}->{'main_show'}}) {
				if (defined ($calls->{'call_'.raised_num()}->{$hashname}{$column}{'selected'}) and $calls->{'call_'.raised_num()}->{$hashname}{$column}{'selected'}) {
					if ($pane_counter_2 == 0) {
						$entries_numbers->[raised_num()]->[$j] = $panes->{'pane_fixed_'.raised_num()}->Entry(
							-text 			=> $j+1,
							-width			=> 7
						)->grid(
							-row 			=> $rows->{'pane_fixed_'.raised_num()},
							-column 		=> $data,
							-sticky			=> 'w'
						);
						my @numbers_info = $entries_numbers->[raised_num()]->[$j]->gridInfo;
						print 'gridder numbers: all gridInfo:';
						print $_." " foreach @numbers_info;
						print "\n";
						$entries_numbers->[raised_num()]->[$j]->bind("<MouseWheel>", \&scroller);
					}
					elsif ($pane_counter_2 == 1) {
						$entries_fixed->[raised_num()]->[$j][$pane_counter_2] = $panes->{'pane_fixed_'.raised_num()}->Entry(
							-text 			=> $calls->{'call_'.raised_num()}->{$hashname}{$column}{'value'}[$j],
							-width			=> 22
						)->grid(
							-row 			=> $rows->{'pane_fixed_'.raised_num()},
							-column 		=> $data,
							-sticky			=> 'w'
						);
						my @fixed_info = $entries_fixed->[raised_num()]->[$j][$pane_counter_2]->gridInfo;
						print 'gridder fixed: all gridInfo:';
						print $_." " foreach @fixed_info;
						print "\n";
						$hashname_fixed->[raised_num()]->[$j][$pane_counter_2] = $hashname;
						$column_fixed->[raised_num()]->[$j][$pane_counter_2] = $column;
						$entries_fixed->[raised_num()]->[$j][$pane_counter_2]->bind("<MouseWheel>", \&scroller);
					}
					elsif ($pane_counter_2 > 1) {
						$entries_scrollable->[raised_num()]->[$j][$pane_counter_2] = $panes->{'pane_scrollable_'.raised_num()}->Entry(
							-text 			=> $calls->{'call_'.raised_num()}->{$hashname}{$column}{'value'}[$j],
							-width			=> 22
						)->grid(
							-row 			=> $rows->{'pane_scrollable_'.raised_num()},
							-column 		=> $data,
							-sticky			=> 'w'
						);
						my @scrollable_info = $entries_scrollable->[raised_num()]->[$j][$pane_counter_2]->gridInfo;
						print 'gridder scrollable: all gridInfo:';
						print $_." " foreach @scrollable_info;
						print "\n";
						$hashname_scrollable->[raised_num()]->[$j][$pane_counter_2] = $hashname;
						$column_scrollable->[raised_num()]->[$j][$pane_counter_2] = $column;
						$entries_scrollable->[raised_num()]->[$j][$pane_counter_2]->bind("<MouseWheel>", \&scroller);
					}
					$data ++;
				}
			}
			$pane_counter_2 ++;
		}
	$data = 0;
	$rows->{'pane_fixed_'.raised_num()} ++;
	$rows->{'pane_scrollable_'.raised_num()} ++;
	$j ++;
	}
}

$calls->{'call_'.raised_num()}->{'main_delta'} = 0;