/****************************************************************
* Name:         PrintQuery                                      *
* Synopsis:     Creates a text file (or printout) of queries    *
****************************************************************/
/*PrintQuery()*/
main()
{
int  db, i, file;
char string[250];

   if( db.query <= 0 )
      return;

   getfile('Print Destination (Use "prn" for printer)',"*.prn",string);
   
   if( (file = open(string,"w+")) == -1 ) {
     puts( 10, 10, "File Error!" );
     return;
   }

   for(i = 1; i <= db.query; i = i + 1) {
      query( db, i, string );
      string = str( i, 4, 0, 'Z' )+" "+pad(string,'L',200)+" "+str(hits(db),6)+" "+str(count(db),6);
      writeln( file, string, len( string ) );
      puts(2,0,"Reviewing: "+str(i), MenuHighlight_ );
   }

   close(file);
   cls();

}  /**  PrintQuery()  **/