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

Patch level : 4.0 620

Browse Source 
Files :  ve7.exe
Ricompilazione Demo : [ ]
Commento            :

Trasferimento Galileo


git-svn-id: svn://10.65.10.50/trunk@14911 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2007-02-13 15:16:35 +00:00
parent 434059220d
commit 52bf679ad7
1 changed files with 2 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
ve/ve7701.cpp
View File

@ -381,30 +381,17 @@ bool TGalileo_articoli::trasferisci_costi(const TString & ditta, const TString &
TRectype& rec_anamag = anamag.curr();
TGalileo_iterator pi(this);
TString80 codart;
TString msg; msg.format("%ld", recordset().items());
query << " " << msg;
message_box(query);
anamag.open_ex(_excllock);
while (++pi)
{
codart = get_str("M2RIS");
codart.trim();
codart.upper();
rec_anamag.zero();
rec_anamag.put(ANAMAG_CODART, codart);
bool good = anamag.read() == NOERR;
TString msg; msg.format("Codice $s", (const char *) codart);
message_box(msg);
if (good)
{
TString msg; msg.format("Aggiorno al costo %s", (const char *) get_str("M2CMD"));
message_box(msg);
anamag.put(ANAMAG_ULTCOS1, get_str("M2CMD"));
return test_rewrite(anamag);
test_rewrite(anamag);
}
}
anamag.close();