Patch level :

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
Aggiunta lista movimenti per importo


git-svn-id: svn://10.65.10.50/branches/R_10_00@22478 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2011-11-08 15:35:23 +00:00
parent 7c4edb6946
commit bb86ce1e74
7 changed files with 262 additions and 8 deletions

@ -420,9 +420,9 @@ void TPay_mask::gioca_cambi(int force)
}
#ifdef __EXTRA__
if ( (force == 0x4 || cambio.in_lire()) && !(totale.is_zero() || totval.is_zero()))
if ( (force == 0x4 || cambio.in_euro()) && !(totale.is_zero() || totval.is_zero()))
{
real new_cambio = totale / totval; new_cambio.round(5);
real new_cambio = totale / totval; new_cambio.round(6);
if (new_cambio != cambio.cambio())
set(E_CAMBIO, new_cambio, TRUE);
}

@ -15,4 +15,9 @@
#define F_I_TIPOCF 212
#define F_I_CODCF 213
#define F_I_RAGSOC 214
#define F_I_CODVAL 215
#define F_I_CODVAL 215
#define F_R_GRUPPO 220
#define F_R_CONTO 221
#define F_R_SOTTOCONTO 222
#define F_R_DESCR 223

@ -1,6 +1,6 @@
<?xml version="1.0" encoding="UTF-8" ?>
<report name="cg7100i" lpi="6">
<description>Lista movimenti per importo</description>
<description>Lista documenti per importo</description>
<font face="Arial" size="8" />
<section type="Head" pattern="1">
<font italic="1" face="Arial" size="8" />

@ -1,6 +1,6 @@
#include "cg7100.h"
PAGE "Lista movimenti per importo" -1 -1 78 14
PAGE "Lista documenti per importo" -1 -1 78 14
NUMBER F_CODDITTA 5
BEGIN
@ -31,7 +31,7 @@ END
GROUPBOX DLG_NULL 76 3
BEGIN
PROMPT 1 3 "@bData registrazione movimento"
PROMPT 1 3 "@bData registrazione"
END
DATE F_DATAINI
@ -50,7 +50,7 @@ END
GROUPBOX DLG_NULL 76 4
BEGIN
PROMPT 1 6 "@bClente/Fornitore"
PROMPT 1 6 "@bCliente/Fornitore"
END
LIST F_I_TIPOCF 1 11

71
cg/cg7100r.rep Normal file

