2401c4a5fc
Files correlati :frm in lista Ricompilazione Demo : [ ] Commento : CM20093 Se il codice della nomenclatura combinata non ha uno dei livelli compilati, la stampa del riepilogo deve comunque stampare gli zeri non significativi. Idem per la generazione del dischetto git-svn-id: svn://10.65.10.50/trunk@11770 c028cbd2-c16b-5b4b-a496-9718f37d4682
861 lines
12 KiB
Plaintext
Executable File
861 lines
12 KiB
Plaintext
Executable File
// Form per la stampa riepiloghi INTRA (Acquisti)
|
|
|
|
USE 9
|
|
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
|
JOIN 8 TO 106@ ALIAS 118 INTO CODANAGR=CODANAGR
|
|
JOIN 13 TO 118@ ALIAS 213 INTO STATO=="" COM==COMNASC
|
|
JOIN 13 TO 106@ ALIAS 313 INTO STATO==STATORES COM==COMRES
|
|
JOIN 13 TO 106@ ALIAS 413 INTO STATO=="" COM==COMRF
|
|
JOIN 6 TO 9 ALIAS 206 INTO TIPOA==TIPOSOGDEL CODANAGR==CODSOGDEL
|
|
JOIN 13 TO 206@ ALIAS 513 INTO STATO==STATORES COM==COMRES
|
|
JOIN 13 TO 206@ ALIAS 613 INTO STATO=="" COM==COMRF
|
|
JOIN 135 TO 9 INTO ANNO=CODDITTA
|
|
END
|
|
|
|
DESCRIPTION
|
|
BEGIN
|
|
END
|
|
|
|
|
|
GENERAL
|
|
BEGIN
|
|
OFFSET 0 0
|
|
CARATTERE "X"
|
|
INIZIO_POS 2 4
|
|
FINE_POS 76
|
|
END
|
|
|
|
SECTION HEADER FIRST 16
|
|
|
|
NUMERO 1 4
|
|
BEGIN
|
|
KEY "Mese"
|
|
PROMPT 43 14 ""
|
|
PICTURE "@ #"
|
|
END
|
|
|
|
NUMERO 2 1
|
|
BEGIN
|
|
KEY "Trimestre"
|
|
PROMPT 55 14 ""
|
|
END
|
|
|
|
NUMERO 3 5
|
|
BEGIN
|
|
KEY "Anno"
|
|
PROMPT 64 14 ""
|
|
PICTURE "^^# #"
|
|
END
|
|
|
|
STRINGA 4 1
|
|
BEGIN
|
|
KEY "Tipo riepilogo"
|
|
PROMPT 40 16 "" //1 dx
|
|
END
|
|
|
|
END
|
|
|
|
SECTION BODY FIRST 33
|
|
|
|
LISTA 99
|
|
BEGIN
|
|
KEY "Tipo anagrafica"
|
|
PROMPT 1 1 ""
|
|
FIELD TIPOA
|
|
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
|
|
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
|
|
END
|
|
|
|
STRINGA 1
|
|
BEGIN
|
|
KEY "Codice Fiscale"
|
|
PROMPT 3 7 ""
|
|
FIELD 106@->COFI
|
|
END
|
|
|
|
STRINGA 2
|
|
BEGIN
|
|
KEY "Partita IVA"
|
|
PROMPT 53 7 ""
|
|
FIELD 106@->PAIV
|
|
END
|
|
|
|
STRINGA 3
|
|
BEGIN
|
|
KEY "Cognome"
|
|
PROMPT 3 10 ""
|
|
FIELD 106@->RAGSOC[1,30]
|
|
GROUP 1
|
|
END
|
|
|
|
STRINGA 4
|
|
BEGIN
|
|
KEY "Nome"
|
|
PROMPT 43 10 ""
|
|
FIELD 106@->RAGSOC[31,50]
|
|
GROUP 1
|
|
END
|
|
|
|
DATA 5
|
|
BEGIN
|
|
KEY "Data di nascita"
|
|
PROMPT 4 13 ""
|
|
FIELD 118@->DATANASC
|
|
FORMAT "1442-"
|
|
PICTURE "# #^# #^# #"
|
|
GROUP 1
|
|
END
|
|
|
|
LISTA 6
|
|
BEGIN
|
|
KEY "Sesso"
|
|
PROMPT 19 13 ""
|
|
FIELD 118@->SESSO
|
|
ITEM "M|X"
|
|
ITEM "F| X"
|
|
GROUP 1
|
|
END
|
|
|
|
STRINGA 7 32
|
|
BEGIN
|
|
KEY "Comune di nascita"
|
|
PROMPT 23 13 ""
|
|
FIELD 213@->DENCOM
|
|
GROUP 1
|
|
END
|
|
|
|
STRINGA 8 2
|
|
BEGIN
|
|
KEY "Provincia di nascita"
|
|
PROMPT 59 13 ""
|
|
FIELD 213@->PROVCOM
|
|
GROUP 1
|
|
END
|
|
|
|
STRINGA 9 4
|
|
BEGIN
|
|
KEY "Prefisso telefonico"
|
|
PROMPT 64 13 ""
|
|
FIELD 106@->PTELRF
|
|
GROUP 1
|
|
END
|
|
|
|
STRINGA 10 9
|
|
BEGIN
|
|
KEY "Numero telefonico"
|
|
PROMPT 69 13 ""
|
|
FIELD 106@->TELRF
|
|
GROUP 1
|
|
END
|
|
|
|
STRINGA 11
|
|
BEGIN
|
|
KEY "Denominazione o ragione sociale"
|
|
PROMPT 3 17 ""
|
|
FIELD 106@->RAGSOC
|
|
GROUP 2
|
|
END
|
|
|
|
STRINGA 12 4
|
|
BEGIN
|
|
KEY "Prefisso telefonico"
|
|
PROMPT 64 17 ""
|
|
FIELD 106@->PTELRF
|
|
GROUP 2
|
|
END
|
|
|
|
STRINGA 13 9
|
|
BEGIN
|
|
KEY "Numero telefonico"
|
|
PROMPT 69 17 ""
|
|
FIELD 106@->TELRF
|
|
GROUP 2
|
|
END
|
|
|
|
STRINGA 14 20
|
|
BEGIN
|
|
KEY "Comune di residenza fiscale"
|
|
PROMPT 52 20 ""
|
|
FIELD 413@->DENCOM
|
|
MESSAGE EMPTY SHOW,3@|HIDE,4@
|
|
MESSAGE SHOW,4@|HIDE,3@
|
|
END
|
|
|
|
STRINGA 15 20
|
|
BEGIN
|
|
KEY "Comune di residenza"
|
|
PROMPT 52 20 ""
|
|
FIELD 313@->DENCOM
|
|
GROUP 3
|
|
END
|
|
|
|
STRINGA 16
|
|
BEGIN
|
|
KEY "Provincia di residenza fiscale"
|
|
PROMPT 74 20 ""
|
|
FIELD 413@->PROVCOM
|
|
GROUP 4
|
|
END
|
|
|
|
STRINGA 17
|
|
BEGIN
|
|
KEY "Provincia di residenza"
|
|
PROMPT 74 20 ""
|
|
FIELD 313@->PROVCOM
|
|
GROUP 3
|
|
END
|
|
|
|
STRINGA 18
|
|
BEGIN
|
|
KEY "Indirizzo residenza fiscale"
|
|
PROMPT 1 20 ""
|
|
FIELD 106@->INDRF[1,35]
|
|
FLAGS "H"
|
|
MESSAGE COPY,20
|
|
END
|
|
|
|
STRINGA 19
|
|
BEGIN
|
|
KEY "Nr. civico di residenza fiscale"
|
|
PROMPT 1 20 ""
|
|
FIELD 106@->CIVRF
|
|
FLAGS "H"
|
|
MESSAGE APPEND,20
|
|
END
|
|
|
|
STRINGA 20 38
|
|
BEGIN
|
|
KEY "Indirizzo residenza fiscale+nr. civico"
|
|
PROMPT 3 20 ""
|
|
GROUP 4
|
|
END
|
|
|
|
STRINGA 21
|
|
BEGIN
|
|
KEY "Indirizzo residenza"
|
|
PROMPT 1 20 ""
|
|
FIELD 106@->INDRES[1,35]
|
|
FLAGS "H"
|
|
MESSAGE COPY,23
|
|
END
|
|
|
|
STRINGA 22
|
|
BEGIN
|
|
KEY "Nr. civico di residenza"
|
|
PROMPT 1 20 ""
|
|
FIELD 106@->CIVRES
|
|
FLAGS "H"
|
|
MESSAGE APPEND,23
|
|
END
|
|
|
|
STRINGA 23 38
|
|
BEGIN
|
|
KEY "Indirizzo residenza+nr. civico"
|
|
PROMPT 3 20 ""
|
|
GROUP 3
|
|
END
|
|
|
|
STRINGA 24
|
|
BEGIN
|
|
KEY "CAP residenza fiscale"
|
|
PROMPT 42 20 ""
|
|
FIELD 106@->CAPRF
|
|
GROUP 4
|
|
END
|
|
|
|
STRINGA 25
|
|
BEGIN
|
|
KEY "CAP residenza"
|
|
PROMPT 42 20 ""
|
|
FIELD 106@->CAPRES
|
|
GROUP 3
|
|
END
|
|
|
|
LISTA 26 1
|
|
BEGIN
|
|
KEY "Elenchi presentati in precedenza"
|
|
PROMPT 7 23 ""
|
|
ITEM " | "
|
|
ITEM "X|X"
|
|
FIELD PRESELEN
|
|
END
|
|
|
|
LISTA 26 1
|
|
BEGIN
|
|
KEY "Cessazione attivita'"
|
|
PROMPT 40 23 ""
|
|
ITEM " | "
|
|
ITEM "X|X"
|
|
FIELD CESSIVA
|
|
END
|
|
|
|
STRINGA 27
|
|
BEGIN
|
|
KEY "Partita IVA delegato"
|
|
PROMPT 11 27 ""
|
|
FIELD 206@->PAIV
|
|
END
|
|
|
|
STRINGA 28 50
|
|
BEGIN
|
|
KEY "Nome e Cognome o Ragione sociale delegato"
|
|
PROMPT 3 30 ""
|
|
FIELD 206@->RAGSOC
|
|
END
|
|
|
|
STRINGA 29 4
|
|
BEGIN
|
|
KEY "Prefisso telefonico delegato"
|
|
PROMPT 64 30 ""
|
|
FIELD 206@->PTELRF
|
|
END
|
|
|
|
STRINGA 30 9
|
|
BEGIN
|
|
KEY "Numero telefonico delegato"
|
|
PROMPT 69 30 ""
|
|
FIELD 206@->TELRF
|
|
END
|
|
|
|
STRINGA 31 20
|
|
BEGIN
|
|
KEY "Comune di residenza fiscale delegato"
|
|
PROMPT 52 33 ""
|
|
FIELD 613@->DENCOM
|
|
MESSAGE EMPTY SHOW,5@|HIDE,6@
|
|
MESSAGE SHOW,6@|HIDE,5@
|
|
END
|
|
|
|
STRINGA 32 20
|
|
BEGIN
|
|
KEY "Comune di residenza delegato"
|
|
PROMPT 52 33 ""
|
|
FIELD 513@->DENCOM
|
|
GROUP 5
|
|
END
|
|
|
|
STRINGA 33
|
|
BEGIN
|
|
KEY "Provincia di residenza fiscale delegato"
|
|
PROMPT 74 33 ""
|
|
FIELD 613@->PROVCOM
|
|
GROUP 6
|
|
END
|
|
|
|
STRINGA 34
|
|
BEGIN
|
|
KEY "Provincia di residenza delegato"
|
|
PROMPT 74 33 ""
|
|
FIELD 513@->PROVCOM
|
|
GROUP 5
|
|
END
|
|
|
|
STRINGA 35
|
|
BEGIN
|
|
KEY "Indirizzo residenza fiscale delegato"
|
|
PROMPT 1 33 ""
|
|
FIELD 206@->INDRF[1,35]
|
|
FLAGS "H"
|
|
MESSAGE COPY,37
|
|
END
|
|
|
|
STRINGA 36
|
|
BEGIN
|
|
KEY "Nr. civico di residenza fiscale delegato"
|
|
PROMPT 1 33 ""
|
|
FIELD 206@->CIVRF
|
|
FLAGS "H"
|
|
MESSAGE APPEND,37
|
|
END
|
|
|
|
STRINGA 37 38
|
|
BEGIN
|
|
KEY "Indirizzo residenza fiscale+nr. civico delegato"
|
|
PROMPT 3 33 ""
|
|
GROUP 6
|
|
END
|
|
|
|
STRINGA 38
|
|
BEGIN
|
|
KEY "Indirizzo residenza delegato"
|
|
PROMPT 1 33 ""
|
|
FIELD 206@->INDRES[1,35]
|
|
FLAGS "H"
|
|
MESSAGE COPY,40
|
|
END
|
|
|
|
STRINGA 39
|
|
BEGIN
|
|
KEY "Nr. civico di residenza delegato"
|
|
PROMPT 1 33 ""
|
|
FIELD 206@->CIVRES
|
|
FLAGS "H"
|
|
MESSAGE APPEND,40
|
|
END
|
|
|
|
STRINGA 40 38
|
|
BEGIN
|
|
KEY "Indirizzo residenza+nr. civico delegato"
|
|
PROMPT 3 33 ""
|
|
GROUP 5
|
|
END
|
|
|
|
STRINGA 41
|
|
BEGIN
|
|
KEY "CAP residenza fiscale delegato"
|
|
PROMPT 42 33 ""
|
|
FIELD 206@->CAPRF
|
|
GROUP 6
|
|
END
|
|
|
|
STRINGA 42
|
|
BEGIN
|
|
KEY "CAP residenza delegato"
|
|
PROMPT 42 33 ""
|
|
FIELD 206@->CAPRES
|
|
GROUP 5
|
|
END
|
|
|
|
END
|
|
|
|
SECTION FOOTER FIRST 23
|
|
|
|
NUMERO 1 3
|
|
BEGIN
|
|
KEY "Totale pagine sezione 1"
|
|
PROMPT 11 6 ""
|
|
END
|
|
|
|
NUMERO 2 5
|
|
BEGIN
|
|
KEY "Totale righe dettaglio sezione 1"
|
|
PROMPT 18 6 ""
|
|
END
|
|
|
|
NUMERO 3 15
|
|
BEGIN
|
|
KEY "Ammontare complessivo sezione 1"
|
|
PROMPT 25 6 ""
|
|
PICTURE "###.###.###"
|
|
MESSAGE _IMP
|
|
END
|
|
|
|
NUMERO 4 3
|
|
BEGIN
|
|
KEY "Totale pagine sezione 2"
|
|
PROMPT 49 6 ""
|
|
END
|
|
|
|
NUMERO 5 5
|
|
BEGIN
|
|
KEY "Totale righe dettaglio sezione 2"
|
|
PROMPT 56 6 ""
|
|
END
|
|
|
|
NUMERO 6 15
|
|
BEGIN
|
|
KEY "Ammontare complessivo sezione 2"
|
|
PROMPT 64 6 ""
|
|
PICTURE "###.###.###"
|
|
MESSAGE _IMP
|
|
END
|
|
|
|
DATA 8 10
|
|
BEGIN
|
|
KEY "Data di stampa"
|
|
PROMPT 6 10 ""
|
|
MESSAGE _TODAY
|
|
END
|
|
|
|
END
|
|
|
|
SECTION HEADER ODD 21
|
|
|
|
NUMERO 1 4
|
|
BEGIN
|
|
KEY "Mese"
|
|
PROMPT 16 15 ""
|
|
PICTURE "@ #"
|
|
END
|
|
|
|
NUMERO 2 1
|
|
BEGIN
|
|
KEY "Trimestre"
|
|
PROMPT 29 15 ""
|
|
END
|
|
|
|
NUMERO 3 5
|
|
BEGIN
|
|
KEY "Anno"
|
|
PROMPT 37 15 ""
|
|
PICTURE "^^# #"
|
|
END
|
|
|
|
STRINGA 4
|
|
BEGIN
|
|
KEY "Partita IVA"
|
|
PROMPT 53 15 ""
|
|
FIELD 106@->PAIV
|
|
END
|
|
|
|
END
|
|
|
|
SECTION BODY ODD 2
|
|
|
|
NUMERO 1 3
|
|
BEGIN
|
|
KEY "Progressivo riga"
|
|
PROMPT 3 1 ""
|
|
FIELD 135->NUMRIG
|
|
END
|
|
|
|
STRINGA 2 2
|
|
BEGIN
|
|
KEY "Stato"
|
|
PROMPT 7 1 ""
|
|
FIELD 135->STATO
|
|
END
|
|
|
|
STRINGA 3
|
|
BEGIN
|
|
KEY "Partita IVA"
|
|
PROMPT 11 1 ""
|
|
FIELD 135->PIVA
|
|
END
|
|
|
|
NUMERO 4 12
|
|
BEGIN
|
|
KEY "Ammontare operazioni in Euro" //++
|
|
PROMPT 23 1 "" //2 sx
|
|
FIELD 135->AMMLIRE
|
|
PICTURE "####.###.###"
|
|
MESSAGE _IMP
|
|
END
|
|
|
|
STRINGA 51 3
|
|
BEGIN
|
|
PROMPT 35 1 "" //2 sx
|
|
FIELD 135->CODVAL
|
|
FLAGS "H"
|
|
END
|
|
|
|
NUMERO 5 12
|
|
BEGIN
|
|
KEY "Ammontare operazioni in valuta"
|
|
PROMPT 35 1 "" //2 sx
|
|
FIELD 135->AMMVALUTA
|
|
MESSAGE _IMP
|
|
PICTURE "####.###.###"
|
|
END
|
|
|
|
STRINGA 6 1
|
|
BEGIN
|
|
KEY "Natura della transazione"
|
|
PROMPT 49 1 "" //1 sx
|
|
FIELD 135->NATURA
|
|
END
|
|
|
|
NUMERO 7 4
|
|
BEGIN
|
|
KEY "Nomenclatura combinata prima parte"
|
|
PROMPT 53 1 ""
|
|
FIELD 135->NOMENCL[1,4]
|
|
PICTURE "@@@@"
|
|
END
|
|
|
|
NUMERO 71 2
|
|
BEGIN
|
|
KEY "Nomenclatura combinata seconda parte"
|
|
PROMPT 57 1 ""
|
|
FIELD 135->NOMENCL[5,6]
|
|
PICTURE "@@"
|
|
END
|
|
|
|
NUMERO 72 2
|
|
BEGIN
|
|
KEY "Nomenclatura combinata terza parte"
|
|
PROMPT 59 1 ""
|
|
FIELD 135->NOMENCL[7,8]
|
|
PICTURE "@@"
|
|
END
|
|
|
|
NUMERO 8 9
|
|
BEGIN
|
|
KEY "Massa netta in kilogrammi"
|
|
PROMPT 62 1 ""
|
|
FIELD 135->MASSAKG
|
|
PICTURE "#########"
|
|
MESSAGE _ROUND,0
|
|
END
|
|
|
|
NUMERO 9 9
|
|
BEGIN
|
|
KEY "Massa in unita' supplementare"
|
|
PROMPT 72 1 "" //1 sx
|
|
FIELD 135->MASSAUMS
|
|
PICTURE "#########"
|
|
MESSAGE _ROUND,0
|
|
END
|
|
|
|
NUMERO 10 12
|
|
BEGIN
|
|
KEY "Valore statistico"
|
|
PROMPT 82 1 "" //2 sx
|
|
FIELD 135->VALSTAT
|
|
PICTURE "####.###.###"
|
|
MESSAGE _IMP
|
|
END
|
|
|
|
STRINGA 11 1
|
|
BEGIN
|
|
KEY "Codice consegna"
|
|
PROMPT 96 1 "" //1 sx
|
|
FIELD 135->CONSEGNA[1,1]
|
|
END
|
|
|
|
STRINGA 12 1
|
|
BEGIN
|
|
KEY "Modo di trasporto"
|
|
PROMPT 99 1 "" //1 sx
|
|
FIELD 135->TRASPORTO
|
|
END
|
|
|
|
STRINGA 13 2
|
|
BEGIN
|
|
KEY "Paese destinazione/provenienza"
|
|
PROMPT 102 1 "" //1 sx
|
|
FIELD 135->PAESE
|
|
END
|
|
|
|
STRINGA 14 2
|
|
BEGIN
|
|
KEY "Paese di origine"
|
|
PROMPT 106 1 "" //1 sx
|
|
FIELD 135->PAESEORIG
|
|
END
|
|
|
|
STRINGA 15 2
|
|
BEGIN
|
|
KEY "Provincia di destinazione"
|
|
PROMPT 110 1 "" //1 sx
|
|
FIELD 135->PROV
|
|
END
|
|
|
|
END
|
|
|
|
SECTION FOOTER ODD 31
|
|
|
|
NUMERO 1 12
|
|
BEGIN
|
|
KEY "Riporto dalla pagina precedente"
|
|
PROMPT 23 1 "" //2 sx
|
|
PICTURE "####.###.###"
|
|
MESSAGE _IMP
|
|
END
|
|
|
|
NUMERO 2 12
|
|
BEGIN
|
|
KEY "Totale riepiloghi"
|
|
PROMPT 23 3 "" //2 sx
|
|
PICTURE "####.###.###"
|
|
MESSAGE _IMP
|
|
END
|
|
|
|
NUMERO 3 3
|
|
BEGIN
|
|
KEY "Numero di pagina"
|
|
PROMPT 110 3 "" //1 sx
|
|
END
|
|
|
|
END
|
|
|
|
SECTION HEADER EVEN 22
|
|
|
|
NUMERO 1 4
|
|
BEGIN
|
|
KEY "Mese"
|
|
PROMPT 16 15 ""
|
|
PICTURE "@ #"
|
|
END
|
|
|
|
NUMERO 2 1
|
|
BEGIN
|
|
KEY "Trimestre"
|
|
PROMPT 29 15 ""
|
|
PICTURE ""
|
|
END
|
|
|
|
NUMERO 3 6
|
|
BEGIN
|
|
KEY "Anno"
|
|
PROMPT 37 15 ""
|
|
PICTURE "^^# #"
|
|
END
|
|
|
|
STRINGA 4
|
|
BEGIN
|
|
KEY "Partita IVA"
|
|
PROMPT 53 15 ""
|
|
FIELD 106@->PAIV
|
|
END
|
|
|
|
END
|
|
|
|
// Sezione di stampa rettifiche
|
|
|
|
SECTION BODY EVEN 2
|
|
|
|
NUMERO 1 3
|
|
BEGIN
|
|
KEY "Progressivo riga"
|
|
PROMPT 3 1 ""
|
|
FIELD 135->NUMRIG
|
|
END
|
|
|
|
NUMERO 2 2
|
|
BEGIN
|
|
KEY "Mese del periodo di riferimento (riempito da programma)"
|
|
PROMPT 7 1 ""
|
|
PICTURE "#@"
|
|
END
|
|
|
|
NUMERO 3 1
|
|
BEGIN
|
|
KEY "Trimestre del periodo di riferimento (riempito da programma)"
|
|
PROMPT 11 1 ""
|
|
PICTURE "@"
|
|
END
|
|
|
|
NUMERO 4 4
|
|
BEGIN
|
|
KEY "Anno del periodo di riferimento"
|
|
PROMPT 14 1 ""
|
|
FIELD 135->ANNORETT
|
|
END
|
|
|
|
STRINGA 5 2
|
|
BEGIN
|
|
KEY "Stato"
|
|
PROMPT 19 1 ""
|
|
FIELD 135->STATO
|
|
END
|
|
|
|
STRINGA 6
|
|
BEGIN
|
|
KEY "Partita IVA"
|
|
PROMPT 23 1 ""
|
|
FIELD 135->PIVA
|
|
END
|
|
|
|
STRINGA 7 1
|
|
BEGIN
|
|
KEY "Segno"
|
|
PROMPT 37 1 ""
|
|
FIELD 135->SEGNORETT
|
|
END
|
|
|
|
NUMERO 8 12
|
|
BEGIN
|
|
KEY "Ammontare operazioni in Euro"
|
|
PROMPT 39 1 "" //2 sx
|
|
FIELD 135->AMMLIRE
|
|
PICTURE "####.###.###"
|
|
MESSAGE _IMP
|
|
END
|
|
|
|
STRINGA 91 3
|
|
BEGIN
|
|
PROMPT 35 1 "" //2 sx
|
|
FIELD 135->CODVAL
|
|
FLAGS "H"
|
|
END
|
|
|
|
NUMERO 9 12
|
|
BEGIN
|
|
KEY "Ammontare operazioni in valuta"
|
|
PROMPT 52 1 "" //2 sx
|
|
FIELD 135->AMMVALUTA
|
|
MESSAGE _IMP
|
|
PICTURE "####.###.###"
|
|
END
|
|
|
|
STRINGA 10 1
|
|
BEGIN
|
|
KEY "Natura della transazione"
|
|
PROMPT 65 1 "" //1 sx
|
|
FIELD 135->NATURA
|
|
END
|
|
|
|
NUMERO 11 4
|
|
BEGIN
|
|
KEY "Nomenclatura combinata prima parte"
|
|
PROMPT 68 1 "" //1 sx
|
|
FIELD 135->NOMENCL[1,4]
|
|
PICTURE "@@@@"
|
|
END
|
|
|
|
NUMERO 111 2
|
|
BEGIN
|
|
KEY "Nomenclatura combinata seconda parte"
|
|
PROMPT 72 1 ""
|
|
FIELD 135->NOMENCL[5,6]
|
|
PICTURE "@@"
|
|
END
|
|
|
|
NUMERO 112 2
|
|
BEGIN
|
|
KEY "Nomenclatura combinata terza parte"
|
|
PROMPT 74 1 ""
|
|
FIELD 135->NOMENCL[7,8]
|
|
PICTURE "@@"
|
|
END
|
|
|
|
NUMERO 12 12
|
|
BEGIN
|
|
KEY "Valore statistico"
|
|
PROMPT 78 1 "" //2 sx
|
|
FIELD 135->VALSTAT
|
|
PICTURE "####.###.###"
|
|
MESSAGE _IMP
|
|
END
|
|
|
|
END
|
|
|
|
SECTION FOOTER EVEN 36
|
|
|
|
STRINGA 4 1
|
|
BEGIN
|
|
KEY "Segno riporto rettifiche"
|
|
PROMPT 37 1 ""
|
|
END
|
|
|
|
NUMERO 1 12
|
|
BEGIN
|
|
KEY "Riporto dalla pagina precedente"
|
|
PROMPT 39 1 "" //2 sx
|
|
PICTURE "####.###.###"
|
|
MESSAGE _IMP
|
|
END
|
|
|
|
STRINGA 7 1
|
|
BEGIN
|
|
KEY "Segno Totale rettifiche"
|
|
PROMPT 37 3 ""
|
|
END
|
|
|
|
NUMERO 2 12
|
|
BEGIN
|
|
KEY "Totale rettifiche"
|
|
PROMPT 39 3 "" //2 sx
|
|
PICTURE "####.###.###"
|
|
MESSAGE _IMP
|
|
END
|
|
|
|
NUMERO 3 3
|
|
BEGIN
|
|
KEY "Numero di pagina"
|
|
PROMPT 87 4 "" //2 sx
|
|
END
|
|
|
|
END
|