Aggiunta tabella %VER per "Versamenti ed interessi IVA".

git-svn-id: svn://10.65.10.50/trunk@2757 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-04-24 10:41:04 +00:00
parent dcf6553973
commit a0fd351764
5 changed files with 425 additions and 0 deletions

7
ba/bastver.h Executable file
View File

@ -0,0 +1,7 @@
//campi di bastesc.uml
#define F_INIZIO1 101
#define F_INIZIO2 102
#define F_FINE1 103
#define F_FINE2 104

66
ba/bastver.uml Executable file
View File

@ -0,0 +1,66 @@
#include "bastver.h"
PAGE "Stampa tabella versamenti ed interessi IVA " -1 -1 40 8
NUMBER F_INIZIO1 4
BEGIN
PROMPT 1 1 "Da anno "
HELP "Anno esercizio con cui iniziare la stampa"
FLAGS "ZR"
USE %VER KEY 1
INPUT CODTAB[1,4] F_INIZIO1
DISPLAY "Anno esercizio" CODTAB[1,4]
DISPLAY "Mese esercizio" CODTAB[5,6]
OUTPUT F_INIZIO1 CODTAB[1,4]
OUTPUT F_INIZIO2 CODTAB[5,6]
END
NUMBER F_INIZIO2 2
BEGIN
PROMPT 28 1 "Mese "
HELP "Mese esercizio con cui iniziare la stampa"
FLAGS "ZR"
COPY USE F_INIZIO1
INPUT CODTAB[1,4] F_INIZIO1
INPUT CODTAB[5,6] F_INIZIO2
COPY DISPLAY F_INIZIO1
COPY OUTPUT F_INIZIO1
CHECKTYPE REQUIRED
END
NUMBER F_FINE1 4
BEGIN
PROMPT 1 3 "Ad anno "
HELP "Anno esercizio con cui finire la stampa"
FLAGS "ZR"
COPY USE F_INIZIO1
INPUT CODTAB[1,4] F_FINE1
COPY DISPLAY F_INIZIO1
OUTPUT F_FINE1 CODTAB[1,4]
OUTPUT F_FINE2 CODTAB[5,6]
END
NUMBER F_FINE2 2
BEGIN
PROMPT 28 3 "Mese "
HELP "Mese esercizio con cui finire la stampa"
FLAGS "ZR"
COPY USE F_INIZIO1
INPUT CODTAB[1,4] F_FINE1
INPUT CODTAB[5,6] F_FINE2
COPY DISPLAY F_INIZIO1
COPY OUTPUT F_FINE1
END
BUTTON DLG_OK 8 2
BEGIN
PROMPT -12 -2 ""
END
BUTTON DLG_QUIT 8 2
BEGIN
PROMPT -22 -2 ""
END
ENDPAGE
ENDMASK

33
ba/batbver.h Executable file
View File

@ -0,0 +1,33 @@
// campi maschera batbver.msk
#define F_ANNOES 131
#define F_MESEES 132
#define F_1_TRIMESTRE_P 133
#define F_2_TRIMESTRE_P 134
#define F_3_TRIMESTRE_P 135
#define F_4_TRIMESTRE_P 136
#define F_ANNUALE_P 137
#define F_1_TRIMESTRE 138
#define F_2_TRIMESTRE 139
#define F_3_TRIMESTRE 140
#define F_4_TRIMESTRE 141
#define F_ANNUALE 142
#define F_I_PERIODO_P 143
#define F_I_ANNUALE_P 144
#define F_I_ACCONTO_P 145
#define F_I_INTEGRATIVO_P 146
#define F_I_CESSAZIONE_P 147
#define F_I_ART74_P 148
#define F_I_PERIODO 149
#define F_I_ANNUALE 150
#define F_I_ACCONTO 151
#define F_I_INTEGRATIVO 152
#define F_I_CESSAZIONE 153
#define F_I_ART74 154
#define F_P_LIQ_NORMALE_P 155
#define F_P_LIQ_DIFFERI_P 156
#define F_P_LIQ_NORMALE 157
#define F_P_LIQ_DIFFERI 158
#define F_ANNOES_2 159
#define F_MESEES_2 160

36
ba/batbver.rpt Executable file
View File

