| Thread Ausgabefehler.... HILFE: der gibt nur sch.... aus
(19 answers) Opened by
Gast
at 2003-09-04 01:07
 
View full thread Ausgabefehler.... HILFE: der gibt nur sch.... aus
User since2003-09-04
 77
Artikel
 BenutzerIn
 
 ![[default_avatar]](/battie/theme/default/default_avatar.gif)  
jo, kann mir zwar nicht vorstellen, dass es am script liegt, aber hier ist es. Ich habe den Ausschnitt gepostet, in dessen Ausgabe der Fehler kommt. Das gesamte Script ist nämlich 1370 Zeilen lang. Wäre echt cool, wenn jemand was finden würde. Ist extrem wichtig. 
12
 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
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
 100
 101
 102
 103
 104
 105
 106
 107
 108
 109
 110
sub Daten_Ausgabe {&allgemeineseinlesen;
 &Kalender3($allgemein->{freigabemandokusdatum});
 
 # Layout Einlesen
 my $template = HTML::Template->new(filename => $LayoutDateienPfad.'mdoku/mhb-liste.htm');
 $template->param(benutzer      => $in{benutzer});
 $template->param(freigabetag   => $Zeit[2]);
 $template->param(freigabemonat => $Zeit[1]);
 $template->param(freigabejahr  => $Zeit[4]);
 $template->param(ort  => $allgemein->{ort});
 $template->param(nkuerzel  => $allgemein->{namemandokusfreigabe});
 
 # Kapitel:
 my $sql = qq{ SELECT * FROM mdoku_kapitel where geloescht = 'n' and aktiv like 'ja' order by nummer, nummer2, nummer3 };
 
 my $sth = $dbh->prepare( $sql );
 $sth->execute();
 
 while( $row = $sth->fetchrow_hashref ) {
 
 my %row_data1;
 
 $row_data1{Inhaltnummer} = "$row->{nummer}";
 
 if($row->{tabart} eq "oberkap") {
 $row_data1{zeilebg} = "#F4F4F4";
 #$row_data1{Bearbeiten} = "<a href=$Tabellenname.pl?ID=$row->{ID}&art=bearbeitenformoberkap&benutzer=$in{benutzer}><image src=\"$BearbeitenBild\" width=\"15\" height=\"15\" border=\"0\"></a>";
 $row_data1{Bearbeiten} = " ";
 #$row_data1{Loeschen} = "<a href=$Tabellenname.pl?ID=$row->{ID}&art=loeschenoberkap&benutzer=$in{benutzer}><image src=\"$LoeschenBild\" width=\"15\" height=\"15\" border=\"0\"></a>";
 $row_data1{Inhaltversion} = " ";
 }
 if($row->{tabart} eq "zwkap") {
 $row_data1{Inhaltnummer} .= ".$row->{nummer2}";
 #$row_data1{Bearbeiten} = "<a href=$Tabellenname.pl?ID=$row->{ID}&art=bearbeitenformzwkap&benutzer=$in{benutzer}><image src=\"$BearbeitenBild\" width=\"15\" height=\"15\" border=\"0\"></a>";
 $row_data1{Bearbeiten} = " ";
 #$row_data1{Loeschen} = "<a href=$Tabellenname.pl?ID=$row->{ID}&art=loeschenzwkap&benutzer=$in{benutzer}><image src=\"$LoeschenBild\" width=\"15\" height=\"15\" border=\"0\"></a>";
 $row_data1{Inhaltversion} = " ";
 }
 if($row->{tabart} eq "unterkap") {
 if($row->{nummer2} ne "") { $row_data1{Inhaltnummer} .= ".$row->{nummer2}"; }
 else{ $row_data1{zeilebg} = "#F4F4F4"; }
 if($row->{nummer3} ne "") { $row_data1{Inhaltnummer} .= ".$row->{nummer3}"; }
 $row_data1{Bearbeiten} = "<a href=$Tabellenname.pl?ID=$row->{ID}&art=bearbeitenformunterkap&benutzer=$in{benutzer}><image src=\"$BearbeitenBild\" width=\"15\" height=\"15\" border=\"0\"></a>";
 #$row_data1{Loeschen} = "<a href=$Tabellenname.pl?ID=$row->{ID}&art=loeschenunterkap&benutzer=$in{benutzer}><image src=\"$LoeschenBild\" width=\"15\" height=\"15\" border=\"0\"></a>";
 $row_data1{Inhaltversion} = "$row->{version}";
 }
 
 $row_data1{Inhalttitel} = "<a href=\"mdoku_admin.pl?art=ausgabe$row->{tabart}&benutzer=$in{'benutzer'}&ID=$row->{ID}\">$row->{titel}</a>";
 
 push(@loop_data1, \%row_data1);
 }
 $sth->finish();
 
 $template->param( kapitel => \@loop_data1 );
 
 # Verfahrensanweisungen:
 $sql = qq{ SELECT * FROM mdoku_verfahren where geloescht = 'n' order by nummer, nummer2, nummer3, nummer4};
 $sth = $dbh->prepare( $sql );
 $sth->execute();
 
 while( $row = $sth->fetchrow_hashref ) {
 
 my %row_data2;
 
 $row_data2{vanummer} = "$row->{nummer}";
 if($row->{nummer2} ne "") { $row_data2{vanummer} .= ".$row->{nummer2}"; }
 if($row->{nummer3} ne "") { $row_data2{vanummer} .= ".$row->{nummer3}"; }
 if($row->{nummer4} ne "") { $row_data2{vanummer} .= " - $row->{nummer4}"; }
 
 $row_data2{vatitel} = "<a href=\"mdoku_admin.pl?art=ausgabe$row->{tabart}&benutzer=$in{'benutzer'}&ID=$row->{ID}\">$row->{titel}</a>";
 $row_data2{vaversion} = "$row->{version}";
 
 $row_data2{Bearbeiten} = "<a href=$Tabellenname.pl?ID=$row->{ID}&art=bearbeitenformverfahren&benutzer=$in{benutzer}><image src=\"$BearbeitenBild\" width=\"15\" height=\"15\" border=\"0\"></a>";
 $row_data2{Loeschen} = "<a href=$Tabellenname.pl?ID=$row->{ID}&art=loeschenverfahren&benutzer=$in{benutzer}><image src=\"$LoeschenBild\" width=\"15\" height=\"15\" border=\"0\"></a>";
 
 push(@loop_data2, \%row_data2);
 }
 $sth->finish();
 
 $template->param( verfahren => \@loop_data2 );
 
 # Arbeitsanweisungen:
 $sql = qq{ SELECT * FROM mdoku_arbeit where geloescht = 'n' order by nummer, nummer2, nummer3, nummer4};
 $sth = $dbh->prepare( $sql );
 $sth->execute();
 
 while( $row = $sth->fetchrow_hashref ) {
 
 my %row_data3;
 
 $row_data3{Inhaltnummer} = "$row->{nummer}";
 if($row->{nummer2} ne "") { $row_data3{Inhaltnummer} .= ".$row->{nummer2}"; }
 if($row->{nummer3} ne "") { $row_data3{Inhaltnummer} .= ".$row->{nummer3}"; }
 if($row->{nummer4} ne "") { $row_data3{Inhaltnummer} .= " - $row->{nummer4}"; }
 
 $row_data3{Inhalttitel} = "<a href=\"mdoku_admin.pl?art=ausgabe$row->{tabart}&benutzer=$in{'benutzer'}&ID=$row->{ID}\">$row->{titel}</a>";
 $row_data3{Inhaltversion} = "$row->{version}";
 
 $row_data3{Bearbeiten} = "<a href=$Tabellenname.pl?ID=$row->{ID}&art=bearbeitenformarbeit&benutzer=$in{benutzer}><image src=\"$BearbeitenBild\" width=\"15\" height=\"15\" border=\"0\"></a>";
 $row_data3{Loeschen} = "<a href=$Tabellenname.pl?ID=$row->{ID}&art=loeschenarbeit&benutzer=$in{benutzer}><image src=\"$LoeschenBild\" width=\"15\" height=\"15\" border=\"0\"></a>";
 
 push(@loop_data3, \%row_data3);
 }
 $sth->finish();
 
 $template->param( arbeitsanweisungen => \@loop_data3 );
 
 print $template->output;
 }
 
