[ic] $Sql{orderline} fails?
Grant
emailgrant at gmail.com
Sun Dec 13 00:19:21 UTC 2009
>> I have a usertag I've been using for a while which creates a PDF file
>> of an order. This morning I was making some modifications to it, and
>> it stopped working with "Couldn't get orderline handle" in the
>> error.log. I restored the original file, but it still fails with that
>> error, even after rebooting the machine. Here is the pertinent code:
>>
>> my $dbh = $Sql{orderline} or die "Couldn't get orderline handle\n";
>>
>> The orders table is still being read and written to just fine. Does
>> anyone know what causes a line like the above to fail?
>
> Make sure that you have orderline table open first, ie:
>
> $Tag->perl('orderline');
> my $dbh = $Sql{orderline} or die "Couldn't get orderline handle\n";
>
>
> Peter
Thanks a lot Peter, that fixed it. Any idea why that line wasn't
necessary originally? Here was the entire original block:
my $db = Vend::Data::database_exists_ref('orderline');
my $sql = "SELECT sku, quantity, price FROM orderline WHERE
order_number = $order_number AND quantity > 0";
my $dbh = $Sql{orderline} or die "Couldn't get orderline handle\n";
That seemed to be sufficient before.
- Grant
More information about the interchange-users
mailing list