From 8d4ed500c4f4a352cfb6b8a145696ce51e4f8ff1 Mon Sep 17 00:00:00 2001 From: Simone Palacino Date: Wed, 22 Jul 2020 10:24:57 +0200 Subject: [PATCH] Patch level : 12.0 982 Files correlati : fp0.exe Commento : - Aggiunto controllo per partite iva che iniziano per 8 o 9 per esportare correttamente solo con codice fiscale. --- src/fp/fplib01.cpp | 14 +++++++++++--- 1 file changed, 11 insertions(+), 3 deletions(-) diff --git a/src/fp/fplib01.cpp b/src/fp/fplib01.cpp index 920ca5a22..4307f87e1 100644 --- a/src/fp/fplib01.cpp +++ b/src/fp/fplib01.cpp @@ -1581,16 +1581,24 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc) TTable tab_codiso("%SCE"); tab_codiso.tab(); tab_codiso.put("CODTAB", stato); tab_codiso.read(); - const TString &piva = cliente.partita_IVA(), - &fisc = cliente.codice_fiscale(); + TString piva = cliente.partita_IVA(), + fisc = cliente.codice_fiscale(); if (!stato.full()) stato = "IT"; if(tab_codiso.get_bool("B0") || stato == "IT") // Cliente EU { + if (fisc.full() && piva.len() == 11 && (fisc[0] == '8' || fisc[0] == '9')) + piva.cut(0); + else if (piva.full() && piva.len() == 11 && (piva[0] == '8' || piva[0] == '9')) + { + fisc = piva; + piva.cut(0); + } + if (piva.full()) { paf0400f.set("P4_FISCIVAPAESE", stato); - paf0400f.set("P4_FISCIVACOD", piva); + paf0400f.set("P4_FISCIVACOD", piva); } if(fisc.full()) paf0400f.set("P4_CODFISC", fisc);