#include <confapp.h>
#include <automask.h>
#include <sheet.h>
#include <utility.h>

#include "fp0.h"
#include "fp0100a.h"
#include <tsdb.h>
#include "recset.h"
#include "progind.h"
#include "../ve/velib.h"

class TParametri_mask : public TAutomask
{
protected:
	void tipi_import();
	virtual bool on_field_event(TOperable_field& o, TField_event e, long jolly);

public:
	TParametri_mask(const char* n);
};

TParametri_mask::TParametri_mask(const char * n) : TAutomask(n)
{
	set(F_INDIRIZZO, ini_get_string(CONFIG_DITTA, "fp", "ip"));
	set(F_DATABASE, ini_get_string(CONFIG_DITTA, "fp", "db"));
	set(F_USER, ini_get_string(CONFIG_DITTA, "fp", "usr"));
	set(F_PASSWORD, decode(ini_get_string(CONFIG_DITTA, "fp", "psw") ));
	set(F_FLDDEST, ini_get_string(CONFIG_DITTA, "fp", "flddest"));
	set(F_FLDUSRDEST, ini_get_string(CONFIG_DITTA, "fp", "fldusrdest"));

}

void TParametri_mask::tipi_import()
{
	if(yesno_box("Attenzione! Questa procedura riporterà su tutti i documenti il tipo documento SDI della configurazione!\nEventuali modifiche già fatte verranno sovrascritte, continuare?"))
	{
		TISAM_recordset tipi("USE %TIP SELECT S12!=''");
		TProgress_monitor p(tipi.items(), "Elaborazione tipi doc");
		for(bool ok = tipi.move_first(); ok; ok = tipi.move_next())
		{
			if (!p.add_status())
				break;

			TISAM_recordset docs("USE DOC SELECT TIPODOC==#TIPODOC");
			docs.set_var("#TIPODOC", tipi.get("CODTAB"));

			TString msg = "Elaborazione documenti "; msg << tipi.get("CODTAB");
			TProgress_monitor d(docs.items(), msg);
			for (bool ok = docs.move_first(); ok; ok = docs.move_next())
			{
				if (!d.add_status())
					break;
				TDocumento doc(docs.cursor()->curr());
				doc.put("TIPODOCSDI", tipi.get("S12").as_string());
				if (doc.rewrite() != NOERR)
					fatal_box("ERRORE aggiornamento documenti");
			}
		}
	}
}

bool TParametri_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
{
	switch (o.dlg())
	{
	case DLG_ELABORA:
		if (e == fe_button)
			tipi_import();
	default:
		break;
	}
	
	return true;
}

class TParametri_ditta : public TSkeleton_application
{
public:
	virtual bool create();
	virtual void main_loop();
};

bool TParametri_ditta::create()
{
	open_files(LF_DOC, LF_RIGHEDOC, -1);
	return TSkeleton_application::create();
}

void TParametri_ditta::main_loop()
{
	TParametri_mask pm("fp0100a");
	while (pm.run() == K_ENTER)
	{
		// Testo prima la connessione
		TString 
			ip = pm.get(F_INDIRIZZO),
			db = pm.get(F_DATABASE),
			ad,
			usr = pm.get(F_USER),
			psw = pm.get(F_PASSWORD);
		ad << ip << "@" << db;

		SSimple_query s(ad, usr, psw, TSDB_MSSQL);
		if (s.sq_is_connect())
		{
			
			ini_set_string(CONFIG_DITTA, "fp", "ip", ip);
			ini_set_string(CONFIG_DITTA, "fp", "db", db);
			ini_set_string(CONFIG_DITTA, "fp", "usr", usr);
			ini_set_string(CONFIG_DITTA, "fp", "psw", encode(psw));
			ini_set_string(CONFIG_DITTA, "fp", "flddest", pm.get(F_FLDDEST));
			ini_set_string(CONFIG_DITTA, "fp", "fldusrdest", pm.get(F_FLDUSRDEST));
			message_box("Dati salvati correttamente!");
		}
		else
			error_box("Connessione a database non riuscita!");
	}
}

int fp0100(int argc, char* argv[])
{
	TParametri_ditta appc;
	appc.run(argc, argv, TR("Configurazione FP"));
	return 0;
}