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@21683 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2011-02-18 10:10:59 +00:00
parent b0170c9f1b
commit f36a23c1ea
1 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
ha/hacnv100.cpp
View File

@ -13,6 +13,7 @@
#include <clifo.h> #include <clifo.h>
#include <pconti.h> #include <pconti.h>
#include "..\pr\agenti.h" #include "..\pr\agenti.h"
#include "..\mg\anamag.h"
#include <..\ve\condv.h> #include <..\ve\condv.h>
#include <..\ve\rcondv.h> #include <..\ve\rcondv.h>
@ -405,6 +406,21 @@ bool THardy_art::trasferisci()
while (++hi) while (++hi)
{ {
aggiorna_record(rec_anamag, lista_campi_anamag); aggiorna_record(rec_anamag, lista_campi_anamag);
int gr, co;
long so;
TString16 key = get_str("IdContoRicavo");
gr = 0;
co = 0;
so = 0;
hd_key2conto(key, gr, co,so);
rec_anamag.put(ANAMAG_GRUPPOV, gr);
rec_anamag.put(ANAMAG_CONTOV, co);
rec_anamag.put(ANAMAG_SOTTOCV, so);
key = get_str("IdContoCosto");
hd_key2conto(key, gr, co,so);
rec_anamag.put(ANAMAG_GRUPPOA, gr);
rec_anamag.put(ANAMAG_CONTOA, co);
rec_anamag.put(ANAMAG_SOTTOCA, so);
test_write(anamag); test_write(anamag);
aggiorna_record(rec_umart, lista_campi_umart); aggiorna_record(rec_umart, lista_campi_umart);
test_write(umart); test_write(umart);