Thread Subroutine (5 answers)
Opened by leissi at 2006-01-20 13:52

leissi
 2006-01-20 14:15
#62105 #62105
User since
2005-07-06
84 Artikel
BenutzerIn
[default_avatar]
Hi,

ich rufe die Ergebnisse der Subroutinen so auf:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
my $code = 'true';

my $ReturnCode1 = &runSqlBackCheck; # start subroutine: runSqlBackCheck
my $ReturnCode2 = &runOtaCheck; # start subroutine: runOtaCheck
my $ReturnCode3 = &runSqlTrnCheck; # start subroutine: runSqlTrnCheck

# Hier muß ich das Ergebnis auswerten

if ( $ReturnCode1 == 1 && $ReturnCode2 == 1 && $ReturnCode3 == 1)
{
# Gesamtergebnis positiv

print LogDatei '*' x 130, "\n";
print LogDatei '#' x 130, "\n";
print LogDatei '#' x 130, "\n";
print LogDatei " Die Z3S BackupKontrolle war erfolgreich!!!!! \n";
print LogDatei '#' x 130, "\n";
}
else
{
# Gesamtergebnis negativ

print LogDatei '*' x 130, "\n";
print LogDatei '#' x 130, "\n";
print LogDatei '#' x 130, "\n";
print LogDatei " Die Z3S BackupKontrolle war nicht erfolgreich!!!!! \n";
print LogDatei '#' x 130, "\n";
print LogDatei "Einzelergebnisse:\n";


Es sind drei Subroutinen bei den anderen beiden erhalte ich das gewünschte Ergebnis!
Nu bei diesem erhalte ich einen negativen Wert auch zurück wenn er alles als positiv als richtig bewertet!

Gruss
:rock:

View full thread Subroutine