Errors Output
  1. SelectRecs: SELECT manufacturer,designation,parttype,sku,id FROM calconv_part WHERE id IN (); failed for /home/gunwiki/public_html/apps/calconversion/showconvparts.asp with error ERROR: syntax error at or near ")" LINE 1: ...esignation,parttype,sku,id FROM calconv_part WHERE id IN (); ^ at /usr/local/sitetools/CS.pm line 271. , /usr/local/share/perl5/Apache/ASP.pm line 1522
Debug Output
  1. SelectRecs: SELECT manufacturer,designation,parttype,sku,id FROM calconv_part WHERE id IN (); failed for /home/gunwiki/public_html/apps/calconversion/showconvparts.asp with error ERROR: syntax error at or near ")" LINE 1: ...esignation,parttype,sku,id FROM calconv_part WHERE id IN (); ^ at /usr/local/sitetools/CS.pm line 271. , /usr/local/share/perl5/Apache/ASP.pm line 1522 
ASP to Perl Script 

  -: no strict;;use vars qw($Application $Session $Response $Server $Request);;
  -: #line 1 /home/gunwiki/public_html/apps/calconversion/showconvparts.asp
  1: ;;&Apache::ASP::WriteRef($main::Response, \('<html><title>Caliber Conversion Database: Show Parts In Conversion</title>
  2: <form method="post" action="inputparts.asp">
  3: '));
  4: use strict;
  5: my ($Conversion, $Buf, $ConversionName);
  6: my (%Machines, %Calibers);
  7: $Conversion=$Request->Params('convid');
  8: $Conversion='' unless($Conversion=~m/^\d+$/);
  9: 
 10: my $dbh=CS::MakeConnect('gunwiki', 'local');
 11: 
 12: my %ConversionTypes=CS::LoadHash($dbh, 'calconv_parttype', 'id,descr');
 13: my %Machines=CS::LoadHash($dbh, 'calconv_machine', 'id,descr');
 14: my %Manufacturer=CS::LoadHash($dbh, 'calconv_manufacturer', 'id,descr');
 15: 
 16: {
 17:  my ($designation, $manufacturer, $parttype, $machine);
 18:  my $sth=CS::SelectRec($dbh, 'calconv_conversion', 'descr,manufacturer,machine', 'id='.$Conversion, \$designation, \$manufacturer, \$machine);
 19:  $ConversionName=sprintf "%s's %s '%s' conversion for the %s", $Manufacturer{$manufacturer}, $ConversionTypes{$parttype}, $designation, $Machines{$machine};
 20: }
 21: 
 22: # Rendering HTML for parts
 23: {
 24:  my ($Set);
 25:  {
 26:   my ($part);
 27:   my $sth=CS::SelectRecs($dbh, 'calconv_conversion_parts', 'part', 'conversion='.$Conversion.' ORDER BY part', \$part);
 28:   while($sth->fetch) { $Set.=$part.','; }
 29:   $sth->finish;
 30:   $Set=~s/,$//;
 31:  }
 32: 
 33:  {
 34:   my ($manufacturer, $parttype, $descr, $sku, $id);
 35:   my $sth=CS::SelectRecs($dbh, 'calconv_part', 'manufacturer,designation,parttype,sku,id', "id IN ($Set)", \$manufacturer, \$descr, \$parttype, \$sku, \$id);
 36:   while($sth->fetch)
 37:    {
 38:     $Buf.=sprintf "<tr><td>%s</td><td>%s</td><td>%s</td><td><a href=\"convsusingpart.asp?part=%s\">%s</a></td></tr>\n", $Manufacturer{$manufacturer}, $ConversionTypes{$parttype}, $descr, $id, $sku;
 39:    }
 40:   $sth->finish;
 41:  }
 42: }
 43: 
 44: $dbh->disconnect;
 45: ; &Apache::ASP::WriteRef($main::Response, \('<h2>Parts used in '.($ConversionName).'</h2>
 46: <table border=1>
 47: <tr><th>Manufacturer</th><th>Part Type</th><th>Part</th><th>SKU</th></tr>
 48: '.($Buf).'
 49: </table>'));
An error has occured with the Apache::ASP script just run. If you are the developer working on this script, and cannot work through this problem, please try researching it at the Apache::ASP web site, specifically the FAQ section. Failing that, check out your support options, and if necessary include this debug output with any query.