Patch level : 12.0 no-patch

Files correlati     : f90.exe d181.des f181.dir f181.trr f9ProspIntegr.rep all-masks build
Commento            : Aggiunto report prospetto integrazione
This commit is contained in:
Simone Palacino 2020-06-17 11:56:11 +02:00
parent ce80f739bc
commit 9439dc6a7c
4 changed files with 283 additions and 1 deletions

View File

@ -245,6 +245,9 @@
<ItemGroup>
<MenCompiler Include="..\src\fp\fpmenu.men" />
</ItemGroup>
<ItemGroup>
<RepCompiler Include="..\src\f9\prosp.rep" />
</ItemGroup>
<Import Project="$(VCTargetsPath)\Microsoft.Cpp.targets" />
<ImportGroup Label="ExtensionTargets">
<Import Project="CampoRules.targets" />

View File

@ -22,6 +22,9 @@
<Filter Include="Recdesc">
<UniqueIdentifier>{95c95f84-ca93-4c2f-b1cf-e94922dfa7ef}</UniqueIdentifier>
</Filter>
<Filter Include="Rep">
<UniqueIdentifier>{07b3ab94-7474-4c5e-9be6-48fd6aea2c6b}</UniqueIdentifier>
</Filter>
</ItemGroup>
<ItemGroup>
<ClInclude Include="..\src\f9\f90.h">
@ -142,4 +145,9 @@
<Filter>Menu</Filter>
</MenCompiler>
</ItemGroup>
<ItemGroup>
<RepCompiler Include="..\src\f9\prosp.rep">
<Filter>Rep</Filter>
</RepCompiler>
</ItemGroup>
</Project>

270
src/f9/f9ProspIntegr.rep Normal file
View File

