diff --git a/build/f90.vcxproj b/build/f90.vcxproj index c1a2441d7..2d070b287 100644 --- a/build/f90.vcxproj +++ b/build/f90.vcxproj @@ -245,6 +245,9 @@ + + + diff --git a/build/f90.vcxproj.filters b/build/f90.vcxproj.filters index bfd98b0d8..73e22f80a 100644 --- a/build/f90.vcxproj.filters +++ b/build/f90.vcxproj.filters @@ -22,6 +22,9 @@ {95c95f84-ca93-4c2f-b1cf-e94922dfa7ef} + + {07b3ab94-7474-4c5e-9be6-48fd6aea2c6b} + @@ -142,4 +145,9 @@ Menu + + + Rep + + \ No newline at end of file diff --git a/src/f9/f9ProspIntegr.rep b/src/f9/f9ProspIntegr.rep new file mode 100644 index 000000000..e78695227 --- /dev/null +++ b/src/f9/f9ProspIntegr.rep @@ -0,0 +1,270 @@ + + + Prospetto integ. Rev. Charge + +
+ + + TODAY + + + + RAGSOC + + + + ADDRSEDE + + + + CAP + + + + PROVIN + + + + CITTA + + + + + + + CODFISC + + + + + + + PARTIVA + + + + + + + + + + DATADOC + + + + + + + CODFORN + + + + + + + NDOC + + + + RAGSOCFORN + + + + ADDRFORN + + + + CAPFORN + + + + PROVINFORN + + + + CITTAFORN + + + + + + + PARTIVAFORN + + + + + + + TOTDOC + + + + + + + REGACQ + + + + + + + PROTIVAACQ + + + + + + + DATAREGACQ + + + + + + + B.REG + + + + + + + B.PROTIVA + + + + + + + B.DATAREG + + + + + + + + + + + + + + + TOTALE + + + + TOTIMPONIBILE + + + + TOTIMPOSTA + + + + + + + + + + + + + + + + +
+
+ #ATTESTA @ + DUP + 0 = IF + DROP + 1 + THEN + "H2.210" ! + +
+
+
+ + + B.IMPONIBILE + + + + R0 + + + + + + B.IMPOSTA + + + + + B.GRUPPO + + + + + + + B.CONTO + + + + + + + B.SOTTOCONTO + + + + B.DESCR + +
+
+
+ #ATTESTA @ + DUP + 0 = IF + DROP + 1 + THEN + "H2.210" ! + +
+ SELECT COD, CODTAB, S0, R0, +B.GRUPPO, B.CONTO, B.SOTTOCONTO, B.DESCR, +B.NUMREG, B.CODIVA, B.IMPONIBILE, B.IMPOSTA, B.GRUPPO, B.CONTO, B.SOTTOCONTO, B.DATAREG, B.DATADOC, B.REG, B.PROTIVA, B.TOTDOC, +'2020-06-15' AS TODAY, 'CORTELEZZI SRL' AS RAGSOC, 112345631.31 AS TOTDOC, 'VIA AZIENDA DELLA POLVERIERA INDUSTRIALE, 27' AS ADDRSEDE, 20021 AS CAP, 'Milano' AS CITTA, 'MI' AS PROVIN, +'00213600125' AS CODFISC, '00213600125' AS PARTIVA, +'131' AS NDOC, '2019-03-11' AS DATADOC, +'1457' AS CODFORN, 'AZIENDA FORNITORE' AS RAGSOCFORN, 'VIA FORNITORE, 19' AS ADDRFORN, '20158' AS CAPFORN, 'San Valentino in Abruzzo Citeriore' AS CITTAFORN, 'MX' AS PROVINFORN, '03512100128' AS PARTIVAFORN, +'1' AS REGACQ, '14' AS PROTIVAACQ, '11-03-2019' AS DATAREGACQ, +'456987131.31' AS TOTALELE, '123456789.89' AS TOTIMPONIBILE, '22' AS TOTIMPOSTA +FROM( + + SELECT PCON.GRUPPO, PCON.CONTO, PCON.SOTTOCONTO, PCON.DESCR, + A.NUMREG AS NUMREG, A.CODIVA, A.IMPONIBILE, A.IMPOSTA, A.GRUPPO, A.CONTO, A.SOTTOCONTO, A.DATAREG, A.DATADOC, A.REG, A.PROTIVA, A.TOTDOC + FROM( + SELECT RMOVIVA.NUMREG AS NUMREG, CODIVA, IMPONIBILE, IMPOSTA, GRUPPO, CONTO, SOTTOCONTO, DATAREG, DATADOC, REG, PROTIVA, TOTDOC + FROM RMOVIVA + JOIN MOV + ON MOV.NUMREG = RMOVIVA.NUMREG + WHERE MOV.NUMREG = 96952 + + ) A + JOIN PCON + ON PCON.GRUPPO = A.GRUPPO AND PCON.CONTO = A.CONTO AND PCON.SOTTOCONTO = A.SOTTOCONTO +) B +JOIN TABCOM +ON COD = 'IVA' AND CODTAB = B.CODIVA + \ No newline at end of file diff --git a/src/f9/f9lib02.cpp b/src/f9/f9lib02.cpp index b0f4c0cb4..4010e7872 100644 --- a/src/f9/f9lib02.cpp +++ b/src/f9/f9lib02.cpp @@ -350,10 +350,11 @@ TProspetto_recset::TProspetto_recset(const char* numreg_acq, const char* numreg_ TString sql; sql << "SELECT COD, CODTAB, S0, R0,\n" "B.GRUPPO, B.CONTO, B.SOTTOCONTO, B.DESCR,\n" "B.NUMREG, B.CODIVA, B.IMPONIBILE, B.IMPOSTA, B.GRUPPO, B.CONTO, B.SOTTOCONTO, B.DATAREG, B.DATADOC, B.REG, B.PROTIVA, B.TOTDOC,\n" - << *_today << " AS TODAY, " << *_ragsoc << " AS RAGSOC, " << *_totdoc << " AS TOTDOC, " << *_address << " AS ADDRSEDE, " << *_cap << " AS CAP, " << *_citta << " AS CITTA, " << *_provin << " AS PROVIN,\n" + << *_today << " AS TODAY, " << *_ragsoc << " AS RAGSOC, " << *_address << " AS ADDRSEDE, " << *_cap << " AS CAP, " << *_citta << " AS CITTA, " << *_provin << " AS PROVIN,\n" << *_codfisc << " AS CODFISC, " << *_partiva << " AS PARTIVA,\n" << *_ndoc << " AS NDOC, " << *_datadoc << " AS DATADOC,\n" << *_codforn << " AS CODFORN, " << *_ragsocforn << " AS RAGSOCFORN, " << *_addrforn << " AS ADDRFORN, " << *_capforn << " AS CAPFORN, " << *_cittaforn << " AS CITTAFORN, " << *_provinforn << " AS PROVINFORN, " << *_partivaforn << " AS PARTIVAFORN,\n" + << *_totdoc << " AS TOTDOC,\n" << *_regacq << " AS REGACQ, " << *_protivaacq << " AS PROTIVAACQ, " << *_dataregacq << " AS DATAREGACQ,\n" << *_totale << " AS TOTALE, " << *_totimponibile << " AS TOTIMPONIBILE, " << *_totimposta << " AS TOTIMPOSTA\n" "FROM(\n"