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