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            :
Corretta la gestione dell'indirizzo e del tipopers


git-svn-id: svn://10.65.10.50/branches/R_10_00@21615 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2011-02-10 08:50:46 +00:00
parent ebb7f35308
commit 7840987230
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ps/pl0002100.cpp
View File

@ -157,10 +157,11 @@ bool TLif_clifo_ca_anagrafiche::trasferisci()
const TString80 ragsoc = get_str("des_ragsoc");
const TString16 cofi = get_str("cod_cfisc");
const TString16 paiv = get_str("cod_piva");
const char tpper = get_str("flg_per_fis")[0];
const long tpper = get_long("flg_per_fis");
const TString80 mail = get_str("des_email1");
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");
@ -168,12 +169,13 @@ bool TLif_clifo_ca_anagrafiche::trasferisci()
rec.put(CLI_CODCF, codcf);
rec.put(CLI_STATOCF, stato);
rec.put(CLI_RAGSOC, ragsoc);
rec.put(CLI_TIPOPERS, tpper == '0' ? 'G' : 'F');
rec.put(CLI_TIPOPERS, tpper == 0L ? 'G' : 'F');
rec.put(CLI_COFI, cofi);
rec.put(CLI_PAIV, paiv);
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_CAPCF, cap);