<%
my @v;
if ($value[2]) {
$v[0] = $value[1];
$v[1] = $value[2];
$v[2] = $value[3];
$v[3] = $value[11];
} else {
if ($PAGE{level} > 1) {
my $prev = $PAGE{level}-1;
$prev = "" if ($prev eq "1");
my $prev = $PAGE{qq(thema${prev}_id)};
$v[1] = $PAGE{level};
if (-f "../se_data/_framework/html_default_${prev}.txt") {
my $sep = $/;
$/ = "\n";
if (open(FRAMEWORKFILE, "../se_data/_framework/html_default_${prev}.txt")) {
my @frameworkfile = ;
close(FRAMEWORKFILE);
chomp(@frameworkfile);
$v[0] = $frameworkfile[1];
$v[1] = $frameworkfile[2];
$v[2] = $frameworkfile[3];
$v[3] = $frameworkfile[11];
}
$/ = $sep;
}
}
if ($v[1] eq "") {
$v[0] = $PAGE{framework_data_global}[1];
$v[1] = $PAGE{framework_data_global}[2];
$v[2] = $PAGE{framework_data_global}[3];
$v[3] = $PAGE{framework_data_global}[11];
}
}
$v[0] = qq( $v[0] ) if ($v[0] ne "");
$v[1] = qq( ) if ($v[1] eq "");
$v[2] = qq( style="background-image: url(/se_data/_filebank/$v[2]);") if ($v[2] ne "");
$v[3] = qq( cursor: pointer;" OnClick="location.href='$v[3]';) if ($v[3] ne "");
return qq(
);
%>
|
<%
my @v;
if ($value[2]) {
$v[0] = $value[4];
$v[1] = $value[5];
$v[2] = $value[6];
$v[3] = $value[12];
} else {
if ($PAGE{level} > 1) {
my $prev = $PAGE{level}-1;
$prev = "" if ($prev eq "1");
$prev = $PAGE{qq(thema${prev}_id)};
if (-f "../se_data/_framework/html_default_${prev}.txt") {
my $sep = $/;
$/ = "\n";
if (open(FRAMEWORKFILE, "../se_data/_framework/html_default_${prev}.txt")) {
my @frameworkfile = ;
close(FRAMEWORKFILE);
chomp(@frameworkfile);
$v[0] = $frameworkfile[4];
$v[1] = $frameworkfile[5];
$v[2] = $frameworkfile[6];
$v[3] = $frameworkfile[12];
}
$/ = $sep;
}
}
if ($v[1] eq "") {
$v[0] = $PAGE{framework_data_global}[4];
$v[1] = $PAGE{framework_data_global}[5];
$v[2] = $PAGE{framework_data_global}[6];
$v[3] = $PAGE{framework_data_global}[12];
}
}
$v[0] = qq( $v[0] ) if ($v[0] ne "");
$v[1] = qq( ) if ($v[1] eq "");
$v[2] = qq( style="background-image: url(/se_data/_filebank/$v[2]);") if ($v[2] ne "");
$v[3] = qq( cursor: pointer;" OnClick="location.href='$v[3]';) if ($v[3] ne "");
return qq(
);
%>
|
<%
my @v;
if ($value[2]) {
$v[0] = $value[7];
$v[1] = $value[8];
$v[2] = $value[9];
$v[3] = $value[13];
} else {
if ($PAGE{level} > 1) {
my $prev = $PAGE{level}-1;
$prev = "" if ($prev eq "1");
$prev = $PAGE{qq(thema${prev}_id)};
if (-f "../se_data/_framework/html_default_${prev}.txt") {
my $sep = $/;
$/ = "\n";
if (open(FRAMEWORKFILE, "../se_data/_framework/html_default_${prev}.txt")) {
my @frameworkfile = ;
close(FRAMEWORKFILE);
chomp(@frameworkfile);
$v[0] = $frameworkfile[7];
$v[1] = $frameworkfile[8];
$v[2] = $frameworkfile[9];
$v[3] = $frameworkfile[13];
}
$/ = $sep;
}
}
if ($v[1] eq "") {
$v[0] = $PAGE{framework_data_global}[7];
$v[1] = $PAGE{framework_data_global}[8];
$v[2] = $PAGE{framework_data_global}[9];
$v[3] = $PAGE{framework_data_global}[13];
}
}
$v[0] = qq( $v[0] ) if ($v[0] ne "");
$v[1] = qq( ) if ($v[1] eq "");
$v[2] = qq( style="background-image: url(/se_data/_filebank/$v[2]);") if ($v[2] ne "");
$v[3] = qq( cursor: pointer;" OnClick="location.href='$v[3]';) if ($v[3] ne "");
return qq(
);
%>
|