5b14bcc2e1
tutti i forms, cambiato il font da Courier New a Roman 17cpi (Generico Solo testo). Aggiunti aqlcuni cambi per la gestione delle persone giuridiche. git-svn-id: svn://10.65.10.50/trunk@2031 c028cbd2-c16b-5b4b-a496-9718f37d4682
199 lines
2.6 KiB
Plaintext
Executable File
199 lines
2.6 KiB
Plaintext
Executable File
USE %ILO
|
|
JOIN 6 ALIAS 16 INTO TIPOA=S0[1,1] CODANAGR=S0[2,6]
|
|
JOIN 7 TO 16@ ALIAS 17 INTO CODANAGR=CODANAGR
|
|
JOIN 13 TO 16@ ALIAS 113 INTO COM=COMRF(COMRES)
|
|
JOIN %BAN ALIAS 14 INTO CODTAB=S7
|
|
JOIN %BAN ALIAS 24 INTO CODTAB=S7+S8
|
|
JOIN %UCS TO 113@ ALIAS 34 INTO CODTAB==UFFCSERV
|
|
JOIN %UID TO 113@ ALIAS 44 INTO CODTAB==UFFIIDD1
|
|
JOIN 13 TO 34@ ALIAS 213 INTO COM=S6
|
|
JOIN 13 TO 24@ ALIAS 313 INTO COM=S5
|
|
JOIN 13 TO 44@ ALIAS 414 INTO COM=S6
|
|
|
|
END
|
|
DESCRIPTION
|
|
BEGIN
|
|
%ILO->* "ILO"
|
|
16@->* "Anagrafica persone fisiche e giuridiche"
|
|
17@->* "Anagrafica persone giuridiche"
|
|
113@->* "Comuni"
|
|
14@->* "BAN"
|
|
24@->* "BAN"
|
|
34@->* "UCS"
|
|
44@->* "UID"
|
|
213@->* "Comuni"
|
|
313@->* "Comuni"
|
|
414@->* "Comuni"
|
|
END
|
|
|
|
GENERAL
|
|
BEGIN
|
|
OFFSET 0 0
|
|
FONT "Roman 17cpi"
|
|
SIZE 12
|
|
END
|
|
|
|
SECTION BODY ODD 72
|
|
|
|
STRINGA 1
|
|
BEGIN
|
|
KEY "Azienda di credito"
|
|
PROMPT 71 8 ""
|
|
FIELD 14@->S0
|
|
END
|
|
|
|
STRINGA 2
|
|
BEGIN
|
|
KEY "Dipendenza"
|
|
PROMPT 71 10 ""
|
|
FIELD 24@->S0
|
|
END
|
|
|
|
STRINGA 3
|
|
BEGIN
|
|
KEY "PROVINCIA dipendenza"
|
|
PROMPT 127 10 ""
|
|
FIELD 313@->PROVCOM
|
|
END
|
|
|
|
GRUPPO 4
|
|
BEGIN
|
|
KEY "SOCIETA'"
|
|
END
|
|
|
|
STRINGA 5
|
|
BEGIN
|
|
KEY "RAGIONE SOCIALE"
|
|
PROMPT 12 18 ""
|
|
FIELD 16@->RAGSOC
|
|
END
|
|
|
|
STRINGA 6
|
|
BEGIN
|
|
KEY "CODICE FISCALE"
|
|
PROMPT 97 18 ""
|
|
PICTURE "# # # # # # # # # # #"
|
|
FIELD 16@->COFI
|
|
END
|
|
|
|
STRINGA 7
|
|
BEGIN
|
|
KEY "COMUNE "
|
|
PROMPT 30 20 ""
|
|
FIELD 113@->DENCOM
|
|
END
|
|
|
|
STRINGA 8
|
|
BEGIN
|
|
KEY "PROVINCIA (sigla)"
|
|
PROMPT 67 20 ""
|
|
FIELD 113@->PROVCOM
|
|
END
|
|
|
|
STRINGA 9
|
|
BEGIN
|
|
KEY "VIA"
|
|
PROMPT 81 20 ""
|
|
FIELD 16@->INDRF
|
|
FIELD 16@->INDRES
|
|
END
|
|
|
|
STRINGA 10
|
|
BEGIN
|
|
KEY "NUMERO CIVICO"
|
|
PROMPT 131 20 ""
|
|
FIELD 16@->CIVRF
|
|
FIELD 16@->CIVRES
|
|
END
|
|
|
|
NUMERO 13
|
|
BEGIN
|
|
KEY "ANNO DI IMPOSTA SALDO"
|
|
PROMPT 51 28 ""
|
|
PICTURE "^^# #"
|
|
FIELD I0
|
|
END
|
|
|
|
NUMERO 14
|
|
BEGIN
|
|
KEY "IMPORTO SALDO: in lettere"
|
|
PROMPT 18 30 ""
|
|
PICTURE "LETTERE"
|
|
FIELD R0
|
|
END
|
|
|
|
NUMERO 15
|
|
BEGIN
|
|
KEY "IMPORTO SALDO: in cifre"
|
|
PROMPT 114 30 ""
|
|
PICTURE "###.###.###^^^"
|
|
FIELD R0
|
|
END
|
|
|
|
NUMERO 17
|
|
BEGIN
|
|
KEY "ANNO DI IMPOSTA ACCONTO"
|
|
PROMPT 51 34 ""
|
|
PICTURE "^^# #"
|
|
FIELD I1
|
|
END
|
|
|
|
NUMERO 18
|
|
BEGIN
|
|
KEY "IMPORTO ACCONTO: in lettere"
|
|
PROMPT 18 36 ""
|
|
PICTURE "LETTERE"
|
|
FIELD R1
|
|
END
|
|
|
|
NUMERO 19
|
|
BEGIN
|
|
KEY "IMPORTO ACCONTO: in cifre"
|
|
PROMPT 114 36 ""
|
|
PICTURE "###.###.###^^^"
|
|
FIELD R1
|
|
END
|
|
|
|
STRINGA 20
|
|
BEGIN
|
|
KEY "CENTRO SERVIZI: Provincia"
|
|
PROMPT 9 49 ""
|
|
FIELD 213@->PROVCOM
|
|
FIELD 414@->PROVCOM
|
|
END
|
|
|
|
STRINGA 21
|
|
BEGIN
|
|
KEY "CENTRO SERVIZI "
|
|
PROMPT 19 49 ""
|
|
FIELD 34@->S0
|
|
FIELD 44@->S0
|
|
END
|
|
|
|
DATA 22
|
|
BEGIN
|
|
KEY "DATA: giorno - mese - anno"
|
|
PROMPT 74 49 ""
|
|
PICTURE "@ @^ @ @^ @ @"
|
|
FIELD D0
|
|
FORMAT "1442-"
|
|
END
|
|
|
|
STRINGA 23
|
|
BEGIN
|
|
KEY "CODICE AZIENDA"
|
|
PROMPT 97 49 ""
|
|
FIELD S7
|
|
END
|
|
|
|
STRINGA 24
|
|
BEGIN
|
|
KEY "CODICE DIPENDENZA"
|
|
PROMPT 120 49 ""
|
|
FIELD S8
|
|
END
|
|
|
|
END
|
|
|
|
END
|