View | Details | Raw Unified | Return to bug 10877
Collapse All | Expand All

(-)a/C4/ImportBatch.pm (-7 / +18 lines)
Lines 207-213 sub AddImportBatch { Link Here
207
    my (@fields, @vals);
207
    my (@fields, @vals);
208
    foreach (qw( matcher_id template_id branchcode
208
    foreach (qw( matcher_id template_id branchcode
209
                 overlay_action nomatch_action item_action
209
                 overlay_action nomatch_action item_action
210
                 import_status batch_type file_name comments record_type )) {
210
                 import_status batch_type file_name comments
211
                 record_type is_order )) {
211
        if (exists $params->{$_}) {
212
        if (exists $params->{$_}) {
212
            push @fields, $_;
213
            push @fields, $_;
213
            push @vals, $params->{$_};
214
            push @vals, $params->{$_};
Lines 320-326 sub ModAuthInBatch { Link Here
320
  ($batch_id, $num_records, $num_items, @invalid_records) = 
321
  ($batch_id, $num_records, $num_items, @invalid_records) = 
321
    BatchStageMarcRecords($encoding, $marc_records, $file_name, $marc_modification_template,
322
    BatchStageMarcRecords($encoding, $marc_records, $file_name, $marc_modification_template,
322
                          $comments, $branch_code, $parse_items,
323
                          $comments, $branch_code, $parse_items,
323
                          $leave_as_staging, 
324
                          $leave_as_staging, is_order,
324
                          $progress_interval, $progress_callback);
325
                          $progress_interval, $progress_callback);
325
326
326
=cut
327
=cut
Lines 335-340 sub BatchStageMarcRecords { Link Here
335
    my $branch_code = shift;
336
    my $branch_code = shift;
336
    my $parse_items = shift;
337
    my $parse_items = shift;
337
    my $leave_as_staging = shift;
338
    my $leave_as_staging = shift;
339
    my $is_order = shift;
338
340
339
    # optional callback to monitor status 
341
    # optional callback to monitor status 
340
    # of job
342
    # of job
Lines 354-359 sub BatchStageMarcRecords { Link Here
354
            file_name => $file_name,
356
            file_name => $file_name,
355
            comments => $comments,
357
            comments => $comments,
356
            record_type => $record_type,
358
            record_type => $record_type,
359
            is_order => $is_order,
357
        } );
360
        } );
358
    if ($parse_items) {
361
    if ($parse_items) {
359
        SetImportBatchItemAction($batch_id, 'always_add');
362
        SetImportBatchItemAction($batch_id, 'always_add');
Lines 954-974 sub GetStagedWebserviceBatches { Link Here
954
957
955
=head2 GetImportBatchRangeDesc
958
=head2 GetImportBatchRangeDesc
956
959
957
  my $results = GetImportBatchRangeDesc($offset, $results_per_group);
960
  my $results = GetImportBatchRangeDesc($offset, $results_per_group, $is_order);
958
961
959
Returns a reference to an array of hash references corresponding to
962
Returns a reference to an array of hash references corresponding to
960
import_batches rows (sorted in descending order by import_batch_id)
963
import_batches rows (sorted in descending order by import_batch_id)
961
start at the given offset.
964
start at the given offset.
962
965
966
Pass in $is_order = 1 to get only batches marked as order records
967
963
=cut
968
=cut
964
969
965
sub GetImportBatchRangeDesc {
970
sub GetImportBatchRangeDesc {
966
    my ($offset, $results_per_group) = @_;
971
    my ($offset, $results_per_group,$is_order) = @_;
972
973
    my $is_order_limit = $is_order ? "AND is_order = 1" : q{};
967
974
968
    my $dbh = C4::Context->dbh;
975
    my $dbh = C4::Context->dbh;
969
    my $query = "SELECT * FROM import_batches
976
    my $query = "
970
                                    WHERE batch_type IN ('batch', 'webservice')
977
        SELECT * FROM import_batches
971
                                    ORDER BY import_batch_id DESC";
978
        WHERE batch_type IN ('batch', 'webservice')
979
        $is_order_limit
980
        ORDER BY import_batch_id DESC
981
    ";
982
972
    my @params;
983
    my @params;
973
    if ($results_per_group){
984
    if ($results_per_group){
974
        $query .= " LIMIT ?";
985
        $query .= " LIMIT ?";
(-)a/acqui/addorderiso2709.pl (-6 / +47 lines)
Lines 61-71 my $cgiparams = $input->Vars; Link Here
61
my $op = $cgiparams->{'op'} || '';
61
my $op = $cgiparams->{'op'} || '';
62
my $booksellerid  = $input->param('booksellerid');
62
my $booksellerid  = $input->param('booksellerid');
63
my $bookseller = Koha::Acquisition::Bookseller->fetch({ id => $booksellerid });
63
my $bookseller = Koha::Acquisition::Bookseller->fetch({ id => $booksellerid });
64
my $is_order = $input->param('is_order');
64
my $data;
65
my $data;
65
66
66
$template->param(scriptname => "/cgi-bin/koha/acqui/addorderiso2709.pl",
67
$template->param(scriptname => "/cgi-bin/koha/acqui/addorderiso2709.pl",
67
                booksellerid => $booksellerid,
68
                booksellerid => $booksellerid,
68
                booksellername => $bookseller->{name},
69
                booksellername => $bookseller->{name},
70
                is_order => $is_order,
69
                );
71
                );
70
72
71
if ($cgiparams->{'import_batch_id'} && $op eq ""){
73
if ($cgiparams->{'import_batch_id'} && $op eq ""){
Lines 83-89 if (! $cgiparams->{'basketno'}){ Link Here
83
if ($op eq ""){
85
if ($op eq ""){
84
    $template->param("basketno" => $cgiparams->{'basketno'});
86
    $template->param("basketno" => $cgiparams->{'basketno'});
85
#display batches
87
#display batches
86
    import_batches_list($template);
88
    import_batches_list( $template, $is_order );
87
#
89
#
88
# 2nd step = display the content of the choosen file
90
# 2nd step = display the content of the choosen file
89
#
91
#
Lines 269-274 if ($op eq ""){ Link Here
269
            my @serials      = $input->param('serial');
271
            my @serials      = $input->param('serial');
270
            my @ind_tag   = $input->param('ind_tag');
272
            my @ind_tag   = $input->param('ind_tag');
271
            my @indicator = $input->param('indicator');
273
            my @indicator = $input->param('indicator');
274
275
            if ($is_order) {
276
                my ( $notforloan_field, $notforloan_subfield ) =
277
                  GetMarcFromKohaField('items.notforloan');
278
                push( @tags,         $notforloan_field );
279
                push( @subfields,    $notforloan_subfield );
280
                push( @field_values, '-1' );
281
282
                my ( $homebranch_field, $homebranch_subfield ) =
283
                  GetMarcFromKohaField('items.homebranch');
284
                push( @tags,         $homebranch_field );
285
                push( @subfields,    $homebranch_subfield );
286
                push( @field_values, C4::Context->userenv->{'branch'} );
287
288
                my ( $holdingbranch_field, $holdingbranch_subfield ) =
289
                  GetMarcFromKohaField('items.holdingbranch');
290
                push( @tags,         $holdingbranch_field );
291
                push( @subfields,    $holdingbranch_subfield );
292
                push( @field_values, C4::Context->userenv->{'branch'} );
293
294
                my $infos = get_infos_syspref($marcrecord, ['itype']);
295
                my ( $itype_field, $itype_subfield ) =
296
                  GetMarcFromKohaField('items.itype');
297
                push( @tags,         $itype_field );
298
                push( @subfields,    $itype_subfield );
299
                push( @field_values, $infos->{itype} );
300
            }
301
272
            my $item;
302
            my $item;
273
            push @{ $item->{tags} },         $tags[0];
303
            push @{ $item->{tags} },         $tags[0];
274
            push @{ $item->{subfields} },    $subfields[0];
304
            push @{ $item->{subfields} },    $subfields[0];
Lines 324-331 output_html_with_http_headers $input, $cookie, $template->output; Link Here
324
354
325
355
326
sub import_batches_list {
356
sub import_batches_list {
327
    my ($template) = @_;
357
    my ($template, $is_order) = @_;
328
    my $batches = GetImportBatchRangeDesc();
358
    my $batches = GetImportBatchRangeDesc(undef,undef,$is_order);
329
359
330
    my @list = ();
360
    my @list = ();
331
    foreach my $batch (@$batches) {
361
    foreach my $batch (@$batches) {
Lines 420-425 sub import_biblios_list { Link Here
420
                        item_action => $item_action
450
                        item_action => $item_action
421
                    );
451
                    );
422
    batch_info($template, $batch);
452
    batch_info($template, $batch);
453
454
    return \@list;
423
}
455
}
424
456
425
sub batch_info {
457
sub batch_info {
Lines 463-470 sub add_matcher_list { Link Here
463
    $template->param(available_matchers => \@matchers);
495
    $template->param(available_matchers => \@matchers);
464
}
496
}
465
497
466
sub get_infos_syspref {
498
sub GetMarcFieldsToOrderAsYAML {
467
    my ($record, $field_list) = @_;
468
    my $syspref = C4::Context->preference('MarcFieldsToOrder');
499
    my $syspref = C4::Context->preference('MarcFieldsToOrder');
469
    $syspref = "$syspref\n\n"; # YAML is anal on ending \n. Surplus does not hurt
500
    $syspref = "$syspref\n\n"; # YAML is anal on ending \n. Surplus does not hurt
470
    my $yaml = eval {
501
    my $yaml = eval {
Lines 472-479 sub get_infos_syspref { Link Here
472
    };
503
    };
473
    if ( $@ ) {
504
    if ( $@ ) {
474
        warn "Unable to parse MarcFieldsToOrder syspref : $@";
505
        warn "Unable to parse MarcFieldsToOrder syspref : $@";
475
        return ();
506
        return;
507
    } else {
508
        return $yaml;
476
    }
509
    }
510
}
511
512
sub get_infos_syspref {
513
    my ($record, $field_list) = @_;
514
515
    my $yaml = GetMarcFieldsToOrderAsYAML;
516
    return unless $yaml;
517
477
    my $r;
518
    my $r;
478
    for my $field_name ( @$field_list ) {
519
    for my $field_name ( @$field_list ) {
479
        next unless exists $yaml->{$field_name};
520
        next unless exists $yaml->{$field_name};
(-)a/installer/data/mysql/kohastructure.sql (+1 lines)
Lines 1030-1035 CREATE TABLE `import_batches` ( -- information about batches of marc records tha Link Here
1030
  `record_type` enum('biblio', 'auth', 'holdings') NOT NULL default 'biblio', -- type of record in the batch
1030
  `record_type` enum('biblio', 'auth', 'holdings') NOT NULL default 'biblio', -- type of record in the batch
1031
  `file_name` varchar(100), -- the name of the file uploaded
1031
  `file_name` varchar(100), -- the name of the file uploaded
1032
  `comments` mediumtext, -- any comments added when the file was uploaded
1032
  `comments` mediumtext, -- any comments added when the file was uploaded
1033
  `is_order` tinyint(1) NOT NULL DEFAULT '0', -- defines if this is an Order Record for processing
1033
  PRIMARY KEY (`import_batch_id`),
1034
  PRIMARY KEY (`import_batch_id`),
1034
  KEY `branchcode` (`branchcode`)
1035
  KEY `branchcode` (`branchcode`)
1035
) ENGINE=InnoDB DEFAULT CHARSET=utf8 COLLATE=utf8_unicode_ci;
1036
) ENGINE=InnoDB DEFAULT CHARSET=utf8 COLLATE=utf8_unicode_ci;
(-)a/installer/data/mysql/updatedatabase.pl (+7 lines)
Lines 9691-9696 if ( CheckVersion($DBversion) ) { Link Here
9691
    SetVersion($DBversion);
9691
    SetVersion($DBversion);
9692
}
9692
}
9693
9693
9694
$DBversion = "3.18.00.XXX";
9695
if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
9696
    $dbh->do("ALTER TABLE import_batches ADD is_order BOOLEAN NOT NULL DEFAULT '0' AFTER comments");
9697
   print "Upgrade to $DBversion done (Bug 10877 - Add 'Order Record' processing)\n";
9698
   SetVersion ($DBversion);
9699
}
9700
9694
=head1 FUNCTIONS
9701
=head1 FUNCTIONS
9695
9702
9696
=head2 TableExists($table)
9703
=head2 TableExists($table)
(-)a/koha-tmpl/intranet-tmpl/prog/en/includes/acquisitions-add-to-basket.inc (+1 lines)
Lines 17-22 Link Here
17
        <li><a href="/cgi-bin/koha/acqui/neworderempty.pl?booksellerid=[% booksellerid %]&amp;basketno=[% basketno %]">From a new (empty) record</a></li>
17
        <li><a href="/cgi-bin/koha/acqui/neworderempty.pl?booksellerid=[% booksellerid %]&amp;basketno=[% basketno %]">From a new (empty) record</a></li>
18
        <li><a href="/cgi-bin/koha/acqui/z3950_search.pl?booksellerid=[% booksellerid %]&amp;basketno=[% basketno %]">From an external source</a></li>
18
        <li><a href="/cgi-bin/koha/acqui/z3950_search.pl?booksellerid=[% booksellerid %]&amp;basketno=[% basketno %]">From an external source</a></li>
19
        <li><a href="/cgi-bin/koha/acqui/addorderiso2709.pl?booksellerid=[% booksellerid %]&amp;basketno=[% basketno %]"> From a staged file</a></li>
19
        <li><a href="/cgi-bin/koha/acqui/addorderiso2709.pl?booksellerid=[% booksellerid %]&amp;basketno=[% basketno %]"> From a staged file</a></li>
20
        <li><a href="/cgi-bin/koha/acqui/addorderiso2709.pl?booksellerid=[% booksellerid %]&amp;basketno=[% basketno %]&amp;is_order=1"> From a staged order file</a></li>
20
        [% IF ( CAN_user_circulate ) %]<li><a href="/cgi-bin/koha/circ/reserveratios.pl?booksellerid=[% booksellerid %]&amp;basketno=[% basketno %]">From titles with highest hold ratios</a></li>[% END %]
21
        [% IF ( CAN_user_circulate ) %]<li><a href="/cgi-bin/koha/circ/reserveratios.pl?booksellerid=[% booksellerid %]&amp;basketno=[% basketno %]">From titles with highest hold ratios</a></li>[% END %]
21
      </ul>
22
      </ul>
22
    [% ELSE %]
23
    [% ELSE %]
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt (-8 / +24 lines)
Lines 138-144 Link Here
138
138
139
            return disableUnchecked($(this));
139
            return disableUnchecked($(this));
140
        });
140
        });
141
141
        $('#tabs').tabs();
142
        $('#tabs').tabs();
143
144
        [% IF is_order %]
145
            $("#checkAll").click();
146
        [% END %]
142
    });
147
    });
143
148
144
    function disableUnchecked(form){
149
    function disableUnchecked(form){
Lines 166-172 Link Here
166
                <div id="tabs" class="toptabs">
171
                <div id="tabs" class="toptabs">
167
                  <ul>
172
                  <ul>
168
                    <li><a href="#records_to_import">Select to import</a></li>
173
                    <li><a href="#records_to_import">Select to import</a></li>
169
                    <li><a href="#items_info" class="items_info">Item information</a></li>
174
                    [% UNLESS is_order %]
175
                        <li><a href="#items_info" class="items_info">Item information</a></li>
176
                    [% END %]
170
                    <li><a href="#accounting_details">Default accounting details</a></li>
177
                    <li><a href="#accounting_details">Default accounting details</a></li>
171
                  </ul>
178
                  </ul>
172
179
Lines 185-190 Link Here
185
                            <input type="hidden" name="[% cur.currency %]" value="[% cur.rate %]" />
192
                            <input type="hidden" name="[% cur.currency %]" value="[% cur.rate %]" />
186
                        [% END %]
193
                        [% END %]
187
194
195
                        [% IF is_order %]
196
                            <p>
197
                                <input type="submit" value="Save" /><a class="cancel" href="/cgi-bin/koha/acqui/basket.pl?basketno=[% basketno %]">Cancel</a>
198
                            </p>
199
                        [% END %]
200
188
                        [% FOREACH biblio IN biblio_list %]
201
                        [% FOREACH biblio IN biblio_list %]
189
                        <fieldset class="biblio unselected rows" style="float:none;">
202
                        <fieldset class="biblio unselected rows" style="float:none;">
190
                          <legend>
203
                          <legend>
Lines 261-271 Link Here
261
                        </fieldset>
274
                        </fieldset>
262
                        [% END %]
275
                        [% END %]
263
                      </div>
276
                      </div>
277
                      [% IF ( items && !is_order ) %]
264
                      <div id="items_info">
278
                      <div id="items_info">
265
                        <h2>Item information</h2>
279
                        <h2>Item information</h2>
266
                        <p>Import all the checked items in the basket with the following parameters:</p>
280
                        <p>Import all the checked items in the basket with the following parameters:</p>
267
281
268
                        [% IF ( items ) %]
269
                        <fieldset class="rows" style="float:none;">
282
                        <fieldset class="rows" style="float:none;">
270
                            <legend>Item</legend>
283
                            <legend>Item</legend>
271
                            [% IF ( NoACQframework ) %]
284
                            [% IF ( NoACQframework ) %]
Lines 309-316 Link Here
309
                            </div>
322
                            </div>
310
                            [% END %] <!-- /items -->
323
                            [% END %] <!-- /items -->
311
                        </fieldset>
324
                        </fieldset>
312
                        [% END %] <!-- items -->
313
                      </div>
325
                      </div>
326
                      [% END %] <!-- items tab -->
314
                      <div id="accounting_details">
327
                      <div id="accounting_details">
315
                        <p>Import all the checked items in the basket with the following accounting details (used only if no information is filled for the item):</p>
328
                        <p>Import all the checked items in the basket with the following accounting details (used only if no information is filled for the item):</p>
316
                        <fieldset class="rows" style="float:none;">
329
                        <fieldset class="rows" style="float:none;">
Lines 360-365 Link Here
360
                                    <label for="all_order_vendornote">Vendor note: </label>
373
                                    <label for="all_order_vendornote">Vendor note: </label>
361
                                    <textarea id="all_order_vendornote" cols="30" rows="3" name="all_order_vendornote"></textarea>
374
                                    <textarea id="all_order_vendornote" cols="30" rows="3" name="all_order_vendornote"></textarea>
362
                                </li>
375
                                </li>
376
                                [% UNLESS is_order %]
363
                                <li>
377
                                <li>
364
                                    <div class="hint">The 2 following fields are available for your own usage. They can be useful for statistical purposes</div>
378
                                    <div class="hint">The 2 following fields are available for your own usage. They can be useful for statistical purposes</div>
365
                                    <label for="all_sort1">Statistic 1: </label>
379
                                    <label for="all_sort1">Statistic 1: </label>
Lines 369-382 Link Here
369
                                    <label for="all_sort2">Statistic 2: </label>
383
                                    <label for="all_sort2">Statistic 2: </label>
370
                                    <input type="text" id="all_sort2" size="20" name="all_sort2" value="" />
384
                                    <input type="text" id="all_sort2" size="20" name="all_sort2" value="" />
371
                                </li>
385
                                </li>
386
                                [% END %]
372
                            </ol>
387
                            </ol>
373
                        </fieldset>
388
                        </fieldset>
374
                      </div>
389
                      </div>
375
                      </div>
390
                      </div>
376
391
377
                      <fieldset class="action">
392
                        <fieldset class="action">
378
                          <input type="submit" value="Save" /><a class="cancel" href="/cgi-bin/koha/acqui/basket.pl?basketno=[% basketno %]">Cancel</a>
393
                            <input type="hidden" name="is_order" value="[% is_order %]" />
379
                      </fieldset>
394
                            <input type="submit" value="Save" /><a class="cancel" href="/cgi-bin/koha/acqui/basket.pl?basketno=[% basketno %]">Cancel</a>
395
                        </fieldset>
380
                    </form>
396
                    </form>
381
                [% ELSE %]
397
                [% ELSE %]
382
                <div>
398
                <div>
Lines 415-422 Link Here
415
                          [% END %]
431
                          [% END %]
416
                        </td>
432
                        </td>
417
                        <td><span title="[% batch_lis.staged_date %]">[% batch_lis.staged_date | $KohaDates with_hours => 1 %]</span></td>
433
                        <td><span title="[% batch_lis.staged_date %]">[% batch_lis.staged_date | $KohaDates with_hours => 1 %]</span></td>
418
                        <td>[% batch_lis.num_records %]</td>
434
                        <td>[% batch_lis.num_biblios %]</td>
419
                        <td><a href="[% batch_lis.scriptname %]?import_batch_id=[% batch_lis.import_batch_id %]&amp;basketno=[% basketno %]&amp;booksellerid=[% booksellerid %]">Add orders</a></td>
435
                        <td><a href="[% batch_lis.scriptname %]?import_batch_id=[% batch_lis.import_batch_id %]&amp;basketno=[% basketno %]&amp;booksellerid=[% booksellerid %]&amp;is_order=[% is_order %]">Add orders</a></td>
420
                      </tr>
436
                      </tr>
421
                      [% END %]
437
                      [% END %]
422
                    </tbody>
438
                    </tbody>
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/stage-marc-import.tt (+4 lines)
Lines 112-117 function CheckForm(f) { Link Here
112
            <option value='auth'>Authority</option>
112
            <option value='auth'>Authority</option>
113
        </select>
113
        </select>
114
    </li>
114
    </li>
115
    <li>
116
        <input type="checkbox" name="is_order" id="is_order" />
117
        <label for="is_order">Is an order file:</label>
118
    </li>
115
	<li>
119
	<li>
116
		<label for="encoding">Character encoding: </label>
120
		<label for="encoding">Character encoding: </label>
117
            <select name="encoding" id="encoding"><option value="utf8" selected="selected">UTF-8 (Default)</option><option value="MARC-8">MARC 8</option><option value="ISO_5426">ISO 5426</option><option value="ISO_6937">ISO 6937</option><option value=ISO_8859-1">ISO 8859-1</option><option value="EUC-KR">EUC-KR</option></select>
121
            <select name="encoding" id="encoding"><option value="utf8" selected="selected">UTF-8 (Default)</option><option value="MARC-8">MARC 8</option><option value="ISO_5426">ISO 5426</option><option value="ISO_6937">ISO 6937</option><option value=ISO_8859-1">ISO 8859-1</option><option value="EUC-KR">EUC-KR</option></select>
(-)a/misc/stage_file.pl (-1 / +4 lines)
Lines 45-50 my $input_file = ""; Link Here
45
my $batch_comment = "";
45
my $batch_comment = "";
46
my $want_help = 0;
46
my $want_help = 0;
47
my $no_replace ;
47
my $no_replace ;
48
my $is_order = 0;
48
my $item_action = 'always_add';
49
my $item_action = 'always_add';
49
50
50
my $result = GetOptions(
51
my $result = GetOptions(
Lines 56-61 my $result = GetOptions( Link Here
56
    'no-replace'    => \$no_replace,
57
    'no-replace'    => \$no_replace,
57
    'comment:s'     => \$batch_comment,
58
    'comment:s'     => \$batch_comment,
58
    'authorities'   => \$authorities,
59
    'authorities'   => \$authorities,
60
    'is-order'      => \$is_order,
59
    'h|help'        => \$want_help
61
    'h|help'        => \$want_help
60
);
62
);
61
63
Lines 101-107 sub process_batch { Link Here
101
103
102
    print "... staging MARC records -- please wait\n";
104
    print "... staging MARC records -- please wait\n";
103
    my ($batch_id, $num_valid_records, $num_items, @import_errors) =
105
    my ($batch_id, $num_valid_records, $num_items, @import_errors) =
104
        BatchStageMarcRecords($record_type, $encoding, $marc_records, $input_file, undef, $batch_comment, '', $add_items, 0,
106
        BatchStageMarcRecords($record_type, $encoding, $marc_records, $input_file, undef, $batch_comment, '', $add_items, 0, $is_order,
105
                              100, \&print_progress_and_commit);
107
                              100, \&print_progress_and_commit);
106
    print "... finished staging MARC records\n";
108
    print "... finished staging MARC records\n";
107
109
Lines 198-203 Parameters: Link Here
198
                            the record batch; if the comment
200
                            the record batch; if the comment
199
                            has spaces in it, surround the
201
                            has spaces in it, surround the
200
                            comment with quotation marks.
202
                            comment with quotation marks.
203
    --is-order              this file is a bibliographic order file
201
    --help or -h            show this message.
204
    --help or -h            show this message.
202
_USAGE_
205
_USAGE_
203
}
206
}
(-)a/tools/stage-marc-import.pl (-3 / +3 lines)
Lines 55-60 my $parse_items = $input->param('parse_items'); Link Here
55
my $item_action = $input->param('item_action');
55
my $item_action = $input->param('item_action');
56
my $comments = $input->param('comments');
56
my $comments = $input->param('comments');
57
my $record_type = $input->param('record_type');
57
my $record_type = $input->param('record_type');
58
my $is_order = $input->param('is_order') eq 'on';
58
my $encoding = $input->param('encoding');
59
my $encoding = $input->param('encoding');
59
my $marc_modification_template = $input->param('marc_modification_template_id');
60
my $marc_modification_template = $input->param('marc_modification_template_id');
60
61
Lines 132-139 if ($completedJobID) { Link Here
132
        $marcrecord,                 $filename,
133
        $marcrecord,                 $filename,
133
        $marc_modification_template, $comments,
134
        $marc_modification_template, $comments,
134
        '',                          $parse_items,
135
        '',                          $parse_items,
135
        0,                           50,
136
        0,                           $is_order,
136
        staging_progress_callback( $job, $dbh )
137
        50, staging_progress_callback( $job, $dbh )
137
      );
138
      );
138
139
139
    my $num_with_matches = 0;
140
    my $num_with_matches = 0;
140
- 

Return to bug 10877