root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
campo-sirio/ca/ca3200a.rep
luca 3ace93b411 Patch level : 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
prima stesura della stampa mastrini con clifo


git-svn-id: svn://10.65.10.50/trunk@19969 c028cbd2-c16b-5b4b-a496-9718f37d4682
2010-01-21 15:15:05 +00:00

286 lines
12 KiB
XML
Executable File
Raw Blame History

<?xml version="1.0" encoding="UTF-8" ?>
<report libraries="ve1300" name="ca3200a" orientation="2" lpi="8" class="ca3200a">
<description>Mastrini CA</description>
<font face="Courier New" size="8" />
<section type="Head">
<font italic="1" face="Courier New" bold="1" size="8" />
</section>
<section type="Head" level="1">
<font face="Arial" size="9" />
<prescript description="H1 PRESCRIPT">MESSAGE RESET,F1.101
MESSAGE RESET,F1.102</prescript>
<field border="1" radius="100" x="1" y="0.5" type="Testo" valign="center" align="center" shade_offset="25" width="167" height="4" text="MASTRINI DI CONTABILITA' ANALITICA">
<font face="Arial" bold="1" size="14" />
</field>
<field x="1" y="5.5" type="Stringa" width="50" pattern="1">
<font face="Arial" bold="1" size="9" />
<source>#SYSTEM.RAGSOC</source>
</field>
<field x="80" y="5.5" type="Data" width="10" pattern="1">
<font face="Arial" bold="1" size="9" />
<source>#SYSTEM.DATE</source>
</field>
<field x="1" y="7" type="Testo" width="18" pattern="1" text="Centro di Costo:" />
<field x="20" y="7" type="Stringa" width="23" pattern="1">
<font face="Arial" bold="1" size="9" />
<source>#COSTO</source>
<prescript description="H1.0 PRESCRIPT">CA_FORMAT_COSTO</prescript>
</field>
<field x="44" y="7" type="Stringa" width="50" pattern="1">
<font face="Arial" bold="1" size="9" />
<prescript description="H1.0 PRESCRIPT">MESSAGE ISAMREAD,CDC,CODCOSTO=RMOVANA.CODCCOSTO,DESCRIZ</prescript>
</field>
<field x="1" y="8.5" type="Testo" width="9" pattern="1" text="Commessa:" />
<field x="20" y="8.5" type="Stringa" width="23" pattern="1">
<font face="Arial" bold="1" size="9" />
<source>#COMMESSA</source>
<prescript description="H1.0 PRESCRIPT">CA_FORMAT_COMMESSA</prescript>
</field>
<field x="44" y="8.5" type="Stringa" width="50" pattern="1">
<font face="Arial" bold="1" size="9" />
<prescript description="H1.0 PRESCRIPT">MESSAGE ISAMREAD,COMMESSE,CODCMS=RMOVANA.CODCMS,DESCRIZ</prescript>
</field>
<field x="1" y="10" type="Testo" width="5" pattern="1" text="Fase:" />
<field x="20" y="10" type="Stringa" width="13" pattern="1">
<font face="Arial" bold="1" size="9" />
<source>#FASE</source>
<prescript description="H1.0 PRESCRIPT">CA_FORMAT_FASE</prescript>
</field>
<field x="44" y="10" type="Stringa" width="50" pattern="1">
<font face="Arial" bold="1" size="9" />
<prescript description="H1.0 PRESCRIPT">MESSAGE ISAMREAD,FASI,CODFASE=RMOVANA.CODFASE,DESCRIZ</prescript>
</field>
<field border="2" x="1" y="11.5" type="Linea" width="167" height="0" pattern="1" />
</section>
<section repeat="1" type="Head" level="2" height="5">
<groupby>CODCONTO</groupby>
<font italic="1" face="Arial" size="8" />
<prescript description="H2 PRESCRIPT">MESSAGE RESET,F2.101
MESSAGE RESET,F2.102
MESSAGE RESET,F2.201
MESSAGE RESET,F2.202
</prescript>
<field y="0.5" type="Testo" width="6" pattern="1" text="Conto:">
<font italic="1" face="Arial" bold="1" size="8" />
</field>
<field x="7" y="0.5" type="Stringa" width="23" pattern="1">
<font italic="1" face="Arial" bold="1" size="8" />
<source>CODCONTO</source>
<prescript description="H2.0 PRESCRIPT">CA_FORMAT_CONTO</prescript>
</field>
<field x="31" y="0.5" type="Stringa" width="50" pattern="1">
<font italic="1" face="Arial" bold="1" size="8" />
<source>CODCONTO</source>
<prescript description="H2.0 PRESCRIPT">CA_FORMAT_CONTO_DESCR</prescript>
</field>
<field x="10" y="2" type="Testo" align="center" width="10" pattern="1" text="N.Reg. &#2F; Riga" />
<field x="22" y="2" type="Testo" width="11" pattern="1" text="Descrizione" />
<field x="41" y="2" type="Testo" width="8" pattern="1" text="N.Reg.CG" />
<field x="50" y="2" type="Testo" align="center" width="10" pattern="1" text="Data Doc." />
<field x="61" y="2" type="Testo" align="center" width="6" pattern="1" text="N.Doc." />
<field x="68" y="2" type="Testo" width="7" pattern="1" text="Causale" />
<field x="102" y="2" type="Testo" align="right" width="4" pattern="1" text="Dare" />
<field x="115" y="2" type="Testo" align="right" width="5" pattern="1" text="Avere" />
<field x="120" y="2" type="Testo" align="right" width="14" pattern="1" text="Saldo" />
<field x="137" y="2" type="Testo" width="30" pattern="1" text="Tipo&#2F;Codice&#2F;Ragsoc. Cli.&#2F;Forn." />
<field border="1" x="1" y="3" type="Linea" width="168" height="0" pattern="1" />
<field x="66" y="3.5" type="Testo" width="25" pattern="1" text="Progressivo precedente" />
<field x="1" y="2" type="Testo" align="center" width="10" id="121" pattern="1" text="Data" />
<field x="91" y="3.5" type="Valuta" align="right" width="13" id="201" pattern="1" hide_zero="1" text="###.###.###,@@">
<source>SALDOINI:DARE</source>
<postscript description="H2.201 POSTSCRIPT">MESSAGE COPY,B1.103
</postscript>
</field>
<field x="107" y="3.5" type="Valuta" align="right" width="13" id="202" pattern="1" hide_zero="1" text="###.###.###,@@">
<source>SALDOINI:AVERE</source>
<prescript description="H2.202 PRESCRIPT">#THIS @
DUP
0 &#3E; IF
-1 *
"B1.103" +!
ELSE
DROP
THEN</prescript>
</field>
</section>
<section type="Head" level="3">
<groupby>DATACOMP</groupby>
<prescript description="H3 PRESCRIPT">MESSAGE RESET,F3.103</prescript>
</section>
<section type="Body" />
<section type="Body" level="1">
<condition>NUMREG != 0</condition>
<font face="Arial" size="8" />
<field x="1" type="Data" width="10" pattern="1">
<source>DATACOMP</source>
<postscript description="B1.0 POSTSCRIPT">MESSAGE COPY,F3.131</postscript>
</field>
<field x="11.5" type="Numero" align="right" link="107.NUMREG" width="6" pattern="1">
<source>NUMREG</source>
</field>
<field x="17.5" type="Testo" align="center" width="1" pattern="1" text="&#2F;" />
<field x="18.5" type="Numero" align="right" width="3" pattern="1">
<source>NUMRIG</source>
</field>
<field x="22" type="Stringa" dynamic_height="1" width="20" height="2" pattern="1">
<font face="Arial Narrow" size="8" />
<source>DESCR</source>
</field>
<field x="43" type="Numero" align="right" link="23.NUMREG" width="6" pattern="1">
<source>MOVANA.NUMREGCG</source>
</field>
<field x="50" type="Data" width="10" pattern="1">
<source>MOVANA.DATADOC</source>
</field>
<field x="61" type="Stringa" align="right" width="6" pattern="1">
<source>MOVANA.NUMDOC</source>
</field>
<field x="68" type="Stringa" width="3" pattern="1">
<source>MOVANA.CODCAUS</source>
</field>
<field x="72" type="Stringa" dynamic_height="1" width="20" height="2" pattern="1">
<font face="Arial Narrow" size="8" />
<prescript description="B1.0 PRESCRIPT">MESSAGE ISAMREAD,CAUS,CODCAUS=MOVANA.CODCAUS,DESCR</prescript>
</field>
<field x="93" type="Valuta" align="right" width="13" id="101" pattern="1" hide_zero="1" text="###.###.###,@@">
<source>IMPORTO</source>
<prescript description="B1.101 PRESCRIPT">"RMOVANA.SEZIONE" @
"A" =
IF
0 #THIS !
ELSE
#THIS @
"B1.103"
+!
THEN
</prescript>
<postscript description="B1.101 POSTSCRIPT">MESSAGE ADD,F2.101
</postscript>
</field>
<field x="107" type="Valuta" align="right" width="13" id="102" pattern="1" hide_zero="1" text="###.###.###,@@">
<source>IMPORTO</source>
<prescript description="B1.102 PRESCRIPT">"RMOVANA.SEZIONE" @
"D" =
IF
0 #THIS !
ELSE
#THIS @
-1 *
"B1.103"
+!
THEN
</prescript>
<postscript description="B1.102 POSTSCRIPT">MESSAGE ADD,F2.102
</postscript>
</field>
<field x="121" type="Valuta" align="right" width="13" id="103" pattern="1" hide_zero="1" text="###.###.###,@@">
<postscript description="B1.103 POSTSCRIPT">MESSAGE COPY,F3.103</postscript>
</field>
<field x="136.5" type="Stringa" width="1" id="104" pattern="1">
<source>MOV.TIPO</source>
</field>
<field x="137.5" type="Numero" align="right" width="6" id="105" pattern="1" hide_zero="1">
<source>MOV.CODCF</source>
</field>
<field x="144" type="Stringa" dynamic_height="1" width="20" height="2" id="106" pattern="1">
<font face="Arial Narrow" size="8" />
<prescript description="B1.106 PRESCRIPT">MESSAGE ISAMREAD,CLIFO,TIPOCF=#104!CODCF=#105,RAGSOC</prescript>
</field>
</section>
<section type="Foot">
<font face="Arial" size="8" />
<field border="2" x="1" y="0.5" type="Linea" width="167" height="0" pattern="1" />
<field x="143" y="1" type="Testo" width="5" pattern="1" text="Pag." />
<field x="149" y="1" type="Numero" align="right" width="3" pattern="1">
<source>#REPORT.PAGE</source>
</field>
</section>
<section type="Foot" level="1">
<field border="1" x="1" y="0.5" type="Linea" width="168" height="0" pattern="1" />
<field x="74" y="1" type="Testo" width="20" pattern="1" text="TOTALI COMMESSA">
<font face="Arial" bold="1" size="9" />
</field>
<field x="92" y="1" type="Valuta" align="right" width="14" id="101" pattern="1" text="###.###.###,@@">
<font face="Arial" bold="1" size="9" />
</field>
<field x="106" y="1" type="Valuta" align="right" width="14" id="102" pattern="1" text="###.###.###,@@">
<font face="Arial" bold="1" size="9" />
</field>
<field x="120" y="1" type="Valuta" align="right" width="14" id="103" pattern="1" text="###.###.###,@@">
<font face="Arial" bold="1" size="9" />
<source>#101-#102</source>
</field>
</section>
<section type="Foot" level="2" height="3.5">
<field border="1" x="1" y="0.25" type="Linea" width="168" height="0" pattern="1" />
<field x="72" y="0.5" type="Testo" width="22" pattern="1" text="Totali periodo:">
<font face="Arial" bold="1" size="8" />
</field>
<field x="72" y="1.75" type="Testo" width="22" pattern="1" text="Totali progressivi:">
<font face="Arial" bold="1" size="8" />
</field>
<field x="93" y="0.5" type="Valuta" align="right" width="13" id="101" pattern="1" text="###.###.###,@@">
<font face="Arial" bold="1" size="8" />
<postscript description="F2.101 POSTSCRIPT">MESSAGE ADD,F1.101</postscript>
</field>
<field x="107" y="0.5" type="Valuta" align="right" width="13" id="102" pattern="1" text="###.###.###,@@">
<font face="Arial" bold="1" size="8" />
<postscript description="F2.102 POSTSCRIPT">MESSAGE ADD,F1.102</postscript>
</field>
<field x="93" y="1.75" type="Valuta" align="right" width="13" id="201" pattern="1" text="###.###.###,@@">
<font face="Arial" bold="1" size="8" />
<source>#101+#H2.201</source>
</field>
<field x="107" y="1.75" type="Valuta" align="right" width="13" id="202" pattern="1" text="###.###.###,@@">
<font face="Arial" bold="1" size="8" />
<source>#102+#H2.202</source>
</field>
<field x="121" y="1.75" type="Valuta" align="right" width="13" id="203" pattern="1" text="###.###.###,@@">
<font face="Arial" bold="1" size="8" />
<source>#201-#202</source>
</field>
</section>
<section type="Foot" level="3">
<condition>#103 != 0</condition>
<font italic="1" face="Arial" size="8" />
<field x="135" y="0.5" type="Testo" width="2" pattern="1" text="al">
<font italic="1" face="Arial Black" size="7" />
</field>
<field x="119" y="0.5" type="Valuta" align="right" width="15" id="103" pattern="1" hide_zero="1" text="###.###.###,@@">
<font italic="1" face="Arial" bold="1" size="8" />
</field>
<field x="137" y="0.5" type="Data" valign="center" width="11" id="131" pattern="1">
<font italic="1" face="Arial" size="7" />
</field>
</section>
<sql>USE RMOVANA KEY 2
JOIN MOVANA INTO NUMREG==NUMREG
JOIN MOV TO MOVANA INTO NUMREG==NUMREGCG</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