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

Patch level : 10.0

Browse Source 
Files correlati     : ve0.exe
Ricompilazione Demo : [ ]
Commento            :
Corretta decodifica banca di appoggio dopo ricerca cliente per ragione sociale


git-svn-id: svn://10.65.10.50/branches/R_10_00@22603 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2012-03-09 11:30:06 +00:00
parent 45bcc74cf5
commit 5f419a6247
2 changed files with 19 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ve/velib04c.cpp
View File

@ -377,7 +377,7 @@ long TGenerazione_effetti::group_bills(TAssoc_array& group_array, bool interatti
effetto->put(EFF_CODVAL, doc.get(DOC_CODVAL));
effetto->put(EFF_CAMBIO, change);
effetto->put(EFF_DATACAMBIO,doc.get_date(DOC_DATACAMBIO));
effetto->put(EFF_CONTROEURO,doc.get_date(DOC_CONTROEURO));
//effetto->put(EFF_CONTROEURO,doc.get_date(DOC_CONTROEURO));
effetto->put(EFF_CODABI,doc.get(DOC_CODABIA));
effetto->put(EFF_CODCAB,doc.get(DOC_CODCABA));
effetto->put(EFF_IBAN,doc.get(DOC_IBAN));
@ -644,7 +644,7 @@ void TGenerazione_effetti::generate_bill(TDocumento& doc, bool interattivo) // b
{
effetto.put(EFF_CAMBIO, change);
effetto.put(EFF_DATACAMBIO,data_cambio);
effetto.put(EFF_CONTROEURO, contro_euro);
//effetto.put(EFF_CONTROEURO, contro_euro);
}
effetto.put(EFF_CODABI,codabi);
effetto.put(EFF_CODCAB,codcab);

34
ve/velib06.cpp
View File

@ -956,7 +956,7 @@ void TDocumento_mask::occ2mask()
void TDocumento_mask::cli2mask(bool force_load)
{
TCli_for& c = doc().clifor();
const TCli_for& c = doc().clifor();
const bool onload = !is_running();
@ -999,31 +999,31 @@ void TDocumento_mask::cli2mask(bool force_load)
key.add("1");
const TRectype & cfban = cache().get(LF_CFBAN, key);
TString iban;
TString80 iban;
if (cfban.empty() || id2pos(F_CODABIA1) < 0)
{
show(-GR_APPOGGIO);
hide(-GR_APPOGGIOCLI);
show(-GR_APPOGGIO);
if (cfban.empty())
{
set(F_CODABIA, c.get(CLI_CODABI), 0x3);
set(F_CODCABA, c.get(CLI_CODCAB), 0x3);
set(F_CODABIA, c.get(CLI_CODABI));
set(F_CODCABA, c.get(CLI_CODCAB), 0x2);
iban = c.get(CLI_IBAN);
}
else
{
set(F_CODABIA, cfban.get(CFBAN_ABI), 0x3);
set(F_CODCABA, cfban.get(CFBAN_CAB), 0x3);
set(F_CODABIA, cfban.get(CFBAN_ABI));
set(F_CODCABA, cfban.get(CFBAN_CAB), 0x2);
iban = cfban.get(CFBAN_IBAN);
}
}
else
{
show(-GR_APPOGGIOCLI);
hide(-GR_APPOGGIO);
set(F_CODABIA1, cfban.get(CFBAN_ABI), 0x3);
set(F_CODCABA1, cfban.get(CFBAN_CAB), 0x3);
show(-GR_APPOGGIOCLI);
set(F_CODABIA1, cfban.get(CFBAN_ABI));
set(F_CODCABA1, cfban.get(CFBAN_CAB), 0x2);
iban = cfban.get(CFBAN_IBAN);
}
if (id2pos(F_IBAN_STATO) > 0)
@ -1053,8 +1053,8 @@ void TDocumento_mask::cli2mask(bool force_load)
// Setta i campi che appartengono al file LF_CFVEN
if (cfbanpr.empty() || id2pos(F_CODABIP1) < 0)
{
show(-GR_PRESENT);
hide(-GR_PRESENTCLI);
show(-GR_PRESENT);
if (cfbanpr.empty() || id2pos(F_CODABIP1) < 0)
{
set(F_CODABIP, ven_rec.get(CFV_CODABIPR), 0x3);
@ -1069,11 +1069,11 @@ void TDocumento_mask::cli2mask(bool force_load)
}
else
{
show(-GR_PRESENTCLI);
hide(-GR_PRESENT);
set(F_CODABIP1, cfbanpr.get(CFBAN_ABI), 0x3);
set(F_CODCABP1, cfbanpr.get(CFBAN_CAB), 0x3);
set(F_PROGBNP1, cfbanpr.get(CFBAN_PROGPR), 0x3);
show(-GR_PRESENTCLI);
set(F_CODABIP1, cfbanpr.get(CFBAN_ABI));
set(F_CODCABP1, cfbanpr.get(CFBAN_CAB), 0x2);
set(F_PROGBNP1, cfbanpr.get(CFBAN_PROGPR));
}
set(F_RAGGR, ven_rec.get(CFV_RAGGDOC));
set(F_RAGGREFF, ven_rec.get(CFV_RAGGEFF));
@ -2064,11 +2064,11 @@ bool TDocumento_mask::clifo_handler( TMask_field& f, KEY key )
TDocumento_mask& m = (TDocumento_mask&)f.mask();
TDocumento& d = m.doc();
TTipo_documento& tdoc = (TTipo_documento&)d.tipo();
const TTipo_documento& tdoc = d.tipo();
d.put(DOC_TIPOCF, tdoc.tipocf());
d.put(DOC_CODCF, f.get());
TCli_for& cli_for = d.clifor(true); // force reload
const TCli_for& cli_for = d.clifor(true); // force reload
if ( cli_for.get_bool(CLI_SOSPESO) )
return f.error_box( "Il codice '%ld' e' sospeso e non puo' essere utilizzato", atol(f.get()));