campo-sirio/ci/ci1200d.rep

<report name="ci1200d" orientation="2" lpi="6" class="ci1200">
 <description>Stampa Analitica Risorse e Cantiere per Cliente</description>
 <font face="Courier New" size="10" />
 <section type="Head">
  <field type="Testo" width="10" height="0" pattern="1" text="Cantiere" />
  <field type="Testo" align="center" width="120" pattern="1" text="Stampa Analitica Risorse e Cantiere per Cliente">
   <font face="Courier New" bold="1" size="10" />
  </field>
  <field x="97" type="Data" width="14" pattern="1">
   <source>#SYSTEM.DATE</source>
  </field>
  <field x="112" type="Data" width="8" pattern="1" text="Pag. ">
   <source>#REPORT.PAGE</source>
  </field>
  <field y="3" type="Stringa" width="30" pattern="1" text="Da Data: ">
   <source>#S_DATEFROM</source>
  </field>
  <field x="31" y="3" type="Stringa" width="30" pattern="1" text="a Data: ">
   <source>#S_DATETO</source>
  </field>
  <field y="5" type="Testo" width="8" pattern="1" text="Cliente">
   <font face="Courier New" size="8" />
  </field>
  <field border="1" y="5" type="Linea" width="120" height="0" pattern="1" />
  <field border="1" x="10.8" y="5" type="Linea" pattern="1" />
  <field x="11" y="5" type="Testo" width="10" pattern="1" text="Data">
   <font face="Courier New" size="8" />
  </field>
  <field border="1" x="20.8" y="5" type="Linea" pattern="1" />
  <field x="21" y="5" type="Testo" width="15" pattern="1" text="Codice">
   <font face="Courier New" size="8" />
  </field>
  <field border="1" x="30.8" y="5" type="Linea" pattern="1" />
  <field x="31" y="5" type="Testo" width="30" pattern="1" text="Risorsa">
   <font face="Courier New" size="8" />
  </field>
  <field border="1" x="61.8" y="5" type="Linea" pattern="1" />
  <field x="62" y="5" type="Testo" width="4" pattern="1" text="U.M.">
   <font face="Courier New" size="8" />
  </field>
  <field border="1" x="65.8" y="5" type="Linea" pattern="1" />
  <field x="66" y="5" type="Testo" width="4" pattern="1" text="Qt&#E0;">
   <font face="Courier New" size="8" />
  </field>
  <field border="1" x="69.8" y="5" type="Linea" pattern="1" />
  <field x="70" y="5" type="Testo" width="10" pattern="1" text="Costo Uni.">
   <font face="Courier New" size="8" />
  </field>
  <field border="1" x="79.8" y="5" type="Linea" pattern="1" />
  <field x="80" y="5" type="Testo" width="10" pattern="1" text="Totale">
   <font face="Courier New" size="8" />
  </field>
  <field border="1" x="89.8" y="5" type="Linea" pattern="1" />
  <field x="90" y="5" type="Testo" width="10" pattern="1" text="Cantiere">
   <font face="Courier New" size="8" />
  </field>
  <field border="1" y="6" type="Linea" width="120" height="0" pattern="1" />
 </section>
 <section type="Head" level="1">
  <prescript description="H1 PRESCRIPT">MESSAGE RESET,F1.330</prescript>
 </section>
 <section keep_with_next="1" type="Head" level="2">
  <groupby>DOC.CODCF</groupby>
  <font face="Courier New" bold="1" size="8" />
  <prescript description="H2 PRESCRIPT">MESSAGE RESET,F2.230</prescript>
  <field type="Array" width="10" pattern="1">
   <source>DOC.TIPOCF</source>
   <list>
    <li Value="Cliente:" Code="C" />
    <li Value="Fornitore:" Code="F" />
   </list>
  </field>
  <field x="10" type="Stringa" width="6.5" pattern="1">
   <source>DOC.CODCF</source>
  </field>
  <field x="16.5" type="Stringa" width="80" pattern="1">
   <source>CLIFO.RAGSOC</source>
   <prescript>MESSAGE COPY,F2.521</prescript>
  </field>
  <field border="1" x="10.8" y="1" type="Linea" width="109" height="0" pattern="1" />
 </section>
 <section keep_with_next="1" type="Head" level="3">
  <groupby>DOC.TIPODOC</groupby>
  <prescript description="H3 PRESCRIPT">MESSAGE RESET,F3.110|RESET,F3.130</prescript>
  <field type="Stringa" hidden="1" width="20" pattern="1" text="Cliente: ">
   <font face="Courier New" size="8" />
   <source>DOC.TIPODOC</source>
   <prescript description="H3.0 PRESCRIPT">MESSAGE COPY,F3.511</prescript>
  </field>
 </section>
 <section type="Body" />
 <section type="Body" level="1">
  <condition>RDOC.CODART!='' &#26;&#26; RDOC.CODART!=' '</condition>
  <field border="1" x="10.8" type="Linea" pattern="1" />
  <field x="11" type="Stringa" width="10" pattern="1">
   <font face="Courier New" size="7" />
   <source>DOC.DATADOC</source>
  </field>
  <field border="1" x="20.8" type="Linea" pattern="1" />
  <field x="21" type="Stringa" width="10" pattern="1">
   <font face="Courier New" size="7" />
   <source>RDOC.CODART</source>
  </field>
  <field border="1" x="30.8" type="Linea" pattern="1" />
  <field x="31" type="Stringa" width="30" pattern="1">
   <font face="Courier New" size="7" />
   <source>RDOC.DESCR</source>
  </field>
  <field border="1" x="61.8" type="Linea" pattern="1" />
  <field x="62" type="Stringa" align="center" width="4" pattern="1">
   <font face="Courier New" size="7" />
   <source>RDOC.UMQTA</source>
  </field>
  <field border="1" x="65.8" type="Linea" pattern="1" />
  <field border="1" x="69.8" type="Linea" pattern="1" />
  <field border="1" x="79.8" type="Linea" pattern="1" />
  <field border="1" x="89.8" type="Linea" pattern="1" />
  <field x="90" type="Stringa" width="10" pattern="1">
   <font face="Courier New" size="7" />
   <source>RDOC.CODCMS</source>
  </field>
  <field x="100" type="Stringa" width="20" pattern="1">
   <font face="Courier New" size="7" />
   <source>COMMESSE.DESCRIZ</source>
  </field>
  <field x="66" type="Numero" align="right" width="3.6" id="1" pattern="1">
   <font face="Courier New" size="7" />
   <source>RDOC.QTA</source>
  </field>
  <field x="70" type="Valuta" align="right" width="9.6" id="2" pattern="1" text="#########,@@">
   <font face="Courier New" size="7" />
   <source>RDOC.PREZZO</source>
  </field>
  <field x="80" type="Valuta" align="right" width="9.6" id="3" pattern="1" text="#########,@@">
   <font face="Courier New" size="7" />
   <source>IMPNS*SEGNO</source>
   <prescript description="B1.3 PRESCRIPT">MESSAGE ADD,F3.130|ADD,F2.230</prescript>
   <postscript description="B1.3 POSTSCRIPT">#THIS @                   \ Leggo importo