@ -0,0 +1,71 @@
<?xml version="1.0" encoding="UTF-8" ?>
<report name="cg7100i" lpi="6">
<description>Lista movimenti per importo</description>
<font face="Arial" size="8" />
<section type="Head" pattern="1">
<font italic="1" face="Arial" size="8" />
<field x="50" y="0.75" type="Testo" width="9" pattern="1" text="Documento" />
<field x="2" y="1.5" type="Testo" width="4" pattern="1" text="Anno" />
<field x="7" y="1.5" type="Testo" align="right" width="7" pattern="1" text="N. Reg." />
<field x="14.5" y="1.5" type="Testo" align="center" width="10" pattern="1" text="Data Reg." />
<field x="25.5" y="1.5" type="Testo" align="center" width="10" pattern="1" text="Data Comp." />
<field x="43" y="1.5" type="Testo" align="center" width="10" pattern="1" text="Data" />
<field x="54.5" y="1.5" type="Testo" align="right" width="7" pattern="1" text="Numero" />
<field x="62" y="1.5" type="Testo" width="3" pattern="1" text="Tipo" />
<field x="67" y="1.5" type="Testo" width="3" pattern="1" text="Cau." />
<field x="71" y="1.5" type="Testo" width="10" pattern="1" text="Descrizione" />
<field x="103" y="1.5" type="Testo" align="right" width="10" pattern="1" text="Importo" />
<field border="1" x="1" y="2.5" type="Linea" width="116" height="0" pattern="1" />
</section>
<section type="Head" level="1" pattern="1">
<field border="1" radius="50" x="25" y="0.5" type="Testo" valign="center" align="center" shade_offset="50" width="60" height="2" pattern="2" text="Lista movimenti per Importo">
<font face="Arial" bold="1" size="14" />
</field>
</section>
<section type="Body" pattern="1" />
<section type="Body" level="1" pattern="1">
<field x="2" type="Numero" align="right" width="4" pattern="1">
<source>ANNOES</source>
</field>
<field x="7" type="Numero" align="right" link="23.NUMREG" width="7" pattern="1">
<source>NUMREG</source>
</field>
<field x="15" type="Data" width="10" pattern="1">
<source>DATAREG</source>
</field>
<field x="26" type="Data" width="10" pattern="1">
<source>MOV.DATACOMP</source>
</field>
<field x="37" type="Numero" align="right" width="6" pattern="1">
<source>SOTTOCONTO</source>
</field>
<field x="44" type="Data" width="10" pattern="1">
<source>MOV.DATADOC</source>
</field>
<field x="54.5" type="Numero" align="right" width="7" pattern="1">
<source>MOV.NUMDOC</source>
</field>
<field x="62" type="Stringa" width="2" pattern="1">
<source>MOV.TIPODOC</source>
</field>
<field x="67" type="Stringa" width="3" pattern="1">
<source>MOV.CODCAUS</source>
</field>
<field x="71" type="Stringa" width="30" pattern="1">
<font face="Arial Narrow" size="8" />
<source>DESCR</source>
<altsource>MOV.DESCR</altsource>
</field>
<field x="102" type="Valuta" align="right" width="12" pattern="1" text="#########,@@">
<source>IMPORTO</source>
</field>
</section>
<section type="Foot" pattern="1" />
<section type="Foot" level="1" pattern="1" />
<sql>USE RMOV KEY 2
SELECT (BETWEEN(DATAREG,#DATAINI,#DATAFIN))&#26;&#26;(STR(BETWEEN(IMPORTO,#DAIMPORTO,#AIMPORTO)))
JOIN MOV INTO NUMREG==NUMREG
FROM GRUPPO=#GRUPPO CONTO=#CONTO SOTTOCONTO=#SOTTOCONTO
TO GRUPPO=#GRUPPO CONTO=#CONTO SOTTOCONTO=#SOTTOCONTO
</sql>
</report>

177
cg/cg7100r.uml Normal file

@ -0,0 +1,177 @@
#include "cg7100.h"
PAGE "Lista movimenti per importo" -1 -1 78 14
NUMBER F_CODDITTA 5
BEGIN
PROMPT 1 1 "Ditta "
FLAGS "FRD"
USE LF_NDITTE KEY 1
CHECKTYPE REQUIRED
INPUT CODDITTA F_CODDITTA
DISPLAY "Codice" CODDITTA
DISPLAY "Ragione sociale @50" RAGSOC
OUTPUT F_CODDITTA CODDITTA
OUTPUT F_RAGSOC RAGSOC
END
STRING F_RAGSOC 50
BEGIN
PROMPT 15 1 ""
FLAGS "D"
END
DATE F_DATASTAMPA
BEGIN
PROMPT 1 2 "Data stampa "
HELP "Data in cui viene effettuata la stampa"
FLAGS "A"
FIELD #DATASTAMPA
END
GROUPBOX DLG_NULL 76 3
BEGIN
PROMPT 1 3 "@bData registrazione"
END
DATE F_DATAINI
BEGIN
PROMPT 2 4 "Dal "
HELP "Data da cui iniziare la ricerca"
FIELD #DATAINI
END
DATE F_DATAFIN
BEGIN
PROMPT 28 4 "Al "
HELP "Data fino a cui eseguire la ricerca"
FIELD #DATAFIN
END
GROUPBOX DLG_NULL 76 4
BEGIN
PROMPT 1 6 "@bConto/Cliente/Fornitore"
END
LIST F_I_TIPOCF 1 11
BEGIN
PROMPT 2 7 "Tipo "
FLAGS "PG"
ITEM "C|Cliente"
MESSAGE SHOW,1@|HIDE,2@
ITEM "F|Fornitore"
MESSAGE SHOW,1@|HIDE,2@
ITEM "|Conto"
MESSAGE SHOW,2@|HIDE,1@
END
NUMBER F_R_GRUPPO 3
BEGIN
PROMPT 26 7 ""
USE LF_PCON SELECT TMCF=#F_I_TIPOCF
INPUT GRUPPO F_R_GRUPPO
INPUT CONTO F_R_CONTO
INPUT SOTTOCONTO F_R_SOTTOCONTO
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_R_GRUPPO GRUPPO
OUTPUT F_R_CONTO CONTO
OUTPUT F_R_SOTTOCONTO SOTTOCONTO
OUTPUT F_R_DESCR DESCR
CHECKTYPE NORMAL
FIELD #GRUPPO
END
NUMBER F_R_CONTO 3
BEGIN
PROMPT 33 7 ""
COPY ALL F_R_GRUPPO
FIELD #CONTO
END
NUMBER F_R_SOTTOCONTO 6
BEGIN
PROMPT 40 7 ""
COPY ALL F_R_GRUPPO
FIELD #SOTTOCONTO
GROUP 2
END
STRING F_R_DESCR 50
BEGIN
PROMPT 20 8 ""
USE LF_PCON KEY 2 SELECT TMCF=#F_I_TIPOCF
INPUT DESCR F_R_DESCR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR
COPY OUTPUT F_R_SOTTOCONTO
GROUP 2
END
NUMBER F_I_CODCF 6
BEGIN
PROMPT 40 7 ""
FLAGS "G"
USE LF_CLIFO
INPUT TIPOCF F_I_TIPOCF SELECT
INPUT CODCF F_I_CODCF
DISPLAY "Codice@6R" CODCF
DISPLAY "Ragione sociale@50" RAGSOC
DISPLAY "Codice fiscale@16" COFI
DISPLAY "Partita IVA@11" PAIV
OUTPUT F_I_CODCF CODCF
OUTPUT F_I_RAGSOC RAGSOC
HELP "Codice relativo al cliente o fornitore"
CHECKTYPE NORMAL
FIELD #SOTTOCONTO
GROUP 1
END
STRING F_I_RAGSOC 50
BEGIN
PROMPT 20 8 ""
USE LF_CLIFO KEY 2
INPUT TIPOCF F_I_TIPOCF SELECT
INPUT RAGSOC F_I_RAGSOC
DISPLAY "Ragione sociale@50" RAGSOC
DISPLAY "Sospeso" SOSPESO
DISPLAY "Codice@6R" CODCF
DISPLAY "Codice fiscale@16" COFI
DISPLAY "Partita IVA@11" PAIV
COPY OUTPUT F_I_CODCF
CHECKTYPE NORMAL
GROUP 1
END
GROUPBOX DLG_NULL 76 3
BEGIN
PROMPT 1 10 "@bImporti"
END
CURRENCY F_I_DAIMPORTO
BEGIN
PROMPT 2 11 "Da "
FIELD #DAIMPORTO
END
CURRENCY F_I_AIMPORTO
BEGIN
PROMPT 26 11 "A "
FIELD #AIMPORTO
NUM_EXPR #THIS_FIELD>=#F_I_DAIMPORTO
WARNING "Il secondo importo non puo' essere inferiore al primo"
END
ENDPAGE
TOOLBAR "topbar" 0 0 0 2
#include <printbar.h>
ENDPAGE
ENDMASK

@ -244,7 +244,8 @@ Item_06 = "Bilancio IV direttiva CEE", "cg1 -5", "F"
Item_07 = "Giornale", "cg3 -3", "F"
Item_08 = "Lista movimenti per imponibile limite", "cg7 -1", "F"
Item_09 = "Lista movimenti stati a fiscalità agevolata", "cg7 -0 cg7100p", "F"
Item_10 = "Lista movimenti per importo", "cg7 -0 cg7100i", "F"
Item_10 = "Lista documenti per importo", "cg7 -0 cg7100i", "F"
Item_11 = "Lista movimenti per importo", "cg7 -0 cg7100r", "F"
[CGMENU_025]
Caption = "Collegamento bilanci"