my $op = $input ->param('op');
my $booksellerid = $input->param('booksellerid');
my $branches = GetBranches;
if ( $op eq 'add_form' ) {
my @contractloop;
my $basket;
my $bookseller = GetBookSellerFromId($booksellerid);
my $count = scalar @contractloop;
if ( $count > 0) {
$template->param(contractloop => \@contractloop,
basketcontractnumber => $basket->{'contractnumber'});
}
my @booksellers = C4::Bookseller::GetBookSeller();
$template->param( add_form => 1,
basketname => $basket->{'basketname'},
basketnote => $basket->{'note'},
basketbooksellernote => $basket->{'booksellernote'},
booksellername => $bookseller->{'name'},
booksellerid => $booksellerid,
basketno => $basketno,
booksellers => \@booksellers,
deliveryplace => $basket->{deliveryplace},
billingplace => $basket->{billingplace},
);
my $billingplace = $basket->{'billingplace'} || C4::Context->userenv->{"branch"};
my $deliveryplace = $basket->{'deliveryplace'} || C4::Context->userenv->{"branch"};
# Build the combobox to select the billing place
my @billingplaceloop;
my $branches = C4::Branch::GetBranchesLoop( $billingplace );
$template->param( billingplaceloop => $branches );
$branches = C4::Branch::GetBranchesLoop( $deliveryplace );
$template->param( deliveryplaceloop => $branches );
#End Edit
} elsif ( $op eq 'add_validate' ) {
#New basket
# creation of basket per day basis for every vendor and all the orders for that day
# will be added to the same basket of creation
my $today = C4::Dates->today;
print $today;
my $dt = DateTime->now; # Stores current date and time as datetime object
my $todaysdate = $dt->ymd;
my $dbh = C4::Context->dbh;
my $sql = q{ SELECT basketno, booksellerid, creationdate FROM aqbasket WHERE creationdate = ? AND booksellerid=?};
my $sth = $dbh->prepare($sql);
$sth->execute($todaysdate, $booksellerid);
if (my @basketdetails = $sth->fetchrow_array ){
my @data = @basketdetails;
$basketno = splice(@data,0,1);
$template->param(basketno => $basketno);
}else{
$basketno = NewBasket(
$booksellerid,
$loggedinuser,
$input->param('basketname'),
$input->param('basketnote'),
$input->param('basketbooksellernote'),
$input->param('basketcontractnumber') || undef,
$input->param('deliveryplace'),
$input->param('billingplace'),
);
$template->param(basketno => $basketno);
}
to activate the new basket function when i save but doesn't seem inserting values for basket details in aqbasket table