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            :sistemate le maschere del collegamento CE/CG


git-svn-id: svn://10.65.10.50/trunk@15935 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2007-12-21 10:37:29 +00:00
parent dd9ec8b9d1
commit 61df2008ef
6 changed files with 395 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ce/ce0400a.h
View File

@ -54,6 +54,10 @@
#define F_VEND_CESP_SO 242
#define F_VEND_CESP_D 243
#define F_TIPOAMM 245
#define F_MOVDETT 246
#define F_ANNOAMM 247
//sheet elenco files personalizzati e relative righe
#define F_USER 300

42
ce/ce0400a.uml
View File

@ -181,18 +181,38 @@ BEGIN
ITEM "X|Su Conto Cespite"
MESSAGE CLEAR,F_VEND_CESP_GR|CLEAR,F_VEND_CESP_CO|CLEAR,F_VEND_CESP_SO|CLEAR,F_VEND_CESP_D
FIELD COR5PM
FLAGS "Z"
GROUP 9
END
LIST F_TIPOAMM 15
BEGIN
PROMPT 2 5 "Tipo ammortamenti "
ITEM "1|Fiscali"
ITEM "2|Civilistici"
FIELD TPAMM
GROUP 9
END
LIST F_MOVDETT 50
BEGIN
PROMPT 2 6 "Dettaglio movimenti "
ITEM "0|Non dettagliati"
ITEM "1|Per cespite con conto della categoria"
ITEM "2|Per cespite con sottoconto = codice cespite"
FIELD MOVDETT
GROUP 9
END
GROUPBOX DLG_NULL 78 7
BEGIN
PROMPT 1 6 "@B Cod. Causali"
PROMPT 1 7 "@B Cod. Causali"
FLAGS "R"
END
STRING F_ELIMCESP 3
BEGIN
PROMPT 2 7 "Eliminazione cespite "
PROMPT 2 8 "Eliminazione cespite "
FIELD COAUEL
USE LF_CAUSALI SELECT ((SOSPESO!="X")&&(TIPODOC=="")&&(COLLCESP==""))
INPUT CODCAUS F_ELIMCESP
@ -207,7 +227,7 @@ END
STRING F_D_ELIMCESP 50 35
BEGIN
PROMPT 40 7 ""
PROMPT 40 8 ""
USE LF_CAUSALI KEY 2
INPUT DESCR F_D_ELIMCESP
DISPLAY "Descrizione@50" DESCR
@ -220,7 +240,7 @@ END
STRING F_RIL_DIFF 3
BEGIN
PROMPT 2 8 "Rilevazione differenze "
PROMPT 2 9 "Rilevazione differenze "
FIELD COAUDI
COPY USE F_ELIMCESP
INPUT CODCAUS F_RIL_DIFF
@ -234,7 +254,7 @@ END
STRING F_D_RIL_DIFF 50 35
BEGIN
PROMPT 40 8 ""
PROMPT 40 9 ""
COPY USE F_D_ELIMCESP
INPUT DESCR F_D_RIL_DIFF
COPY DISPLAY F_D_ELIMCESP
@ -246,7 +266,7 @@ END
STRING F_RIL_QUOT 3
BEGIN
PROMPT 2 9 "Rilevazione quote ammortamento "
PROMPT 2 10 "Rilevazione quote ammortamento "
FIELD COAUQU
COPY USE F_ELIMCESP
INPUT CODCAUS F_RIL_QUOT
@ -260,7 +280,7 @@ END
STRING F_D_RIL_QUOT 50 35
BEGIN
PROMPT 40 9 ""
PROMPT 40 10 ""
COPY USE F_D_ELIMCESP
INPUT DESCR F_D_RIL_QUOT
COPY DISPLAY F_D_ELIMCESP
@ -272,7 +292,7 @@ END
STRING F_RIL_PLUS 3
BEGIN
PROMPT 2 10 "Rilevazione plusvalenze "
PROMPT 2 11 "Rilevazione plusvalenze "
FIELD COAUPL
COPY USE F_ELIMCESP
INPUT CODCAUS F_RIL_PLUS
@ -286,7 +306,7 @@ END
STRING F_D_RIL_PLUS 50 35
BEGIN
PROMPT 40 10 ""
PROMPT 40 11 ""
COPY USE F_D_ELIMCESP
INPUT DESCR F_D_RIL_PLUS
COPY DISPLAY F_D_ELIMCESP
@ -298,7 +318,7 @@ END
STRING F_RIL_MIN 3
BEGIN
PROMPT 2 11 "Rilevazione minusvalenze "
PROMPT 2 12 "Rilevazione minusvalenze "
FIELD COAUM
COPY USE F_ELIMCESP
INPUT CODCAUS F_RIL_MIN
@ -312,7 +332,7 @@ END
STRING F_D_RIL_MIN 50 35
BEGIN
PROMPT 40 11 ""
PROMPT 40 12 ""
COPY USE F_D_ELIMCESP
INPUT DESCR F_D_RIL_MIN
COPY DISPLAY F_D_ELIMCESP

