Attachment #108045 for bug #22417

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




        ->store;

    my $mmtid = $args->{mmtid};
    my $record_type = $args->{record_type};
    my @record_ids = @{ $args->{record_ids} };

    my $report = {


    # TODO Raise exception instead
    return unless exists $args->{mmtid};
    return unless exists $args->{record_type}; #FIXME RMME
    return unless exists $args->{record_ids};

    my $mmtid = $args->{mmtid};
    my $record_type = $args->{record_type};
    my @record_ids = @{ $args->{record_ids} };

    $self->SUPER::enqueue({
        job_size => scalar @record_ids,
        job_args => {mmtid => $mmtid, record_ids => \@record_ids,}
    });
}





        ->store;

    my $mmtid = $args->{mmtid};
    my $record_type = $args->{record_type};
    my @record_ids = @{ $args->{record_ids} };

    my $report = {


    # TODO Raise exception instead
    return unless exists $args->{mmtid};
    return unless exists $args->{record_type}; #FIXME RMME
    return unless exists $args->{record_ids};

    my $mmtid = $args->{mmtid};
    my $record_type = $args->{record_type};
    my @record_ids = @{ $args->{record_ids} };

    $self->SUPER::enqueue({
        job_size => scalar @record_ids,
        job_args => {mmtid => $mmtid, record_ids => \@record_ids,}
    });
}


Lines 153-159 if ( $op eq 'form' ) { Link Here

(-)a/tools/batch_record_modification.pl (-2 lines)
153	try {	153	try {
154	my $params = {	154	my $params = {
155	mmtid => $mmtid,	155	mmtid => $mmtid,
156	record_type => $recordtype,
157	record_ids => \@record_ids,	156	record_ids => \@record_ids,
158	};	157	};
159		158
160	-

Return to bug 22417

Lines 31-37 sub process { Link Here

(-)a/Koha/BackgroundJob/BatchUpdateAuthority.pm (-4 / +1 lines)
31	->store;	31	->store;
32		32
33	my $mmtid = $args->{mmtid};	33	my $mmtid = $args->{mmtid};
34	my $record_type = $args->{record_type};
35	my @record_ids = @{ $args->{record_ids} };	34	my @record_ids = @{ $args->{record_ids} };
36		35
37	my $report = {	36	my $report = {
Lines 85-100 sub enqueue { Link Here
85		84
86	# TODO Raise exception instead	85	# TODO Raise exception instead
87	return unless exists $args->{mmtid};	86	return unless exists $args->{mmtid};
88	return unless exists $args->{record_type}; #FIXME RMME
89	return unless exists $args->{record_ids};	87	return unless exists $args->{record_ids};
90		88
91	my $mmtid = $args->{mmtid};	89	my $mmtid = $args->{mmtid};
92	my $record_type = $args->{record_type};
93	my @record_ids = @{ $args->{record_ids} };	90	my @record_ids = @{ $args->{record_ids} };
94		91
95	$self->SUPER::enqueue({	92	$self->SUPER::enqueue({
96	job_size => scalar @record_ids,	93	job_size => scalar @record_ids,
97	job_args => {mmtid => $mmtid, record_type => $record_type, record_ids => \@record_ids,}	94	job_args => {mmtid => $mmtid, record_ids => \@record_ids,}
98	});	95	});
99	}	96	}
100		97

Lines 35-41 sub process { Link Here

(-)a/Koha/BackgroundJob/BatchUpdateBiblio.pm (-4 / +1 lines)
35	->store;	35	->store;
36		36
37	my $mmtid = $args->{mmtid};	37	my $mmtid = $args->{mmtid};
38	my $record_type = $args->{record_type};
39	my @record_ids = @{ $args->{record_ids} };	38	my @record_ids = @{ $args->{record_ids} };
40		39
41	my $report = {	40	my $report = {
Lines 92-107 sub enqueue { Link Here
92		91
93	# TODO Raise exception instead	92	# TODO Raise exception instead
94	return unless exists $args->{mmtid};	93	return unless exists $args->{mmtid};
95	return unless exists $args->{record_type}; #FIXME RMME
96	return unless exists $args->{record_ids};	94	return unless exists $args->{record_ids};
97		95
98	my $mmtid = $args->{mmtid};	96	my $mmtid = $args->{mmtid};
99	my $record_type = $args->{record_type};
100	my @record_ids = @{ $args->{record_ids} };	97	my @record_ids = @{ $args->{record_ids} };
101		98
102	$self->SUPER::enqueue({	99	$self->SUPER::enqueue({
103	job_size => scalar @record_ids,	100	job_size => scalar @record_ids,
104	job_args => {mmtid => $mmtid, record_type => $record_type, record_ids => \@record_ids,}	101	job_args => {mmtid => $mmtid, record_ids => \@record_ids,}
105	});	102	});
106	}	103	}
107		104