@ -0,0 +1,270 @@
<?xml version="1.0" encoding="UTF-8" ?>
<report name="prosp" lpi="6">
<description>Prospetto integ. Rev. Charge</description>
<font face="Arial" size="8" />
<section type="Head" pattern="1">
<field x="8" y="4" type="Data" width="12" pattern="1">
<font face="Arial" size="10" />
<source>TODAY</source>
</field>
<field x="8" y="5" type="Stringa" width="57" pattern="1">
<font face="Arial" size="10" />
<source>RAGSOC</source>
</field>
<field x="8" y="6" type="Stringa" width="57" pattern="1">
<font face="Arial" size="10" />
<source>ADDRSEDE</source>
</field>
<field x="8" y="7" type="Numero" align="right" width="8" pattern="1">
<font face="Arial" size="10" />
<source>CAP</source>
</field>
<field x="17" y="7" type="Stringa" width="4" pattern="1">
<font face="Arial" size="10" />
<source>PROVIN</source>
</field>
<field x="22" y="7" type="Stringa" width="33" pattern="1">
<font face="Arial" size="10" />
<source>CITTA</source>
</field>
<field x="8" y="8" type="Testo" width="16" pattern="1" text="Codice Fiscale: ">
<font face="Arial" size="10" />
</field>
<field x="27" y="8" type="Stringa" width="28" pattern="1" text="@@#########">
<font face="Arial" size="10" />
<source>CODFISC</source>
</field>
<field x="8" y="9" type="Testo" width="16" pattern="1" text="Partita IVA:">
<font face="Arial" size="10" />
</field>
<field x="27" y="9" type="Stringa" width="28" pattern="1" text="@@#########">
<font face="Arial" size="10" />
<source>PARTIVA</source>
</field>
<field x="25" y="13" type="Testo" align="center" width="70" height="2" pattern="1" text="PROSPETTO INTEGRATIVO ACQUISTO">
<font face="Bookman Old Style" size="14" />
</field>
<field x="8" y="16" type="Testo" width="26" pattern="1" text="Riferimento documento del">
<font face="Arial" size="10" />
</field>
<field x="34" y="16" type="Data" width="14" pattern="1">
<font face="Arial" size="10" />
<source>DATADOC</source>
</field>
<field x="60" y="16" type="Testo" width="2" pattern="1" text="F">
<font face="Arial" size="10" />
</field>
<field x="62" y="16" type="Stringa" width="13" pattern="1">
<font face="Arial" size="10" />
<source>CODFORN</source>
</field>
<field x="8" y="17" type="Testo" width="3" pattern="1" text="n.">
<font face="Arial" size="10" />
</field>
<field x="11" y="17" type="Stringa" width="37" pattern="1">
<font face="Arial" size="10" />
<source>NDOC</source>
</field>
<field x="60" y="17" type="Stringa" width="40" pattern="1">
<font face="Arial" size="10" />
<source>RAGSOCFORN</source>
</field>
<field x="60" y="18" type="Stringa" width="40" pattern="1">
<font face="Arial" size="10" />
<source>ADDRFORN</source>
</field>
<field x="60" y="19" type="Numero" align="right" width="7" pattern="1">
<font face="Arial" size="10" />
<source>CAPFORN</source>
</field>
<field x="68" y="19" type="Stringa" width="4" pattern="1">
<font face="Arial" size="10" />
<source>PROVINFORN</source>
</field>
<field x="73" y="19" type="Stringa" width="31" pattern="1">
<font face="Arial" size="10" />
<source>CITTAFORN</source>
</field>
<field x="60" y="20" type="Testo" width="11" pattern="1" text="Partita IVA:">
<font face="Arial" size="10" />
</field>
<field x="72" y="20" type="Stringa" width="28" pattern="1" text="@@#########">
<font face="Arial" size="10" />
<source>PARTIVAFORN</source>
</field>
<field x="8" y="22" type="Testo" width="18" pattern="1" text="Totale documento">
<font face="Arial" size="10" />
</field>
<field x="25" y="22" type="Prezzo" align="right" width="26" pattern="1" text="###.###.###,@@">
<font face="Arial" size="10" />
<source>TOTDOC</source>
</field>
<field x="8" y="24" type="Testo" width="21" pattern="1" text="Protocollo IVA credito">
<font face="Arial" size="10" />
</field>
<field x="29" y="24" type="Stringa" align="right" width="7" pattern="1" text="@@#">
<font face="Arial" size="10" />
<source>REGACQ</source>
</field>
<field x="36" y="24" type="Testo" width="1" pattern="1" text="&#2F;">
<font face="Arial" size="10" />
</field>
<field x="37" y="24" type="Stringa" width="8" pattern="1">
<font face="Arial" size="10" />
<source>PROTIVAACQ</source>
</field>
<field x="46" y="24" type="Testo" width="4" pattern="1" text="del">
<font face="Arial" size="10" />
</field>
<field x="50" y="24" type="Data" width="15" pattern="1">
<font face="Arial" size="10" />
<source>DATAREGACQ</source>
</field>
<field x="8" y="25" type="Testo" width="21" pattern="1" text="Protocollo IVA debito">
<font face="Arial" size="10" />
</field>
<field x="29" y="25" type="Stringa" align="right" width="7" pattern="1" text="@@#">
<font face="Arial" size="10" />
<source>B.REG</source>
</field>
<field x="36" y="25" type="Testo" width="1" pattern="1" text="&#2F;">
<font face="Arial" size="10" />
</field>
<field x="37" y="25" type="Stringa" width="8" pattern="1">
<font face="Arial" size="10" />
<source>B.PROTIVA</source>
</field>
<field x="46" y="25" type="Testo" width="4" pattern="1" text="del">
<font face="Arial" size="10" />
</field>
<field x="50" y="25" type="Data" width="15" pattern="1">
<font face="Arial" size="10" />
<source>B.DATAREG</source>
</field>
<field x="27" y="29" type="Testo" align="center" width="18" pattern="1" text="TOTALE">
<font face="Arial" size="10" />
</field>
<field border="2" x="45" y="29" type="Linea" height="2" pattern="1" />
<field x="45" y="29" type="Testo" align="center" width="20" pattern="1" text="IMPONIBILE">
<font face="Arial" size="10" />
</field>
<field border="2" x="65" y="29" type="Linea" height="2" pattern="1" />
<field x="65" y="29" type="Testo" align="center" width="20" pattern="1" text="IMPOSTA">
<font face="Arial" size="10" />
</field>
<field x="27" y="30" type="Prezzo" align="right" width="15" pattern="1" text="###.###.###,@@">
<font face="Arial" size="10" />
<source>TOTALE</source>
</field>
<field x="47" y="30" type="Prezzo" align="right" width="16" pattern="1" text="###.###.###,@@">
<font face="Arial" size="10" />
<source>TOTIMPONIBILE</source>
</field>
<field x="71" y="30" type="Prezzo" align="right" width="9" pattern="1" text="#########,@@">
<font face="Arial" size="10" />
<source>TOTIMPOSTA</source>
</field>
<field x="7" y="34" type="Testo" align="center" width="29" pattern="1" text="IMPORTO CONTROVALORE">
<font face="Arial" size="10" />
</field>
<field x="35" y="34" type="Testo" align="center" width="10" pattern="1" text="% IVA">
<font face="Arial" size="10" />
</field>
<field border="2" x="36" y="34" type="Linea" pattern="1" />
<field x="45" y="34" type="Testo" align="center" width="20" pattern="1" text="VALORE IVA">
<font face="Arial" size="10" />
</field>
<field border="2" x="45" y="34" type="Linea" pattern="1" />
<field border="2" x="65" y="34" type="Linea" pattern="1" />
<field x="65" y="34" type="Testo" align="center" width="40" pattern="1" text="CONTO DI CONTROPARTITA">
<font face="Arial" size="10" />
</field>
</section>
<section type="Head" level="1" pattern="1">
<prescript description="H1 PRESCRIPT">#ATTESTA @
DUP
0 = IF
DROP
1
THEN
"H2.210" !
</prescript>
</section>
<section type="Body" pattern="1" />
<section type="Body" level="1" pattern="1">
<field x="14" type="Prezzo" align="right" width="18" pattern="1" text="###.###.###,@@">
<font face="Arial" size="10" />
<source>B.IMPONIBILE</source>
</field>
<field x="36" type="Prezzo" align="right" width="7" pattern="1" text="###.###.###,@@">
<font face="Arial" size="10" />
<source>R0</source>
</field>
<field border="2" x="36" type="Linea" pattern="1" />
<field border="2" x="45" type="Linea" pattern="1" />
<field x="47" type="Prezzo" align="right" width="16" pattern="1" text="#########,@@">
<font face="Arial" size="10" />
<source>B.IMPOSTA</source>
</field>
<field border="2" x="65" type="Linea" pattern="1" />
<field x="66" type="Stringa" align="center" width="6" pattern="1">
<font face="Arial" size="10" />
<source>B.GRUPPO</source>
</field>
<field x="72" type="Testo" align="center" width="1" pattern="1" text="&#2F;">
<font face="Arial" size="10" />
</field>
<field x="73" type="Stringa" align="center" width="6" pattern="1">
<font face="Arial" size="10" />
<source>B.CONTO</source>
</field>
<field x="79" type="Testo" align="center" width="1" pattern="1" text="&#2F;">
<font face="Arial" size="10" />
</field>
<field x="80" type="Stringa" align="center" width="7" pattern="1">
<font face="Arial" size="10" />
<source>B.SOTTOCONTO</source>
</field>
<field x="89" type="Stringa" width="54" pattern="1">
<font face="Arial" size="10" />
<source>B.DESCR</source>
</field>
</section>
<section type="Foot" pattern="1" />
<section type="Foot" level="1" pattern="1">
<prescript description="F1 PRESCRIPT">#ATTESTA @
DUP
0 = IF
DROP
1
THEN
"H2.210" !
</prescript>
</section>
<sql>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</sql>
</report>

View File

@ -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"