Attachment #149912 for bug #33488

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




use Modern::Perl;

return {
    bug_number => "33488",
    description => "Add index to fromBranch for branch_transfer_limits",
    up => sub {
        my ($args) = @_;
        my ($dbh, $out) = @$args{qw(dbh out)};
        # Do you stuffs here
        unless ( index_exists( 'branch_transfer_limits', 'fromBranch_idx' ) ) {
            $dbh->do(q{CREATE INDEX fromBranch_idx ON branch_transfer_limits ( fromBranch )});
            say $out "Added new index on branch_transfer_limits.fromBranch";
        }
    },
};

Lines 1507-1513 CREATE TABLE `branch_transfer_limits` ( Link Here

(-)a/installer/data/mysql/kohastructure.sql (-2 / +2 lines)
1507	`fromBranch` varchar(10) NOT NULL,	1507	`fromBranch` varchar(10) NOT NULL,
1508	`itemtype` varchar(10) DEFAULT NULL,	1508	`itemtype` varchar(10) DEFAULT NULL,
1509	`ccode` varchar(80) DEFAULT NULL,	1509	`ccode` varchar(80) DEFAULT NULL,
1510	PRIMARY KEY (`limitId`)	1510	PRIMARY KEY (`limitId`),
		1511	KEY `fromBranch_index` (`fromBranch`)
1511	) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;	1512	) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
1512	/!40101 SET character_set_client = @saved_cs_client /;	1513	/!40101 SET character_set_client = @saved_cs_client /;
1513		1514
1514	-

Return to bug 33488

Line 0 Link Here

(-)a/installer/data/mysql/atomicupdate/bz_33488.pl (+15 lines)
	1	use Modern::Perl;
	2
	3	return {
	4	bug_number => "33488",
	5	description => "Add index to fromBranch for branch_transfer_limits",
	6	up => sub {
	7	my ($args) = @_;
	8	my ($dbh, $out) = @$args{qw(dbh out)};
	9	# Do you stuffs here
	10	unless ( index_exists( 'branch_transfer_limits', 'fromBranch_idx' ) ) {
	11	$dbh->do(q{CREATE INDEX fromBranch_idx ON branch_transfer_limits ( fromBranch )});
	12	say $out "Added new index on branch_transfer_limits.fromBranch";
	13	}
	14	},
	15	};