diff options
Diffstat (limited to 'httemplate/misc/inventory_item-move.cgi')
-rw-r--r-- | httemplate/misc/inventory_item-move.cgi | 23 |
1 files changed, 0 insertions, 23 deletions
diff --git a/httemplate/misc/inventory_item-move.cgi b/httemplate/misc/inventory_item-move.cgi deleted file mode 100644 index 4d53beb..0000000 --- a/httemplate/misc/inventory_item-move.cgi +++ /dev/null @@ -1,23 +0,0 @@ -<% '',$cgi->redirect(popurl(2). "search/inventory_item.html?$browse_opts") %> -<%init> - -# Shamelessly copied from misc/cust_attachment.cgi. - -my $browse_opts = join(';', map { $_.'='.$cgi->param($_) } - qw( classnum avail ) - ); - -my $move_agentnum = $cgi->param('move_agentnum') or - die "No agent selected"; -foreach my $itemnum ( - map { /^itemnum(\d+)$/; $1; } grep /^itemnum\d+$/, $cgi->param ) { - my $item = qsearchs('inventory_item', { 'itemnum' => $itemnum }); -# die "Can't move assigned inventory item $itemnum" if $item->svcnum; - my $error; - $item->agentnum($move_agentnum); - $error = $item->replace; - die $error if $error; -} - -</%init> - |