diff --git a/ba/deliig.frm b/ba/deliig.frm new file mode 100755 index 000000000..509cf3cb3 --- /dev/null +++ b/ba/deliig.frm @@ -0,0 +1,607 @@ +USE %IIG +JOIN 6 ALIAS 16 INTO TIPOA=S0[1,1] CODANAGR=S0[2,6] +JOIN 8 TO 16@ ALIAS 18 INTO CODANAGR=CODANAGR +JOIN 13 TO 18@ ALIAS 113 INTO COM=COMNASC +JOIN 13 TO 16@ ALIAS 213 INTO COM=COMRES +JOIN 6 ALIAS 26 INTO TIPOA=S1[1,1] CODANAGR=S1[2,6] +JOIN 8 TO 26@ ALIAS 28 INTO CODANAGR=CODANAGR +JOIN 13 TO 28@ ALIAS 313 INTO COM=COMNASC +JOIN %BAN ALIAS 14 INTO CODTAB=S7 +JOIN %BAN ALIAS 24 INTO CODTAB=S7+S8 +JOIN %UCS TO 213@ ALIAS 34 INTO CODTAB==UFFCSERV +JOIN %UID TO 213@ ALIAS 44 INTO CODTAB==UFFIIDD1 + +END +DESCRIPTION +BEGIN + %IIG->* " " + 6->* "Anagrafica persone fisiche e giuridiche" + 8->* "Anagrafica persone fisiche" + 113@->* "Comuni" + 213@->* "Comuni" + 14@->* "BAN" + 24@->* "BAN" + 313@->* "Comuni" +END + +GENERAL +BEGIN + OFFSET 0 0 + FONT "Courier New" + SIZE 7 +END + +SECTION BODY ODD 72 + +STRINGA +BEGIN + KEY "Azienda di credito" + PROMPT 72 6 "" + FIELD 14@->S0 +END + +STRINGA +BEGIN + KEY "Dipendenza" + PROMPT 72 8 "" + FIELD 24@->S0 +END + +STRINGA +BEGIN + KEY "PROVINCIA Dipendenza" + PROMPT 129 8 "" + FIELD 313@->PROVCOM +END + +GRUPPO +BEGIN + KEY "DATI DICHIARANTE (ALIAS 16 e 18)" +END + +STRINGA +BEGIN + KEY "COGNOME" + PROMPT 11 11 "" + FIELD 16@->RAGSOC[1,30] +END + +STRINGA +BEGIN + KEY "NOME" + PROMPT 65 11 "" + FIELD 16@->RAGSOC[31,0] +END + +LISTA +BEGIN + KEY "Societa'" + PROMPT 93 11 "" + FIELD 6->TIPOA + ITEM "F|" + ITEM "G|X" +END + +DATA +BEGIN + KEY "DATA DI NASCITA" + PROMPT 99 11 "" + PICTURE "##^ ##^ ^###" + FIELD 18@->DATANASC + FORMAT "1444-" +END + +STRINGA +BEGIN + KEY "SESSO (M o F)" + PROMPT 122 11 "" + FIELD 18@->SESSO +END + +STRINGA +BEGIN + KEY "STATO CIVILE" + PROMPT 130 11 "" + FIELD 18@->STATCIV +END + +STRINGA +BEGIN + KEY "COMUNE (o Stato estero) DI NASCITA" + PROMPT 11 13 "" + FIELD 113@->DENCOM +END + +STRINGA +BEGIN + KEY "PROV. DI NASCITA (sigla)" + PROMPT 74 13 "" + FIELD 113@->PROVCOM +END + +STRINGA +BEGIN + KEY "CODICE FISCALE" + PROMPT 83 13 "" + PICTURE "# # # # # # # # # # # # # # # #" + FIELD 16@->COFI +END + +STRINGA +BEGIN + KEY "RESIDENTE IN: COMUNE" + PROMPT 28 15 "" + FIELD 213@->DENCOM +END + +STRINGA +BEGIN + KEY "RESIDENTE IN: PROV. (sigla)" + PROMPT 74 15 "" + FIELD 213@->PROVCOM +END + +STRINGA +BEGIN + KEY "RESIDENTE IN: VIA" + PROMPT 83 15 "" + FIELD 16@->INDRES +END + +STRINGA +BEGIN + KEY "RESIDENTE IN: NUMERO CIVICO" + PROMPT 131 15 "" + FIELD 16@->CIVRES +END + +GRUPPO +BEGIN + KEY "DATI CONIUGE (ALIAS 26 e 28)" +END + +STRINGA +BEGIN + KEY "COGNOME" + PROMPT 11 18 "" + FIELD 26@->RAGSOC[1,30] +END + +STRINGA +BEGIN + KEY "NOME" + PROMPT 65 18 "" + FIELD 26@->RAGSOC[31,0] +END + +DATA +BEGIN + KEY "DATA DI NASCITA" + PROMPT 108 18 "" + PICTURE "##^ ##^ ^###" + FIELD 28@->DATANASC + FORMAT "1444-" +END + +STRINGA +BEGIN + KEY "SESSO (M o F)" + PROMPT 130 18 "" + FIELD 28@->SESSO +END + +STRINGA +BEGIN + KEY "COMUNE (o Stato estero) DI NASCITA" + PROMPT 11 20 "" + FIELD 313@->DENCOM +END + +STRINGA +BEGIN + KEY "PROV. DI NASCITA (sigla)" + PROMPT 74 20 "" + FIELD 313@->PROVCOM +END + +STRINGA +BEGIN + KEY "CODICE FISCALE" + PROMPT 83 20 "" + PICTURE "# # # # # # # # # # # # # # # #" + FIELD 26@->COFI +END + +NUMERO +BEGIN + KEY "Anno di riferimento (saldo IRPEF)" + PROMPT 64 24 "" + PICTURE "# #" + FIELD I0 +END + +NUMERO +BEGIN + KEY "Importo saldo IRPEF" + PROMPT 87 24 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R0 +END + +NUMERO +BEGIN + KEY "Anno di riferimento (acconto IRPEF)" + PROMPT 64 26 "" + PICTURE "# #" + FIELD I1 +END + +NUMERO +BEGIN + KEY "Importo acconto IRPEF" + PROMPT 87 26 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R1 +END + +NUMBER +BEGIN + KEY "Anno di riferimento (saldo ILOR dichiarante)" + PROMPT 64 28 "" + PICTURE "# #" + FIELD I2 +END + +NUMERO +BEGIN + KEY "Importo saldo ILOR dichiarante" + PROMPT 87 28 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R2 +END + +NUMERO +BEGIN + KEY "Anno di riferimento (acconto ILOR dichiarante)" + PROMPT 64 30 "" + PICTURE "# #" + FIELD I3 +END + +NUMERO +BEGIN + KEY "Importo acconto ILOR dichiarante" + PROMPT 87 30 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R3 +END + +NUMERO +BEGIN + KEY "Anno di riferimento (saldo SSN dichiarante)" + PROMPT 64 32 "" + PICTURE "# #" + FIELD I4 +END + +NUMERO +BEGIN + KEY "Importo saldo SSN dichiarante" + PROMPT 87 32 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R4 +END + +NUMERO +BEGIN + KEY "Anno di riferimento (acconto SSN dichiarante)" + PROMPT 64 34 "" + PICTURE "# #" + FIELD I5 +END + +NUMERO +BEGIN + KEY "Importo acconto SSN dichiarante" + PROMPT 87 34 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R5 +END + +STRING +BEGIN + KEY "Codice regione SSN dichiarante" + PROMPT 112 33 "" + PICTURE "# #" + FIELD S6 +END + +NUMERO +BEGIN + KEY "Anno di riferimento (saldo ILOR coniuge)" + PROMPT 64 36 "" + PICTURE "# #" + FIELD I6 +END + +NUMERO +BEGIN + KEY "Importo saldo ILOR coniuge" + PROMPT 87 36 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R6 +END + +NUMERO +BEGIN + KEY "Anno di riferimento (acconto ILOR coniuge)" + PROMPT 64 38 "" + PICTURE "# #" + FIELD I7 +END + +NUMERO +BEGIN + KEY "Importo acconto ILOR coniuge" + PROMPT 87 38 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R7 +END + +NUMERO +BEGIN + KEY "Anno di riferimento (saldo SSN coniuge)" + PROMPT 64 40 "" + PICTURE "# #" + FIELD I8 +END + +NUMERO +BEGIN + KEY "Importo saldo SSN coniuge" + PROMPT 87 40 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R8 +END + +NUMERO +BEGIN + KEY "Anno di riferimento (acconto SSN coniuge)" + PROMPT 64 42 "" + PICTURE "# #" + FIELD I9 +END + +NUMERO +BEGIN + KEY "Importo acconto SSN coniuge" + PROMPT 87 42 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R9 +END + +STRING +BEGIN + KEY "Codice regione SSN coniuge" + PROMPT 112 41 "" + PICTURE "# #" + FIELD S9 +END + +STRINGA +BEGIN + KEY "Centro di servizio o Ufficio imposte dirette" + PROMPT 61 44 "" + PICTURE "# # #" + FIELD 213@->UFFCSERV + FIELD 213@->UFFIIDD1 +END + +STRING +BEGIN + KEY "Intestatario tributo (1)" + PROMPT 34 49 "" + FIELD S2[5,5] +END + +STRING +BEGIN + KEY "Codice tributo (1)" + PROMPT 42 49 "" + FIELD S2[1,4] +END + +STRING +BEGIN + KEY "Codice regione tributo (1)" + PROMPT 112 49 "" + PICTURE "# #" + FIELD S2[6,7] +END + +NUMERO +BEGIN + KEY "Anno di riferimento tributo (1)" + PROMPT 64 49 "" + PICTURE "# #" + FIELD I10 +END + +NUMERO +BEGIN + KEY "Importo tributo (1)" + PROMPT 87 49 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R10 +END + +STRING +BEGIN + KEY "Intestatario tributo (2)" + PROMPT 34 51 "" + FIELD S3[5,5] +END + +STRING +BEGIN + KEY "Codice tributo (2)" + PROMPT 42 51 "" + FIELD S3[1,4] +END + +STRING +BEGIN + KEY "Codice regione tributo (2)" + PROMPT 112 51 "" + PICTURE "# #" + FIELD S3[6,7] +END + +NUMERO +BEGIN + KEY "Anno di riferimento tributo (2)" + PROMPT 64 51 "" + PICTURE "# #" + FIELD I11 +END + +NUMERO +BEGIN + KEY "Importo tributo (2)" + PROMPT 87 51 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R11 +END + +STRING +BEGIN + KEY "Intestatario tributo (3)" + PROMPT 34 53 "" + FIELD S4[5,5] +END + +STRING +BEGIN + KEY "Codice tributo (3)" + PROMPT 42 53 "" + FIELD S4[1,4] +END + +STRING +BEGIN + KEY "Codice regione tributo (3)" + PROMPT 112 53 "" + PICTURE "# #" + FIELD S4[6,7] +END + +NUMERO +BEGIN + KEY "Anno di riferimento tributo (3)" + PROMPT 64 53 "" + PICTURE "# #" + FIELD I12 +END + +NUMERO +BEGIN + KEY "Importo tributo (3)" + PROMPT 87 53 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R12 +END + +STRING +BEGIN + KEY "Intestatario tributo (4)" + PROMPT 34 55 "" + FIELD S5[5,5] +END + +STRING +BEGIN + KEY "Codice tributo (4)" + PROMPT 42 55 "" + FIELD S5[1,4] +END + +STRING +BEGIN + KEY "Codice regione tributo (4)" + PROMPT 112 55 "" + PICTURE "# #" + FIELD S5[6,7] +END + +NUMERO +BEGIN + KEY "Anno di riferimento tributo (4)" + PROMPT 64 55 "" + PICTURE "# #" + FIELD I13 +END + +NUMERO +BEGIN + KEY "Importo tributo (4)" + PROMPT 87 55 "" + MESSAGE ADD,1@ + PICTURE "###.###.###^^^" + FIELD R13 +END + +NUMERO +BEGIN + KEY "TOTALE (in cifre)" + PROMPT 87 58 "" + GROUP 1 + PICTURE "###.###.###^^^" +END + +NUMERO +BEGIN + KEY "TOTALE (in lettere)" + PROMPT 20 61 "" + GROUP 1 + PICTURE "LETTERE" +END + +DATA +BEGIN + KEY "DATA: giorno - mese - anno" + PROMPT 80 66 "" + PICTURE "@ @^ @ @^ ^^@ @" + FIELD D0 + FORMAT "1444-" +END + +STRINGA +BEGIN + KEY "CODICE AZIENDA" + PROMPT 102 66 "" + FIELD S7 +END + +STRINGA +BEGIN + KEY "CODICE DIPENDENZA" + PROMPT 120 66 "" + FIELD S8 +END + +END + +END