Patch level : 12.0
Files correlati : Commento : Aggiunti flag import e export git-svn-id: svn://10.65.10.50/branches/R_10_00@23896 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
da3df8a6ff
commit
08a10571ae
@ -38,6 +38,8 @@ TCampass_msk::TCampass_msk() : TAutomask("mr0600a")
|
||||
set(F_DSN, ini_get_string(CONFIG_DITTA, "Campo_Compass", "DSN"));
|
||||
set(F_USR, ini_get_string(CONFIG_DITTA, "Campo_Compass", "User"));
|
||||
set(F_PWD, ini_get_string(CONFIG_DITTA, "Campo_Compass", "Password"));
|
||||
set(B_IMPORT, ini_get_bool(CONFIG_DITTA, "Campo_Compass", "Importa"));
|
||||
set(B_EXPORT, ini_get_bool(CONFIG_DITTA, "Campo_Compass", "Esporta"));
|
||||
}
|
||||
|
||||
class TCampass_app : public TSkeleton_application
|
||||
@ -45,6 +47,7 @@ class TCampass_app : public TSkeleton_application
|
||||
protected:
|
||||
TToken_string tables;
|
||||
TString DSN, usr, psw;
|
||||
TCampass_msk* m;
|
||||
const TString getTime() const;
|
||||
const TString getFam(TString codArt) const {TString app; app << codArt[3] << codArt[4] << codArt[5]; return app; } // Restituisce la famiglia di un prodotto CODART[3,5]
|
||||
const TString getGroup(TString codTab) const {TString app; app << codTab[1] << codTab[2] << codTab[3]; return app; } // Restituisce la famiglia di un prodotto CODART[3,5]
|
||||
@ -80,8 +83,15 @@ protected:
|
||||
public:
|
||||
virtual void main_loop();
|
||||
void setTable(TToken_string s) { tables = s; }
|
||||
~TCampass_app();
|
||||
};
|
||||
|
||||
TCampass_app::~TCampass_app()
|
||||
{
|
||||
if(m != NULL)
|
||||
delete m;
|
||||
}
|
||||
|
||||
const TString TCampass_app::getTime() const
|
||||
{
|
||||
TString app;
|
||||
@ -130,6 +140,8 @@ bool TCampass_app::setParameters(TString dsn, TString utente, TString password)
|
||||
ini_set_string(CONFIG_DITTA, "Campo_Compass", "DSN", dsn);
|
||||
ini_set_string(CONFIG_DITTA, "Campo_Compass", "User", utente);
|
||||
ini_set_string(CONFIG_DITTA, "Campo_Compass", "Password", password);
|
||||
ini_set_bool(CONFIG_DITTA, "Campo_Compass", "Importa", m->get_bool(B_IMPORT));
|
||||
ini_set_bool(CONFIG_DITTA, "Campo_Compass", "Esporta", m->get_bool(B_EXPORT));
|
||||
DSN = dsn;
|
||||
usr = utente;
|
||||
psw = password;
|
||||
@ -189,13 +201,6 @@ bool TCampass_app::emptyTables(const TString& DSN, const TString& usr, const TSt
|
||||
TString TCampass_app::esporta(const TString& DSN, const TString& usr, const TString& psw) const
|
||||
{
|
||||
TString errors;
|
||||
// Funzione disabilitata di debug
|
||||
// Innanzitutto svuoto le tabelle
|
||||
//if(!emptyTables(DSN)) return false;
|
||||
//test();
|
||||
//return "";
|
||||
|
||||
// Adesso inizio a popolarle
|
||||
|
||||
// File di Log
|
||||
ofstream logFile;
|
||||
@ -211,6 +216,9 @@ TString TCampass_app::esporta(const TString& DSN, const TString& usr, const TStr
|
||||
|
||||
logFile << getTime() << " - Connessione effettuata!\n";
|
||||
|
||||
if(m->get_bool(B_EXPORT))
|
||||
{
|
||||
|
||||
// INIZIO O03
|
||||
logFile << getTime() << " - Inizio esportazione O03:\n";
|
||||
|
||||
@ -323,18 +331,18 @@ TString TCampass_app::esporta(const TString& DSN, const TString& usr, const TStr
|
||||
|
||||
logFile << getTime() << " - Fine esportazione A01!\n";
|
||||
|
||||
if(yesno_box("Importare tabella C09A?"))
|
||||
}
|
||||
|
||||
if(m->get_bool(B_IMPORT))
|
||||
{
|
||||
|
||||
logFile << getTime() << " - Inizio importazione C09A:\n";
|
||||
if(!c09a()) errors << "ERRORE TABELLA: C09A\n"; // O01A
|
||||
else
|
||||
logFile << getTime() << " - Importata tabella C09A\n";
|
||||
logFile << getTime() << " - Fine importazione C09A!\n";
|
||||
}
|
||||
else
|
||||
{
|
||||
logFile << getTime() << " - Saltata importazione C09A!\n";
|
||||
}
|
||||
|
||||
|
||||
logFile.close();
|
||||
|
||||
@ -1187,12 +1195,12 @@ bool TCampass_app::c09a() const
|
||||
|
||||
void TCampass_app::main_loop()
|
||||
{
|
||||
TCampass_msk m;
|
||||
while (m.run() == K_ENTER)
|
||||
m = new TCampass_msk();
|
||||
while (m->run() == K_ENTER)
|
||||
{
|
||||
const TString& DSN = m.get(F_DSN);
|
||||
const TString& usr = m.get(F_USR);
|
||||
const TString& psw = m.get(F_PWD);
|
||||
const TString& DSN = m->get(F_DSN);
|
||||
const TString& usr = m->get(F_USR);
|
||||
const TString& psw = m->get(F_PWD);
|
||||
if(checkParameters(DSN, usr, psw))
|
||||
{
|
||||
// Chiamo la funzione globale esporta
|
||||
|
@ -1,4 +1,6 @@
|
||||
#define F_DSN 250
|
||||
#define F_USR 251
|
||||
#define F_PWD 252
|
||||
#define F_LOG 253
|
||||
#define F_DSN 101
|
||||
#define F_USR 102
|
||||
#define F_PWD 103
|
||||
#define F_LOG 104
|
||||
#define B_EXPORT 105
|
||||
#define B_IMPORT 106
|
||||
|
@ -10,7 +10,7 @@ PAGE "Invio a Compass" 0 2 0 0
|
||||
|
||||
STRING F_DSN 260 50
|
||||
BEGIN
|
||||
PROMPT 1 0 "ODBC DSN "
|
||||
PROMPT 1 1 "ODBC DSN "
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
@ -27,6 +27,16 @@ BEGIN
|
||||
FLAGS "*"
|
||||
END
|
||||
|
||||
BOOLEAN B_EXPORT
|
||||
BEGIN
|
||||
PROMPT 1 4 "Esporta tutte le tabelle"
|
||||
END
|
||||
|
||||
BOOLEAN B_IMPORT
|
||||
BEGIN
|
||||
PROMPT 1 5 "Importa C09A"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
Loading…
x
Reference in New Issue
Block a user