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            :
0001478: Manca una stampa delle tabelle di ripartizione
Descrizione  Manca una stampa delle tabelle di ripartizione : è possibile averla?
Passaggi per riprodurre l'anomalia
Informazioni addizionali  Avvisare Habilita se verrà fatta.


git-svn-id: svn://10.65.10.50/trunk@19628 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2009-11-16 15:10:12 +00:00
parent 891aa48eb0
commit 3d1c15555c
9 changed files with 436 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ca/ca3.cpp
View File

@ -10,7 +10,7 @@ int main(int argc, char** argv)
case 1: ca3200(argc, argv); break; // stampa mastrini
case 2: ca3300(argc, argv); break; // stampa bilancio
case 3: ca3400(argc, argv); break; // generazione movimenti perfetti ma casuali
//case 4: ca3500(argc, argv); break;
case 4: ca3500(argc, argv); break; // stampatore generico di report di CA
case 5: ca3600(argc, argv); break; // stampa pagato per CdC/Commessa/Fase
case 6: ca3700(argc, argv); break; //stampa rendiconto
case 7: ca3800(argc, argv); break; //stampa bilancio di commessa per esercizio

2
ca/ca3.h
View File

@ -5,7 +5,7 @@ int ca3100(int argc, char* argv[]);
int ca3200(int argc, char* argv[]);
int ca3300(int argc, char* argv[]);
int ca3400(int argc, char* argv[]);
//int ca3500(int argc, char* argv[]);
int ca3500(int argc, char* argv[]);
int ca3600(int argc, char* argv[]);
int ca3700(int argc, char* argv[]);
int ca3800(int argc, char* argv[]);

35
ca/ca3500.cpp Executable file
View File

@ -0,0 +1,35 @@
#include <applicat.h>
#include "calib02.h"
#include "../ba/ba8500.h"
class TGeneric_anal_report : public TAnal_report
{
protected:
virtual bool use_mask() { return true; }
};
///////////////////////////////////////////////////////////
// TBruce_wayne_app
///////////////////////////////////////////////////////////
class TBruce_wayne_app : public TKlarkKent_app
{
protected:
virtual TReport* create_report(const char* name) const;
};
TReport* TBruce_wayne_app::create_report(const char* name) const
{
TGeneric_anal_report* rep = new TGeneric_anal_report;
rep->load(name);
return rep;
}
int ca3500(int argc, char* argv[])
{
TBruce_wayne_app app;
app.run(argc, argv, TR("Stampa Report Analitica"));
return 0;
}

14
ca/ca9300a.h Executable file
View File

@ -0,0 +1,14 @@
#define F_TIPO 101
#define F_DACODICE 102
#define F_DADESCR 103
#define F_ACODICE 104
#define F_ADESCR 105
#define F_CODCMS 106
#define F_DESCRCMS 107
#define F_CODCOSTO 108
#define F_DESCRCOSTO 109
#define F_CODCONTO 110
#define F_DESCRCONTO 111
#define F_REPORT 120

238
ca/ca9300a.rep Executable file
View File

