campo-sirio/at/at_etsez.frm
cris 07f76d4bf8 Patch level :
Files correlati     :
Ricompilazione Demo : [ ]
Commento            : Sezioni: aggiunto denominazione da stampare in indirizzo


git-svn-id: svn://10.65.10.50/trunk@6631 c028cbd2-c16b-5b4b-a496-9718f37d4682
1998-05-11 09:52:29 +00:00

151 lines
1.8 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 15 50
BEGIN
KEY "Denominazione"
PROMPT 0 0 ""
FLAG "H"
FIELD 96->DENOMINAZ
MESSAGE RESET,4|COPY,4|DISABLE,1|DISABLE,2|DISABLE,3
MESSAGE EMPTY ENABLE,1|ENABLE,2|ENABLE,3
END
STRINGA 1 25
BEGIN
KEY "Sezione"
FIELD 96->DENSEZ
PROMPT 0 0 ""
FLAGS "H"
MESSAGE RESET,4|COPY,4|"/",2
END
STRINGA 14 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 2
BEGIN
KEY "Denominazione"
PROMPT 1 2 ""
END
STRINGA 5 33 2
BEGIN
KEY "Indirizzo"
PROMPT 1 4 ""
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 6 ""
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 6 ""
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 6 ""
END
STRINGA 13 15
BEGIN
KEY "Spett.le"
PROMPT 1 1 "Spett.le AVIS "
END
END
END