#include <prefix.h>

#include "cg6905.h"
#include "cglib04.h"

void TCanc_file_invio::main_loop()
{ 
  TTransfer_file tras_file;
  tras_file.remove_all(false);
  
  TFilename marker;
  marker = firm2dir(0);
  marker << "\\marker";
  xvt_fsys_removefile(marker);
  
  message_box("Eliminazione file di lavoro dell'invio terminata");          
}