root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level :10.0

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :aggiunte le stampe del panapdc


git-svn-id: svn://10.65.10.50/trunk@16662 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2008-05-27 09:52:32 +00:00
parent 122677dbdb
commit 350c9dc80c
5 changed files with 324 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

79
ca/ca9400k1.rep Executable file
View File

@ -0,0 +1,79 @@
<?xml version="1.0" encoding="UTF-8" ?>
<report name="ca9400k1" lpi="6">
<description>Riclassificazione conti da analitica a contabile</description>
<font face="Arial" size="8" />
<section type="Head">
<font face="Arial" bold="1" size="8" />
<field type="Testo" width="20" pattern="1" text="Conto analitico" />
<field x="22.5" y="1" type="Testo" align="center" width="14" pattern="1" text="Conti contabili" />
<field x="22" y="2" type="Testo" width="4" pattern="1" text="Gr." />
<field x="27" y="2" type="Testo" width="4" pattern="1" text="Co." />
<field x="34" y="2" type="Testo" width="6" pattern="1" text="Sott." />
<field border="1" y="3" type="Linea" width="100" height="0" pattern="1" />
</section>
<section type="Head" level="1">
<field type="Stringa" width="50" pattern="1">
<font face="Arial" bold="1" size="8" />
<source>#SYSTEM.RAGSOC</source>
</field>
<field x="73" type="Testo" width="15" pattern="1" text="Data stampa:">
<font face="Arial" bold="1" size="8" />
</field>
<field x="88" type="Data" width="10" pattern="1">
<font face="Arial" bold="1" size="8" />
<source>#SYSTEM.DATE</source>
</field>
<field border="1" radius="100" x="4" y="1.5" type="Rettangolo" width="80" height="2" pattern="1" />
<field x="4" y="2" type="Testo" align="center" width="80" pattern="1" text="RICLASSIFICAZIONE CONTI DA ANALITICI A CONTABILI">
<font face="Arial" bold="1" size="12" />
</field>
</section>
<section type="Head" level="2">
<groupby>CODCONTO</groupby>
<font face="Arial" bold="1" size="8" />
<field x="1" y="0.75" type="Stringa" width="20" pattern="1">
<source>CODCONTO</source>
</field>
<field x="22" y="0.75" type="Stringa" width="50" pattern="1">
<source>PCONANA.DESCR</source>
<prescript description="H2.0 PRESCRIPT">#THIS @
EMPTY= IF
"CONTO ANALITICO MANCANTE!"
#THIS !
THEN</prescript>
</field>
</section>
<section type="Body" />
<section type="Body" level="1">
<field x="21" type="Numero" align="right" width="3" pattern="1" hide_zero="1">
<source>GRUPPO</source>
</field>
<field x="26" type="Numero" align="right" width="3" pattern="1" hide_zero="1">
<source>CONTO</source>
</field>
<field x="31" type="Numero" align="right" width="6" pattern="1" hide_zero="1">
<source>SOTTOCONTO</source>
</field>
<field x="39" type="Stringa" width="50" pattern="1">
<source>PCON.DESCR</source>
<prescript description="H2.0 PRESCRIPT">#THIS @
EMPTY= IF
"CONTO CONTABILE MANCANTE!"
#THIS !
THEN</prescript>
</field>
</section>
<section type="Foot" height="2">
<field border="1" y="0.5" type="Linea" width="100" height="0" pattern="1" />
<field x="89" y="0.75" type="Numero" align="right" width="10" pattern="1" text="Pag.###">
<source>#REPORT.PAGE</source>
</field>
</section>
<section type="Foot" level="1" />
<section type="Foot" level="2" />
<sql>USE PANAPDC
JOIN PCONANA INTO CODCONTO==CODCONTO
JOIN PCON INTO GRUPPO==GRUPPO CONTO==CONTO SOTTOCONTO==SOTTOCONTO
FROM CODCONTO=#DACONTO
TO CODCONTO=#ACONTO</sql>
</report>

41
ca/ca9400k1.uml Executable file
View File

