Files correlati : gli stessi file della 2.1 Ricompilazione Demo : [ ] Commento Riportata la versione 2.1 patch 408 git-svn-id: svn://10.65.10.50/trunk@13463 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			908 lines
		
	
	
		
			12 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			908 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
 | |
| 
 | |
| STRINGA -1 80
 | |
| BEGIN
 | |
|   PROMPT 3 4 "E L E N C O    R I E P I L O G A T I V O"
 | |
| END
 | |
| 
 | |
| STRINGA -1 80 
 | |
| BEGIN
 | |
|   PROMPT 3 6 "D E G L I    A C Q U I S T I"
 | |
| END
 | |
| 
 | |
| STRINGA -1 80 
 | |
| BEGIN
 | |
|   PROMPT 3 8 "I N T R A C O M U N I T A R I    D I    B E N I"
 | |
| END
 | |
| 
 | |
| STRINGA -1 10
 | |
| BEGIN
 | |
|   PROMPT 68 4 "(EURO)"
 | |
| END
 | |
| 
 | |
| STRINGA -1 15
 | |
| BEGIN
 | |
|   PROMPT 20 13 "Periodo    :"
 | |
| END
 | |
| 
 | |
| STRINGA -1 10
 | |
| BEGIN
 | |
|   PROMPT 43 13 "Mese"
 | |
| END
 | |
| 
 | |
| STRINGA -1 10
 | |
| BEGIN
 | |
|   PROMPT 51 13 "Trimestre"
 | |
| END
 | |
| 
 | |
| STRINGA -1 10
 | |
| BEGIN
 | |
|   PROMPT 65 13 "Anno"
 | |
| END
 | |
| 
 | |
| STRINGA -1 20
 | |
| BEGIN
 | |
|   PROMPT 20 16 "Tipo riepilogo: "
 | |
| END
 | |
| 
 | |
| 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
 |