I'm running ArsPerl 1.85, compiled against 5.1.2 Remedy lib.

I can build a connection object, but if I try to open a form, I get
ARERR #149.  If I just connect and exit, it segfaults on exit.  

Here is my script and output:

-----------
#!/usr/local/bin/perl5  
# 
 
use ARS; 
$server = 'remedy1.andrew.cmu.edu'; 
$userid = 'blk'; 
$passwd = 'remedy'; 
 
## get connection 
my $connection =  
  new ARS ( 
           -server   => $server, 
           -username => $userid, 
           -password => $passwd, 
           -catch => undef, 
           -ctrl => undef, 
           -debug => 1 
          ); 
 
die("Unable to connect to server\n") 
  unless ($connection); 
 
$connection->print() if $connection; 
 
print "got connection\n"; 
#exit; 
 
## open form 
my $FormName = "HPD:HelpDesk"; 
my $form = $connection->openForm( 
                                 -form => $FormName, 
                                 -vui => undef 
                                ); 
 
print "got form\n"; 
exit; 

-----------

% ./arsconnect
new connection object: (remedy1.andrew.cmu.edu, blk, remedy)
connection object details:
        cacheId       = ARControlStructPtr=SCALAR(0x8413bc8)
        operationTime = Wed Dec 31 19:00:00 1969
        user          = 
        password      = 
        server        = 
        lang          = 
got connection
[ERROR] Cannot open catalog; Message number = 149 () (ARERR #149)

TRACEBACK:

exception generated at
/usr/local/lib/perl5/site_perl/5.8.6/i686-linux-thread-multi-64int-ld/ARSOOform.pm
line 47
        ARS::form::new('ARS::form', '-form', 'HPD:HelpDesk', '-vui',
'undef', '-connection', 'ARS=HASH(0x8413b48)') called at
/usr/local/lib/perl5/site_perl/5.8.6/i686-linux-thread-multi-64int-ld/ARSOOsup.pm
line 138
        ARS::openForm('ARS=HASH(0x8413b48)', '-form', 'HPD:HelpDesk',
'-vui', 'undef') called at ./arsconnect line 30

destroying connection object: ars_Logoff called.
Segmentation fault
% 

Any ideas on how to debug this?  

Thanks,
barbara

-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys - and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Arsperl-users mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/arsperl-users

Reply via email to