USE 90

END
DESCRIPTION
BEGIN
   90->* "Soggetti Sezioni AVIS"
END

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

SECTION HEADER ODD 4

STRINGA 1 15
BEGIN
	KEY "Cognome e nome"
	PROMPT 1 2 "Cognome e nome"
END

STRINGA 2 10
BEGIN
   KEY "Data nascita"
   PROMPT 37 2 "Data nasc."
END

STRINGA 3 6
BEGIN
   KEY "Tessera"
   PROMPT 48 2 "Tess."
END

STRINGA 4 2
BEGIN
   KEY "Cat.don."
   PROMPT 50 3 "Ca"
END

STRINGA 5 10
BEGIN
   KEY "Data ult. don."
   PROMPT 58 2 "Ult. don."
END

STRINGA 6 4
BEGIN
   KEY "Totale donazioni"
   PROMPT 69 2 "Tot."
END

STRINGA 7 4
BEGIN
   KEY "Totale donazioni"
   PROMPT 69 3 "don."
END

STRINGA 8 6
BEGIN
   KEY "Int. SI"
   PROMPT 73 2 "Int.SI"
END

STRINGA 9 6
BEGIN
   KEY "Int. AF"
   PROMPT 73 3 "Int.AF"
END

STRINGA 10 4
BEGIN
   KEY "Gruppo AB0"
   PROMPT 80 2 "Grup"
END

STRINGA 11 3
BEGIN
   KEY "Rh/AntiD"
   PROMPT 80 3 "Rh"
END

STRINGA 12 14
BEGIN
   KEY "Telefono abitazione"
   PROMPT 85 2 "Tel. abitaz."
END

STRINGA 13 14
BEGIN
   KEY "Telefono lavoro"
   PROMPT 85 3 "Tel. lavoro"
END

STRINGA 14 14
BEGIN
   KEY "Telefono altro"
   PROMPT 100 2 "Tel. altro"
END

STRINGA 15 15
BEGIN
   KEY "Data prosssima SI"
   PROMPT 115 2 "Data pross.SI"
END

STRINGA 16 35
BEGIN
   KEY "Cognome e nome"
   PROMPT 1 4 "-----------------------------------"
END

STRINGA 17 10
BEGIN
   KEY "Data nascita"
   PROMPT 37 4 "----------"
END

STRINGA 18 6
BEGIN
   KEY "Tessera"
   PROMPT 48 4 "------"
END

STRINGA 19 10
BEGIN
   KEY "Data ult. don."
   PROMPT 58 4 "----------"
END

STRINGA 20 3
BEGIN
   KEY "Totale donazioni"
   PROMPT 69 4 "---"
END

STRINGA 21 6
BEGIN
   KEY "Int. SI"
   PROMPT 73 4 "------"
END

STRINGA 22 4
BEGIN
   KEY "Gruppo AB0"
   PROMPT 80 4 "----"
END

STRINGA 23 14
BEGIN
   KEY "Telefono abitazione"
   PROMPT 85 4 "--------------"
END

STRINGA 24 14
BEGIN
   KEY "Telefono altro"
   PROMPT 100 4 "--------------"
END

STRINGA 15 15
BEGIN
   KEY "Data prosssima SI"
   PROMPT 115 4 "-------------"
END

END // END SECTION HEADER

SECTION BODY ODD 3

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 35 2
BEGIN
   KEY "Cognome e nome"
   PROMPT 1 1 ""
END

DATA 4 10
BEGIN
   KEY "Data nascita"
   PROMPT 37 1 ""
   FIELD 90->DATANASC
END

STRINGA 5 6
BEGIN
   KEY "Tessera"
   PROMPT 48 1 ""
   FIELD 90->TESSAVIS
END

STRINGA 6 2
BEGIN
   KEY "Cat.don."
   PROMPT 50 2 ""
   FIELD 90->CATDON
END

DATA 7
BEGIN
   KEY "Data ult. don."
   PROMPT 58 1 ""
   FIELD 90->DATAULTDON
END

STRINGA 8 2
BEGIN
   KEY "Tipo ult. don."
   PROMPT 61 2 ""
   FIELD 90->TIPOULTDON
END

NUMERO 9 3
BEGIN
   KEY "Totale donaz."
   PROMPT 69 1 ""
   FIELD 90->TOTDON
END

NUMERO 10 3
BEGIN
   KEY "Int. SI"
   PROMPT 76 1 ""
   FIELD 90->INTSI
END

NUMERO 11 3
BEGIN
   KEY "Int. AF"
   PROMPT 76 2 ""
   FIELD 90->INTAF
END

STRINGA 12 3
BEGIN
   KEY "Gruppo AB0"
   PROMPT 80 1 ""
   FIELD 90->GRUPPOAB0
END

STRINGA 13 3
BEGIN
   KEY "Rh/AntiD"
   PROMPT 80 2 ""
   FIELD 90->RHANTID
END

STRINGA 14 14
BEGIN
   KEY "Telefono abitazione"
   PROMPT 85 1 ""
   FIELD 90->TELABI
END

STRINGA 15 14
BEGIN
   KEY "Telefono lavoro"
   PROMPT 85 2 ""
   FIELD 90->TELLAV
END

STRINGA 16 14
BEGIN
   KEY "Telefono altro"
   PROMPT 100 1 ""
   FIELD 90->TELALT
END

DATA 17
BEGIN
   KEY "Data prosssima SI"
   PROMPT 115 1 ""
   FIELD 90->DATAPROSSI
END

END // END SECTION BODY

SECTION FOOTER ODD 3

STRINGA 1 10
BEGIN
	KEY "Niente"
	PROMPT 1 1 "---"
END

END // END SECTION FOOTER

END // END FORM