package Austin::DB::CreditCard;

use strict;
use warnings;
 
use Austin::DB;
use base qw/Austin::DB/;
use Austin::SUP::Helpers qw/encrypt/;
use Data::Dumper;
Austin::DB::CreditCard->table('cc_payment');
Austin::DB::CreditCard->columns(All => qw/trip_id cc_type cc_name cc_number expiry issue_no sec_code/);
Austin::DB::CreditCard->autoupdate(0);
 __PACKAGE__->add_trigger( before_set_cc_number  => \&do_encryption);
 
 sub do_encryption {
 	my $self = shift; 	
 	my $encrypted = encrypt('local', $self->cc_number, getlogin());
 	$self->cc_number($encrypted);

 }
 
 
1;

##</code><code>##

Austin::DB::CreditCard->insert(\%info);