|
Lines 59-64
my (
Link Here
|
| 59 |
$end_accession, |
59 |
$end_accession, |
| 60 |
$marc_conditions, |
60 |
$marc_conditions, |
| 61 |
$embed_see_from_headings, |
61 |
$embed_see_from_headings, |
|
|
62 |
$embed_see_also_from_headings, |
| 62 |
$report_id, |
63 |
$report_id, |
| 63 |
@report_params, |
64 |
@report_params, |
| 64 |
$report, |
65 |
$report, |
|
Lines 70-101
my (
Link Here
|
| 70 |
); |
71 |
); |
| 71 |
|
72 |
|
| 72 |
GetOptions( |
73 |
GetOptions( |
| 73 |
'format=s' => \$output_format, |
74 |
'format=s' => \$output_format, |
| 74 |
'date=s' => \$timestamp, |
75 |
'date=s' => \$timestamp, |
| 75 |
'dont_export_items' => \$dont_export_items, |
76 |
'dont_export_items' => \$dont_export_items, |
| 76 |
'csv_profile_id=s' => \$csv_profile_id, |
77 |
'csv_profile_id=s' => \$csv_profile_id, |
| 77 |
'deleted_barcodes' => \$deleted_barcodes, |
78 |
'deleted_barcodes' => \$deleted_barcodes, |
| 78 |
'clean' => \$clean, |
79 |
'clean' => \$clean, |
| 79 |
'filename=s' => \$filename, |
80 |
'filename=s' => \$filename, |
| 80 |
'record-type=s' => \$record_type, |
81 |
'record-type=s' => \$record_type, |
| 81 |
'id_list_file=s' => \$id_list_file, |
82 |
'id_list_file=s' => \$id_list_file, |
| 82 |
'starting_authid=s' => \$starting_authid, |
83 |
'starting_authid=s' => \$starting_authid, |
| 83 |
'ending_authid=s' => \$ending_authid, |
84 |
'ending_authid=s' => \$ending_authid, |
| 84 |
'authtype=s' => \$authtype, |
85 |
'authtype=s' => \$authtype, |
| 85 |
'starting_biblionumber=s' => \$starting_biblionumber, |
86 |
'starting_biblionumber=s' => \$starting_biblionumber, |
| 86 |
'ending_biblionumber=s' => \$ending_biblionumber, |
87 |
'ending_biblionumber=s' => \$ending_biblionumber, |
| 87 |
'itemtype=s' => \$itemtype, |
88 |
'itemtype=s' => \$itemtype, |
| 88 |
'starting_callnumber=s' => \$starting_callnumber, |
89 |
'starting_callnumber=s' => \$starting_callnumber, |
| 89 |
'ending_callnumber=s' => \$ending_callnumber, |
90 |
'ending_callnumber=s' => \$ending_callnumber, |
| 90 |
'start_accession=s' => \$start_accession, |
91 |
'start_accession=s' => \$start_accession, |
| 91 |
'end_accession=s' => \$end_accession, |
92 |
'end_accession=s' => \$end_accession, |
| 92 |
'marc_conditions=s' => \$marc_conditions, |
93 |
'marc_conditions=s' => \$marc_conditions, |
| 93 |
'embed_see_from_headings' => \$embed_see_from_headings, |
94 |
'embed_see_from_headings' => \$embed_see_from_headings, |
| 94 |
'report_id=s' => \$report_id, |
95 |
'embed_see_also_from_headings' => \$embed_see_also_from_headings, |
| 95 |
'report_param=s' => \@report_params, |
96 |
'report_id=s' => \$report_id, |
| 96 |
'destination_server_id=s' => \$destination_server_id, |
97 |
'report_param=s' => \@report_params, |
| 97 |
'delete_local_after_run' => \$delete_local_after_run, |
98 |
'destination_server_id=s' => \$destination_server_id, |
| 98 |
'h|help|?' => \$help, |
99 |
'delete_local_after_run' => \$delete_local_after_run, |
|
|
100 |
'h|help|?' => \$help, |
| 99 |
) || pod2usage(1); |
101 |
) || pod2usage(1); |
| 100 |
|
102 |
|
| 101 |
if ($help) { |
103 |
if ($help) { |
|
Lines 348-361
if ($deleted_barcodes) {
Link Here
|
| 348 |
} else { |
350 |
} else { |
| 349 |
Koha::Exporter::Record::export( |
351 |
Koha::Exporter::Record::export( |
| 350 |
{ |
352 |
{ |
| 351 |
record_type => $record_type, |
353 |
record_type => $record_type, |
| 352 |
record_ids => \@record_ids, |
354 |
record_ids => \@record_ids, |
| 353 |
record_conditions => @marc_conditions ? \@marc_conditions : undef, |
355 |
record_conditions => @marc_conditions ? \@marc_conditions : undef, |
| 354 |
format => $output_format, |
356 |
format => $output_format, |
| 355 |
csv_profile_id => $csv_profile_id, |
357 |
csv_profile_id => $csv_profile_id, |
| 356 |
export_items => ( not $dont_export_items ), |
358 |
export_items => ( not $dont_export_items ), |
| 357 |
clean => $clean || 0, |
359 |
clean => $clean || 0, |
| 358 |
embed_see_from_headings => $embed_see_from_headings || 0, |
360 |
embed_see_from_headings => $embed_see_from_headings || 0, |
|
|
361 |
embed_see_also_from_headings => $embed_see_also_from_headings || 0, |
| 359 |
} |
362 |
} |
| 360 |
); |
363 |
); |
| 361 |
} |
364 |
} |
|
Lines 536-541
Print a brief help message.
Link Here
|
| 536 |
|
539 |
|
| 537 |
--embed_see_from_headings Embed see from (non-preferred form) headings in bibliographic record. |
540 |
--embed_see_from_headings Embed see from (non-preferred form) headings in bibliographic record. |
| 538 |
|
541 |
|
|
|
542 |
=item B<--embed_see_also_from_headings> |
| 543 |
|
| 544 |
--embed_see_also_from_headings Embed see also from (non-preferred form) headings in bibliographic record. |
| 545 |
|
| 539 |
=item B<--report_id> |
546 |
=item B<--report_id> |
| 540 |
|
547 |
|
| 541 |
--report_id=ID Export biblionumbers or authids from a given saved report output. |
548 |
--report_id=ID Export biblionumbers or authids from a given saved report output. |
| 542 |
- |
|
|