f2185ee347
Files correlati : un casino Ricompilazione Demo : [ ] Commento : allineato versione git-svn-id: svn://10.65.10.50/trunk@13415 c028cbd2-c16b-5b4b-a496-9718f37d4682
122 lines
1.4 KiB
Plaintext
Executable File
122 lines
1.4 KiB
Plaintext
Executable File
USE 96
|
|
JOIN 13 INTO COM==COM
|
|
JOIN LCP INTO CODTAB==LOCALITA
|
|
END
|
|
DESCRIPTION
|
|
BEGIN
|
|
96->* "Sezioni"
|
|
13->* "COMUNI"
|
|
LCP->* "Località postali"
|
|
END
|
|
GENERAL
|
|
BEGIN
|
|
OFFSET 0 0
|
|
FONT "Arial"
|
|
SIZE 12
|
|
GRID ""
|
|
END
|
|
SECTION BODY ODD 9
|
|
STRINGA 1 25
|
|
BEGIN
|
|
KEY "Sezione"
|
|
FIELD 96->DENSEZ
|
|
PROMPT 0 0 ""
|
|
FLAGS "H"
|
|
MESSAGE RESET,4|COPY,4|"/",2
|
|
END
|
|
STRINGA 13 25
|
|
BEGIN
|
|
KEY "/"
|
|
FIELD 96->DENSOT
|
|
PROMPT 0 0 ""
|
|
FLAGS "H"
|
|
MESSAGE EMPTY RESET,2
|
|
END
|
|
STRINGA 2 1
|
|
BEGIN
|
|
KEY "/"
|
|
PROMPT 0 0 ""
|
|
FLAGS "H"
|
|
MESSAGE APPEND,4
|
|
END
|
|
STRINGA 3 25
|
|
BEGIN
|
|
KEY "Sottogruppo"
|
|
FIELD 96->DENSOT
|
|
PROMPT 0 0 ""
|
|
FLAGS "H"
|
|
MESSAGE APPEND,4
|
|
END
|
|
STRINGA 4 33 3
|
|
BEGIN
|
|
KEY "Denominazione"
|
|
PROMPT 1 2 ""
|
|
END
|
|
STRINGA 5 33 2
|
|
BEGIN
|
|
KEY "Indirizzo"
|
|
PROMPT 1 5 ""
|
|
FIELD 96->INDIRIZZO
|
|
END
|
|
STRINGA 6 4
|
|
BEGIN
|
|
KEY "Codice localita'"
|
|
PROMPT 0 0 ""
|
|
FLAG "H"
|
|
FIELD 96->LOCALITA
|
|
MESSAGE ENABLE,1@|DISABLE,2@
|
|
MESSAGE EMPTY ENABLE,2@|DISABLE,1@
|
|
END
|
|
STRINGA 7 5
|
|
BEGIN
|
|
KEY "CAP loc."
|
|
PROMPT 1 7 ""
|
|
FIELD LCP->S6
|
|
GROUP 1
|
|
END
|
|
STRINGA 8 30
|
|
BEGIN
|
|
KEY "Localita'"
|
|
PROMPT 0 0 ""
|
|
FIELD LCP->S0
|
|
GROUP 1
|
|
FLAG "H"
|
|
MESSAGE RESET,12|COPY,12
|
|
END
|
|
STRINGA 9 5
|
|
BEGIN
|
|
KEY "CAP"
|
|
PROMPT 1 7 ""
|
|
FIELD 13->CAPCOM
|
|
GROUP 2
|
|
END
|
|
STRINGA 10 50
|
|
BEGIN
|
|
KEY "Comune"
|
|
PROMPT 0 0 ""
|
|
FIELD 13->DENCOM
|
|
GROUP 2
|
|
FLAG "H"
|
|
MESSAGE RESET,12|COPY,12
|
|
END
|
|
STRINGA 11 5
|
|
BEGIN
|
|
KEY "Provincia"
|
|
PROMPT 0 0 ""
|
|
FIELD 13->PROVCOM
|
|
FLAG "H"
|
|
MESSAGE APPEND,12
|
|
END
|
|
STRINGA 12 27 2
|
|
BEGIN
|
|
KEY "Loc./Com. e Prov."
|
|
PROMPT 7 7 ""
|
|
END
|
|
STRINGA 13 15
|
|
BEGIN
|
|
KEY "Spett.le"
|
|
PROMPT 1 1 "Spett.le AVIS "
|
|
END
|
|
END
|
|
END
|