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

Patch level :

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :


git-svn-id: svn://10.65.10.50/branches/R_10_00@21190 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2010-11-24 16:40:47 +00:00
parent ae34c4b525
commit e3ecd94380
1 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
ha/ha1200.cpp
View File

@ -161,6 +161,7 @@ void TFile2Txt::genera_clienti_txt(const long da_codcli)
TString query;
query << "USE CLIFO";
query << "\nSELECT (SOSPESO!=\"X\")";
query << "\nJOIN CFVEN INTO TIPOCF=TIPOCF CODCF=CODCF";
query << "\nFROM TIPOCF=C";
if (da_codcli > 0L)
@ -530,7 +531,8 @@ void TFile2Txt::genera_tabpag_txt()
TEsporta_pagamenti_recordset tabpag;
TString query;
query << "USE %RPG";
query << "USE %CPG";
query << "\nJOIN %RPG ALIAS 401 INTO CODTAB=CODTAB";
TISAM_recordset archivio_pagamenti(query);
const long archivio_pagamenti_items = archivio_pagamenti.items();
@ -542,10 +544,13 @@ void TFile2Txt::genera_tabpag_txt()
tabpag.new_rec("");
const TString& codtab = archivio_pagamenti.get("CODTAB").as_string();
tabpag.set("CodicePagamento", codtab.left(2));
const TString& cpg_s0 = cache().get("%CPG", codtab.left(4), "S0");
tabpag.set("CodicePagamento", codtab.right(2));
const TString& cpg_s0 = archivio_pagamenti.get("S0").as_string();
tabpag.set("DescrPagamento", cpg_s0);
tabpag.set("GiorniScadenza", archivio_pagamenti.get("I0"));
long giorni = archivio_pagamenti.get("401@.I0").as_int();
if (giorni <= 0)
giorni = archivio_pagamenti.get("I3").as_int();
tabpag.set("GiorniScadenza", giorni);
}
TFilename output_path = genera_path("tabpag");