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

(-)a/C4/SQLHelper.pm (-1 / +18 lines)
Lines 54-59 BEGIN { Link Here
54
	SearchInTable
54
	SearchInTable
55
	UpdateInTable
55
	UpdateInTable
56
	GetPrimaryKeys
56
	GetPrimaryKeys
57
        clear_columns_cache
57
);
58
);
58
	%EXPORT_TAGS = ( all =>[qw( InsertInTable DeleteInTable SearchInTable UpdateInTable GetPrimaryKeys)]
59
	%EXPORT_TAGS = ( all =>[qw( InsertInTable DeleteInTable SearchInTable UpdateInTable GetPrimaryKeys)]
59
				);
60
				);
Lines 252-257 sub GetPrimaryKeys($) { Link Here
252
	return  grep { $hash_columns->{$_}->{'Key'} =~/PRI/i}  keys %$hash_columns;
253
	return  grep { $hash_columns->{$_}->{'Key'} =~/PRI/i}  keys %$hash_columns;
253
}
254
}
254
255
256
257
=head2 clear_columns_cache
258
                            
259
  C4::SQLHelper->clear_columns_cache();
260
                
261
cleans the internal cache of sysprefs. Please call this method if
262
you update a tables structure. Otherwise, your new changes
263
will not be seen by this process.
264
    
265
=cut
266
267
sub clear_columns_cache {               
268
    %$hashref = ();
269
}
270
271
272
255
=head2 _get_columns
273
=head2 _get_columns
256
274
257
    _get_columns($tablename)
275
    _get_columns($tablename)
258
- 

Return to bug 7276