<?xml version="1.0" encoding="UTF-8" ?>
<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">
  <font face="Arial" bold="1" size="16" />
  <field border="3" type="Stringa" valign="center" align="center" width="162" height="3" pattern="1">
   <source>"BILANCIO " + YEAR(#DATAFIN) + " - SITUAZIONE AL " + #DATASTA</source>
  </field>
 </section>
 <section repeat="1" type="Head" level="2" page_break="1" pattern="1">
  <groupby>CODCCOSTO_1</groupby>
  <font face="Arial" bold="1" size="8" />
  <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" 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="Arial" bold="1" size="10" />
   <source>CODCCOSTO_1</source>
  </field>
  <field x="21" type="Stringa" valign="center" width="42" height="2" id="102" pattern="1">
   <prescript description="H2.102 PRESCRIPT">MESSAGE ISAMREAD,CDC,CODCOSTO=CODCCOSTO_1,DESCRIZ</prescript>
  </field>
 </section>
 <section type="Head" level="3" pattern="1">
  <groupby>CODCCOSTO</groupby>
  <prescript description="H3 PRESCRIPT">MESSAGE RESET,F3</prescript>
  <field border="2" type="Linea" width="162" height="0" pattern="1" />
  <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 type="Stringa" valign="center" width="20" height="2" id="101" pattern="1">
   <font face="Arial" bold="1" size="10" />
   <source>CODCCOSTO</source>
  </field>
  <field x="21" type="Stringa" valign="center" width="42" height="2" id="102" pattern="1">
   <font face="Arial" bold="1" size="8" />
   <prescript description="H3.102 PRESCRIPT">MESSAGE ISAMREAD,CDC,CODCOSTO=CODCCOSTO,DESCRIZ</prescript>
  </field>
 </section>
 <section type="Head" level="4" pattern="1">
  <groupby>CODCONTO</groupby>
  <prescript description="H4 PRESCRIPT">MESSAGE RESET,F4</prescript>
  <field type="Stringa" hidden="1" width="20" id="101" pattern="1">
   <source>CODCONTO</source>
  </field>
 </section>
 <section type="Body" pattern="1" />
 <section type="Body" level="1" hidden="1" pattern="1">
  <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
ELSE
  #THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
  "A" = IF                           \  Se vale Avere
    #THIS @  -1 *              \ Cambia segno
    #THIS !                         \ al campo corrente
  THEN
  #THIS @                         \ Prende il valore attuale con segno
  "F4." #THIS GET_ID +    \ Costruisce la stringa F4.101
  +!                                     \ Somma il campo corrente al corrispondente in F4
THEN
</postscript>
  </field>
  <field x="76" type="Stringa" width="1.5" id="202" pattern="1">
   <source>SEZIONE</source>
  </field>
  <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
ELSE
  #THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
  "A" = IF                           \  Se vale Avere
    #THIS @  -1 *              \ Cambia segno
    #THIS !                         \ al campo corrente
  THEN
  #THIS @                         \ Prende il valore attuale con segno
  "F4." #THIS GET_ID +    \ Costruisce la stringa F4.101
  +!                                     \ Somma il campo corrente al corrispondente in F4
THEN
</postscript>
  </field>
  <field x="91" type="Stringa" width="1.5" id="204" pattern="1">
   <source>SEZIONE</source>
  </field>
  <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
ELSE
  #THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
  "A" = IF                           \  Se vale Avere
    #THIS @  -1 *              \ Cambia segno
    #THIS !                         \ al campo corrente
  THEN
  #THIS @                         \ Prende il valore attuale con segno
  "F4." #THIS GET_ID +    \ Costruisce la stringa F4.101
  +!                                     \ Somma il campo corrente al corrispondente in F4
THEN
</postscript>
  </field>
  <field x="126" type="Stringa" width="1.5" id="302" pattern="1">
   <source>SEZIONE</source>
  </field>
  <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
ELSE
  #THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
  "A" = IF                           \  Se vale Avere
    #THIS @  -1 *              \ Cambia segno
    #THIS !                         \ al campo corrente
  THEN
  #THIS @                         \ Prende il valore attuale con segno
  "F4." #THIS GET_ID +    \ Costruisce la stringa F4.101
  +!                                     \ Somma il campo corrente al corrispondente in F4
THEN
</postscript>
  </field>
  <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" 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 type="Stringa" valign="center" width="20" height="2" 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">
  <font face="Arial" bold="1" size="8" />
  <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="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 type="Stringa" width="20" id="101" pattern="1">
   <source>#H3.101</source>
  </field>
  <field x="21" type="Stringa" width="42" id="102" pattern="1">
   <source>#H3.102</source>
  </field>
  <field x="63" 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>
   <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.5" id="202" pattern="1" />
  <field x="79" 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>
   <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.5" id="204" pattern="1" />
  <field x="95" type="Valuta" align="right" width="12" id="205" pattern="1" text="###.###.###,@@">
   <prescript>201 @
203 @
- .</prescript>
  </field>
  <field x="108" 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" 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>
   <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.5" id="302" pattern="1" />
  <field x="129" 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>
   <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.5" id="304" pattern="1" />
  <field x="145" type="Valuta" align="right" width="12" id="305" pattern="1" text="###.###.###,@@">
   <prescript>301 @
303 @
- .</prescript>
  </field>
  <field x="158" 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="4" 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="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 type="Stringa" width="20" id="101" pattern="1">
   <source>#H4.101</source>
  </field>
  <field x="21" type="Stringa" width="42" id="102" pattern="1">
   <source>#H4.101</source>
   <prescript description="F4.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="F4.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="F4.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
"F3." #THIS GET_ID +    \ Costruisce la stringa F3.201
+!                                     \ Somma il valore corrente al corrispondente in F3</postscript>
  </field>
  <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="F4.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="F4.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
"F3." #THIS GET_ID +    \ Costruisce la stringa F3.203
+!                                     \ Somma il valore corrente al corrispondente in F3
</postscript>
  </field>
  <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>201 @
203 @
- .</prescript>
  </field>
  <field x="108" 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" type="Valuta" align="right" width="12" id="301" pattern="1" hide_zero="1" text="###.###.###,@@">
   <prescript description="F4.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="F4.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
"F3." #THIS GET_ID +    \ Costruisce la stringa F3.301
+!                                     \ Somma il valore corrente al corrispondente in F3
</postscript>
  </field>
  <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="F4.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="F4.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
"F3." #THIS GET_ID +    \ Costruisce la stringa F3.303
+!                                     \ Somma il valore corrente al corrispondente in F3
</postscript>
  </field>
  <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="###.###.###,@@">
   <prescript>301 @
303 @
- .</prescript>
  </field>
  <field x="158" 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>
 <sql>USE RMOVANA KEY 3 SELECT BETWEEN(CODCCOSTO,#CODCOSTO,#CODCOSTO+'~')
BY CODCCOSTO CODCONTO DATACOMP
JOIN MOVANA INTO NUMREG==NUMREG
FROM DATACOMP=#DATAINI
TO DATACOMP=#DATAFIN</sql>
 <prescript description="PRESCRIPT">: ADD_T0_F3 ( -- )
#THIS @
EMPTY= 
IF
ELSE
  MON
  #THIS GET_ID_NEXT @ \ Legge la sezione dal campo successivo
  "A" = IF                           \  Se vale Avere
    #THIS @  -1 *              \ Cambia segno
    #THIS !                         \ al campo corrente
  THEN
  #THIS @                         \ Prende il valore attuale con segno
  "F3." #THIS GET_ID +    \ Costruisce la stringa F3.101
  +!                                     \ Somma il campo corrente al corrispondente in F3
THEN
;</prescript>
</report>