load failure - SQL0104N Db2 version 9

[Justin]

Excuted the statement through a SSH connection:

db2 import from <filename.ixf of ixf messages /database/stage/
acct_news_asc.t xt insert into userid.acct_new s_asc

And it worked fine.

Ran the same command through perl and received an error:
SQLErr: [IBM][CLI Driver][DB2/LINUXX8664] SQL0104N An unexpected
token "/database/stage/acct_news_asc.t xt" was found following
"MESSAGES". Expected tokens may include: "ON". SQLSTATE=42601
(-104)(42601)

Error while executing import on acct_news_asc.

Any suggestions would be helpful...

[Ian]

Justin wrote:

Excuted the statement through a SSH connection:

db2 import from <filename.ixf of ixf messages /database/stage/
acct_news_asc.t xt insert into userid.acct_new s_asc

And it worked fine.

Ran the same command through perl and received an error:

How exactly did you run the command? Via DBD::DB2? By using the
system() function? What was the exact statement you tried to execute?

It would be helpful to see an excerpt of the code that is doing this.

[Justin]

Ian,

Thanks for responding so quickly.

Yes, the command is run through DBD::DB2 (perl).

We use the sysproc.admin_c md. A similar piece code works great for
the export.

Here is the perl code:

# setup import command
my $importcmd = "Load FROM " . $filename . " OF IXF MESSAGES " .
$messagefile . " INSERT INTO USERID." . $table ;

# Prepare import command
my $sths = $dbh->prepare("cal l sysproc.admin_c md(?)")
or return ($self->do_return($q , 0, $dbh->errstr, $dbh->err, $dbh-

>state,

"Error while preparing import on $table.", $dbh));

# Bind input parameters
$sths->bind_param( 1, $importcmd);

# Call the stored procedure
$sths->execute()
or return ($self->do_return($q , 0, $dbh->errstr, $dbh->err, $dbh-

>state,

"Error while executing import on $table.", $dbh));

$sths->finish();

On Nov 12, 11:15 pm, Ian <ianb...@mobile audio.comwrote:

>
How exactly did you run the command? Via DBD::DB2? By using the
system() function? What was the exact statement you tried to execute?

It would be helpful to see an excerpt of the code that is doing this.

[Justin]

Interesting enough... If I take out messages (and associate msg text
file) it works fine through perl

Not sure if that is helpful...

[Justin]

Message on server was the part that I was missing.

Thanks.

For those who run into similar - here is a little info:

my $importcmd = "LOAD FROM " . $filename . " OF IXF MESSAGES on
server INSERT INTO USERID." . $table ;
print "importcmd = $importcmd\n";

# Prepare import command
my $sths = $dbh->prepare("cal l sysproc.admin_c md(?)") #
sysproc.db2load
or return ($self->do_return($q , 0, $dbh->errstr, $dbh->err, $dbh-

>state,

"Error while preparing import on $table.", $dbh));

# Bind input parameters
$sths->bind_param( 1, $importcmd);

# Call the stored procedure
$sths->execute()
or return ($self->do_return($q , 0, $dbh->errstr, $dbh->err, $dbh-

>state,

"Error while executing import on $table.", $dbh));
# bind column 1 to variable
$sths->bind_col(1, \$outCol1);

# bind column 2 to variable
$sths->bind_col(2, \$outCol2);

# bind column 3 to variable
$sths->bind_col(3, \$outCol3);

# bind column 4 to variable
$sths->bind_col(4, \$outCol4);

# bind column 5 to variable
$sths->bind_col(5, \$outCol5);

# bind column 6 to variable
$sths->bind_col(6, \$outCol6);

# bind column 9 to variable
$sths->bind_col(9, \$msg_retrieval );

# bind column 10 to variable
$sths->bind_col(10, \$msg_removal);