Patch level : 10.0

Files correlati : ca1100a.rep Ricompilazione Demo : [ ] Commento : git-svn-id: svn://10.65.10.50/branches/R_10_00@22536 c028cbd2-c16b-5b4b-a496-9718f37d4682
2011-12-23 14:50:36 +00:00 · 2011-12-23 14:50:36 +00:00 · 8649090cbd
commit 8649090cbd
parent 3dea1e0a88
1 changed files with 380 additions and 65 deletions
--- a/ca/ca1100a.rep
+++ b/ca/ca1100a.rep
@ -1,41 +1,45 @@
 <?xml version="1.0" encoding="UTF-8" ?>
-<report name="BilancioTassan" orientation="2" lpi="6">
+<report name="ca1100a" orientation="2" lpi="8" command="ca1 -0 ca1100a">
 <font face="Arial" size="8" />
 <section type="Head" pattern="1" />
 <section type="Head" level="1" pattern="1">
-  <field type="Stringa" valign="center" align="center" width="130" height="3" pattern="1">
-   <font face="Courier New" bold="1" size="16" />
-   <source>"BILANCIO DAL " + #DATAINI + " AL " + #DATAFIN + " STAMPA DEL " + #DATASTA</source>
+  <font face="Arial" bold="1" size="16" />
+  <field border="3" type="Stringa" valign="center" align="center" width="162" height="3" pattern="1">
+   <font face="Arial" bold="1" size="16" />
+   <source>"BILANCIO " + YEAR(#DATAFIN) + " - SITUAZIONE AL " + #DATASTA</source>
  </field>
 </section>
 <section repeat="1" type="Head" level="2" page_break="1" pattern="1">
  <groupby>CODCCOSTO</groupby>
  <font face="Arial" bold="1" size="8" />
-  <field border="3" y="0.5" type="Linea" width="162" height="0" pattern="1" />
-  <field y="1" type="Stringa" width="20" pattern="1">
+  <prescript description="H2 PRESCRIPT">MESSAGE RESET,F2</prescript>
+  <field border="3" x="63" type="Linea" height="4" pattern="1" />
+  <field border="3" x="112" type="Linea" height="4" pattern="1" />
+  <field x="70" y="0.5" type="Stringa" align="right" width="24" pattern="1">
+   <source>"Situazione al " + #DATASTA</source>
+  </field>
+  <field x="118" y="0.5" type="Stringa" align="right" width="24" pattern="1">
+   <source>"Situazione al " + #DATAFIN</source>
+  </field>
+  <field border="2" y="2" type="Linea" width="162" height="0" pattern="1" />
+  <field y="2.25" type="Testo" width="20" pattern="1" text="Conto" />
+  <field x="21" y="2.25" type="Testo" align="center" width="41.5" pattern="1" text="Descrizione" />
+  <field x="65" y="2.25" type="Testo" align="right" width="12" pattern="1" text="Budget" />
+  <field x="77" y="2.25" type="Testo" align="right" width="17" pattern="1" text="Consuntivo" />
+  <field x="94" y="2.25" type="Testo" align="right" width="14" pattern="1" text="Differenza" />
+  <field x="109" y="2.25" type="Testo" align="center" width="3" pattern="1" text="%" />
+  <field x="112" y="2.25" type="Testo" align="right" width="15" pattern="1" text="Budget" />
+  <field x="129" y="2.25" type="Testo" align="right" width="14" pattern="1" text="Consuntivo " />
+  <field x="143" y="2.25" type="Testo" align="right" width="14" pattern="1" text="Differenza" />
+  <field x="158" y="2.25" type="Testo" align="center" width="3" pattern="1" text="%" />
+  <field border="3" y="3.5" type="Linea" width="162" height="0" pattern="1" />
+  <field type="Stringa" valign="center" width="20" height="2" id="101" pattern="1">
   <font face="Courier New" bold="1" size="10" />
   <source>CODCCOSTO</source>
  </field>
-  <field x="20" y="1" type="Stringa" width="50" pattern="1">
-   <prescript description="H2.0 PRESCRIPT">MESSAGE ISAMREAD,CDC,CODCOSTO=CODCCOSTO,DESCRIZ</prescript>
+  <field x="20" type="Stringa" valign="center" width="43" height="2" id="102" pattern="1">
+   <prescript description="H2.102 PRESCRIPT">MESSAGE ISAMREAD,CDC,CODCOSTO=CODCCOSTO,DESCRIZ</prescript>
  </field>
-  <field x="84" y="1" type="Stringa" align="right" width="10" pattern="1">
-   <source>"AL " + #DATASTA</source>
-  </field>
-  <field border="2" y="2.5" type="Linea" width="162" height="0" pattern="1" />
-  <field border="2" x="63" y="2.5" type="Linea" height="1.5" pattern="1" />
-  <field border="2" x="112" y="2.5" type="Linea" height="1.5" pattern="1" />
-  <field y="3" type="Testo" width="20" pattern="1" text="Conto" />
-  <field x="21" y="3" type="Testo" align="center" width="41.5" pattern="1" text="Descrizione" />
-  <field x="65" y="3" type="Testo" align="right" width="12" pattern="1" text="Budget" />
-  <field x="77" y="3" type="Testo" align="right" width="17" pattern="1" text="Consuntivo" />
-  <field x="94" y="3" type="Testo" align="right" width="14" pattern="1" text="Differenza" />
-  <field x="109" y="3" type="Testo" align="center" width="3" pattern="1" text="%" />
-  <field x="113" y="3" type="Testo" align="right" width="14" pattern="1" text="Budget" />
-  <field x="129" y="3" type="Testo" align="right" width="14" pattern="1" text="Consuntivo " />
-  <field x="143" y="3" type="Testo" align="right" width="14" pattern="1" text="Differenza" />
-  <field x="158" y="3" type="Testo" align="center" width="3" pattern="1" text="%" />
-  <field border="3" y="4" type="Linea" width="162" height="0" pattern="1" />
 </section>
 <section type="Head" level="3" pattern="1">
  <groupby>CODCONTO</groupby>
@ -46,8 +50,8 @@
 </section>
 <section type="Body" pattern="1" />
 <section type="Body" level="1" hidden="1" pattern="1">
-  <field x="20" type="Valuta" align="right" width="12" id="201" pattern="1" text="#########,@@">
-   <source>IF((MOVANA.TIPOMOV!="")&#26;&#26;(BETWEEN(DATACOMP,#DATAINI,#DATASTA));IMPORTO;0)</source>
+  <field x="63" type="Valuta" align="right" width="12" id="201" pattern="1" text="#########,@@">
+   <source>IF(NUM((MOVANA.TIPOMOV="P")||(MOVANA.TIPOMOV="V"));BETWEEN(DATACOMP,#DATAINI,#DATASTA); 0) * IMPORTO</source>
   <postscript description="B1.201 POSTSCRIPT">#THIS @
 EMPTY= 
 IF
@ -63,11 +67,11 @@ ELSE
 THEN
 </postscript>
  </field>
-  <field x="33" type="Stringa" width="1" id="202" pattern="1">
+  <field x="76" type="Stringa" width="1.5" id="202" pattern="1">
   <source>SEZIONE</source>
  </field>
-  <field x="36" type="Valuta" align="right" width="12" id="203" pattern="1" text="#########,@@">
-   <source>IF((MOVANA.TIPOMOV=="")&#26;&#26;(BETWEEN(DATACOMP,#DATAINI,#DATASTA));IMPORTO;0)</source>
+  <field x="78" type="Valuta" align="right" width="12" id="203" pattern="1" text="#########,@@">
+   <source>IF(NUM(MOVANA.TIPOMOV="");BETWEEN(DATACOMP,#DATAINI,#DATASTA); 0) * IMPORTO</source>
   <postscript description="B1.203 POSTSCRIPT">#THIS @
 EMPTY= 
 IF
@ -83,11 +87,11 @@ ELSE
 THEN
 </postscript>
  </field>
-  <field x="49" type="Stringa" width="1" id="204" pattern="1">
+  <field x="91" type="Stringa" width="1.5" id="204" pattern="1">
   <source>SEZIONE</source>
  </field>
-  <field x="66" type="Valuta" align="right" width="14" id="301" pattern="1" text="#########,@@">
-   <source>IF((MOVANA.TIPOMOV!="")&#26;&#26;(BETWEEN(DATACOMP,#DATAINI,#DATASTA));IMPORTO;0)</source>
+  <field x="111" type="Valuta" align="right" width="14" id="301" pattern="1" text="#########,@@">
+   <source>IF(NUM((MOVANA.TIPOMOV="P")||(MOVANA.TIPOMOV="V"));IMPORTO;0)</source>
   <postscript description="B1.301 POSTSCRIPT">#THIS @
 EMPTY= 
 IF
@ -103,11 +107,11 @@ ELSE
 THEN
 </postscript>
  </field>
-  <field x="87" type="Stringa" width="1" id="302" pattern="1">
+  <field x="126" type="Stringa" width="1.5" id="302" pattern="1">
   <source>SEZIONE</source>
  </field>
-  <field x="88" type="Valuta" align="right" width="14" id="303" pattern="1" text="###.###.###,@@">
-   <source>IF((MOVANA.TIPOMOV=="")&#26;&#26;(BETWEEN(DATACOMP,#DATAINI,#DATASTA));IMPORTO;0)</source>
+  <field x="128" type="Valuta" align="right" width="14" id="303" pattern="1" text="###.###.###,@@">
+   <source>IF(NUM(MOVANA.TIPOMOV="");IMPORTO;0)</source>
   <postscript description="B1.303 POSTSCRIPT">#THIS @
 EMPTY= 
 IF
@ -123,29 +127,309 @@ ELSE
 THEN
 </postscript>
  </field>
-  <field x="103" type="Stringa" width="1" id="304" pattern="1">
+  <field x="143" type="Stringa" width="1.5" id="304" pattern="1">
   <source>SEZIONE</source>
  </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">
+  <font face="Arial" bold="1" size="8" />
+  <field border="2" x="20.5" type="Linea" height="2" pattern="1" />
+  <field border="3" x="63" type="Linea" height="2" pattern="1" />
+  <field border="2" x="78" type="Linea" height="2" pattern="1" />
+  <field border="2" x="94" type="Linea" height="2" pattern="1" />
+  <field border="3" x="112" type="Linea" height="2" pattern="1" />
+  <field border="2" x="128" type="Linea" height="2" pattern="1" />
+  <field border="2" x="144" type="Linea" height="2" pattern="1" />
+  <field border="2" x="144" type="Linea" height="2" pattern="1" />
+  <field border="3" y="0.25" type="Linea" width="162" height="0" pattern="1" />
+  <field y="0.5" type="Testo" width="20" id="101" pattern="1" text="TOTALE GENERALE" />
+  <field x="63" y="0.5" type="Valuta" align="right" width="12" id="201" pattern="1" hide_zero="1" text="###.###.###,@@">
+   <prescript>#THIS @ 0 &#3C; IF
+  #THIS @ 
+  -1 *
+  #THIS !
+  #THIS GET_ID_NEXT
+  "A"
+ELSE
+  #THIS @ 
+  0 = IF
+    ""
+  ELSE
+    "D"
+  THEN
+THEN
+ #THIS GET_ID_NEXT !
+  </prescript>
+  </field>
+  <field x="76" y="0.5" type="Stringa" width="1.5" id="202" pattern="1" />
+  <field x="79" y="0.5" type="Valuta" align="right" width="12" id="203" pattern="1" hide_zero="1" text="###.###.###,@@">
+   <prescript>#THIS @ 0 &#3C; IF
+  #THIS @ 
+  -1 *
+  #THIS !
+  #THIS GET_ID_NEXT
+  "A"
+ELSE
+  #THIS @ 
+  0 = IF
+    ""
+  ELSE
+    "D"
+  THEN
+THEN
+ #THIS GET_ID_NEXT !
+</prescript>
+  </field>
+  <field x="92" y="0.5" type="Stringa" width="1.5" id="204" pattern="1" />
+  <field x="95" y="0.5" type="Valuta" align="right" width="12" id="205" pattern="1" text="###.###.###,@@">
+   <prescript>201 @
+203 @
+- .</prescript>
+  </field>
+  <field x="108" y="0.5" type="Numero" align="right" width="3" id="206" pattern="1">
+   <prescript>201 @
+0 = IF
+  0
+ELSE
+  205 @
+  201 @
+  &#2F; 100 *
+  0 ROUND
+THEN
+.
+</prescript>
+  </field>
+  <field x="113" y="0.5" type="Valuta" align="right" width="12" id="301" pattern="1" hide_zero="1" text="###.###.###,@@">
+   <prescript>#THIS @ 0 &#3C; IF
+  #THIS @ 
+  -1 *
+  #THIS !
+  #THIS GET_ID_NEXT
+  "A"
+ELSE
+  #THIS @ 
+  0 = IF
+    ""
+  ELSE
+    "D"
+  THEN
+THEN
+ #THIS GET_ID_NEXT !
+  </prescript>
+  </field>
+  <field x="126" y="0.5" type="Stringa" width="1.5" id="302" pattern="1" />
+  <field x="129" y="0.5" type="Valuta" align="right" width="12" id="303" pattern="1" hide_zero="1" text="###.###.###,@@">
+   <prescript>#THIS @ 0 &#3C; IF
+  #THIS @ 
+  -1 *
+  #THIS !
+  #THIS GET_ID_NEXT
+  "A"
+ELSE
+  #THIS @ 
+  0 = IF
+    ""
+  ELSE
+    "D"
+  THEN
+THEN
+ #THIS GET_ID_NEXT !
+</prescript>
+  </field>
+  <field x="142" y="0.5" type="Stringa" width="1.5" id="304" pattern="1" />
+  <field x="145" y="0.5" type="Valuta" align="right" width="12" id="305" pattern="1" text="###.###.###,@@">
+   <prescript>301 @
+303 @
+- .</prescript>
+  </field>
+  <field x="158" y="0.5" type="Numero" align="right" width="3" id="306" pattern="1">
+   <prescript>301 @
+0 = IF
+  0
+ELSE
+  305 @
+  301 @
+  &#2F; 100 *
+  0 ROUND
+THEN
+.
+</prescript>
+  </field>
+ </section>
+ <section type="Foot" level="2" pattern="1">
+  <font face="Arial" bold="1" size="8" />
+  <field border="2" x="20.5" type="Linea" height="2" pattern="1" />
+  <field border="3" x="63" type="Linea" height="2" pattern="1" />
+  <field border="2" x="78" type="Linea" height="2" pattern="1" />
+  <field border="2" x="94" type="Linea" height="2" pattern="1" />
+  <field border="3" x="112" type="Linea" height="2" pattern="1" />
+  <field border="2" x="128" type="Linea" height="2" pattern="1" />
+  <field border="2" x="144" type="Linea" height="2" pattern="1" />
+  <field border="2" x="144" type="Linea" height="2" pattern="1" />
+  <field border="3" y="0.25" type="Linea" width="162" height="0" pattern="1" />
+  <field y="0.5" type="Stringa" width="20" id="101" pattern="1">
+   <source>#H2.101</source>
+  </field>
+  <field x="21" type="Stringa" valign="center" width="42" height="2" id="102" pattern="1">
+   <source>#H2.102</source>
+  </field>
+  <field x="63" y="0.5" type="Valuta" align="right" width="12" id="201" pattern="1" hide_zero="1" text="###.###.###,@@">
+   <prescript description="F2.201 PRESCRIPT">#THIS @ 0 &#3C; IF
+  #THIS @ 
+  -1 *
+  #THIS !
+  #THIS GET_ID_NEXT
+  "A"
+ELSE
+  #THIS @ 
+  0 = IF
+    ""
+  ELSE
+    "D"
+  THEN
+THEN
+ #THIS GET_ID_NEXT !
+  </prescript>
+   <postscript description="F2.201 POSTSCRIPT">#THIS @                         \ Legge il valore del campo corrente
+#THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
+"A" = IF                           \  Se vale Avere
+      -1 *                           \ Cambia segno
+THEN
+"F1." #THIS GET_ID +    \ Costruisce la stringa F1.201
+!                                     \ Somma il valore corrente al corrispondente in F1</postscript>
+  </field>
+  <field x="76" y="0.5" type="Stringa" width="1.5" id="202" pattern="1" />
+  <field x="79" y="0.5" type="Valuta" align="right" width="12" id="203" pattern="1" hide_zero="1" text="###.###.###,@@">
+   <prescript description="F2.203 PRESCRIPT">#THIS @ 0 &#3C; IF
+  #THIS @ 
+  -1 *
+  #THIS !
+  #THIS GET_ID_NEXT
+  "A"
+ELSE
+  #THIS @ 
+  0 = IF
+    ""
+  ELSE
+    "D"
+  THEN
+THEN
+ #THIS GET_ID_NEXT !
+</prescript>
+   <postscript description="F2.203 POSTSCRIPT">#THIS @                         \ Legge il valore del campo corrente
+#THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
+"A" = IF                           \  Se vale Avere
+      -1 *                           \ Cambia segno
+THEN
+"F1." #THIS GET_ID +    \ Costruisce la stringa F1.201
+!                                     \ Somma il valore corrente al corrispondente in F1</postscript>
+  </field>
+  <field x="92" y="0.5" type="Stringa" width="1.5" id="204" pattern="1" />
+  <field x="95" y="0.5" type="Valuta" align="right" width="12" id="205" pattern="1" text="###.###.###,@@">
+   <prescript>201 @
+203 @
+- .</prescript>
+  </field>
+  <field x="108" y="0.5" type="Numero" align="right" width="3" id="206" pattern="1">
+   <prescript>201 @
+0 = IF
+  0
+ELSE
+  205 @
+  201 @
+  &#2F; 100 *
+  0 ROUND
+THEN
+.
+</prescript>
+  </field>
+  <field x="113" y="0.5" type="Valuta" align="right" width="12" id="301" pattern="1" hide_zero="1" text="###.###.###,@@">
+   <prescript description="F2.301 PRESCRIPT">#THIS @ 0 &#3C; IF
+  #THIS @ 
+  -1 *
+  #THIS !
+  #THIS GET_ID_NEXT
+  "A"
+ELSE
+  #THIS @ 
+  0 = IF
+    ""
+  ELSE
+    "D"
+  THEN
+THEN
+ #THIS GET_ID_NEXT !
+  </prescript>
+   <postscript description="F2.301 POSTSCRIPT">#THIS @                         \ Legge il valore del campo corrente
+#THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
+"A" = IF                           \  Se vale Avere
+      -1 *                           \ Cambia segno
+THEN
+"F1." #THIS GET_ID +    \ Costruisce la stringa F1.201
+!                                     \ Somma il valore corrente al corrispondente in F1</postscript>
+  </field>
+  <field x="126" y="0.5" type="Stringa" width="1.5" id="302" pattern="1" />
+  <field x="129" y="0.5" type="Valuta" align="right" width="12" id="303" pattern="1" hide_zero="1" text="###.###.###,@@">
+   <prescript description="F2.303 PRESCRIPT">#THIS @ 0 &#3C; IF
+  #THIS @ 
+  -1 *
+  #THIS !
+  #THIS GET_ID_NEXT
+  "A"
+ELSE
+  #THIS @ 
+  0 = IF
+    ""
+  ELSE
+    "D"
+  THEN
+THEN
+ #THIS GET_ID_NEXT !
+</prescript>
+   <postscript description="F2.303 POSTSCRIPT">#THIS @                         \ Legge il valore del campo corrente
+#THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
+"A" = IF                           \  Se vale Avere
+      -1 *                           \ Cambia segno
+THEN
+"F1." #THIS GET_ID +    \ Costruisce la stringa F1.201
+!                                     \ Somma il valore corrente al corrispondente in F1</postscript>
+  </field>
+  <field x="142" y="0.5" type="Stringa" width="1.5" id="304" pattern="1" />
+  <field x="145" y="0.5" type="Valuta" align="right" width="12" id="305" pattern="1" text="###.###.###,@@">
+   <prescript>301 @
+303 @
+- .</prescript>
+  </field>
+  <field x="158" y="0.5" type="Numero" align="right" width="3" id="306" pattern="1">
+   <prescript description="F2.306 PRESCRIPT">301 @
+0 = IF
+  0
+ELSE
+  305 @
+  301 @
+  &#2F; 100 *
+  0 ROUND
+THEN
+.
+</prescript>
+  </field>
+ </section>
 <section type="Foot" level="3" pattern="1">
-  <field border="2" x="20" type="Linea" pattern="1" />
-  <field border="2" x="63" type="Linea" pattern="1" />
+  <field border="2" x="20.5" type="Linea" pattern="1" />
+  <field border="3" x="63" type="Linea" pattern="1" />
  <field border="2" x="78" type="Linea" pattern="1" />
  <field border="2" x="94" type="Linea" pattern="1" />
-  <field border="2" x="112" type="Linea" pattern="1" />
+  <field border="3" x="112" type="Linea" pattern="1" />
  <field border="2" x="128" type="Linea" pattern="1" />
  <field border="2" x="144" type="Linea" pattern="1" />
  <field border="2" x="144" type="Linea" pattern="1" />
-  <field border="2" x="162" type="Linea" pattern="1" />
-  <field border="2" x="162" type="Linea" pattern="1" />
  <field type="Stringa" width="20" id="101" pattern="1">
   <source>#H3.101</source>
  </field>
-  <field x="20" type="Stringa" width="43" id="102" pattern="1">
-   <prescript description="F3.102 PRESCRIPT">MESSAGE ISAMREAD,PCONANA,CODCONTO=#H3.101,DESCR</prescript>
+  <field x="21" type="Stringa" width="42" id="102" pattern="1">
+   <source>#H3.101</source>
+   <prescript description="F3.102 PRESCRIPT">CA_FORMAT_CONTO_DESCR</prescript>
  </field>
  <field x="63" type="Valuta" align="right" width="12" id="201" pattern="1" hide_zero="1" text="###.###.###,@@">
   <prescript description="F3.201 PRESCRIPT">#THIS @ 0 &#3C; IF
@ -164,8 +448,15 @@ ELSE
 THEN
 #THIS GET_ID_NEXT !
  </prescript>
+   <postscript description="F3.201 POSTSCRIPT">#THIS @                         \ Legge il valore del campo corrente
+#THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
+"A" = IF                           \  Se vale Avere
+      -1 *                           \ Cambia segno
+THEN
+"F2." #THIS GET_ID +    \ Costruisce la stringa F2.201
+!                                     \ Somma il valore corrente al corrispondente in F2</postscript>
  </field>
-  <field x="76" type="Stringa" width="1" id="202" pattern="1" />
+  <field x="76" type="Stringa" width="1.5" id="202" pattern="1" />
  <field x="79" type="Valuta" align="right" width="12" id="203" pattern="1" hide_zero="1" text="###.###.###,@@">
   <prescript description="F3.203 PRESCRIPT">#THIS @ 0 &#3C; IF
  #THIS @ 
@ -183,20 +474,28 @@ ELSE
 THEN
 #THIS GET_ID_NEXT !
 </prescript>
+   <postscript description="F3.203 POSTSCRIPT">#THIS @                         \ Legge il valore del campo corrente
+#THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
+"A" = IF                           \  Se vale Avere
+      -1 *                           \ Cambia segno
+THEN
+"F2." #THIS GET_ID +    \ Costruisce la stringa F2.203
+!                                     \ Somma il valore corrente al corrispondente in F2
+</postscript>
  </field>
-  <field x="92" type="Stringa" width="1" id="204" pattern="1" />
-  <field x="95" type="Valuta" align="right" width="12" id="205" pattern="1" hide_zero="1" text="###.###.###,@@">
-   <postscript description="F3.205 POSTSCRIPT">104 @
-102 @
- .</postscript>
+  <field x="92" type="Stringa" width="1.5" id="204" pattern="1" />
+  <field x="95" type="Valuta" align="right" width="12" id="205" pattern="1" text="###.###.###,@@">
+   <prescript description="F3.205 PRESCRIPT">201 @
+203 @
+- .</prescript>
  </field>
-  <field x="108" type="Numero" align="right" width="3" id="206" pattern="1" text="###">
-   <prescript description="F3.206 PRESCRIPT">102 @
+  <field x="108" type="Numero" align="right" width="3" id="206" pattern="1">
+   <prescript description="F3.206 PRESCRIPT">201 @
 0 = IF
  0
 ELSE
-  106 @
-  102 @
+  205 @
+  201 @
  &#2F; 100 *
  0 ROUND
 THEN
@ -220,8 +519,16 @@ ELSE
 THEN
 #THIS GET_ID_NEXT !
  </prescript>
+   <postscript description="F3.301 POSTSCRIPT">#THIS @                         \ Legge il valore del campo corrente
+#THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
+"A" = IF                           \  Se vale Avere
+      -1 *                           \ Cambia segno
+THEN
+"F2." #THIS GET_ID +    \ Costruisce la stringa F2.301
+!                                     \ Somma il valore corrente al corrispondente in F2
+</postscript>
  </field>
-  <field x="126" type="Stringa" width="1" id="302" pattern="1" />
+  <field x="126" type="Stringa" width="1.5" id="302" pattern="1" />
  <field x="129" type="Valuta" align="right" width="12" id="303" pattern="1" hide_zero="1" text="###.###.###,@@">
   <prescript description="F3.303 PRESCRIPT">#THIS @ 0 &#3C; IF
  #THIS @ 
@ -239,20 +546,28 @@ ELSE
 THEN
 #THIS GET_ID_NEXT !
 </prescript>
+   <postscript description="F3.303 POSTSCRIPT">#THIS @                         \ Legge il valore del campo corrente
+#THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
+"A" = IF                           \  Se vale Avere
+      -1 *                           \ Cambia segno
+THEN
+"F2." #THIS GET_ID +    \ Costruisce la stringa F2.303
+!                                     \ Somma il valore corrente al corrispondente in F2
+</postscript>
  </field>
-  <field x="142" type="Stringa" width="1" id="304" pattern="1" />
+  <field x="142" type="Stringa" width="1.5" id="304" pattern="1" />
  <field x="145" type="Valuta" align="right" width="12" id="305" pattern="1" text="###.###.###,@@">
-   <postscript description="F3.305 POSTSCRIPT">104 @
-102 @
- .</postscript>
+   <prescript description="F3.305 PRESCRIPT">301 @
+303 @
+- .</prescript>
  </field>
-  <field x="158" type="Numero" align="right" width="3" id="306" pattern="1" text="###">
-   <prescript description="F3.306 PRESCRIPT">102 @
+  <field x="158" type="Numero" align="right" width="3" id="306" pattern="1">
+   <prescript description="F3.306 PRESCRIPT">301 @
 0 = IF
  0
 ELSE
-  106 @
-  102 @
+  305 @
+  301 @
  &#2F; 100 *
  0 ROUND
 THEN