Attachment #111109 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 152-158 if ( $op eq 'form' ) { Link Here

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

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 91-106 sub enqueue { Link Here
91		90
92	# TODO Raise exception instead	91	# TODO Raise exception instead
93	return unless exists $args->{mmtid};	92	return unless exists $args->{mmtid};
94	return unless exists $args->{record_type}; #FIXME RMME
95	return unless exists $args->{record_ids};	93	return unless exists $args->{record_ids};
96		94
97	my $mmtid = $args->{mmtid};	95	my $mmtid = $args->{mmtid};
98	my $record_type = $args->{record_type};
99	my @record_ids = @{ $args->{record_ids} };	96	my @record_ids = @{ $args->{record_ids} };
100		97
101	$self->SUPER::enqueue({	98	$self->SUPER::enqueue({
102	job_size => scalar @record_ids,	99	job_size => scalar @record_ids,
103	job_args => {mmtid => $mmtid, record_type => $record_type, record_ids => \@record_ids,}	100	job_args => {mmtid => $mmtid, record_ids => \@record_ids,}
104	});	101	});
105	}	102	}
106		103