USE 90
JOIN 13 INTO COM==DOM_CODCOM
JOIN LCP ALIAS 100 INTO CODTAB==DOM_CODLOC

END
DESCRIPTION
BEGIN
   90->* "Soggetti Sezioni AVIS"
   13->* "COMUNI"
   100@->* "Localita' postali"
END

GENERAL
BEGIN
   OFFSET 0 0
   FONT "Roman"
   SIZE 12
   GRID ""
END

SECTION BODY ODD 24

STRINGA 1 25
BEGIN
   KEY "Cognome"
   FIELD 90->COGNOME
   PROMPT 0 0 ""
   FLAGS "H"
   MESSAGE RESET,3|COPY,3
END

STRINGA 2 25
BEGIN
   KEY "Nome"
   FIELD 90->NOME
   PROMPT 0 0 ""
   FLAGS "H"
   MESSAGE APPEND,3
END

STRINGA 3 25 2
BEGIN
   KEY "Cognome e nome"
   PROMPT 32 13 ""
END

STRINGA 4 20 2
BEGIN
   KEY "Indirizzo"
   FIELD 90->DOM_INDIR
   PROMPT 32 15 ""
END

STRINGA 5 4
BEGIN
   KEY "Codice localita'"
   FIELD 90->DOM_CODLOC
   PROMPT 0 0 ""
   FLAGS "H"
END

STRINGA 6 5
BEGIN
   KEY "CAP"
   FIELD 100@->S6
   FIELD 13->CAPCOM
   PROMPT 32 17 ""
END

STRINGA 7 30
BEGIN
   KEY "Denominazione localita' o comune"
   FIELD 100@->S0
   FIELD 13->DENCOM
   PROMPT 0 0 ""
   FLAGS "H"
   MESSAGE RESET,9|COPY,9
END

STRINGA 8 5
BEGIN
   KEY "Provincia"
   FIELD 13->PROVCOM
   PROMPT 0 0 ""
   FLAGS "H"
   MESSAGE APPEND,9
END

STRINGA 9 22 3
BEGIN
   KEY "Loc./Com. e Prov."
   PROMPT 38 17 ""
END

STRINGA 10 25
BEGIN
 KEY "Invito per"
 PROMPT 3 9 ""
END

STRINGA 11 25
BEGIN
 KEY "Data convocazione"
 PROMPT 3 12 ""
END

STRINGA 12 25
BEGIN
 KEY "Presso: riga 1"
 PROMPT 3 14 ""
END

STRINGA 13 25
BEGIN
 KEY "Presso: riga 2"
 PROMPT 3 15 ""
END

STRINGA 14 25
BEGIN
 KEY "Presso: riga 3"
 PROMPT 3 16 ""
END

STRINGA 15 25
BEGIN
 KEY "Presso: riga 4"
 PROMPT 3 17 ""
END

STRINGA 16 14
BEGIN
 KEY "Orario"
 PROMPT 14 19 ""
END

STRINGA 17 10
BEGIN
 KEY "Data cartolina"
 PROMPT 18 21 ""
END

STRINGA 18 25
BEGIN
 KEY "Note"
 PROMPT 3 23 ""
END

STRINGA 19 20
BEGIN
 KEY "Intestazione 1"
 PROMPT 15 5 ""
END

STRINGA 20 20
BEGIN
 KEY "Intestazione 2"
 PROMPT 15 6 ""
END

STRINGA 21 20
BEGIN
 KEY "Intestazione 3"
 PROMPT 15 7 ""
END

STRINGA 22 20
BEGIN
 KEY "Intestazione 4"
 PROMPT 15 8 ""
END

END

END