if ( $class =~ m/^SL::DB::AccTransaction/ ) {
my %unwanted_acc_trans = map { ( $_ => 1 ) } (qw(acc_trans_id trans_id cleared fx_transaction ob_transaction cb_transaction itime mtime chart_link tax_id description gldate memo source transdate), map { $_->name } @{ $class->meta->primary_key_columns });
@unwanted{keys %unwanted_acc_trans} = values %unwanted_acc_trans;
if ( $class =~ m/^SL::DB::AccTransaction/ ) {
my %unwanted_acc_trans = map { ( $_ => 1 ) } (qw(acc_trans_id trans_id cleared fx_transaction ob_transaction cb_transaction itime mtime chart_link tax_id description gldate memo source transdate), map { $_->name } @{ $class->meta->primary_key_columns });
@unwanted{keys %unwanted_acc_trans} = values %unwanted_acc_trans;