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();