Patch level : 12.0 no-patch
Files correlati : fp Commento : Aggiunto controllo gruppo IVA su monitor passive
This commit is contained in:
parent
72f3acd9b7
commit
5e752b772e
@ -157,7 +157,6 @@ void TPassive_mask::elenco_prots_sel(TString& string) const
|
||||
string = "";
|
||||
}
|
||||
|
||||
|
||||
void TPassive_mask::aggiungi_riga(TLocalisamfile& clifo, TSheet_field& sf, TSheet_field& sf_err)
|
||||
{
|
||||
int forn_code = -1;
|
||||
@ -461,23 +460,33 @@ void TPassive_mask::aggiorna_forn()
|
||||
|
||||
if (row->starts_with("X") && cod_forn == no_match_cf)
|
||||
{
|
||||
TString num; num.format("%04d", nr);
|
||||
TFilename newf_ini;
|
||||
TString temp_path = newf_ini.tempdir();
|
||||
newf_ini.tempdir() << "\\" << newf << num << ".ini";
|
||||
TConfig forn_conf(newf_ini, "Transaction");
|
||||
TLocalisamfile clifo(LF_CLIFO);
|
||||
bool is_not_gruppo_iva = false;
|
||||
clifo.setkey(5);
|
||||
clifo.put(CLI_TIPOCF, 'F');
|
||||
clifo.put(CLI_STATOPAIV, row->get(1));
|
||||
clifo.put(CLI_PAIV, row->get(2));
|
||||
is_not_gruppo_iva = (clifo.read() == NOERR && clifo.get(CLI_ALLEG) != 'G');
|
||||
if(is_not_gruppo_iva)
|
||||
{
|
||||
TString num; num.format("%04d", nr);
|
||||
TFilename newf_ini;
|
||||
TString temp_path = newf_ini.tempdir();
|
||||
newf_ini.tempdir() << "\\" << newf << num << ".ini";
|
||||
TConfig forn_conf(newf_ini, "Transaction");
|
||||
|
||||
forn_conf.set("Action", "MODIFY");
|
||||
forn_conf.set("Action", "MODIFY");
|
||||
|
||||
forn_conf.set_paragraph("20");
|
||||
forn_conf.set("TIPOCF", "F");
|
||||
forn_conf.set("COFI", row->get(sf.cid2index(S_CODFIERR)));
|
||||
forn_conf.set("CODCF", row_elenco_fatt.get(sf.cid2index(S_FORNITORE)));
|
||||
forn_conf.set_paragraph("20");
|
||||
forn_conf.set("TIPOCF", "F");
|
||||
forn_conf.set("COFI", row->get(sf.cid2index(S_CODFIERR)));
|
||||
forn_conf.set("CODCF", row_elenco_fatt.get(sf.cid2index(S_FORNITORE)));
|
||||
|
||||
TExternal_app app(TString("cg0 -1 -i") << temp_path << "\\" << newf << "*" << ".ini" << " /u" << user());
|
||||
message_box(TString("Sto andando a modificare il codice fiscale del fornitore:\n") << row->get(sf.cid2index(S_RAGSERR)));
|
||||
app.run();
|
||||
row->add("", 0);
|
||||
TExternal_app app(TString("cg0 -1 -i") << temp_path << "\\" << newf << "*" << ".ini" << " /u" << user());
|
||||
message_box(TString("Sto andando a modificare il codice fiscale del fornitore:\n") << row->get(sf.cid2index(S_RAGSERR)));
|
||||
app.run();
|
||||
row->add("", 0);
|
||||
}
|
||||
}
|
||||
}
|
||||
sf.force_update();
|
||||
|
Loading…
x
Reference in New Issue
Block a user