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

Patch level :4.0 / 10.0

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :corretti errori di riporto


git-svn-id: svn://10.65.10.50/trunk@16372 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2008-03-26 10:35:00 +00:00
parent ed7c4be4bd
commit 3eb5b833d7
2 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
m770/777100.cpp
View File

@ -24,7 +24,7 @@
static int anno_dic()
{
static anno = 0;
static int anno = 0;
if (anno <= 0)
{
TConfig ini(CONFIG_STUDIO);
@ -1008,7 +1008,8 @@ bool TRecord770::add(const char* code, const char* val)
CHECKS(val && *val, "Can't add empty field ", code);
// Cerca il primo posto libero
for (int pos = HEADER_SIZE; pos < HEADER_SIZE+USEABLE_SIZE; pos += BLOCK_SIZE)
int pos;
for (pos = HEADER_SIZE; pos < HEADER_SIZE+USEABLE_SIZE; pos += BLOCK_SIZE)
{
if (_buffer[pos] == ' ')
break;
@ -1124,7 +1125,7 @@ bool TTrasferimento770::open(const char* path, char mode, int volume)
_name << '_' << volume;
}
if (mode == 'r')
_in_stream = new ifstream(_name, ios::in | ios::nocreate | ios::binary);
_in_stream = new ifstream(_name, ios::in | ios::binary);
else
_out_stream = new ofstream(_name, ios::out | ios::binary);
@ -1267,7 +1268,7 @@ bool TTrasferimento770::append_record_b()
rec.set(36, rec_comres.get(COM_PROVCOM));
TString indirizzo;
indirizzo << rec_anagr.get(ANA_INDRES) << ' ' << rec_anagr.get(ANA_CIVRES);
indirizzo.strip_d_spaces(); indirizzo.cut(35);
indirizzo.strip_double_spaces(); indirizzo.cut(35);
rec.set(37, rec_anagr.get(ANA_CAPRES));
rec.set(38, rec_anagr.get(ANA_COMRES));
rec.set(39, indirizzo);
@ -1292,7 +1293,7 @@ bool TTrasferimento770::append_record_b()
rec.set(97, rec_anagr.get(ANA_CAPRES));
TString80 indirizzo = rec_anagr.get(ANA_INDRES);
indirizzo.strip_d_spaces(); indirizzo.trim();
indirizzo.strip_double_spaces(); indirizzo.trim();
TString8 tipologia;
const int spazio = indirizzo.find(' ');
if (spazio > 0 && spazio < 16) // Lunghezza accettabile per TString16 successiva
@ -1341,7 +1342,7 @@ bool TTrasferimento770::append_record_b()
rec.set(120, rec_rap.get(ANA_CAPRES));
indirizzo.cut(0);
indirizzo << rec_rap.get(ANA_INDRES) << ' ' << rec_rap.get(ANA_CIVRES);
indirizzo.strip_d_spaces(); indirizzo.cut(35); indirizzo.trim();
indirizzo.strip_double_spaces(); indirizzo.cut(35); indirizzo.trim();
rec.set(121, indirizzo);
ok = write(rec);

2
m770/777200.cpp
View File

@ -560,7 +560,7 @@ bool TTrasferimentoDylog::open(const char* path, char mode)
if (_name.empty())
_name = default_name();
if (mode == 'r')
_in_stream = new ifstream(_name, ios::in | ios::nocreate | ios::binary);
_in_stream = new ifstream(_name, ios::in | ios::binary);
else
_out_stream = new ofstream(_name, ios::out | ios::binary);