@ -0,0 +1,41 @@
#include "ca9400k.h"
PAGE "Stampa riclassificazione conti da analitici a contabili" -1 -1 64 10
STRING F_DACONTO 20
BEGIN
PROMPT 2 2 "Da conto analitico "
USE LF_PCONANA KEY 1
INPUT CODCONTO F_DACONTO
DISPLAY "Codice conto analitico" CODCONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_DACONTO CODCONTO
FIELD DACONTO
KEY 1
END
STRING F_ACONTO 20
BEGIN
PROMPT 2 4 "A conto analitico "
USE LF_PCONANA KEY 1
INPUT CODCONTO F_ACONTO
DISPLAY "Codice conto analitico" CODCONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_ACONTO CODCONTO
FIELD ACONTO
KEY 2
END
BUTTON DLG_PRINT 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK

82
ca/ca9400k2.rep Executable file
View File

@ -0,0 +1,82 @@
<?xml version="1.0" encoding="UTF-8" ?>
<report name="ca9400k2" lpi="6">
<description>Riclassificazione conti da contabile ad analitica</description>
<font face="Arial" size="8" />
<section type="Head">
<font face="Arial" bold="1" size="8" />
<field x="1" type="Testo" width="4" pattern="1" text="Gr." />
<field x="6" type="Testo" width="4" pattern="1" text="Co." />
<field x="13" type="Testo" width="6" pattern="1" text="Sott." />
<field x="20" y="1" type="Testo" width="20" pattern="1" text="Conto analitico">
<font italic="1" face="Arial" bold="1" size="8" />
</field>
<field border="1" y="2" type="Linea" width="100" height="0" pattern="1" />
</section>
<section type="Head" level="1">
<field type="Stringa" width="50" pattern="1">
<font face="Arial" bold="1" size="8" />
<source>#SYSTEM.RAGSOC</source>
</field>
<field x="73" type="Testo" width="15" pattern="1" text="Data stampa:">
<font face="Arial" bold="1" size="8" />
</field>
<field x="88" type="Data" width="10" pattern="1">
<font face="Arial" bold="1" size="8" />
<source>#SYSTEM.DATE</source>
</field>
<field border="1" radius="100" x="4" y="1.5" type="Rettangolo" width="80" height="2" pattern="1" />
<field x="4" y="2" type="Testo" align="center" width="80" pattern="1" text="RICLASSIFICAZIONE CONTI DA CONTABILI AD ANALITICI">
<font face="Arial" bold="1" size="12" />
</field>
</section>
<section type="Head" level="2">
<groupby>STR(GRUPPO)+STR(CONTO)+STR(SOTTOCONTO)</groupby>
<field x="1" type="Numero" align="right" width="3" pattern="1">
<source>GRUPPO</source>
</field>
<field x="6" type="Numero" align="right" width="3" pattern="1" hide_zero="1">
<source>CONTO</source>
</field>
<field x="11" type="Numero" align="right" width="6" pattern="1" hide_zero="1">
<source>SOTTOCONTO</source>
</field>
<field x="19" type="Stringa" width="50" pattern="1">
<source>PCON.DESCR</source>
<prescript description="H2.0 PRESCRIPT">#THIS @
EMPTY= IF
"CONTO CONTABILE MANCANTE!"
#THIS !
THEN</prescript>
</field>
</section>
<section type="Body" />
<section type="Body" level="1">
<field x="20" type="Stringa" width="20" pattern="1">
<font italic="1" face="Arial" size="8" />
<source>CODCONTO</source>
</field>
<field x="41" type="Stringa" width="50" pattern="1">
<font italic="1" face="Arial" size="8" />
<source>PCONANA.DESCR</source>
<prescript description="B1.0 PRESCRIPT">#THIS @
EMPTY= IF
"CONTO ANALITICO MANCANTE!"
#THIS !
THEN</prescript>
</field>
</section>
<section type="Foot" height="2">
<field border="1" y="0.5" type="Linea" width="100" height="0" pattern="1" />
<field x="89" y="0.75" type="Numero" align="right" width="10" pattern="1" text="Pag.###">
<source>#REPORT.PAGE</source>
</field>
</section>
<section type="Foot" level="1" />
<section type="Foot" level="2" />
<sql>USE PANAPDC KEY 2
JOIN PCONANA INTO CODCONTO==CODCONTO
JOIN PCON INTO GRUPPO==GRUPPO CONTO==CONTO SOTTOCONTO==SOTTOCONTO
FROM GRUPPO=#DAGR CONTO=#DACO SOTTOCONTO=#DASOTT
TO GRUPPO=#AGR CONTO=#ACO SOTTOCONTO=#ASOTT
</sql>
</report>