Die Datenbankstruktur:
 
12
 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
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
CREATE TABLE `mdoku_kapitel` (`ID` text,
 `geloescht` char(2) default NULL,
 `nummer` text,
 `nummer2` text,
 `nummer3` text,
 `titel` text,
 `textdatei` text,
 `bild1` text,
 `bild2` text,
 `bild3` text,
 `bild4` text,
 `bild5` text,
 `bild6` text,
 `bild7` text,
 `bild8` text,
 `bild9` text,
 `bild10` text,
 `unterlage1` text,
 `unterlage2` text,
 `unterlage3` text,
 `unterlage4` text,
 `unterlage5` text,
 `unterlage6` text,
 `unterlage7` text,
 `unterlage8` text,
 `unterlage9` text,
 `unterlage10` text,
 `unterlage11` text,
 `unterlage12` text,
 `unterlage13` text,
 `unterlage14` text,
 `unterlage15` text,
 `unterlage16` text,
 `unterlage17` text,
 `unterlage18` text,
 `unterlage19` text,
 `unterlage20` text,
 `version` text,
 `benutzer` text,
 `archiver` text,
 `tabart` text,
 `stand` int(11) default NULL,
 `archivdatum` int(11) default NULL,
 `aktiv` text NOT NULL,
 `unterlage21` text NOT NULL
 ) TYPE=MyISAM;
 |