Lines 151-157
my @errorloop;
Link Here
|
151 |
if ( $uploadbarcodes && length($uploadbarcodes) > 0 ) { |
151 |
if ( $uploadbarcodes && length($uploadbarcodes) > 0 ) { |
152 |
my $dbh = C4::Context->dbh; |
152 |
my $dbh = C4::Context->dbh; |
153 |
my $date = dt_from_string( $input->param('setdate') ); |
153 |
my $date = dt_from_string( $input->param('setdate') ); |
154 |
$date = output_pref( $date, 'iso' ); |
154 |
$date = output_pref( { dt => $date, dateformat => 'iso' } ); |
155 |
|
155 |
|
156 |
my $strsth = "select * from issues, items where items.itemnumber=issues.itemnumber and items.barcode =?"; |
156 |
my $strsth = "select * from issues, items where items.itemnumber=issues.itemnumber and items.barcode =?"; |
157 |
my $qonloan = $dbh->prepare($strsth); |
157 |
my $qonloan = $dbh->prepare($strsth); |
Lines 204-212
if ( $markseen or $op ) {
Link Here
|
204 |
# If "compare barcodes list to results" has been checked, we want to alert for missing items |
204 |
# If "compare barcodes list to results" has been checked, we want to alert for missing items |
205 |
if ( $compareinv2barcd ) { |
205 |
if ( $compareinv2barcd ) { |
206 |
# set "missing" flags for all items with a datelastseen (dls) before the choosen datelastseen (cdls) |
206 |
# set "missing" flags for all items with a datelastseen (dls) before the choosen datelastseen (cdls) |
207 |
my $dls = output_pref( dt_from_string( $datelastseen ), 'iso' ); |
207 |
my $dls = output_pref( { dt => dt_from_string( $datelastseen ), dateformat => 'iso' } ); |
208 |
foreach my $item ( @$inventorylist ) { |
208 |
foreach my $item ( @$inventorylist ) { |
209 |
my $cdls = output_pref( dt_from_string( $_->{datelastseen} ), 'iso' ); |
209 |
my $cdls = output_pref( { dt => dt_from_string( $_->{datelastseen} ), dateformat => 'iso' } ); |
210 |
if ( $cdls lt $dls ) { |
210 |
if ( $cdls lt $dls ) { |
211 |
$item->{problem} = 'missingitem'; |
211 |
$item->{problem} = 'missingitem'; |
212 |
# We have to push a copy of the item, not the reference |
212 |
# We have to push a copy of the item, not the reference |
213 |
- |
|
|