sybperl-l Archive

From: Louis Proyect <lnp3 at columbia dot edu>
Subject: inexplicable CTI lib message
Date: Sep 14 1999 6:30PM

When running this script: 

====
#!/usr/local/bin/perl
use Sybase::CTlib;
 
open(OUTFILE, ">idi.dat");
 
ct_callback(CS_SERVERMSG_CB, "srv_cb");
 
$X = Sybase::CTlib->ct_connect("xxx", "yyy");
 
@res = $X->ct_sql("exec IDITransmit_lou");
 
foreach $row (@res)
{print "@$row\n";
  }
 
close OUTFILE;
 
sub srv_cb {
             my($dbh, $number, $severity, $state, $line, $server,
                $proc, $msg) = @_;
             if ($msg =~ /Wrote a total/)
              $proc, $msg) = @_;  
             elsif ($proc =~ /IDI/)
                {print OUTFILE "$msg\n";}
         }
====

I get these messages, but not on every execution. What do they mean?

Thanks,

Louis Proyect
Columbia University


Open Client Message:
Message number: LAYER = (1) ORIGIN = (1) SEVERITY = (1) NUMBER = (50)
Message String: ct_cmd_alloc(): user api layer: external error: The
connection has been marked dead.
ct_cmd_alloc failed at idi_transmit.pl line 8.
 
Open Client Message:
Message number: LAYER = (1) ORIGIN = (1) SEVERITY = (1) NUMBER = (60)
Message String: ct_con_drop(): user api layer: external error: There is a
usage
error.  This routine has been called at an illegal time.
Can't call method "ct_sql" on an undefined value at idi_transmit.pl line 10.