campo-sirio/m770/77as.frm
alex 3e0ee48a95 Riportata la R9702 sulla R9703
git-svn-id: svn://10.65.10.50/trunk@5411 c028cbd2-c16b-5b4b-a496-9718f37d4682
1997-10-22 10:59:30 +00:00

153 lines
3.0 KiB
Plaintext
Executable File

USE 12
JOIN 9 INTO CODDITTA=CODDITTA
JOIN 6 INTO TIPOA=TIPOASOC CODANAGR=CODANAGRSO
JOIN 8 TO 6 ALIAS 108 INTO CODANAGR=CODANAGR
JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC
END
DESCRIPTION
BEGIN
12->* "Soci"
9->* "Ditte"
6->* "Anagrafica persone fisiche e giuridiche"
108@->* "Anagrafica persone fisiche"
113@->* "Comuni (nascita)"
END
GENERAL
BEGIN
OFFSET 0 0
FONT "Courier New"
SIZE 11
CARATTERE "X"
INIZIO_POS 1 1
FINE_POS 131
GRID "+++++++++-|"
END
SECTION HEADER FIRST 9
STRINGA 1
BEGIN
KEY "INTESTAZIONE 1"
PROMPT 1 1 "MOD. 770/97 DICHIARAZIONE DEL SOSTITUTO D'IMPOSTA:"
END
STRINGA 2
BEGIN
KEY "INTESTAZIONE 2"
PROMPT 1 3 " ELENCO NOMINATIVO DEGLI AMMINISTRATORI E DEI COMPONENTI DEL COLLEGIO SINDACALE"
END
STRINGA 3
BEGIN
KEY "INTESTAZIONE 3"
PROMPT 1 4 " O DI ALTRO ORGANO DI CONTROLLO DELLA SOCIETA' O ENTE"
END
STRINGA 4
BEGIN
KEY "INTESTAZIONE 4"
PROMPT 1 5 " (o, in mancanza, dei soggetti che rispondono personalmente delle obbligazioni della societa' o ente)"
END
STRINGA 5
BEGIN
KEY "INTESTAZIONE 5"
PROMPT 1 7 "-----------------------------------------------------------------------------------------------------------------------------------"
END
STRINGA 6
BEGIN
KEY "INTESTAZIONE 6"
PROMPT 1 8 "N.ord. Cognome e nome Sesso Comune di nascita Prov. Data Codice fiscale Qual."
// 11111111111111111111111111111111
// 11111111112222222222333333333344444444445555555555666666666677777777778888888888999999999900000000001111111111222222222233
// 12345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901
// 12345 123456789012345678901234567890 123456789012345678901 1 12345678901234567890 12 12/12/123 1234567890123456 1
END
STRINGA 7
BEGIN
KEY "INTESTAZIONE 7"
PROMPT 1 9 "-----------------------------------------------------------------------------------------------------------------------------------"
END
STRINGA 8
BEGIN
KEY "RAGIONE SOCIALE"
PROMPT 60 1 ""
FIELD 9->RAGSOC
END
END
SECTION BODY ODD 1
NUMERO 1
BEGIN
KEY "N.ORD"
PROMPT 1 1 ""
PICTURE "#####"
END
STRINGA 2
BEGIN
KEY "COGNOME"
PROMPT 9 1 ""
FIELD 6->RAGSOC[1,30]
END
STRINGA 3
BEGIN
KEY "NOME"
PROMPT 40 1 ""
FIELD 6->RAGSOC[31,50]
END
STRINGA 4
BEGIN
KEY "SESSO"
PROMPT 64 1 ""
FIELD 108@->SESSO
END
STRINGA 5
BEGIN
KEY "COMUNE DI NASCITA"
PROMPT 69 1 ""
FIELD 113@->DENCOM[1,20]
END
STRINGA 6
BEGIN
KEY "PROV. DI NASCITA"
PROMPT 92 1 ""
FIELD 113@->PROVCOM
END
STRINGA 7
BEGIN
KEY "DATA DI NASCITA"
PROMPT 98 1 ""
FIELD 108@->DATANASC
END
STRINGA 8
BEGIN
KEY "CODICE FISCALE"
PROMPT 109 1 ""
FIELD 6->COFI
END
STRINGA 9
BEGIN
KEY "QUALIFICA"
PROMPT 128 1 ""
FIELD 12->RICQUAL
END
END
END