From 8578cb914b7482d1ac032d988c86f9ae7d5a04a5 Mon Sep 17 00:00:00 2001 From: alex Date: Tue, 8 Jun 2010 13:38:10 +0000 Subject: [PATCH] Patch level : 10.0 750 Files correlati : tc1.exe Ricompilazione Demo : [ ] Commento Corretta l macro_CFPIT SE LA PARTITA iva e' un codice fiscale non metteva F come prefisso neli movimenti git-svn-id: svn://10.65.10.50/trunk@20547 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- tc/tc1100.cpp | 6 +++++- tc/tc1100a.ini | 6 +++--- 2 files changed, 8 insertions(+), 4 deletions(-) diff --git a/tc/tc1100.cpp b/tc/tc1100.cpp index b508667b4..046f59378 100755 --- a/tc/tc1100.cpp +++ b/tc/tc1100.cpp @@ -509,8 +509,12 @@ void TInvio_file::validate(TCursor& cur,TRecord_text &rec, TToken_string &s, TSt valore = clifo.get(CLI_COFI); if (valore.blank()) + { valore = clifo.get(CLI_PAIV); - add_field(rec, fldcod, valore.len() == 16 ? "F" : (valore.len() == 0 ? "" : "P")); + add_field(rec, fldcod, (valore.blank() ? "" : "P")); + } + else + add_field(rec, fldcod, "F"); if (!clifo.empty()) { key.cut(0); diff --git a/tc/tc1100a.ini b/tc/tc1100a.ini index 020f2a2c6..cab06c789 100755 --- a/tc/tc1100a.ini +++ b/tc/tc1100a.ini @@ -109,13 +109,13 @@ NAME(3) = CODICE DITTA TYPE(3) = NUMERO POSITION(3) = 17 LENGTH(3) = 6 -MESSAGE(3)=_OPZIONI,CODICEDITTA +MESSAGE(3)= _OPZIONI,ZUDITTA NAME(4) = NUMERO SPEDIZIONE TYPE(4) = NUMERO POSITION(4) = 23 LENGTH(4) = 2 -MESSAGE(4)=_OPZIONI,NUMEROINVIO +MESSAGE(4)=_OPZIONI,ZUNUMEROINVIO NAME(5) = DATA SPEDIZIONE TYPE(5) = STRINGA @@ -207,7 +207,7 @@ NAME(7) = CODICE FISCALE TYPE(7) = STRINGA POSITION(7) = 68 LENGTH(7) = 16 -FIELD(7) = 20->PAIV +FIELD(7) = 20->COFI NAME(8) = CODICE FISCALE ERRATO TYPE(8) = STRINGA