3
ce/ce4400.cpp
View File

@ -129,7 +129,7 @@ void TTrasf_mov_ce_cg::elabora()
//Assoc_array Categoria-QammTot-QperseTot
TAssoc_array quote_per_cat;
TProgind pi(nrec, TR("Trasferimento in corso..."), true, true);
TProgind pi(nrec, TR("Ricalcolo ammortamenti in corso..."), true, true);
for (int i = 0; cespiti.move_to(i); i++)
{
if (!pi.addstatus(1))
@ -141,6 +141,7 @@ void TTrasf_mov_ce_cg::elabora()
//calcola gli ammortamenti di tutti i cespiti; SOLO situazione FISCALE (tiposit = 1)
//la calc_amm pensa da sola a calcolare gli ammortamenti solo per i cespiti validi
//l'ultimo parametro e' true x' il calcolo viene fatto in memoria!
cespite.calc_amm(1, datacalc, false, true);
//controlla le quote del cespite in questione su AMMCE

7
ce/cemenu.men
View File

@ -79,12 +79,7 @@ Caption = "Collegamenti contabili"
Picture = <ce00>
Module = 11
Flags = ""
Item_01 = "Parametri collegamento contabilità", "ce0 -3", ""
Item_02 = "Colleg. contabilità cat/ces", "", ""
Item_03 = "St. contr. param. colleg. contab.", "", ""
Item_04 = "St. contr. colleg. contab. cat/ces", "", ""
Item_05 = "Trasferimento movimenti provvisori", "", ""
Item_06 = "Trasferimento movimenti definitivi", "", ""
Item_01 = "Trasferimento movimenti", "ce4 -3", "F"
[CEMENU_009]
Caption = "Operazioni giornaliere e fine esercizio"

22
ce/cetbcac.h
View File

@ -31,3 +31,25 @@
#define GR_MAT 130
#define GR_IMMAT 131
#define GR_PLURI 132
//pagina collegamenti con la contabilta'
#define F_IMM_GR 201
#define F_IMM_CO 202
#define F_IMM_SOT 203
#define F_IMM_DES 204
#define F_FON_GR 205
#define F_FON_CO 206
#define F_FON_SOT 207
#define F_FON_DES 208
#define F_QNOR_GR 209
#define F_QNOR_CO 210
#define F_QNOR_SOT 211
#define F_QNOR_DES 212
#define F_QANT_GR 213
#define F_QANT_CO 214
#define F_QANT_SOT 215
#define F_QANT_DES 216
#define F_QACC_GR 217
#define F_QACC_CO 218
#define F_QACC_SOT 219
#define F_QACC_DES 220

335
ce/cetbcac.uml
View File

@ -239,5 +239,340 @@ END
ENDPAGE
PAGE "Collegamento contabilita'" -1 -1 60 6
GROUPBOX DLG_NULL 74 7
BEGIN
PROMPT 1 1 "@bConti per attivita' Gruppo Conto Sottoconto Descrizione"
FLAGS "R"
END
NUMBER F_IMM_GR 3
BEGIN
PROMPT 2 2 "Immobilizzo "
FIELD S1[1,3]
FLAGS "Z"
USE LF_PCON SELECT CONTO=""
INPUT GRUPPO F_IMM_GR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_IMM_GR GRUPPO
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
NUMBER F_IMM_CO 3
BEGIN
PROMPT 22 2 ""
FIELD S1[4,6]
FLAGS "Z"
USE LF_PCON SELECT ((CONTO!="")&&(SOTTOCONTO="")&&((INDBIL==1)||(INDBIL==2)))
COPY INPUT F_IMM_GR
INPUT CONTO F_IMM_CO
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Ind.Bil." INDBIL
DISPLAY "Descrizione@50" DESCR
COPY OUTPUT F_IMM_GR
OUTPUT F_IMM_CO CONTO
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
NUMBER F_IMM_SOT 6
BEGIN
PROMPT 29 2 ""
FIELD S1[7,12]
FLAGS "Z"
USE LF_PCON SELECT SOTTOCONTO!=""
COPY INPUT F_IMM_CO
INPUT SOTTOCONTO F_IMM_SOT
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR
COPY OUTPUT F_IMM_CO
OUTPUT F_IMM_SOT SOTTOCONTO
OUTPUT F_IMM_DES DESCR
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
STRING F_IMM_DES 50 32
BEGIN
PROMPT 39 2 ""
USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
INPUT DESCR F_IMM_DES
DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_IMM_SOT
ADD RUN CG0 -0
CHECKTYPE NORMAL
END
NUMBER F_FON_GR 3
BEGIN
PROMPT 2 3 "Fondo "
FIELD S1[13,15]
FLAGS "Z"
USE LF_PCON SELECT CONTO=""
INPUT GRUPPO F_FON_GR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_FON_GR GRUPPO
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
NUMBER F_FON_CO 3
BEGIN
PROMPT 22 3 ""
FIELD S1[16,18]
FLAGS "Z"
USE LF_PCON SELECT ((CONTO!="")&&(SOTTOCONTO="")&&((INDBIL==1)||(INDBIL==2)))
COPY INPUT F_FON_GR
INPUT CONTO F_FON_CO
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Ind.Bil." INDBIL
DISPLAY "Descrizione@50" DESCR
COPY OUTPUT F_FON_GR
OUTPUT F_FON_CO CONTO
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
NUMBER F_FON_SOT 6
BEGIN
PROMPT 29 3 ""
FIELD S1[19,24]
FLAGS "Z"
USE LF_PCON SELECT SOTTOCONTO!=""
COPY INPUT F_FON_CO
INPUT SOTTOCONTO F_FON_SOT
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR
COPY OUTPUT F_FON_CO
OUTPUT F_FON_SOT SOTTOCONTO
OUTPUT F_FON_DES DESCR
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
STRING F_FON_DES 50 32
BEGIN
PROMPT 39 3 ""
USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
INPUT DESCR F_FON_DES
DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_FON_SOT
ADD RUN CG0 -0
CHECKTYPE NORMAL
END
NUMBER F_QNOR_GR 3
BEGIN
PROMPT 2 4 "Amm. Normali "
FIELD S1[25,27]
FLAGS "Z"
USE LF_PCON SELECT CONTO=""
INPUT GRUPPO F_QNOR_GR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_QNOR_GR GRUPPO
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
NUMBER F_QNOR_CO 3
BEGIN
PROMPT 22 4 ""
FIELD S1[28,30]
FLAGS "Z"
USE LF_PCON SELECT ((CONTO!="")&&(SOTTOCONTO="")&&((INDBIL==1)||(INDBIL==2)))
COPY INPUT F_QNOR_GR
INPUT CONTO F_QNOR_CO
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Ind.Bil." INDBIL
DISPLAY "Descrizione@50" DESCR
COPY OUTPUT F_QNOR_GR
OUTPUT F_QNOR_CO CONTO
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
NUMBER F_QNOR_SOT 6
BEGIN
PROMPT 29 4 ""
FIELD S1[31,36]
FLAGS "Z"
USE LF_PCON SELECT SOTTOCONTO!=""
COPY INPUT F_QNOR_CO
INPUT SOTTOCONTO F_QNOR_SOT
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR
COPY OUTPUT F_QNOR_CO
OUTPUT F_QNOR_SOT SOTTOCONTO
OUTPUT F_QNOR_DES DESCR
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
STRING F_QNOR_DES 50 32
BEGIN
PROMPT 39 4 ""
USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
INPUT DESCR F_QNOR_DES
DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_QNOR_SOT
ADD RUN CG0 -0
CHECKTYPE NORMAL
END
NUMBER F_QANT_GR 3
BEGIN
PROMPT 2 5 "Amm. Anticip."
FIELD S1[37,39]
FLAGS "Z"
USE LF_PCON SELECT CONTO=""
INPUT GRUPPO F_QANT_GR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_QANT_GR GRUPPO
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
NUMBER F_QANT_CO 3
BEGIN
PROMPT 22 5 ""
FIELD S1[40,42]
FLAGS "Z"
USE LF_PCON SELECT ((CONTO!="")&&(SOTTOCONTO="")&&((INDBIL==1)||(INDBIL==2)))
COPY INPUT F_QANT_GR
INPUT CONTO F_QANT_CO
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Ind.Bil." INDBIL
DISPLAY "Descrizione@50" DESCR
COPY OUTPUT F_QANT_GR
OUTPUT F_QANT_CO CONTO
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
NUMBER F_QANT_SOT 6
BEGIN
PROMPT 29 5 ""
FIELD S1[43,48]
FLAGS "Z"
USE LF_PCON SELECT SOTTOCONTO!=""
COPY INPUT F_QANT_CO
INPUT SOTTOCONTO F_QANT_SOT
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR
COPY OUTPUT F_QANT_CO
OUTPUT F_QANT_SOT SOTTOCONTO
OUTPUT F_QANT_DES DESCR
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
STRING F_QANT_DES 50 32
BEGIN
PROMPT 39 5 ""
USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
INPUT DESCR F_QANT_DES
DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_QANT_SOT
ADD RUN CG0 -0
CHECKTYPE NORMAL
END
NUMBER F_QACC_GR 3
BEGIN
PROMPT 2 6 "Amm. Accel. "
FIELD S1[49,51]
FLAGS "Z"
USE LF_PCON SELECT CONTO=""
INPUT GRUPPO F_QACC_GR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_QACC_GR GRUPPO
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
NUMBER F_QACC_CO 3
BEGIN
PROMPT 22 6 ""
FIELD S1[52,54]
FLAGS "Z"
USE LF_PCON SELECT ((CONTO!="")&&(SOTTOCONTO="")&&((INDBIL==1)||(INDBIL==2)))
COPY INPUT F_QACC_GR
INPUT CONTO F_QACC_CO
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Ind.Bil." INDBIL
DISPLAY "Descrizione@50" DESCR
COPY OUTPUT F_QACC_GR
OUTPUT F_QACC_CO CONTO
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
NUMBER F_QACC_SOT 6
BEGIN
PROMPT 29 6 ""
FIELD S1[55,60]
FLAGS "Z"
USE LF_PCON SELECT SOTTOCONTO!=""
COPY INPUT F_QACC_CO
INPUT SOTTOCONTO F_QACC_SOT
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR
COPY OUTPUT F_QACC_CO
OUTPUT F_QACC_SOT SOTTOCONTO
OUTPUT F_QACC_DES DESCR
ADD RUN CG0 -0
CHECKTYPE REQUIRED
END
STRING F_QACC_DES 50 32
BEGIN
PROMPT 39 6 ""
USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
INPUT DESCR F_QACC_DES
DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_QACC_SOT
ADD RUN CG0 -0
CHECKTYPE NORMAL
END
ENDPAGE
ENDMASK