@ -0,0 +1,36 @@
[Headers]
80
Tabella versamenti ed interessi IVA
1|@2g%s|Anno
1|@7g%s|Mese
1|@14g%s|% 1^ trim.
1|@27g%s|% 2^ trim.
1|@40g%s|% 3^ trim.
1|@53g%s|% 4^ trim.
1|@66g%s|% annuale
2|@14g%s|% liq. diff.
2|@40g%s|% liq. ann.
3|@19g%s|I. period.
3|@40g%s|I. annuale
3|@67g%s|I. art.74
4|@19g%s|I. cessaz.
4|@40g%s|I. integr.
4|@67g%s|I. acconto
[Rows]
1|CODTAB[1,4]|@2g@4s
1|CODTAB[5,6]|@7g@2s
1|R0|@14g@5,rs
1|R1|@29g@5,rs
1|R2|@44g@5,rs
1|R3|@56g@5,rs
1|R4|@70g@5,rs
2|R11|@15g@5,rs
2|R12|@44g@5,rs
3|R5|@14g@15,rpn|###.###.###.###
3|R6|@34g@15,rpn|###.###.###.###
3|R7|@60g@15,rpn|###.###.###.###
4|R8|@14g@15,rpn|###.###.###.###
4|R9|@34g@15,rpn|###.###.###.###
4|R10|@60g@15,rpn|###.###.###.###

283
ba/batbver.uml Executable file
View File

