Form per etichette richieste da Rimini

git-svn-id: svn://10.65.10.50/trunk@6139 c028cbd2-c16b-5b4b-a496-9718f37d4682

at/ateticrn.frm

@@ -0,0 +1,111 @@
+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 ""
+   SIZE 12
+   GRID ""
+END
+
+SECTION BODY ODD 6
+
+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 30
+BEGIN
+   KEY "Cognome e nome"
+   PROMPT 1 2 ""
+END
+
+STRINGA 4 30
+BEGIN
+   KEY "Indirizzo"
+   FIELD 90->DOM_INDIR
+   PROMPT 1 3 ""
+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 1 4 ""
+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 50 2
+BEGIN
+   KEY "Loc./Com. e Prov."
+   PROMPT 7 4 ""
+END
+
+STRINGA 10 4
+BEGIN
+   KEY "Categoria"
+   PROMPT 1 1 ""
+   FIELD 90->CATDON
+END
+
+STRINGA 11 6
+BEGIN
+   KEY "Tessera"
+   PROMPT 5 1 ""
+   FIELD 90->TESSAVIS
+END
+
+END
+
+END