"DOC.IS_COSTO" @   \ &#E8; un costo
IF                              \  
   "F1.330"                  \ lo sommo al totale dei costi
ELSE
   "F1.340"                  \ lo sommo al totale dei ricavi
THEN
+!                              \ incremento il totale selezionato</postscript>
  </field>
 </section>
 <section type="Foot">
  <field border="1" y="0.5" type="Linea" width="120" height="0" pattern="1" />
 </section>
 <section type="Foot" level="1">
  <field x="45.5" y="1" type="Testo" width="18" pattern="1" text="Totale Costi">
   <font face="Courier New" bold="1" size="8" />
  </field>
  <field x="45.5" y="2" type="Testo" width="18" pattern="1" text="Totale Ricavi">
   <font face="Courier New" bold="1" size="8" />
  </field>
  <field x="45.5" y="3" type="Testo" width="18" pattern="1" text="Margine">
   <font face="Courier New" bold="1" size="8" />
  </field>
  <field x="64" y="1" type="Valuta" align="right" width="25.6" id="330" pattern="1" hide_zero="1" text="###.###.###,@@">
   <font face="Courier New" bold="1" size="8" />
  </field>
  <field x="64" y="2" type="Valuta" align="right" width="25.6" id="340" pattern="1" hide_zero="1" text="###.###.###,@@">
   <font face="Courier New" bold="1" size="8" />
  </field>
  <field x="64" y="3" type="Valuta" align="right" width="25.6" id="350" pattern="1" hide_zero="1" text="###.###.###,@@">
   <font face="Courier New" bold="1" size="8" />
   <source>#340-#330</source>
  </field>
 </section>
 <section type="Foot" level="2">
  <field border="1" x="10.8" type="Linea" pattern="1" />
  <field border="1" x="10.8" type="Linea" width="109.2" height="0" pattern="1" />
  <field border="3" x="10.8" y="1" type="Linea" width="109.2" height="0" pattern="1" />
  <field x="74" type="Valuta" align="right" width="15.6" id="230" pattern="1" text="#########,@@">
   <font face="Courier New" size="7" />
  </field>
  <field x="11" type="Stringa" width="60" id="521" pattern="1" text="Totale Cliente ">
   <font face="Courier New" size="7" />
  </field>
 </section>
 <section type="Foot" level="3">
  <field border="1" x="10.8" type="Linea" pattern="1" />
  <field border="1" x="10.8" type="Linea" width="109.2" height="0" pattern="1" />
  <field x="11" type="Stringa" width="40" pattern="1" text="Totale Tipologia: ">
   <font face="Courier New" size="7" />
   <prescript description="F3.0 PRESCRIPT">MESSAGE _TABLEREAD,%TIP,#511,S0</prescript>
  </field>
  <field border="1" x="10.8" y="1" type="Linea" width="109.2" height="0" pattern="1" />
  <field x="74" type="Valuta" align="right" width="15.6" id="130" pattern="1" text="#########,@@">
   <font face="Courier New" size="7" />
  </field>
  <field x="1" type="Stringa" hidden="1" width="5" id="511" pattern="1">
   <font face="Courier New" size="7" />
  </field>
 </section>
 <sql>USE RDOC KEY 2
BY 33.TIPOCF 20.RAGSOC 33.TIPODOC CODCMS 33.DATADOC 
JOIN DOC INTO CODNUM=CODNUM ANNO=ANNO PROVV=PROVV NDOC=NDOC
JOIN CLIFO TO DOC INTO CODCF=CODCF TIPOCF=TIPOCF
JOIN COMMESSE INTO CODCMS=CODCMS
</sql>
</report>