Ce script vous affiche les même renseignement que la transaction SM21

 

Attention le champ version doit être en minuscule sinon un conflit
avec une variable du module SAP empéche le script de fonctionner

 

 

use SAP::Rfc;
use SAP::Iface;
use strict;

my $rfc = new SAP::Rfc(
ASHOST => 'host',
USER => 'user',
PASSWD => 'passsword',
LANG => 'FR',
CLIENT => '008',
SYSNR => '00',
);
my $it = $rfc->discover("SXMI_LOGON");
$it->EXTCOMPANY("BORCHERS");
$it->EXTPRODUCT("PHP");
$it->INTERFACE("XMB");
$it->version("0.1");
$rfc->callrfc($it);
$it = $rfc->discover("SXMI_XMB_SYSLOG_READ");
#$it->{'PARAMETERS'}->{'SERVER_NAME'}->{'VALUE'}='';
$it->LIMIT_PAGES("999");
$it->FROM_DATE("20030101");
$it->FROM_TIME("010000");
$it->TO_DATE("20030201");
$it->TO_TIME("230000");
$it->EXTERNAL_USER_NAME('BORCHERS');
$rfc->callrfc( $it );
my @syslog= $it->SYSLOG_TBL;
for my $log (@syslog)
{
print $log."\n";

}

$rfc->close();