root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : 12.0 308

Browse Source 
Files correlati     : ic0100f.rep ic0200p.rep
Commento            :

Aggiunti i totali nelle stampe IVA differita e per cassa

git-svn-id: svn://10.65.10.50/branches/R_10_00@23413 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
bonazzi 2016-12-02 00:12:58 +00:00
parent 2eb1aefb40
commit 4ff15689b0
4 changed files with 269 additions and 86 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/ic/ic0100.cpp
View File

@ -1,4 +1,5 @@
#include <applicat.h>
#include <mask.h>
#include <report.h>
#include "ic0.h"

118
src/ic/ic0100f.rep
View File

@ -3,11 +3,14 @@
<font face="Arial" size="10" />
<section type="Head" pattern="1" />
<section type="Head" level="1" pattern="1">
<prescript description="H1 PRESCRIPT">0 #F1.101 !
0 #F1.102 !
0 #F1.103 !</prescript>
<field type="Stringa" align="center" width="90" height="2" pattern="1">
<font face="Arial" bold="1" size="20" />
<source>IF(#TIPOIVA==1,"VENDITE", "ACQUISTI") + " CON IVA " + IF(#TIPODIFF==1,"DIFFERITA", "PER CASSA")</source>
</field>
<field type="Stringa" align="center" y="2" width="90" height="1" pattern="1">
<field y="2" type="Stringa" align="center" width="90" pattern="1">
<font face="Arial" bold="1" size="10" />
<source>IF(#DAL="",""," DAL "+#DAL) + IF(#AL="","", " AL "+#AL)</source>
</field>
@ -15,6 +18,9 @@
<section type="Head" level="2" pattern="1">
<groupby>NUMREG</groupby>
<font face="Arial" bold="1" size="10" />
<prescript description="H2 PRESCRIPT">0 #F2.101 !
0 #F2.102 !
0 #F2.103 !</prescript>
<field border="3" y="0.5" type="Linea" width="90" height="0" pattern="1" />
<field y="1" type="Testo" width="8" pattern="1" text="Fattura" />
<field x="8" y="1" type="Stringa" width="10" pattern="1">
@ -27,14 +33,12 @@
<field x="40" y="1" type="Stringa" width="50" pattern="1">
<source>CLIFO.RAGSOC</source>
</field>
<field x="19" y="2" type="Testo" width="7" pattern="1" text="Sezione" />
<field x="25" y="2" type="Testo" align="right" width="15" pattern="1" text="Importo" />
<field x="40" y="2" type="Testo" align="right" width="15" pattern="1" text="Imponibile" />
<field x="56" y="2" type="Testo" align="right" width="4" pattern="1" text="IVA" />
<field x="60" y="2" type="Testo" align="right" width="15" pattern="1" text="Imposta" />
<field x="80" y="2" type="Testo" align="left" width="6" pattern="1" text="Chiusa" />
<field x="80" y="2" type="Testo" width="6" pattern="1" text="Chiusa" />
<field y="3" type="Numero" align="right" link="MOV.NUMREG" width="7" pattern="1" hide_zero="1">
<source>NUMREG</source>
</field>
@ -51,7 +55,7 @@
<field x="25" y="3" type="Valuta" align="right" width="15" pattern="1" text="###.###.###,@@">
<source>MOV.TOTDOC</source>
</field>
<field x="83" y="3" valign="center" type="Booleano" width="1" pattern="1">
<field x="83" y="3" type="Booleano" valign="center" width="1" pattern="1">
<source>CHIUSA</source>
</field>
<field border="1" y="4.5" type="Linea" width="90" height="0" pattern="1" />
@ -66,32 +70,118 @@
<source>DATAREGP</source>
<alt_source>DATAREG</alt_source>
</field>
<field x="19" type="Array" width="5" pattern="1">
<source>SEZIONE</source>
<list>
<li Value="Dare" Code="D" />
<li Value="Avere" Code="A" />
</list>
</field>
<field x="25" type="Valuta" align="right" width="15" pattern="1" text="###.###.###,@@">
<source>IMPORTO</source>
<postscript description="B1.0 POSTSCRIPT">#100 @
"A"
=
IF
-1
ELSE
1
THEN
#THIS @
*
#F2.101 +!</postscript>
</field>
<field x="40" type="Valuta" align="right" width="15" pattern="1" text="###.###.###,@@">
<source>IMPONIBILE</source>
<postscript description="B1.0 POSTSCRIPT">#THIS @
#F2.102 +!</postscript>
</field>
<field x="56" type="Stringa" align="right" width="4" pattern="1">
<source>CODIVA</source>
</field>
<field x="60" type="Valuta" align="right" width="15" pattern="1" text="###.###.###,@@">
<source>IMPOSTA</source>
<postscript description="B1.0 POSTSCRIPT">#THIS @
#F2.103 +!</postscript>
</field>
<field x="83" type="Booleano" width="1" pattern="1">
<source>CHIUSA</source>
</field>
<field x="19" type="Array" width="5" id="100" pattern="1">
<source>SEZIONE</source>
<list>
<li Value="Dare" Code="D" />
<li Value="Avere" Code="A" />
</list>
</field>
</section>
<section type="Foot" pattern="1" />
<section type="Foot" level="1" pattern="1" />
<section type="Foot" level="2" pattern="1" />
<section type="Foot" level="1" height="2" pattern="1">
<field border="1" y="0.25" type="Linea" width="90" height="0" pattern="1" />
<field x="4" y="0.5" type="Testo" width="15" pattern="1" text="Totale Generale" />
<field x="19" y="0.5" type="Array" width="5" id="100" pattern="1">
<source>SEZIONE</source>
<list>
<li Value="Dare" Code="D" />
<li Value="Avere" Code="A" />
</list>
</field>
<field x="25" y="0.5" type="Valuta" align="right" width="15" id="101" pattern="1" text="###.###.###,@@">
<prescript description="F1.101 PRESCRIPT">#THIS @
0
&#3C;
IF
"A" #100 !
#THIS
-1
*
#THIS !
ELSE
"D" #100 !
THEN
</prescript>
</field>
<field x="40" y="0.5" type="Valuta" align="right" width="15" id="102" pattern="1" text="###.###.###,@@" />
<field x="60" y="0.5" type="Valuta" align="right" width="15" id="103" pattern="1" text="###.###.###,@@" />
</section>
<section type="Foot" level="2" height="2" pattern="1">
<field border="1" y="0.25" type="Linea" width="90" height="0" pattern="1" />
<field x="4" y="0.5" type="Testo" width="10" pattern="1" text="Totale" />
<field x="19" y="0.5" type="Array" width="5" id="100" pattern="1">
<source>SEZIONE</source>
<list>
<li Value="Dare" Code="D" />
<li Value="Avere" Code="A" />
</list>
</field>
<field x="25" y="0.5" type="Valuta" align="right" width="15" id="101" pattern="1" text="###.###.###,@@">
<prescript description="F2.101 PRESCRIPT">#THIS @
0
&#3C;
IF
"A" #100 !
#THIS
-1
*
#THIS !
ELSE
"D" #100 !
THEN
</prescript>
<postscript description="F2.101 POSTSCRIPT">#100 @
"A"
=
IF
-1
ELSE
1
THEN
#THIS @
*
#F1.101 +!</postscript>
</field>
<field x="40" y="0.5" type="Valuta" align="right" width="15" id="102" pattern="1" text="###.###.###,@@">
<postscript description="F2.102 POSTSCRIPT">#THIS @
#F1.102 +!</postscript>
</field>
<field x="60" y="0.5" type="Valuta" align="right" width="15" id="103" pattern="1" text="###.###.###,@@">
<postscript description="F2.103 POSTSCRIPT">#THIS @
#F1.103 +!</postscript>
</field>
</section>
<sql>USE IVADIFF SELECT (BETWEEN(DATAREG,#DAL,#AL))&#26;&#26;(TIPOIVA==#TIPOIVA)&#26;&#26;(TIPODIFF==#TIPODIFF)&#26;&#26;((CHIUSA=#CHIUSA)||(#CHIUSA="T"))
JOIN MOV INTO NUMREG==NUMREG
JOIN CLIFO TO MOV INTO TIPOCF==TIPO CODCF==CODCF</sql>

1
src/ic/ic0200.cpp
View File

@ -1,4 +1,5 @@
#include <applicat.h>
#include <mask.h>
#include <report.h>
#include "ic0.h"

107
src/ic/ic0200p.rep
View File

@ -3,11 +3,14 @@
<font face="Arial" size="10" />
<section type="Head" pattern="1" />
<section type="Head" level="1" pattern="1">
<prescript description="H1 PRESCRIPT">0 #F1.101 !
0 #F1.102 !
0 #F1.103 !</prescript>
<field type="Stringa" align="center" width="90" height="2" pattern="1">
<font face="Arial" bold="1" size="20" />
<source>IF(#TIPOIVA==1,"INCASSI", "PAGAMENTI") + " CON IVA " + IF(#TIPODIFF==1,"DIFFERITA", "PER CASSA")</source>
</field>
<field type="Stringa" align="center" y="2" width="90" height="1" pattern="1">
<field y="2" type="Stringa" align="center" width="90" pattern="1">
<font face="Arial" bold="1" size="10" />
<source>IF(#DAL="",""," DAL "+#DAL) + IF(#AL="","", " AL "+#AL)</source>
</field>
@ -15,6 +18,9 @@
<section type="Head" level="2" pattern="1">
<groupby>NUMREG</groupby>
<font face="Arial" bold="1" size="10" />
<prescript description="H2 PRESCRIPT">0 #F2.101 !
0 #F2.102 !
0 #F2.103 !</prescript>
<field border="3" y="0.5" type="Linea" width="90" height="0" pattern="1" />
<field y="1" type="Testo" width="8" pattern="1" text="Fattura" />
<field x="8" y="1" type="Stringa" width="10" pattern="1">
@ -27,14 +33,12 @@
<field x="40" y="1" type="Stringa" width="50" pattern="1">
<source>CLIFO.RAGSOC</source>
</field>
<field x="19" y="2" type="Testo" width="7" pattern="1" text="Sezione" />
<field x="25" y="2" type="Testo" align="right" width="15" pattern="1" text="Importo" />
<field x="40" y="2" type="Testo" align="right" width="15" pattern="1" text="Imponibile" />
<field x="56" y="2" type="Testo" align="right" width="4" pattern="1" text="IVA" />
<field x="60" y="2" type="Testo" align="right" width="15" pattern="1" text="Imposta" />
<field x="80" y="2" type="Testo" align="left" width="6" pattern="1" text="Chiusa" />
<field x="80" y="2" type="Testo" width="6" pattern="1" text="Chiusa" />
<field y="3" type="Numero" align="right" link="MOV.NUMREG" width="7" pattern="1" hide_zero="1">
<source>NUMREG</source>
</field>
@ -51,14 +55,14 @@
<field x="25" y="3" type="Valuta" align="right" width="15" pattern="1" text="###.###.###,@@">
<source>MOV.TOTDOC</source>
</field>
<field x="83" y="3" valign="center" type="Booleano" width="1" pattern="1">
<field x="83" y="3" type="Booleano" valign="center" width="1" pattern="1">
<source>CHIUSA</source>
</field>
<field border="1" y="4.5" type="Linea" width="90" height="0" pattern="1" />
</section>
<section type="Body" pattern="1" />
<section type="Body" level="1" pattern="1">
<field type="String" align="right" link="MOV.NUMREG" width="7" pattern="1" hide_zero="1">
<field type="Stringa" align="right" link="MOV.NUMREG" width="7" pattern="1">
<source>IF(NUMREGP==NUMREG,"",NUMREGP)</source>
</field>
<field x="8" type="Data" width="10" pattern="1">
@ -73,23 +77,110 @@
</field>
<field x="25" type="Valuta" align="right" width="15" pattern="1" text="###.###.###,@@">
<source>IMPORTO</source>
<postscript description="B1.0 POSTSCRIPT">#100 @
"A"
=
IF
-1
ELSE
1
THEN
#THIS @
*
#F2.101 +!</postscript>
</field>
<field x="40" type="Valuta" align="right" width="15" pattern="1" text="###.###.###,@@">
<source>IMPONIBILE</source>
<postscript description="B1.0 POSTSCRIPT">#THIS @
#F2.102 +!</postscript>
</field>
<field x="56" type="Stringa" align="right" width="4" pattern="1">
<source>CODIVA</source>
</field>
<field x="60" type="Valuta" align="right" width="15" pattern="1" text="###.###.###,@@">
<source>IMPOSTA</source>
<postscript description="B1.0 POSTSCRIPT">#THIS @
#F2.103 +!</postscript>
</field>
<field x="83" type="Booleano" valign="center" width="1" pattern="1">
<source>CHIUSA</source>
</field>
</section>
<section type="Foot" pattern="1" />
<section type="Foot" level="1" pattern="1" />
<sql>USE IVADIFF SELECT (BETWEEN(DATAREGP,#DAL,#AL))&#26;&#26;(TIPOIVA==#TIPOIVA)&#26;&#26;(TIPODIFF==#TIPODIFF)&#26;&#26;(NUMPRO>0)&#26;&#26;((CHIUSA=#CHIUSA)||(#CHIUSA="T"))
<section type="Foot" level="1" height="2" pattern="1">
<field border="1" y="0.25" type="Linea" width="90" height="0" pattern="1" />
<field x="4" y="0.5" type="Testo" width="14" pattern="1" text="Totale Generale" />
<field x="19" y="0.5" type="Array" width="5" id="100" pattern="1">
<source>SEZIONE</source>
<list>
<li Value="Dare" Code="D" />
<li Value="Avere" Code="A" />
</list>
</field>
<field x="25" y="0.5" type="Valuta" align="right" width="15" id="101" pattern="1" text="###.###.###,@@">
<prescript description="F1.101 PRESCRIPT">#THIS @
0
&#3C;
IF
"A" #100 !
#THIS
-1
*
#THIS !
ELSE
"D" #100 !
THEN
</prescript>
</field>
<field x="40" y="0.5" type="Valuta" align="right" width="15" id="102" pattern="1" text="###.###.###,@@" />
<field x="60" y="0.5" type="Valuta" align="right" width="15" id="103" pattern="1" text="###.###.###,@@" />
</section>
<section type="Foot" level="2" height="2" pattern="1">
<field border="1" y="0.25" type="Linea" width="90" height="0" pattern="1" />
<field x="4.5" y="0.5" type="Testo" width="10" pattern="1" text="Totale" />
<field x="19.5" y="0.5" type="Array" width="5" id="100" pattern="1">
<source>SEZIONE</source>
<list>
<li Value="Dare" Code="D" />
<li Value="Avere" Code="A" />
</list>
</field>
<field x="25.5" y="0.5" type="Valuta" align="right" width="15" id="101" pattern="1" text="###.###.###,@@">
<prescript description="F2.101 PRESCRIPT">#THIS @
0
&#3C;
IF
"A" #100 !
#THIS
-1
*
#THIS !
ELSE
"D" #100 !
THEN
</prescript>
<postscript description="F2.101 POSTSCRIPT">#100 @
"A"
=
IF
-1
ELSE
1
THEN
#THIS @
*
#F1.101 +!</postscript>
</field>
<field x="40.5" y="0.5" type="Valuta" align="right" width="15" id="102" pattern="1" text="###.###.###,@@">
<postscript description="F2.102 POSTSCRIPT">#THIS @
#F1.102 +!</postscript>
</field>
<field x="60.5" y="0.5" type="Valuta" align="right" width="15" id="103" pattern="1" text="###.###.###,@@">
<postscript description="F2.103 POSTSCRIPT">#THIS @
#F1.103 +!</postscript>
</field>
</section>
<sql>USE IVADIFF SELECT (BETWEEN(DATAREGP,#DAL,#AL))&#26;&#26;(TIPOIVA==#TIPOIVA)&#26;&#26;(TIPODIFF==#TIPODIFF)&#26;&#26;(NUMPRO&#3E;0)&#26;&#26;((CHIUSA=#CHIUSA)||(#CHIUSA="T"))
BY NUMREG DATAREGP NUMREGP
JOIN MOV INTO NUMREG==NUMREG
JOIN CLIFO TO MOV INTO TIPOCF==TIPO CODCF==CODCF</sql>