root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
campo-sirio/ca/ca3100a.rep
luca 3680024c6d Patch level :10.0 244 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :sistemata stampa dei movimenti di analitica; aggiunto ordinamento per numreg (che esisteva solo in via teorica) e sistemato ordinamento per data (che andava statisticamente). Riporto da 5.0


git-svn-id: svn://10.65.10.50/trunk@18299 c028cbd2-c16b-5b4b-a496-9718f37d4682
2009-02-19 11:16:03 +00:00

214 lines
8.6 KiB
XML
Executable File
Raw Blame History

<?xml version="1.0" encoding="UTF-8" ?>
<report libraries="ve1300" name="ca3100a" lpi="8" class="ca3100b">
<description>Movimenti CA per numero registrazione</description>
<font face="Courier New" size="8" />
<section type="Head">
<font italic="1" face="Courier New" size="8" />
<prescript description="H0 PRESCRIPT">#ESERCIZIO @
0 &#3E;
IF
121 122 SCAMBIA_CAMPI
THEN
;</prescript>
<field x="1" type="Stringa" width="50" pattern="1">
<font italic="1" face="Courier New" bold="1" size="10" />
<source>#SYSTEM.RAGSOC</source>
</field>
<field x="76" type="Data" width="10" pattern="1">
<source>#SYSTEM.DATE</source>
</field>
<field x="157" type="Numero" align="right" width="3" pattern="1">
<source>#REPORT.PAGE</source>
</field>
<field x="10" y="1.25" type="Testo" width="12" pattern="1" text="Dal numero" />
<field x="22" y="1.25" type="Numero" width="12" pattern="1">
<font face="Courier New" bold="1" size="8" />
<source>#DANUMREG</source>
</field>
<field x="40" y="1.25" type="Testo" width="12" pattern="1" text="Al numero" />
<field x="52" y="1.25" type="Numero" width="12" pattern="1">
<font face="Courier New" bold="1" size="8" />
<source>#ANUMREG</source>
</field>
<field border="2" x="1" y="2.5" type="Linea" width="161" height="0" pattern="1" />
<field x="1.5" y="3" type="Testo" align="center" width="7" pattern="1" text="N.Reg." />
<field x="33.5" y="3" type="Testo" align="center" width="10" pattern="1" text="Data Doc." />
<field x="45.5" y="3" type="Testo" align="center" width="8" pattern="1" text="N.Reg.CG" />
<field x="55" y="3" type="Testo" align="center" width="6" pattern="1" text="N.Doc." />
<field x="62" y="3" type="Testo" align="center" width="7" pattern="1" text="Tp.Doc." />
<field x="69" y="3" type="Testo" align="center" width="11" pattern="1" text="Descrizione" />
<field x="95" y="3" type="Testo" align="center" width="7" pattern="1" text="Causale" />
<field x="125" y="3" type="Testo" align="center" width="7" pattern="1" text="Tp.Mov." />
<field x="133" y="3" type="Testo" align="center" width="15" pattern="1" text="Totale Dare" />
<field x="147" y="3" type="Testo" align="center" width="15" pattern="1" text="Totale Avere" />
<field border="2" x="1" y="4" type="Linea" width="161" height="0" pattern="1" />
<field x="10" y="3" type="Testo" align="center" width="10" id="121" pattern="1" text="Data Reg." />
<field x="22" y="3" type="Testo" width="10" id="122" pattern="1" text="Data Comp." />
</section>
<section type="Head" level="1" height="3">
<prescript description="H1 PRESCRIPT">MESSAGE RESET,F1.101
MESSAGE RESET,F1.102</prescript>
<field border="1" radius="100" x="1" type="Testo" valign="center" align="center" shade_offset="25" width="161" height="2.5" text="MOVIMENTI DI CONTABILITA' ANALITICA">
<font face="Courier New" bold="1" size="16" />
</field>
</section>
<section type="Head" level="2">
<groupby>NUMREG</groupby>
<field x="1" y="1" type="Numero" align="right" link="107.NUMREG" width="7" pattern="1">
<source>MOVANA.NUMREG</source>
</field>
<field x="34" y="1" type="Data" width="10" pattern="1">
<source>MOVANA.DATADOC</source>
</field>
<field x="47" y="1" type="Numero" align="right" link="23.NUMREG" width="7" pattern="1" hide_zero="1">
<source>MOVANA.NUMREGCG</source>
</field>
<field x="56" y="1" type="Stringa" width="7" pattern="1">
<source>MOVANA.NUMDOC</source>
</field>
<field x="64" y="1" type="Stringa" width="4" pattern="1">
<source>MOVANA.TIPODOC</source>
</field>
<field x="69" y="1" type="Stringa" dynamic_height="1" width="25" height="2" pattern="1">
<source>MOVANA.DESCR</source>
</field>
<field x="95" y="1" type="Stringa" width="3" pattern="1">
<source>MOVANA.CODCAUS</source>
</field>
<field x="99" y="1" type="Stringa" dynamic_height="1" width="25" height="2" pattern="1">
<prescript description="H2.0 PRESCRIPT">MESSAGE ISAMREAD,CAUS,CODCAUS=MOVANA.CODCAUS,DESCR</prescript>
</field>
<field x="127" y="1" type="Stringa" width="1" pattern="1">
<source>MOVANA.TIPOMOV</source>
</field>
<field x="131" y="1" type="Valuta" align="right" width="15" pattern="1" hide_zero="1" text="###.###.###,@@">
<source>MOVANA.TOTDOC</source>
<prescript description="H2.0 PRESCRIPT">"MOVANA.SEZIONE" @
"A" =
IF
0 #THIS !
THEN
</prescript>
</field>
<field x="146" y="1" type="Valuta" align="right" width="15" pattern="1" hide_zero="1" text="###.###.###,@@">
<source>MOVANA.TOTDOC</source>
<prescript description="H2.0 PRESCRIPT">"MOVANA.SEZIONE" @
"D" =
IF
0 #THIS !
THEN
</prescript>
</field>
<field x="8" y="3" type="Testo" align="center" width="4" pattern="1" text="Riga" />
<field x="13" y="3" type="Testo" width="23" pattern="1" text="Centro di Costo" />
<field x="37" y="3" type="Testo" width="23" pattern="1" text="Commessa" />
<field x="61" y="3" type="Testo" width="13" pattern="1" text="Fase" />
<field x="75" y="3" type="Testo" width="23" pattern="1" text="Conto" />
<field x="99" y="3" type="Testo" width="25" pattern="1" text="Descrizione" />
<field x="131.18" y="3" type="Testo" align="center" width="15" pattern="1" text="Dare" />
<field x="146.18" y="3" type="Testo" align="center" width="15" pattern="1" text="Avere" />
<field border="1" x="8.18" y="4" type="Linea" width="154" height="0" pattern="1" />
<field x="-9.88" y="1" type="Data" width="10" id="121" pattern="1">
<source>DATAREG</source>
</field>
<field x="10" y="1" type="Data" width="10" id="121" pattern="1">
<source>MOVANA.DATAREG</source>
</field>
<field x="22" y="1" type="Data" align="right" width="10" id="122" pattern="1">
<source>MOVANA.DATACOMP</source>
</field>
</section>
<section type="Body" />
<section type="Body" level="1">
<prescript description="B1 PRESCRIPT">#ESERCIZIO @
0 &#3E;
IF
121 122 SCAMBIA_CAMPI
THEN
;</prescript>
<field x="9" type="Numero" align="right" width="3" pattern="1">
<source>NUMRIG</source>
</field>
<field x="13" type="Stringa" width="23" pattern="1">
<source>CODCCOSTO</source>
<prescript description="B1.0 PRESCRIPT">CA_FORMAT_COSTO</prescript>
</field>
<field x="37" type="Stringa" width="23" pattern="1">
<source>CODCMS</source>
<prescript description="B1.0 PRESCRIPT">CA_FORMAT_COMMESSA</prescript>
</field>
<field x="61" type="Stringa" width="13" pattern="1">
<source>CODFASE</source>
<prescript description="B1.0 PRESCRIPT">CA_FORMAT_FASE</prescript>
</field>
<field x="75" type="Stringa" width="23" pattern="1">
<source>CODCONTO</source>
<prescript description="B1.0 PRESCRIPT">CA_FORMAT_CONTO</prescript>
</field>
<field x="99" type="Stringa" dynamic_height="1" width="25" height="2" pattern="1">
<source>DESCR</source>
</field>
<field x="131" type="Valuta" align="right" width="15" id="101" pattern="1" hide_zero="1" text="###.###.###,@@">
<source>IMPORTO</source>
<prescript description="B1.101 PRESCRIPT">"RMOVANA.SEZIONE" @
"A" =
IF
0 #THIS !
THEN
</prescript>
<postscript description="B1.101 POSTSCRIPT">MESSAGE ADD,F1.101</postscript>
</field>
<field x="146" type="Valuta" align="right" width="15" id="102" pattern="1" hide_zero="1" text="###.###.###,@@">
<source>IMPORTO</source>
<prescript description="B1.102 PRESCRIPT">"RMOVANA.SEZIONE" @
"D" =
IF
0 #THIS !
THEN
</prescript>
<postscript description="B1.102 POSTSCRIPT">MESSAGE ADD,F1.102</postscript>
</field>
</section>
<section type="Foot" height="1" />
<section type="Foot" level="1">
<field border="2" x="1" y="1" type="Linea" width="161" height="0" pattern="1" />
<field x="101" y="1.5" type="Testo" width="30" pattern="1" text="Totale generale per sezione:">
<font face="Courier New" bold="1" size="8" />
</field>
<field x="131" y="1.5" type="Valuta" align="right" width="15" id="101" pattern="1" text="###.###.###,@@">
<font face="Courier New" bold="1" size="8" />
</field>
<field x="146" y="1.5" type="Valuta" align="right" width="15" id="102" pattern="1" text="###.###.###,@@">
<font face="Courier New" bold="1" size="8" />
</field>
</section>
<section type="Foot" level="2" />
<sql>USE RMOVANA
JOIN MOVANA INTO NUMREG==NUMREG</sql>
<prescript description="PRESCRIPT">: SCAMBIA_CAMPI ( F1 F2 -- )
VARIABLE _X1 \ coordinate del campo F1
VARIABLE _Y1
VARIABLE _X2 \ coordinate del campo F2
VARIABLE _Y2
2DUP \ duplica i campi F1 F2 sullo stack
GET_POS \ prende le coordinate del campo F2
_Y2 ! \ e le mette in _Y2 e _X2
_X2 !
GET_POS \ prende le coordinate del campo F1
_Y1 ! \ e le mette in _Y1 e _X1
_X1 !
_X1 @ \ legge le coordinate di F1
_Y1 @
ROT
SET_POS \ mette le coord in F2
_X2 @
_Y2 @
ROT
SET_POS
;
</prescript>
</report>
Reference in New Issue View Git Blame Copy Permalink