Attachment #33375 for bug #13180

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




            my @field_values = $input->param('field_value');
            my @serials      = $input->param('serial');
            my @ind_tag   = $input->param('ind_tag');
            my @indicator = $input->param('indicator'); #Passing the imaginary empty "  " -indicators from the templates, to stop C4::Biblio::TransformHtmlToXml() to warn the bejesus out of my koha-error.log
            my $item;
            push @{ $item->{tags} },         $tags[0];
            push @{ $item->{subfields} },    $subfields[0];
            push @{ $item->{field_values} }, $field_values[0];
            push @{ $item->{ind_tag} },      $ind_tag[0];
            push @{ $item->{indicator} },    $indicator[0];
            my $xml = TransformHtmlToXml( \@tags, \@subfields, \@field_values, \@indicator, \@ind_tag );
            my $record = MARC::Record::new_from_xml( $xml, 'UTF-8' );
            for (my $qtyloop=1;$qtyloop <= $c_quantity;$qtyloop++) {
                my ( $biblionumber, $bibitemnum, $itemnumber ) = AddItemFromMarc( $record, $biblionumber );

Lines 299-304 Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt (-1 / +1 lines)
299	<input type="hidden" name="itemid" value="1" />	299	<input type="hidden" name="itemid" value="1" />
300	<input type="hidden" name="kohafield" value="[% iteminformatio.kohafield %]" />	300	<input type="hidden" name="kohafield" value="[% iteminformatio.kohafield %]" />
301	<input type="hidden" name="tag" value="[% iteminformatio.tag %]" />	301	<input type="hidden" name="tag" value="[% iteminformatio.tag %]" />
		302	<input type="hidden" name="indicator" value=" " /> [%#Pass imaginary indicators to stop warnings in C4::Biblio::TransformHtmlToXml() %]
302	<input type="hidden" name="subfield" value="[% iteminformatio.subfield %]" />	303	<input type="hidden" name="subfield" value="[% iteminformatio.subfield %]" />
303	<input type="hidden" name="mandatory" value="[% iteminformatio.mandatory %]" />	304	<input type="hidden" name="mandatory" value="[% iteminformatio.mandatory %]" />
304	[% IF ( iteminformatio.mandatory ) %] <span class="required">Required</span>[% END %]	305	[% IF ( iteminformatio.mandatory ) %] <span class="required">Required</span>[% END %]
305	-

Return to bug 13180

Lines 269-282 if ($op eq ""){ Link Here

(-)a/acqui/addorderiso2709.pl (-2 / +2 lines)
269	my @field_values = $input->param('field_value');	269	my @field_values = $input->param('field_value');
270	my @serials = $input->param('serial');	270	my @serials = $input->param('serial');
271	my @ind_tag = $input->param('ind_tag');	271	my @ind_tag = $input->param('ind_tag');
272	my @indicator = $input->param('indicator');	272	my @indicator = $input->param('indicator'); #Passing the imaginary empty " " -indicators from the templates, to stop C4::Biblio::TransformHtmlToXml() to warn the bejesus out of my koha-error.log
273	my $item;	273	my $item;
274	push @{ $item->{tags} }, $tags[0];	274	push @{ $item->{tags} }, $tags[0];
275	push @{ $item->{subfields} }, $subfields[0];	275	push @{ $item->{subfields} }, $subfields[0];
276	push @{ $item->{field_values} }, $field_values[0];	276	push @{ $item->{field_values} }, $field_values[0];
277	push @{ $item->{ind_tag} }, $ind_tag[0];	277	push @{ $item->{ind_tag} }, $ind_tag[0];
278	push @{ $item->{indicator} }, $indicator[0];	278	push @{ $item->{indicator} }, $indicator[0];
279	my $xml = TransformHtmlToXml( \@tags, \@subfields, \@field_values, \@ind_tag, \@indicator );	279	my $xml = TransformHtmlToXml( \@tags, \@subfields, \@field_values, \@indicator, \@ind_tag );
280	my $record = MARC::Record::new_from_xml( $xml, 'UTF-8' );	280	my $record = MARC::Record::new_from_xml( $xml, 'UTF-8' );
281	for (my $qtyloop=1;$qtyloop <= $c_quantity;$qtyloop++) {	281	for (my $qtyloop=1;$qtyloop <= $c_quantity;$qtyloop++) {
282	my ( $biblionumber, $bibitemnum, $itemnumber ) = AddItemFromMarc( $record, $biblionumber );	282	my ( $biblionumber, $bibitemnum, $itemnumber ) = AddItemFromMarc( $record, $biblionumber );