%
tie my %labels, 'Tie::IxHash',
'num_avail' => 'Available', # (upload batch)',
'num_used' => 'In use', #'Used', #'Allocated',
'num_total' => 'Total',
;
my %inv_action_link = (
'num_avail' => 'eventually'
);
my %inv_action_label = (
'num_avail' => 'upload_batch'
);
my $link = [ "${p}edit/inventory_class.html?", 'classnum' ];
%><%= include( 'elements/search.html',
'title' => 'Inventory Classes',
'name' => 'inventory classes',
'menubar' => [ 'Add a new inventory class' =>
$p.'edit/inventory_class.html',
],
'query' => { 'table' => 'inventory_class', },
'count_query' => 'SELECT COUNT(*) FROM inventory_class',
'header' => [ '#', 'Inventory class', 'Inventory' ],
'fields' => [ 'classnum',
'classname',
sub {
#my $inventory_class = shift;
my $i_c = shift;
[ map {
[
{
'data' => ''. $i_c->$_(). '',
'align' => 'right',
},
{
'data' => $labels{$_},
'align' => 'left',
},
{ 'data' => ( exists($inv_action_link{$_})
? '('. $inv_action_label{$_}. ')'
: ''
),
'align' => 'left',
},
]
} keys %labels
];
},
],
'links' => [ $link,
$link,
'',
],
)
%>