root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level :

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :


git-svn-id: svn://10.65.10.50/branches/R_10_00@21613 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2011-02-09 12:04:11 +00:00
parent a28e5a7598
commit ebb7f35308
4 changed files with 81 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
ha/hacnv100.cpp
View File

@ -587,6 +587,24 @@ bool THardy_clienti::trasferisci_clienti()
rec.put(CLI_TIPOCF, "C");
rec.put(CLI_CODCF, codcf);
if (codcf < 100000)
{
rec.put(CLI_GRUPPO, ini.get_int("CLIA_GRUPPO", "Parametri"));
rec.put(CLI_CONTO, ini.get_int("CLIA_CONTO", "Parametri"));
}
else
if (codcf < 110000)
{
rec.put(CLI_GRUPPO, ini.get_int("CLIC_GRUPPO", "Parametri"));
rec.put(CLI_CONTO, ini.get_int("CLIC_CONTO", "Parametri"));
}
else
if (codcf < 120000)
{
rec.put(CLI_GRUPPO, ini.get_int("CLIE_GRUPPO", "Parametri"));
rec.put(CLI_CONTO, ini.get_int("CLIE_CONTO", "Parametri"));
}
// banca
TString8 codabi = get_str("IdBanca");
codabi.lpad(5,'0');
@ -816,6 +834,15 @@ bool THardy_fornitori::trasferisci()
rec.put(CLI_TIPOCF, "F");
rec.put(CLI_CODCF, codcf);
const TString8 idmastro = get_str("IdMastro");
TToken_string conto = ini.get(idmastro, "IdMastro_FOR");
const int gruppo = conto.get_int(0);
if (gruppo != 0)
{
rec.put(CLI_GRUPPO, gruppo);
rec.put(CLI_CONTO, conto.get_int());
}
// contropartita
const TString16 key = get_str("IdContropartita");
int gr, co;

17
ha/hacnv100a.ini
View File

@ -141,8 +141,8 @@ PAIV = PartitaIVA
TIPOPERS =
ALLEG =
CODALLEG =
GRUPPO = _FISSO,5
CONTO = _FISSO,600
GRUPPO =
CONTO =
GRUPPORIC =
CONTORIC =
SOTTOCRIC =
@ -195,8 +195,8 @@ PAIV = PartitaIVA
TIPOPERS =
ALLEG =
CODALLEG =
GRUPPO = _FISSO,4
CONTO = _FISSO,101
GRUPPO =
CONTO =
GRUPPORIC =
CONTORIC =
SOTTOCRIC =
@ -581,6 +581,13 @@ CONTI_MOV = 3,1,0|3,5,0|3,45,2|3,45,3|4,101,1001|5,601,127|5,601,137|5,601,295|6
IVA_ESENTE = 999
CONTO_OMAGGI=8|15|22
[IdMastro_FOR]
0560001=0|0
0560002=5|602
0560003=5|603
0560004=5|604
0561001=5|611
[Indetraibilita]
072=9
076=9
@ -593,7 +600,7 @@ I50=B
// parametri generali della maschera (dns user password)
[Main]
201 = hardy
201 = OS1_HAR
202 =
203 =
PATH = c:\temp

12
ha/hacnv200.cpp
View File

@ -181,9 +181,17 @@ void THardy_movimenti::conto2campo(const TString& hd_tipoc, const TString& hd_ke
case 'F':
{
tipoc = "F";
gr = ini.get_int("FOR_GRUPPO", "Parametri");
co = ini.get_int("FOR_CONTO", "Parametri");
so = hd_key2forn(hd_key);
TToken_string key(tipoc);
key.add(so);
const TRectype rec_cf = cache().get(LF_CLIFO, key);
gr = rec_cf.get_int(CLI_GRUPPO);
co = rec_cf.get_int(CLI_CONTO);
if (gr == 0)
{
gr = ini.get_int("FOR_GRUPPO", "Parametri");
co = ini.get_int("FOR_CONTO", "Parametri");
}
}
break;
default:

36
ha/hacnv300.cpp
View File

@ -53,17 +53,45 @@ void THardy_scadenze::conto2billcampo(const TString& hd_tipoc, const TString& hd
case 'C':
{
tipoc = 'C';
gr = ini.get_int("CLI_GRUPPO", "Parametri");
co = ini.get_int("CLI_CONTO", "Parametri");
so = hd_key2cli(hd_key);
if (so < 100000)
{
gr = ini.get_int("CLIA_GRUPPO", "Parametri");
co = ini.get_int("CLIA_CONTO", "Parametri");
}
else
if ( so < 110000)
{
gr = ini.get_int("CLIC_GRUPPO", "Parametri");
co = ini.get_int("CLIC_CONTO", "Parametri");
}
else
if ( so < 120000)
{
gr = ini.get_int("CLIE_GRUPPO", "Parametri");
co = ini.get_int("CLIE_CONTO", "Parametri");
}
else
{
gr = ini.get_int("CLI_GRUPPO", "Parametri");
co = ini.get_int("CLI_CONTO", "Parametri");
}
}
break;
case 'F':
{
tipoc = 'F';
gr = ini.get_int("FOR_GRUPPO", "Parametri");
co = ini.get_int("FOR_CONTO", "Parametri");
so = hd_key2forn(hd_key);
TToken_string key("F");
key.add(so);
const TRectype rec_cf = cache().get(LF_CLIFO, key);
gr = rec_cf.get_int(CLI_GRUPPO);
co = rec_cf.get_int(CLI_CONTO);
if (gr == 0)
{
gr = ini.get_int("FOR_GRUPPO", "Parametri");
co = ini.get_int("FOR_CONTO", "Parametri");
}
}
break;
default: