Patch level :2.1 nopatch x ora

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :rep di ab


git-svn-id: svn://10.65.10.50/trunk@12194 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2004-06-18 13:06:04 +00:00
parent 6e42deb507
commit d99fa0e580
4 changed files with 183 additions and 1 deletions

73
ab/bastarb.rep Executable file
View File

@ -0,0 +1,73 @@
<report name="bastarb" lpi="6">
<font face="Courier New" size="10" />
<section keep_with_next="1" type="Head">
<field type="Stringa" width="50">
<font italic="1" face="Courier New" bold="1" size="10" />
<source>#SYSTEM.RAGSOC</source>
</field>
<field y="1" type="Testo" valign="center" align="center" width="96" height="2" text="Tabella Archiviazione Bilanci">
<font face="Courier New" bold="1" size="14" />
</field>
<field border="2" x="1" y="3.5" type="Linea" width="93" height="0" />
<field x="2" y="4" type="Testo" width="6" text="Codice">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="11" y="4" type="Testo" width="4" text="Anno">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="18" y="4" type="Testo" width="8" text="Cod.Per.">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="29" y="4" type="Testo" width="9" text="Tipo bil.">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="41" y="4" type="Testo" width="9" text="Data arc.">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="54" y="4" type="Testo" width="9" text="Data rip.">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="67" y="4" type="Testo" width="11" text="Per. chiuso ">
<font face="Courier New" bold="1" size="10" />
</field>
<field border="2" x="1" y="5.5" type="Linea" width="93" height="0" />
</section>
<section keep_with_next="1" type="Head" level="1" />
<section keep_with_next="1" type="Body" />
<section keep_with_next="1" type="Body" level="1">
<field x="2" type="Stringa" link="ARB.CODTAB[1,5]" width="5">
<source>CODTAB[1,5]</source>
</field>
<field x="11" type="Stringa" link="ARB.CODTAB[6,9]" width="4">
<source>CODTAB[6,9]</source>
</field>
<field x="20" type="Stringa" link="ARB.CODTAB[10,12]" width="3">
<source>CODTAB[10,12]</source>
</field>
<field x="32" type="Stringa" link="ARB.CODTAB[13,15]" width="3">
<source>CODTAB[13,15]</source>
</field>
<field x="41" type="Data" width="10">
<source>D0</source>
</field>
<field x="54" type="Data" width="10">
<source>D1</source>
</field>
<field x="72" type="Stringa" width="1">
<source>B0</source>
</field>
</section>
<section keep_with_next="1" type="Foot" height="3">
<field border="2" x="1" y="0.5" type="Linea" width="93" height="0" />
<field x="2" y="1" type="Data" width="10">
<source>#SYSTEM.DATE</source>
</field>
<field x="90" y="1" type="Numero" align="right" width="3">
<source>#PAGE</source>
</field>
<field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
</section>
<section keep_with_next="1" type="Foot" level="1" />
<sql>USE ARB</sql>
</report>

39
ab/bastntb.rep Executable file
View File

@ -0,0 +1,39 @@
<report name="bastntb" lpi="6">
<font face="Courier New" size="10" />
<section keep_with_next="1" type="Head">
<field type="Testo" valign="center" align="center" width="96" height="2" text="Tabella Tipi di Bilancio">
<font face="Courier New" bold="1" size="14" />
</field>
<field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
<field x="2" y="3" type="Testo" width="10" text="Codice">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="11" y="3" type="Testo" width="12" text="Descrizione">
<font face="Courier New" bold="1" size="10" />
</field>
<field border="2" x="1" y="4.5" type="Linea" width="93" height="0" />
</section>
<section keep_with_next="1" type="Head" level="1" />
<section keep_with_next="1" type="Body" />
<section keep_with_next="1" type="Body" level="1">
<field x="2" type="Stringa" link="%NTB.CODTAB[1,2]" width="2">
<source>CODTAB[1,2]</source>
</field>
<field x="11" type="Stringa" width="80">
<source>S0</source>
</field>
</section>
<section keep_with_next="1" type="Foot" height="3">
<field border="2" x="1" y="0.5" type="Linea" width="93" height="0" />
<field x="2" y="1" type="Data" width="10">
<source>#SYSTEM.DATE</source>
</field>
<field x="90" y="1" type="Numero" align="right" width="3">
<source>#PAGE</source>
</field>
<field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
</section>
<section keep_with_next="1" type="Foot" level="1" />
<sql>USE %NTB</sql>
</report>

70
ab/bastpdb.rep Executable file
View File

@ -0,0 +1,70 @@
<report name="bastpdb" lpi="6">
<font face="Courier New" size="10" />
<section keep_with_next="1" type="Head">
<field type="Testo" valign="center" align="center" width="96" height="2" text="Tabella Perodi di Bilancio">
<font face="Courier New" bold="1" size="14" />
</field>
<field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
<field x="2" y="3" type="Testo" width="4" text="Cod.">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="8" y="3" type="Testo" width="11" text="Descrizione">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="58" y="3" type="Testo" width="12" text="gg/mm inizio">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="73" y="3" type="Testo" width="10" text="gg/mm fine">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="85" y="3" type="Testo" width="9" text="Num. Anni">
<font face="Courier New" bold="1" size="10" />
</field>
<field x="8" y="4" type="Testo" width="40" text="Descrizione alternativa stampa raffronto ">
<font face="Courier New" bold="1" size="10" />
</field>
<field border="2" x="1" y="5.5" type="Linea" width="93" height="0" />
</section>
<section keep_with_next="1" type="Head" level="1" />
<section keep_with_next="1" type="Body" />
<section keep_with_next="1" type="Body" level="1">
<field x="2" type="Stringa" link="%PDB.CODTAB[1,3]" width="3">
<source>CODTAB[1,3]</source>
</field>
<field x="8" type="Stringa" width="50">
<source>S0</source>
</field>
<field x="61" type="Numero" align="right" width="2">
<source>I0[1,2]</source>
</field>
<field x="65" type="Numero" align="right" width="2">
<source>I1[1,2]</source>
</field>
<field x="77" type="Numero" align="right" width="2">
<source>I2[1,2]</source>
</field>
<field x="81" type="Numero" align="right" width="2">
<source>I3[1,2]</source>
</field>
<field x="90" type="Numero" align="right" width="4">
<source>I4[1,4]</source>
</field>
<field x="8" y="1" type="Stringa" width="50">
<source>S1</source>
</field>
<field border="1" x="1" y="2.5" type="Linea" width="93" height="0" />
</section>
<section keep_with_next="1" type="Foot" height="3">
<field border="2" x="1" y="0.5" type="Linea" width="93" height="0" />
<field x="2" y="1" type="Data" width="10">
<source>#SYSTEM.DATE</source>
</field>
<field x="90" y="1" type="Numero" align="right" width="3">
<source>#PAGE</source>
</field>
<field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
</section>
<section keep_with_next="1" type="Foot" level="1" />
<sql>USE %PDB</sql>
</report>

View File

@ -108,7 +108,7 @@ DATE F_DF
BEGIN
PROMPT 4 16 "Data di ripristino "
FIELD D1
NUM_EXPR (#F_DF==0)||(#F_DF>#F_DI)
NUM_EXPR (#F_DF==0)||(#F_DF<#F_DI)
WARNING "La data di ripristino deve essere superiore a quella di archiviazione"
CHECKTYPE NORMAL
END