Modifica alle anagrafiche di windows :
Aggiunta la tabella Uffici unici delle entrate (%UUE) git-svn-id: svn://10.65.10.50/trunk@5509 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
f5f8ac49a5
commit
8458c0334a
41
ba/bastuue.uml
Executable file
41
ba/bastuue.uml
Executable file
@ -0,0 +1,41 @@
|
|||||||
|
#include "ba3200.h"
|
||||||
|
|
||||||
|
PAGE "Stampa uffici concessione" -1 -1 50 8
|
||||||
|
|
||||||
|
NUMBER F_INIZIO1 3
|
||||||
|
BEGIN
|
||||||
|
PROMPT 3 1 "Da codice "
|
||||||
|
USE %UUE
|
||||||
|
INPUT CODTAB F_INIZIO1
|
||||||
|
DISPLAY "Codice" CODTAB
|
||||||
|
DISPLAY "Dizione@30" S0
|
||||||
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
|
FIELD CODTAB
|
||||||
|
GROUP 1
|
||||||
|
FLAGS "RZ"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_FINE1 3
|
||||||
|
BEGIN
|
||||||
|
PROMPT 3 3 "A codice "
|
||||||
|
COPY USE F_INIZIO1
|
||||||
|
INPUT CODTAB F_FINE1
|
||||||
|
COPY DISPLAY F_INIZIO1
|
||||||
|
OUTPUT F_FINE1 CODTAB
|
||||||
|
FIELD CODTAB
|
||||||
|
GROUP 2
|
||||||
|
FLAGS "RZ"
|
||||||
|
END
|
||||||
|
|
||||||
|
BUTTON DLG_OK 10 2
|
||||||
|
BEGIN
|
||||||
|
PROMPT -12 -1 ""
|
||||||
|
END
|
||||||
|
|
||||||
|
BUTTON DLG_QUIT 10 2
|
||||||
|
BEGIN
|
||||||
|
PROMPT -22 -1 ""
|
||||||
|
END
|
||||||
|
|
||||||
|
ENDPAGE
|
||||||
|
ENDMASK
|
8
ba/batbuue.h
Executable file
8
ba/batbuue.h
Executable file
@ -0,0 +1,8 @@
|
|||||||
|
#define F_CODICE 100
|
||||||
|
#define F_DIZIONE 101
|
||||||
|
#define F_INDIRIZZO 102
|
||||||
|
#define F_CIV 103
|
||||||
|
#define F_CODCOM 104
|
||||||
|
#define F_DENCOM 105
|
||||||
|
#define F_PROVCOM 109
|
||||||
|
#define F_CAP 106
|
15
ba/batbuue.rpt
Executable file
15
ba/batbuue.rpt
Executable file
@ -0,0 +1,15 @@
|
|||||||
|
[Headers]
|
||||||
|
132
|
||||||
|
Tabella concessioni
|
||||||
|
1|@2g%s|Codice
|
||||||
|
1|@10g%s|Descrizione ufficio concessioni
|
||||||
|
1|@62g%s|Indirizzo ufficio
|
||||||
|
1|@99g%s|N. civico
|
||||||
|
1|@111g%s|Comune
|
||||||
|
|
||||||
|
[Rows]
|
||||||
|
1|CODTAB|@2g@6,ls
|
||||||
|
1|S0|@10g@50,ls
|
||||||
|
1|S1|@62g@35,ls
|
||||||
|
1|S3|@99g@10,ls
|
||||||
|
1|S7|@111g@6,ls
|
88
ba/batbuue.uml
Executable file
88
ba/batbuue.uml
Executable file
@ -0,0 +1,88 @@
|
|||||||
|
#include "batbuue.h"
|
||||||
|
|
||||||
|
TOOLBAR "" 0 20 0 2
|
||||||
|
|
||||||
|
#include <toolbar.h>
|
||||||
|
|
||||||
|
ENDPAGE
|
||||||
|
|
||||||
|
PAGE "Uffici concessioni" -1 -1 78 19
|
||||||
|
|
||||||
|
NUMBER F_CODICE 3
|
||||||
|
BEGIN
|
||||||
|
PROMPT 3 1 "Codice "
|
||||||
|
FIELD CODTAB
|
||||||
|
FLAGS "Z"
|
||||||
|
KEY 1
|
||||||
|
USE %UUE
|
||||||
|
INPUT CODTAB F_CODICE
|
||||||
|
DISPLAY "Codice" CODTAB
|
||||||
|
DISPLAY "Dizione@50" S0
|
||||||
|
OUTPUT F_CODICE CODTAB
|
||||||
|
OUTPUT F_DIZIONE S0
|
||||||
|
CHECKTYPE REQUIRED
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_DIZIONE 30
|
||||||
|
BEGIN
|
||||||
|
PROMPT 3 3 "Dizione "
|
||||||
|
FIELD S0
|
||||||
|
KEY 2
|
||||||
|
USE %UUE KEY 2
|
||||||
|
INPUT S0 F_DIZIONE
|
||||||
|
DISPLAY "Dizione@50" S0
|
||||||
|
DISPLAY "Codice" CODTAB
|
||||||
|
OUTPUT F_CODICE CODTAB
|
||||||
|
OUTPUT F_DIZIONE S0
|
||||||
|
CHECKTYPE REQUIRED
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_INDIRIZZO 35
|
||||||
|
BEGIN
|
||||||
|
PROMPT 3 5 "Indirizzo "
|
||||||
|
FIELD S1
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_CIV 5
|
||||||
|
BEGIN
|
||||||
|
PROMPT 56 5 "N."
|
||||||
|
FIELD S3
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_CODCOM 4
|
||||||
|
BEGIN
|
||||||
|
PROMPT 3 7 "Codice comune "
|
||||||
|
FIELD S6
|
||||||
|
FLAGS "U"
|
||||||
|
USE LF_COMUNI KEY 1
|
||||||
|
INPUT STATO ""
|
||||||
|
INPUT COM F_CODCOM
|
||||||
|
#include <comdcod.h>
|
||||||
|
OUTPUT F_CODCOM COM
|
||||||
|
OUTPUT F_DENCOM DENCOM
|
||||||
|
OUTPUT F_PROVCOM PROVCOM
|
||||||
|
OUTPUT F_CAP CAPCOM
|
||||||
|
CHECKTYPE REQUIRED
|
||||||
|
WARNING "Comune non presente"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_DENCOM 50
|
||||||
|
BEGIN
|
||||||
|
PROMPT 3 9 "Denominazione "
|
||||||
|
FLAGS "D"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_PROVCOM 2
|
||||||
|
BEGIN
|
||||||
|
PROMPT 3 11 "Provincia "
|
||||||
|
FLAGS "D"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_CAP 5
|
||||||
|
BEGIN
|
||||||
|
PROMPT 56 11 "CAP "
|
||||||
|
FIELD S7
|
||||||
|
END
|
||||||
|
|
||||||
|
ENDPAGE
|
||||||
|
ENDMASK
|
Loading…
x
Reference in New Issue
Block a user