sub showsect{
my $TERM;
my $Collection;
#offerprice isused to control display of additional pictures in offers and artists network
my $offerprice=0;
print "\n<div class='sectsel'>\n";
$DIMS=150;
if($_[0] == 1){
$pic_sql="SELECT TITLE, ARTIST, STYLE, MEDIUM, FORMAT, CATEGORY, WIDTH, HEIGHT, SPRICE, FILENAME, NUM FROM PICTURES WHERE CUSNUM='YES' AND ARTALLOW<>'NO' AND $WhichSection = '$WhichItem' ORDER BY RAND()";
}elsif($_[0] == 2){
$pic_sql="SELECT TITLE, ARTIST, STYLE, MEDIUM, FORMAT, CATEGORY, WIDTH, HEIGHT, SPRICE, FILENAME, NUM FROM PICTURES WHERE CUSNUM='YES' AND ARTALLOW<>'NO' AND CATEGORY<>'SOLD' ORDER BY NUM DESC LIMIT 12";
$WhichItem="New Items";
}elsif($_[0] == 3){
$pic_sql="SELECT TITLE, ARTIST, STYLE, MEDIUM, FORMAT, CATEGORY, WIDTH, HEIGHT, SPRICE, FILENAME, NUM FROM PICTURES WHERE CUSNUM='YES' AND ARTALLOW<>'NO' AND MEDIUM LIKE '%SCULPTURE%' ORDER BY RAND()";
$WhichItem="Sculptures";
}elsif($_[0] == 4){
$TERM=$query->param("serchterm") || "";
open (SLOG, ">>serchlog.txt") || &errormess;
print SLOG "$TIMELINE";
print SLOG " - ";
print SLOG "$TERM";
print SLOG "\n";
close (SLOG);
$pic_sql="SELECT TITLE, ARTIST, STYLE, MEDIUM, FORMAT, CATEGORY, WIDTH, HEIGHT, SPRICE, FILENAME, NUM FROM PICTURES WHERE CUSNUM='YES' AND ARTALLOW<>'NO' AND (MEDIUM LIKE '%$TERM%' OR TITLE LIKE '%$TERM%' OR STYLE LIKE '%$TERM%'OR ARTIST LIKE '%$TERM%') ORDER BY RAND()";
}elsif($_[0] == 5){
# Special Offer List
$pic_sql="SELECT TITLE, ARTIST, STYLE, MEDIUM, FORMAT, CATEGORY, WIDTH, HEIGHT, SPRICE, FILENAME, NUM, SPRICE FROM PICTURES WHERE CUSNUM='YES' AND ARTALLOW<>'NO' AND CATEGORY='DISCOUNT' ORDER BY RAND()";
$WhichItem="Special Offer";
# set offerprice to display discount graphic
$offerprice=1;
}elsif($_[0] == 6){
# Artist's network main screen launch
$pic_sql="SELECT TITLE, ARTIST, STYLE, MEDIUM, FORMAT, CATEGORY, WIDTH, HEIGHT, SPRICE, FILENAME, NUM, SPRICE FROM PICTURES WHERE CUSNUM='YES' AND ARTALLOW<>'NO' AND CATEGORY='ARTNET' ORDER BY RAND()";
$WhichItem="Artist's Network";
# set offerprice to suppress bottom images and artist details
$offerprice=2;
}
$pic_sth=$dbh->prepare($pic_sql);
$pic_sth->execute();
$pic_rows=$pic_sth->rows;
my $ArtistStory='';
if($pic_rows > 0){
if($_[0] == 4){
print "<h1>Site Search for the term '$TERM' ($pic_rows)</h1>";
}else{
$Collection=&make_proper($WhichItem);
my $bits;
my $ArtistLink="artstory/".$Collection;
$ArtistLink=~ s/ //g;
$ArtistLink=lc($ArtistLink);
$ArtistLink.=".kjw";
if(-e $ArtistLink){
open (LOG, "<".$ArtistLink) || print "cannot open file";
@allmessages=<LOG>;
close LOG;
foreach $bits (@allmessages){
$ArtistStory.=$bits;
}
}
print "<div class='secthead'>The $Collection Collection ($pic_rows)</div>";
if($offerprice == 1){
print "<img src='images2/offerpic.jpg'><br>";
}
}
if($pic_rows == 1){
print "<p><div class='small'>Click the Picture to Enlarge</div></p>";
}else{
print "<p><div class='small'>Click a Picture to Enlarge</div></p>";
}
my $printit;
my @PrintPics;
my $Piccer;
my $Caption;
my $AltCont;
my $BlankDiv="\n<div class='sectselitem'> \n</div>\n";
my $numnum;
my $countr;
my @pic_results;
while(@pic_results=$pic_sth->fetchrow_array()){
++$countr;
$pic_results[9].=".jpg";
$pic_results[9]=lc $pic_results[9];
$pic_results[0]=&make_proper($pic_results[0]);
$pic_results[1]=&make_proper($pic_results[1]);
if(uc $WhichSection ne "ARTIST"){
$Caption="<br>$pic_results[0]<br>$pic_results[1]";
$AltCont="<br>$pic_results[0] by $pic_results[1] - Click for large picture";
}else{
$Caption="<br>$pic_results[0]";
}
if($offerprice == 1){
if($pic_results[11] > 10){
$pic_results[11]=sprintf("%.2f",$pic_results[11]);
$Caption.="<br><strong>£$pic_results[11] before discount.</strong>";
}else{
$Caption.="<br><strong>Price on Application</strong>";
}
}
$ARTIST=uc($pic_results[1]);
if($LOCATION==0){
$Piccer="\n<div class='sectselitem'><a href=\"artdec.cgi?lastsec=$LastSect&critter=$WhichItem&stile=$WhichSection&lastitm=$LastItem&lastinp=$INP&biscuits=$BASKONT&fishnet=$EXERT&call=showbigpic&num=$pic_results[10]&artist=$ARTIST#pictop\"><img border='0' src='$pic_results[9]' width='$DIMS' height='$DIMS' alt=''>";
if($pic_results[5] eq 'Yes'){
$Piccer.= "\n<div class='frontextsold'>SOLD\n</div>\n";
}
$Piccer.= "$Caption</a><br>\n</div>\n\n";
}else{
$Piccer="\n<div class='sectselitem'><a title='Click to show larger image.' href=\"artdec.cgi?lastsec=$LastSect&critter=$WhichItem&stile=$WhichSection&lastitm=$LastItem&lastinp=$INP&biscuits=$BASKONT&fishnet=$EXERT&call=showbigpic&num=$pic_results[10]&artist=$ARTIST&offert=$offerprice#pictop\"><img border='0' src=\"fumnail2.php?imnam=$pic_results[9]&maxwid=$DIMS&maxhi=$DIMS&blow=17\" alt='Click to show larger image.'>";
if($pic_results[5] eq 'SOLD'){
$Piccer.= "\n<div class='frontextsold'>SOLD\n</div>\n";
}
$Piccer.= "$Caption</a><br>\n</div>\n\n";
}
if(($countr < 2) and ($pic_rows%3 == 1)){
push(@PrintPics,$BlankDiv);
push(@PrintPics,$Piccer);
push(@PrintPics,$BlankDiv);
}elsif(($countr < 2) and ($pic_rows%3 == 2)){
push(@PrintPics,$Piccer);
push(@PrintPics,$BlankDiv);
}else{
push(@PrintPics,$Piccer);
}
}
for($countr=1; $countr<=@PrintPics; ++$countr){
print "$PrintPics[-$countr]";
}
my $art_sql;
$Collection=uc($Collection);
$art_sql="SELECT ADDINFO, BIOPIC FROM ARTISTS WHERE NAME='$Collection' AND EXHIB='YES'";
if($_[0] < 5){
&GetBioInfo($art_sql,$ARTIST);
}
if($EXERT eq 'lookaritetit'){
print "<p><a href='artdec.cgi?biscuits=&call=exar&pag=exa'>Return to Exhibited Artists</a></p>";
}
}else{
print "<h1>Sorry - No matches were found for the term '$TERM'.</h1>";
print "<hr><h2>N E E D H E L P ?</h2><a href=\"javascript:contWindow('artnet.cgi?biscuits=BASKIT&call=contact&witch=7&disp=5&dispat=1&mekfile=n&disptype=ED')\"><br>Please Contact Us</a><br><hr>";
}
if($_[0] == 4){
print "<h1>Search Again?</h1>";
print "\n<div class='serch'>";
print "\n<div class='logz'><form method='POST' action='artdec.cgi'>Search The Site";
print "<input type='text' name='serchterm' size='14'>";
print "<input type='submit' value='Find Me' name='call'></form>";
print "</div></div>";
}
print "<p><a href='artdec.cgi?biscuits=&fishnet=$EXERT&call=hindhex&pag=ind&biscuits=$BASKONT'><img border='0' src='buttons/homepage.jpg'></a>";
print "</p>";
if($BASKONT){
print "<p><a href='artbuy.cgi?fishnet=$EXERT&call=newrtbuy&biscuits=$BASKONT'>Proceed to Checkout</a></p>";
}
print "<!-- ENDIV sectsel --></div><!-- ENDIV pagcont --></div><div class='pagcont'><!-- DIV pagcont -->";
}