@ -0,0 +1,283 @@
#include "batbver.h"
TOOLBAR "" 0 20 0 2
#include <toolbar.h>
ENDPAGE
PAGE "Versamenti ed interessi IVA" -1 -1 78 16
GROUPBOX DLG_NULL 78 4
BEGIN
PROMPT 1 0 ""
FLAGS "R"
END
NUMBER F_ANNOES 4
BEGIN
PROMPT 2 1 "Anno di inizio validita' "
HELP "Anno esercizio di riferimento"
FLAGS "ZR"
FIELD CODTAB[1,4]
KEY 1
USE %VER
INPUT CODTAB[1,4] F_ANNOES
DISPLAY "Anno esercizio" CODTAB[1,4]
DISPLAY "Mese esercizio" CODTAB[5,6]
OUTPUT F_ANNOES CODTAB[1,4]
OUTPUT F_MESEES CODTAB[5,6]
MESSAGE COPY,F_ANNOES_2
CHECKTYPE REQUIRED
END
NUMBER F_MESEES 2
BEGIN
PROMPT 2 2 "Mese di inizio validita' "
FIELD CODTAB[5,6]
HELP "Mese esercizio di riferimento"
FLAGS "Z"
KEY 1
SHEET "Codice|Mese@16"
INPUT F_MESEES
OUTPUT F_MESEES
ITEM "01|Gennaio"
ITEM "02|Febbraio"
ITEM "03|Marzo"
ITEM "04|Aprile"
ITEM "05|Maggio"
ITEM "06|Giugno"
ITEM "07|Luglio"
ITEM "08|Agosto"
ITEM "09|Settembre"
ITEM "10|Ottobre"
ITEM "11|Novembre"
ITEM "12|Dicembre"
CHECKTYPE REQUIRED
WARNING "Codice mese non corretto"
MESSAGE COPY,F_MESEES_2
END
GROUPBOX DLG_NULL 78 3
BEGIN
PROMPT 1 4 "Percentuali interessi periodo precedente"
END
NUMBER F_1_TRIMESTRE_P 5 2
BEGIN
PROMPT 2 5 "1 tri. "
FLAGS "D"
END
NUMBER F_2_TRIMESTRE_P 5 2
BEGIN
PROMPT 16 5 "2 tri. "
FLAGS "D"
END
NUMBER F_3_TRIMESTRE_P 5 2
BEGIN
PROMPT 32 5 "3 tri. "
FLAGS "D"
END
NUMBER F_4_TRIMESTRE_P 5 2
BEGIN
PROMPT 49 5 "4 tri. "
FLAGS "D"
END
NUMBER F_ANNUALE_P 5 2
BEGIN
PROMPT 63 5 "Annuale "
FLAGS "D"
END
GROUPBOX DLG_NULL 78 3
BEGIN
PROMPT 1 7 "Percentuali interessi"
END
NUMBER F_1_TRIMESTRE 5 2
BEGIN
PROMPT 2 8 "1 tri. "
FIELD R0
END
NUMBER F_2_TRIMESTRE 5 2
BEGIN
PROMPT 16 8 "2 tri. "
FIELD R1
END
NUMBER F_3_TRIMESTRE 5 2
BEGIN
PROMPT 32 8 "3 tri. "
FIELD R2
END
NUMBER F_4_TRIMESTRE 5 2
BEGIN
PROMPT 49 8 "4 tri. "
FIELD R3
END
NUMBER F_ANNUALE 5 2
BEGIN
PROMPT 63 8 "Annuale "
FIELD R4
END
GROUPBOX DLG_NULL 78 3
BEGIN
PROMPT 1 11 "Percentuali calcolo acconti periodo precedente"
END
NUMBER F_P_LIQ_NORMALE_P 5 2
BEGIN
PROMPT 2 12 "Liquidazione normale "
FLAGS "D"
END
NUMBER F_P_LIQ_DIFFERI_P 5 2
BEGIN
PROMPT 48 12 "Liquidazione differita "
FLAGS "D"
END
GROUPBOX DLG_NULL 78 3
BEGIN
PROMPT 1 14 "Percentuali calcolo acconti"
END
NUMBER F_P_LIQ_NORMALE 5 2
BEGIN
PROMPT 2 15 "Liquidazione normale "
FIELD R11
END
NUMBER F_P_LIQ_DIFFERI 5 2
BEGIN
PROMPT 48 15 "Liquidazione differita "
FIELD R12
END
ENDPAGE
PAGE "" -1 -1 78 16
GROUPBOX DLG_NULL 78 4
BEGIN
PROMPT 1 0 ""
FLAGS "R"
END
NUMBER F_ANNOES_2 4
BEGIN
PROMPT 2 1 "Anno di inizio validita' "
FLAGS "D"
END
NUMBER F_MESEES_2 2
BEGIN
PROMPT 2 2 "Mese di inizio validita' "
FLAGS "DZ"
END
GROUPBOX DLG_NULL 78 5
BEGIN
PROMPT 1 4 "Importi versamenti periodo precedente"
END
NUMBER F_I_PERIODO_P 15
BEGIN
PROMPT 2 5 "Periodico "
PICTURE ".2"
FLAGS "D"
END
NUMBER F_I_ANNUALE_P 15
BEGIN
PROMPT 2 6 "Annuale "
PICTURE ".2"
FLAGS "D"
END
NUMBER F_I_ACCONTO_P 15
BEGIN
PROMPT 2 7 "Acconto "
PICTURE ".2"
FLAGS "D"
END
NUMBER F_I_INTEGRATIVO_P 15
BEGIN
PROMPT 49 5 "Integrativo "
PICTURE ".2"
FLAGS "D"
END
NUMBER F_I_CESSAZIONE_P 15
BEGIN
PROMPT 49 6 "Cessazione "
PICTURE ".2"
FLAGS "D"
END
NUMBER F_I_ART74_P 15
BEGIN
PROMPT 49 7 "Art. 74 "
PICTURE ".2"
FLAGS "D"
END
GROUPBOX DLG_NULL 78 5
BEGIN
PROMPT 1 9 "Importi versamenti"
END
NUMBER F_I_PERIODO 15
BEGIN
PROMPT 2 10 "Periodico "
PICTURE ".2"
FIELD R5
END
NUMBER F_I_ANNUALE 15
BEGIN
PROMPT 2 11 "Annuale "
PICTURE ".2"
FIELD R6
END
NUMBER F_I_ACCONTO 15
BEGIN
PROMPT 2 12 "Acconto "
PICTURE ".2"
FIELD R7
END
NUMBER F_I_INTEGRATIVO 15
BEGIN
PROMPT 49 10 "Integrativo "
PICTURE ".2"
FIELD R8
END
NUMBER F_I_CESSAZIONE 15
BEGIN
PROMPT 49 11 "Cessazione "
PICTURE ".2"
FIELD R9
END
NUMBER F_I_ART74 15
BEGIN
PROMPT 49 12 "Art. 74 "
PICTURE ".2"
FIELD R10
END
ENDPAGE
ENDMASK