@ -0,0 +1,238 @@
<?xml version="1.0" encoding="UTF-8" ?>
<report name="ca9300a" orientation="2" lpi="6">
<description>Stampa tabelle ripartizione analitica</description>
<font face="Arial" size="8" />
<section type="Head">
<field type="Stringa" hidden="1" width="1" pattern="1">
<source>#TIPO</source>
<prescript description="H0.0 PRESCRIPT">#THIS @
"B" = IF
"2@" HIDE
"1@" SHOW
ELSE
"1@" HIDE
"2@" SHOW
THEN</prescript>
</field>
<field x="1" type="Testo" width="12" pattern="1" text="Ripartizione">
<font face="Arial" bold="1" size="8" />
</field>
<field x="36" type="Testo" width="25" pattern="1" text="Gruppo\Conto\Sottoconto">
<font face="Arial" bold="1" size="8" />
<groups>2</groups>
</field>
<field x="36" type="Testo" width="10" pattern="1" text="Commessa">
<font face="Arial" bold="1" size="8" />
<groups>1</groups>
</field>
<field x="77" type="Testo" width="14" pattern="1" text="Centro di costo">
<font face="Arial" bold="1" size="8" />
<groups>1</groups>
</field>
<field x="115" type="Testo" width="8" pattern="1" text="Fase">
<font face="Arial" bold="1" size="8" />
<groups>1</groups>
</field>
<field x="127.5" type="Testo" width="8" pattern="1" text="Modalit&#E0;">
<font face="Arial" bold="1" size="8" />
</field>
<field x="137" type="Testo" width="4" pattern="1" text="Anno">
<font face="Arial" bold="1" size="8" />
</field>
<field x="142" type="Testo" width="2" pattern="1" text="Ib">
<font face="Arial" bold="1" size="8" />
</field>
<field x="145" type="Testo" width="10" pattern="1" text="Classe mov.">
<font face="Arial" bold="1" size="8" />
</field>
<field x="2" y="1" type="Testo" width="4" pattern="1" text="Riga" />
<field x="6" y="1" type="Testo" width="10" pattern="1" text="Commessa" />
<field x="47" y="1" type="Testo" width="14" pattern="1" text="Centro di costo" />
<field x="91" y="1" type="Testo" width="6" pattern="1" text="Fase" />
<field x="99" y="1" type="Testo" width="10" pattern="1" text="Conto" />
<field x="140.5" y="1" type="Testo" width="10" pattern="1" text="Ripartizione" />
<field border="1" x="1" y="2" type="Linea" width="160" height="0" pattern="1" />
</section>
<section type="Head" level="1">
<font face="Arial" bold="1" size="8" />
<prescript description="H1 PRESCRIPT">#CODCMS @
EMPTY= IF
101 HIDE
102 HIDE
THEN
#CODCOSTO @
EMPTY= IF
103 HIDE
104 HIDE
THEN</prescript>
<field border="2" radius="200" x="36" y="0.5" type="Rettangolo" shade_offset="25" width="70" height="4" />
<field x="41" y="1.5" type="Testo" valign="center" align="center" width="60" height="2" pattern="1" text="STAMPA TABELLE RIPARTIZIONE">
<font face="Arial" bold="1" size="16" />
</field>
<field x="2" y="5.5" type="Testo" width="18" pattern="1" text="Tipo ripartizioni:">
<font face="Arial" size="8" />
</field>
<field x="20" y="5.5" type="Array" width="15" pattern="1">
<source>#TIPO</source>
<list>
<li Value="Batch" Code="B" />
<li Value="Interattive" Code="I" />
<li Value="Pareggio" Code="P" />
</list>
</field>
<field border="1" x="1" y="8.5" type="Linea" width="160" height="0" pattern="1" />
<field x="2" y="6.5" type="Testo" width="12" id="101" pattern="1" text="Commessa:">
<font face="Arial" size="8" />
</field>
<field x="20" y="6.5" type="Stringa" width="20" id="102" pattern="1">
<source>#CODCMS</source>
</field>
<field x="41" y="6.5" type="Stringa" width="60" id="103" pattern="1">
<prescript description="H1.103 PRESCRIPT">MESSAGE ISAMREAD,COMMESSE,CODCMS=#102,DESCRIZ</prescript>
</field>
<field x="2" y="7.5" type="Testo" width="15" id="103" pattern="1" text="Centro di costo:">
<font face="Arial" size="8" />
</field>
<field x="20" y="7.5" type="Stringa" width="20" id="104" pattern="1">
<source>#CODCOSTO</source>
</field>
<field x="41" y="7.5" type="Stringa" width="60" id="105" pattern="1">
<prescript description="H1.105 PRESCRIPT">MESSAGE ISAMREAD,CDC,CODCOSTO=#104,DESCRIZ</prescript>
</field>
</section>
<section type="Head" level="2">
<groupby>CODICE</groupby>
<font face="Arial" bold="1" size="8" />
<field y="1" type="Stringa" hidden="1" width="1" id="98" pattern="1">
<source>#TIPO</source>
<prescript description="H2.98 PRESCRIPT">#THIS @
"B" = IF
"2@" HIDE
"1@" SHOW
ELSE
"1@" HIDE
"2@" SHOW
THEN</prescript>
</field>
<field x="1" y="1" type="Stringa" width="8" id="99" pattern="1">
<source>CODICE</source>
</field>
<field x="9" y="1" type="Stringa" width="25" id="100" pattern="1">
<font face="Arial Narrow" bold="1" size="7" />
<source>RIP.DESCRIZ</source>
</field>
<field x="36" y="1" type="Stringa" width="15" id="101" pattern="1">
<groups>1</groups>
<source>RIP.CODCMS</source>
</field>
<field x="51.5" y="1" type="Stringa" width="25" id="102" pattern="1">
<font face="Arial Narrow" size="7" />
<groups>1</groups>
<prescript description="H2.102 PRESCRIPT">MESSAGE ISAMREAD,COMMESSE,CODCMS=#101,DESCRIZ</prescript>
</field>
<field x="77.5" y="1" type="Stringa" width="15" id="103" pattern="1">
<groups>1</groups>
<source>RIP.CODCOSTO</source>
</field>
<field x="93" y="1" type="Stringa" width="25" id="104" pattern="1">
<font face="Arial Narrow" size="7" />
<groups>1</groups>
<prescript description="H2.104 PRESCRIPT">MESSAGE ISAMREAD,CDC,CODCOSTO=#103,DESCRIZ</prescript>
</field>
<field x="119" y="1" type="Stringa" width="7" id="105" pattern="1">
<groups>1</groups>
<source>RIP.CODFASE</source>
</field>
<field x="127" y="1" type="Array" align="right" width="10" id="106" pattern="1">
<source>RIP.TIPORIP</source>
<list>
<li Value="Percentuale" Code="0" />
<li Value="Quote" Code="1" />
<li Value="Parti" Code="2" />
</list>
</field>
<field x="138" y="1" type="Numero" align="right" width="4" id="107" pattern="1" hide_zero="1">
<source>RIP.ANNOES</source>
</field>
<field x="143" y="1" type="Numero" align="right" width="1" id="108" pattern="1" hide_zero="1">
<source>RIP.INDBIL</source>
</field>
<field x="145" y="1" type="Array" width="10" id="109" pattern="1">
<source>RIP.CLASSEMOV</source>
<list>
<li Value="Tutti" Code="0" />
<li Value="Normali" Code="1" />
<li Value="Preventivi" Code="2" />
</list>
</field>
<field x="36" y="1" type="Numero" align="right" width="3" id="201" pattern="1">
<groups>2</groups>
<source>RIP.GRUPPO</source>
</field>
<field x="40" y="1" type="Numero" align="right" width="3" id="202" pattern="1">
<groups>2</groups>
<source>RIP.CONTO</source>
</field>
<field x="44" y="1" type="Numero" align="right" width="6" id="203" pattern="1">
<groups>2</groups>
<source>RIP.SOTTOCONTO</source>
</field>
<field x="51" y="1" type="Stringa" width="50" id="204" pattern="1">
<groups>2</groups>
<prescript description="H2.204 PRESCRIPT">MESSAGE ISAMREAD,PCON,GRUPPO=#201!CONTO=#202!SOTTOCONTO=#203,DESCR</prescript>
</field>
</section>
<section type="Body" />
<section type="Body" level="1">
<field x="1" type="Numero" align="right" width="2" pattern="1">
<source>NRIGA</source>
</field>
<field x="21.5" type="Stringa" width="25" pattern="1">
<font face="Arial Narrow" size="7" />
<prescript description="B1.0 PRESCRIPT">MESSAGE ISAMREAD,COMMESSE,CODCMS=#101,DESCRIZ</prescript>
</field>
<field x="65" type="Stringa" width="25" pattern="1">
<font face="Arial Narrow" size="7" />
<prescript description="B1.0 PRESCRIPT">MESSAGE ISAMREAD,CDC,CODCOSTO=#103,DESCRIZ</prescript>
</field>
<field x="114.5" type="Stringa" width="25" pattern="1">
<font face="Arial Narrow" size="7" />
<source>CODCONTO</source>
<prescript description="B1.0 PRESCRIPT">CA_FORMAT_CONTO_DESCR</prescript>
</field>
<field x="140.5" type="Numero" align="right" width="10" pattern="1">
<source>RIPARTO</source>
</field>
<field x="4" type="Stringa" width="17" id="101" pattern="1">
<source>CODCMS</source>
</field>
<field x="47.5" type="Stringa" width="17" id="103" pattern="1">
<source>CODCOSTO</source>
</field>
<field x="91" type="Stringa" width="7" id="105" pattern="1">
<source>CODFASE</source>
</field>
<field x="99" type="Stringa" width="15" id="107" pattern="1">
<source>CODCONTO</source>
<prescript description="B1.107 PRESCRIPT">CA_FORMAT_CONTO</prescript>
</field>
</section>
<section type="Foot">
<field border="1" y="0.5" type="Linea" width="160" height="0" pattern="1" />
<field x="2" y="1" type="Testo" width="12" pattern="1" text="Data stampa:" />
<field x="14" y="1" type="Data" width="10" pattern="1">
<source>#SYSTEM.DATE</source>
</field>
<field x="145" y="1" type="Testo" width="5" pattern="1" text="Pag." />
<field x="150" y="1" type="Numero" align="right" width="3" pattern="1">
<source>#REPORT.PAGE</source>
</field>
</section>
<section type="Foot" level="1" />
<section type="Foot" level="2" />
<sql>USE RRIP
SELECT (BETWEEN(CODCMS,#CODCMS,#CODCMS))&#26;&#26;(BETWEEN(CODCOSTO,#CODCOSTO,#CODCOSTO))
JOIN RIP INTO TIPO==TIPO CODICE==CODICE
FROM TIPO=#TIPO CODICE=#DACODICE
TO TIPO=#TIPO CODICE=#ACODICE</sql>
</report>

136
ca/ca9300a.uml Executable file
View File

@ -0,0 +1,136 @@
#include "ca9300a.h"
TOOLBAR "topbar" 0 0 0 2
#include <printbar.h>
ENDPAGE
PAGE "Stampa tabelle ripartizione analitica" 0 2 0 0
GROUPBOX DLG_NULL 78 5
BEGIN
PROMPT 0 1 "@bParametri ripartizione"
END
LIST F_TIPO 16
BEGIN
PROMPT 1 2 "Tipo "
ITEM "I|Interattiva"
ITEM "B|Batch"
ITEM "P|Pareggio"
FIELD #TIPO
END
STRING F_DACODICE 8
BEGIN
PROMPT 1 3 "Da rip. "
USE LF_RIP
INPUT TIPO F_TIPO SELECT
INPUT CODICE F_DACODICE
DISPLAY "Tipo" TIPO
DISPLAY "Codice@8" CODICE
DISPLAY "Descrizione@50" DESCRIZ
OUTPUT F_DACODICE CODICE
OUTPUT F_DADESCR DESCRIZ
FIELD #DACODICE
END
STRING F_DADESCR 50
BEGIN
PROMPT 21 3 ""
USE LF_RIP KEY 2
INPUT TIPO F_TIPO SELECT
INPUT DESCRIZ F_DADESCR
DISPLAY "Descrizione@50" DESCRIZ
DISPLAY "Codice@8" CODICE
DISPLAY "Tipo" TIPO
COPY OUTPUT F_DACODICE
END
STRING F_ACODICE 8
BEGIN
PROMPT 1 4 "A rip. "
USE LF_RIP
INPUT TIPO F_TIPO SELECT
INPUT CODICE F_ACODICE
DISPLAY "Tipo" TIPO
DISPLAY "Codice@8" CODICE
DISPLAY "Descrizione@50" DESCRIZ
OUTPUT F_ACODICE CODICE
OUTPUT F_ADESCR DESCRIZ
FIELD #ACODICE
END
STRING F_ADESCR 50
BEGIN
PROMPT 21 4 ""
USE LF_RIP KEY 2
INPUT TIPO F_TIPO SELECT
INPUT DESCRIZ F_ADESCR
DISPLAY "Descrizione@50" DESCRIZ
DISPLAY "Codice@8" CODICE
DISPLAY "Tipo" TIPO
COPY OUTPUT F_ACODICE
END
GROUPBOX DLG_NULL 78 8
BEGIN
PROMPT 0 6 "@bParametri di selezione"
END
TEXT DLG_NULL
BEGIN
PROMPT 1 7 "Commessa"
END
STRING F_CODCMS 20
BEGIN
PROMPT 1 8 ""
USE COMMESSE
INPUT CODCMS F_CODCMS
DISPLAY "Codice@20" CODCMS
DISPLAY "Descrizione@50" DESCRIZ
OUTPUT F_CODCMS CODCMS
OUTPUT F_DESCRCMS DESCRIZ
FIELD #CODCMS
END
STRING F_DESCRCMS 50
BEGIN
PROMPT 25 8 ""
USE COMMESSE KEY 2
INPUT DESCRIZ F_DESCRCMS
DISPLAY "Descrizione@50" DESCRIZ
DISPLAY "Codice@20" CODCMS
COPY OUTPUT F_CODCMS
END
TEXT DLG_NULL
BEGIN
PROMPT 1 9 "Centro di costo"
END
STRING F_CODCOSTO 20
BEGIN
PROMPT 1 10 ""
USE CDC
INPUT CODCOSTO F_CODCOSTO
DISPLAY "Codice@20" CODCOSTO
DISPLAY "Descrizione@50" DESCRIZ
OUTPUT F_CODCOSTO CODCOSTO
OUTPUT F_DESCRCOSTO DESCRIZ
FIELD #CODCOSTO
END
STRING F_DESCRCOSTO 50
BEGIN
PROMPT 25 10 ""
USE CDC KEY 2
INPUT DESCRIZ F_DESCRCOSTO
DISPLAY "Descrizione@50" DESCRIZ
DISPLAY "Codice@20" CODCOSTO
COPY OUTPUT F_CODCOSTO
END
ENDPAGE
ENDMASK

1
ca/cacmmenu.men
View File

@ -19,6 +19,7 @@ Item_03 = "Fasi", "ca0 -6", "SF"
Item_04 = "Stampa Commesse", "ca1 -5", "F"
Item_05 = "Stampa Fasi", "ca1 -6", "F"
Item_06 = "Tabelle di ripartizione", "ca0 -7", "F"
Item_07 = "Stampa Tabelle ripartizione", "ca3 -4 ca9300a", "F"
[CMMENU_040]
Caption = "Stampe"

4
ca/calib02.h
View File

@ -1,6 +1,10 @@
#ifndef __CALIB02_H
#define __CALIB02_H
#ifndef __AUTOMASK_H
#include <automask.h>
#endif
#ifndef __REPORT_H
#include <report.h>
#endif

11
ca/camenu.men
View File

@ -44,11 +44,12 @@ Picture = <ba03>
Module = 22
Flags = ""
Item_01 = "Piano dei conti", "ca1 -3", "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"
Item_02 = "Riclassificazione conti A/C", "ca3 -4 ca9400k1", "F"
Item_03 = "Riclassificazione conti C/A", "ca3 -4 ca9400k2", "F"
Item_04 = "Tabelle ripartizione", "ca3 -4 ca9300a", "F"
Item_05 = "Centri di costo", "ca1 -4", "F"
Item_06 = "Commesse", "ca1 -5", "F"
Item_07 = "Fasi", "ca1 -6", "F"
[CAMENU_030]
Caption = "Movimenti"