//Programma per la stampa anagrafiche utilizzando i files .rep (21/06/2004)

#include <applicat.h>
#include <mask.h>
#include <reprint.h>

#include "ba6300a.h"

class TPrint_anagraph : public TSkeleton_application
{
  TMask* _mask;

protected:
  virtual void main_loop();
  virtual bool create();
  virtual bool destroy();

public:
  bool get_rep_name(TFilename& repname) const;
};


bool TPrint_anagraph::create()
{
  _mask = new TMask("ba6300a");
  return TSkeleton_application::create();
}

bool TPrint_anagraph::destroy()
{
  delete _mask;
  return TSkeleton_application::destroy();
}

bool TPrint_anagraph::get_rep_name(TFilename& repname) const
{
  return repname.custom_path();
}

void TPrint_anagraph::main_loop()
{
  KEY key = K_ENTER;
  while (key != K_QUIT)
  {
    key = _mask->run();
    TFilename rep_name = _mask->get(F_PERSREP);
    if (rep_name.empty())
    {
      rep_name = "ba63";
      rep_name << _mask->get(F_TIPOSTAMPA);
      rep_name << _mask->get(F_TIPO);
    }
    rep_name.ext("rep");

    if (rep_name.custom_path())
    {
      TReport rep; rep.load(rep_name);
      TReport_book book;
      book.add(rep);
      book.print_or_preview();
    }
    else
      error_box(FR("Il file %s non esiste"), (const char*)rep_name);
  }
}


int ba6300(int argc, char* argv[])
{     
  TPrint_anagraph app;
  app.run(argc, argv, TR("Stampa Anagrafiche"));
  return 0;
}