sub DB_Abfrage { # Abfrage auf der DB ; aus Datenschutzgründen entfernt $i = 0; $HTML_Anzeige_Zaehler = 0; foreach( @Ergebnis_SQL_DB ) { my $Anzahl = 1; my $x = 0; # ------------------------------------------------------- $HTML_Anzeige_SSTs = $Ergebnis_SQL_DB[$i][3]; $HTML_Anzeige_Broker = $Ergebnis_SQL_DB[$i][4]; $HTML_Anzeige_MTs = $Ergebnis_SQL_DB[$i][7]; $HTML_Anzeige_Status = $Ergebnis_SQL_DB[$i][9]; $HTML_Anzeige_EC = $Ergebnis_SQL_DB[$i][10]; $HTML_Anzeige_Anzahl = $Ergebnis_SQL_DB[$i][11]; # ------------------------------------------------------- $Umwandlung_TS_I = $Ergebnis_SQL_DB[$i][1]; $Umwandlung_TS_II = $Ergebnis_SQL_DB[$i][2]; for ( $x = 0; $x < $Anzahl; $x++ ) { if ( $Ergebnis_SQL_DB[$i][10] == '00000' ) { &Anzeige_Ergebnisse(); } if ( $Ergebnis_SQL_DB[$i][10] != '00000' ) { &Anzeige_Ergebnisse(); } } print "\n"; $i++; $HTML_Anzeige_Zaehler++; } }