117
ca/ca9400k2.uml Executable file
View File

@ -0,0 +1,117 @@
#include "ca9400k.h"
PAGE "Stampa riclassificazione conti da contabili ad analitici" -1 -1 64 12
GROUPBOX DLG_NULL 60 5
BEGIN
PROMPT 1 1 "@bDa"
END
NUMBER F_DAGR 3
BEGIN
PROMPT 2 2 "Gruppo "
USE LF_PCON KEY 1 SELECT CONTO=""
INPUT GRUPPO F_DAGR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_DAGR GRUPPO
FIELD DAGR
KEY 1
END
NUMBER F_DACO 3
BEGIN
PROMPT 2 3 "Conto "
USE LF_PCON KEY 1 SELECT ((CONTO!="")&&(SOTTOCONTO=""))
COPY INPUT F_DAGR
INPUT CONTO F_DACO
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_DAGR GRUPPO
OUTPUT F_DACO CONTO
VALIDATE REQIF_FUNC 1 F_DASOTT
FIELD DACO
KEY 1
END
NUMBER F_DASOTT 6
BEGIN
PROMPT 2 4 "Sottoconto "
USE LF_PCON KEY 1 SELECT SOTTOCONTO!=""
COPY INPUT F_DACO
INPUT SOTTOCONTO F_DASOTT
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_DASOTT SOTTOCONTO
OUTPUT F_DAGR GRUPPO
OUTPUT F_DACO CONTO
FIELD DASOTT
KEY 1
END
GROUPBOX DLG_NULL 60 5
BEGIN
PROMPT 1 6 "@bA"
END
NUMBER F_AGR 3
BEGIN
PROMPT 2 7 "Gruppo "
USE LF_PCON KEY 1 SELECT CONTO=""
INPUT GRUPPO F_AGR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_AGR GRUPPO
FIEELD AGR
KEY 2
END
NUMBER F_ACO 3
BEGIN
PROMPT 2 8 "Conto "
USE LF_PCON KEY 1 SELECT ((CONTO!="")&&(SOTTOCONTO=""))
COPY INPUT F_AGR
INPUT CONTO F_ACO
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_AGR GRUPPO
OUTPUT F_ACO CONTO
VALIDATE REQIF_FUNC 1 F_ASOTT
FIELD ACO
KEY 2
END
NUMBER F_ASOTT 6
BEGIN
PROMPT 2 9 "Sottoconto "
USE LF_PCON KEY 1 SELECT SOTTOCONTO!=""
COPY INPUT F_ACO
INPUT SOTTOCONTO F_ASOTT
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_ASOTT SOTTOCONTO
OUTPUT F_AGR GRUPPO
OUTPUT F_ACO CONTO
FIELD ASOTT
KEY 2
END
BUTTON DLG_PRINT 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK

8
ca/camenu.men
View File

@ -44,9 +44,11 @@ Picture = <ba03>
Module = 22
Flags = ""
Item_01 = "Piano dei conti", "ca1 -3", "F"
Item_02 = "Centri di costo", "ca1 -4", "F"
Item_03 = "Commesse", "ca1 -5", "F"
Item_04 = "Fasi", "ca1 -6", "F"
Item_02 = "Riclassificazione conti A/C", "ba8 -4 ca9400k1", "F"
Item_03 = "Riclassificazione conti C/A", "ba8 -4 ca9400k2", "F"
Item_04 = "Centri di costo", "ca1 -4", "F"
Item_05 = "Commesse", "ca1 -5", "F"
Item_06 = "Fasi", "ca1 -6", "F"
[CAMENU_030]
Caption = "Movimenti"