Error Message :
"code" : 45110,
"error" : "An Automation Engine internal error occured.",
"details" : "No detail information available."
REST API calls fail when issued with PERL.
Investigation
Run a code like below : use REST::Client;
use JSON;
# Data::Dumper makes it easy to see what the JSON returned actually looks like
# when converted into Perl data structures.
use Data::Dumper;
use MIME::Base64;
$lgnr="4655512026";
$klgnr="465551202";
$parameter="BRGEV";
$stadtwerke=" ";
$transid="K0000626";
$dsn="P.ABR.TAB";
$sprache="D";
$date="210917";
$ftpfilepath="c:\\temp";
#$transid="api.txt";
my $username = 'AUTOMIC/AUTOMIC';
my $password = 'AUTOMIC';
my %request_abronl_map = (
'object_name' => "ABRE.$demand1",
'inputs' => {'VLGNR#' => "$lgnr", 'BLGNR#' => "$lgnr",'VLGNRK#' => "$klgnr",'BLGNRK#' => "$klgnr",'P2950#' => "$parameter",'STWK#' => "$stadtwerke",'JOBNAM#' => "$transid",'DSN#' => "$dsn",'SPRA#' => "$sprache",'DATUM#' => "$datum"}
);
my $encoded_auth = encode_base64("$username:$password", '');
my $client = REST::Client->new();
$client->setHost('http://<AE_host:8088/ae/api/v1');
# POST to the incident table
$client->POST('/3/executions',
encode_json(\%request_abronl_map),
{'Authorization' => "Basic $encoded_auth",
'Content-Type' => 'application/json',
'Accept' => 'application/json'}
);
print 'Response: ' . $client->responseContent() . "\n"; Results
The request will fail and get this JSON response :Response: {
"code" : 45110,
"error" : "An Automation Engine internal error occured.",
"details" : "No detail information available."
}