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

Patch level :2.0 474

Browse Source 
Files correlati     :dl0.exe
Ricompilazione Demo : [ ]
Commento            :sistemata la scrittura delle date zero-filled


git-svn-id: svn://10.65.10.50/trunk@11157 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2003-05-20 14:31:22 +00:00
parent 1d35ac3c92
commit ba6565323a
1 changed files with 13 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
dl/dl0800.cpp
View File

@ -63,8 +63,19 @@ void TCat2dl_file::set_config(const char * listingr,const char * listven, const
bool TCat2dl_file::pre_writerel(TRelation& rel,const TRecord_text& rec)
{
if (rel.curr().get("CODIVA").blank())
rel.curr().put("CODIVA", _codiva);
TRectype& curr = rel.curr();
if (curr.get("CODIVA").blank())
curr.put("CODIVA", _codiva);
//se un campo data che finirebbe in un campo user di anamag.dbf e' pieno di 0, lo svuota
for (int i = 5; i <= 8; i++)
{
TString8 user;
user.format("USER%d", i);
const TString& val = curr.get(user);
if (real::is_null(val))
curr.zero(user);
}
// 1) sistema i tipi di supporto e genere
write_supporto(rec);