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            :
Modifiche importatore LIF da richieste Girardi


git-svn-id: svn://10.65.10.50/branches/R_10_00@21970 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2011-04-18 14:33:00 +00:00
parent b78d70352f
commit af5ddae026
1 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
ps/pl0002100.cpp
View File

@ -12,6 +12,7 @@
#include <tabutil.h>
#include <clifo.h>
#include <..\cg\cglib01.h>
#include <..\lv\lvcondv.h>
#include <..\lv\lvrcondv.h>
#include <..\mg\clifogiac.h>
@ -198,8 +199,10 @@ bool TLif_clifo_ca_anagrafiche::trasferisci()
const TString80 tel = get_str("sig_tel_fis");
const TString80 fax = get_str("sig_fax_fis");
const TString80 indirizzo = get_str("des_indir_res");
const TString localita = get_str("des_localita_fis");
const long cap = get_long("cod_cap_fis");
const long cap = get_long("cod_cap_fis");
TString localita = get_str("des_localita_fis"); localita.trim();
TString8 capstr; capstr << cap;
const TString4 codcom = cap2comune(capstr, localita);
rec.put(CLI_TIPOCF, tipocf);
rec.put(CLI_CODCF, codcli);
@ -211,10 +214,12 @@ bool TLif_clifo_ca_anagrafiche::trasferisci()
rec.put(CLI_MAIL, mail);
rec.put(CLI_TEL, tel);
rec.put(CLI_FAX, fax);
rec.put(CLI_INDCF, indirizzo);
rec.put(CLI_LOCCF, localita);
rec.put(CLI_INDCF, indirizzo);
rec.put(CLI_CAPCF, cap);
if(codcom.empty())
rec.put(CLI_LOCCF, localita);
else
rec.put(CLI_COMCF, codcom);
aggiorna_record(rec, lista_campi);
if (test_write(clienti))
{