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

Patch level :2.0 p@rtners 688

Browse Source 
Files correlati     :in0.exe
Ricompilazione Demo : [ ]
Commento            :come commit precedente


git-svn-id: svn://10.65.10.50/trunk@11775 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2004-02-24 14:32:35 +00:00
parent d3b23c8c74
commit c264128878
1 changed files with 12 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
in/in0200.cpp
View File

@ -195,7 +195,9 @@ void TRecord_intra::put(const TRectype& rec, TIntra_context& ic)
put(rec.get_real("AMMLIRE"), 43, 13, _ndec);
put(rec.get_real("AMMVALUTA"), 56, 13);
put(rec.get_char("NATURA"), 69);
put(rec.get("NOMENCL"), 70, 8, "Z");
put(rec.get("NOMENCL").mid(0,4), 70, 4, "Z"); //il campo viene spezzato in 3 pezzi
put(rec.get("NOMENCL").mid(4,2), 74, 2, "Z");
put(rec.get("NOMENCL").mid(6,2), 76, 2, "Z");
if (ic._freq == 'M')
{
put(rec.get_real("MASSAKG"), 78, 10, 0);
@ -228,7 +230,9 @@ void TRecord_intra::put(const TRectype& rec, TIntra_context& ic)
put(rec.get_real("AMMLIRE"), 49, 13, _ndec);
put(rec.get_real("AMMVALUTA"), 62, 13);
put(rec.get_char("NATURA"), 75);
put(rec.get("NOMENCL"), 76, 8, "Z");
put(rec.get("NOMENCL").mid(0,4), 76, 4, "Z"); //il campo viene spezzato in 3 pezzi
put(rec.get("NOMENCL").mid(4,2), 80, 2, "Z");
put(rec.get("NOMENCL").mid(6,2), 82, 2, "Z");
if (ic._freq == 'M')
put(rec.get_real("VALSTAT"), 84, 13, _ndec);
else
@ -241,7 +245,9 @@ void TRecord_intra::put(const TRectype& rec, TIntra_context& ic)
put(rec.get("PIVA"), 31, 12);
put(rec.get_real("AMMLIRE"), 43, 13, _ndec);
put(rec.get_char("NATURA"), 56);
put(rec.get("NOMENCL"), 57, 8, "Z");
put(rec.get("NOMENCL").mid(0,4), 57, 4, "Z"); //il campo viene spezzato in 3 pezzi
put(rec.get("NOMENCL").mid(4,2), 61, 2, "Z");
put(rec.get("NOMENCL").mid(6,2), 63, 2, "Z");
if (ic._freq == 'M')
{
put(rec.get_real("MASSAKG"), 65, 10);
@ -272,7 +278,9 @@ void TRecord_intra::put(const TRectype& rec, TIntra_context& ic)
put(rec.get("SEGNORETT"), 48, 1);
put(rec.get_real("AMMLIRE"), 49, 13, _ndec);
put(rec.get("NATURA"), 62, 1);
put(rec.get("NOMENCL"), 63, 8, "Z");
put(rec.get("NOMENCL").mid(0,4), 63, 4, "Z"); //il campo viene spezzato in 3 pezzi
put(rec.get("NOMENCL").mid(4,2), 67, 2, "Z");
put(rec.get("NOMENCL").mid(6,2), 69, 2, "Z");
if (ic._freq == 'M')
put(rec.get_real("VALSTAT"), 71, 13, _ndec);
else