|
|
|
|
Hi, dear all interchange users
I managed to install the latest release 4.5.6 with all the
optional modules and everything seems working fine.
Except that when I
tried to delete an item. Can anyone out there tell me what is my problem? I got
internal server
error and the error log shows the following error
message:
127.0.0.1 c7rFf9By:goh goh [02/October/2000:16:18:35 +1100] construct
/cgi-bin/construct/admin/item_edit.html
Safe: Can't locate object method "import_db" via package
"Vend::Table::GDBM" at /usr/local/interchange/lib/Vend/
Table/Common.pm line 403.
> delete $Scratch->{ui_location};
> if($CGI->{ui_sequence_edit}) {
> my $doit;
> if($CGI->{item_id_left} =~ s/^(.*?),//) {
> $CGI->{item_id} = $1;
> $doit = 1;
> }
> elsif ($CGI->{item_id_left}) {
> $CGI->{item_id} = delete $CGI->{item_id_left};
> delete $CGI->{ui_sequence_edit};
> $doit = 1;
> }
> else {
> delete $CGI->{item_id};
> delete $CGI->{ui_sequence_edit};
> }
> return unless $doit;
> $Scratch->{ui_location}
> = $Tag->area( {
> href =">" 'admin/item_edit',
> form => qq{
> item_id=$CGI->{item_id}
> item_id_left=$CGI->{item_id_left}
> ui_sequence_edit=$CGI->{ui_sequence_edit}
> },
> });
> return;
> }
>
> return unless $CGI->{item_id};
> return unless delete $CGI->{deleterecords};
> return unless $Tag->if_mm('tables', '=d');
>
> delete $Scratch->{ui_location};
> $Config->{NoSearch} = '';
> my $tab = $CGI->{mv_data_table} or return;
> my $db = $Db{$tab};
> if(! $db) {
> $Scratch->{error_message} = "<FONT CLASS=error>Error: no
<B>$tab</B> database.</FONT><BR>";
> $Scratch->{ui_location} = "admin/error";
> return;
> }
>
> for(grep $_, @{$CGI_array->{item_id}}) {
> $db->delete_record($_)
> or push @errors, $@;
> }
> if(@errors) {
> my $plural = @errors > 1 ? 's' : '';
> return "<FONT CLASS=error>Error$plural:<UL><LI>"
.
> join ("<LI>", @errors) .
> "</UL></FONT><BR>";
> }
> return;
>
>
127.0.0.1 c7rFf9By:goh goh [02/October/2000:16:18:35 +1100] construct
/cgi-bin/construct/admin/item_edit.html Runtime
error: Can't call method "open_table" on an undefined value at
/usr/local/interchange/lib/Vend/Data.pm line 799.
>
Thank You
Goh, L.K
|