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

Patch level : 12.0 984

Browse Source 
Files correlati     : bs0.exe
Commento            : Modifica per importazione sknet nuovabienne vecchi codici pack: lettura da db codice articolo giusto.
This commit is contained in:
Simone Palacino 2020-07-30 12:10:23 +02:00
parent 2c419359af
commit bed73ea111
1 changed files with 13 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/bs/bs0300.cpp
View File

@ -1653,8 +1653,19 @@ void TSknet_sync::sync_doc()
if (tiporiga == "01" && ini_get_bool(CONFIG_DITTA, "BS", "SKUseCustomRiga", false))
{
TSQL_recordset codcor(TString() << "SELECT * FROM CODCORR WHERE CODARTALT = '" << codart << "' AND CODART = '" << codartmag << "';");
if (codcor.items() > 0)
{
TSQL_recordset codcor(TString() << "SELECT * FROM CODCORR WHERE CODARTALT = '" << codart << "' AND CODART = '" << codartmag << "';");
if (codcor.items() > 0)
{
TString err; err << "Attenzione l'articolo (cod. cliente) " << codart << " non trova corrispondenza con l'articolo interno "
<< codartmag << ". Controllare i condici corrispendenti nell'anagrafica articoli.";
_log->log(1, err);
}
}
TLocalisamfile codcor(LF_CODCORR); codcor.setkey(2);
TRectype rcodcor(LF_CODCORR);
rcodcor.put(CODCORR_CODARTALT, codart);
if (codcor.read(rcodcor, _isequal) == NOERR)
tiporiga = ini_get_string(CONFIG_DITTA, "BS", "SKNumCustomRiga", "14");
}