#include "mg4frm.h"
USE LF_ANAMAG KEY 1 
SORT LF_MAG BY ANNOES CODART LIVELLO CODMAG
	JOIN TO LF_ANAMAG INTO ANNOES==1996 CODART==CODART
JOIN MAG TO LF_MAG ALIAS 500 INTO CODTAB==CODMAG[1,3]
JOIN MAG TO LF_MAG ALIAS 501 INTO CODTAB==CODMAG
JOIN GMC TO LF_ANAMAG ALIAS 400 INTO CODTAB==GRMERC[1,3]
JOIN GMC TO LF_ANAMAG ALIAS 401 INTO CODTAB==GRMERC
JOIN LF_UMART TO LF_ANAMAG INTO CODART==CODART
END
	
DESCRIPTION
BEGIN
    47->* "Anagrafica articoli"
    109->* "Archivio Giacenze"
    MAG->* "Tabella magazzini"
    49->* "Unità di misura articoli"
END

GENERAL
BEGIN
    OFFSET 0 0
    CARATTERE "X"
    INIZIALE 5 2
    FINALE 133
END

SECTION HEADER ODD 6

STRINGA 1 40 1
BEGIN
 KEY "nome ditta"
 PROMPT  1 1 "Ditta "
 MESSAGE _DITTA, !RAGSOC
END

STRINGA 2 10
BEGIN
 KEY "Data"
 PROMPT  120 1 "Data "
 MESSAGE _TODAY
END

NUMERO 3 7
BEGIN
 KEY "Nr. pagina"
 PROMPT  137 1 "Pagina "
 MESSAGE _PAGENO
END

NUMERO 4 32
BEGIN
 KEY "Intestazione stampa"
 PROMPT  45 2 "Stampa inventario"
END

STRINGA 5 146
BEGIN
  KEY "Separatore (iniziale)"
  PROMPT 1 3 "------------------------------------------------------------------------------------------------------------------------------------------------------"
END

	LIST FF_ENABLECOLS 
	BEGIN
		FLAGS "H"
		ITEM "|only one, "
		ITEM "1|only one, "
		MESSAGE DISABLE,FG_COL1@|DISABLE,FG_COL2@|DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@
		ITEM "2|two"
		MESSAGE DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@
		ITEM "3|three"
		MESSAGE DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@
		ITEM "4|four"
		MESSAGE DISABLE,FG_COL5@|DISABLE,FG_COL6@
		ITEM "5|five"
		MESSAGE DISABLE,FG_COL6@
		ITEM "6|six"
	END

	STRINGA 1 28
	BEGIN
	  KEY "H1"
		PROMPT 72 4 ""
		MESSAGE _USER,NAMEVAL1
	END
	STRINGA 1 28
	BEGIN
	  KEY "H1"
		PROMPT 101 4 ""
		MESSAGE _USER,NAMEVAL2
		GROUP FG_COL2
	END
	STRINGA 1 28
	BEGIN
	  KEY "H1"
		PROMPT 130 4 ""
		MESSAGE _USER,NAMEVAL3
		GROUP FG_COL3
	END
	STRINGA 1 28
	BEGIN
	  KEY "H1"
		PROMPT 159 4 ""
		MESSAGE _USER,NAMEVAL4
		GROUP FG_COL4
	END
	STRINGA 1 28
	BEGIN
	  KEY "H1"
		PROMPT 188 4 ""
		MESSAGE _USER,NAMEVAL5
		GROUP FG_COL5
	END
	STRINGA 1 28
	BEGIN
	  KEY "H1"
		PROMPT 217 4 ""
		MESSAGE _USER,NAMEVAL6
		GROUP FG_COL6
	END


	STRINGA 6 20
	BEGIN
	  KEY "H1"
		PROMPT 2 5 "Codice"
	END
	STRINGA 7 40
	BEGIN
	  KEY "H1"
		PROMPT 24 5 "Descrizione"
	END
	STRINGA 7 40
	BEGIN
	  KEY "H1"
		PROMPT 45 5 "UM"
	END
	STRINGA 8 12
	BEGIN
	  KEY "H1"
		PROMPT 55 5 "Giacenza"
	END
	STRINGA 8 12
	BEGIN
	  KEY "H1"
		PROMPT 71 5 "Valore"
	END
	STRINGA 9 12
	BEGIN
	  KEY "H1"
		PROMPT 84 5 "Val.unitario"
		GROUP FG_COL2
	END
	STRINGA 9 12
	BEGIN
	  KEY "H1"
		PROMPT 100 5 "Valore"
		GROUP FG_COL2
	END
	STRINGA 10 12
	BEGIN
	  KEY "H1"
		PROMPT 113 5 "Val.unitario"
		GROUP FG_COL2
	END
	STRINGA 10 12
	BEGIN
	  KEY "H1"
		PROMPT 129 5 "Valore"
		GROUP FG_COL3
	END
	STRINGA 11 12
	BEGIN
	  KEY "H1"
		PROMPT 142 5 "Val.unitario"
		GROUP FG_COL3
	END
	STRINGA 12 12
	BEGIN
	  KEY "H1"
		PROMPT 158 5 "Valore"
		GROUP FG_COL4
	END
	STRINGA 13 12
	BEGIN
	  KEY "H1"
		PROMPT 171 5 "Val.unitario"
		GROUP FG_COL4
	END
	STRINGA 14 12
	BEGIN
	  KEY "H1"
		PROMPT 187 5 "Valore"
		GROUP FG_COL5
	END
	STRINGA 15 12
	BEGIN
		KEY "H1"
		PROMPT 200 5 "Val.unitario"
		GROUP FG_COL5
	END
	STRINGA 14 12
	BEGIN
	  KEY "H1"
		PROMPT 216 5 "Valore"
		GROUP FG_COL6
	END
	STRINGA 15 12
	BEGIN
		KEY "H1"
		PROMPT 229 5 "Val.unitario"
		GROUP FG_COL6
	END
STRINGA 17 146
BEGIN
  KEY "Separatore (iniziale)"
  PROMPT 1 6 "------------------------------------------------------------------------------------------------------------------------------------------------------"
END

END

SECTION BODY ODD 0 COLUMNWISE

	LIST FF_ENABLECOLS 
	BEGIN
		FLAGS "H"
		ITEM "|only one, "
		ITEM "1|only one, "
		MESSAGE DISABLE,FG_COL2@|DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@
		ITEM "2|two"
		MESSAGE DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@
		ITEM "3|three"
		MESSAGE DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@
		ITEM "4|four"
		MESSAGE DISABLE,FG_COL5@|DISABLE,FG_COL6@
		ITEM "5|five"
		MESSAGE DISABLE,FG_COL6@
		ITEM "6|six"
	END

	NUMBER FF_FLAGTOTQTA 1
	BEGIN
		FLAGS "H"
	END
	
	SECTION H_CATMER 1 1 2 GROUP 
		STRINGA 11 12 2
		BEGIN
			KEY "CATMER"
			PROMPT 2 1 ""
			MESSAGE _USER,CODCATMER
		END
		STRINGA 12 30 2
		BEGIN
			KEY "CODICE CATMER"
			PROMPT 3 1 ""
			MESSAGE _USER,CATMER|COPY,1550
		END
	END

	STRINGA 60 40 1
	BEGIN
		FLAGS "H"
	  KEY "CATMER" 
	  PROMPT 2 1 ""
		MESSAGE RESET,15@
	END

	SECTION GRUPPI_CATMER 1 0 1 FILE LF_ANAMAG GROUP GRMERC

		STRINGA 60 40 1
		BEGIN
			FLAGS "H"
		  KEY "CATMER" 
		  PROMPT 2 1 ""
			MESSAGE RESET,14@
		END
		SECTION H_GCODART1 1 1 1 GROUP 
			STRINGA 16 12 2 
			BEGIN
				KEY "CODICE GRUPPO"
				PROMPT 2 1 ""
				MESSAGE _USER,CODGRUPPOART,1
			END
			STRINGA 17 30 2 
			BEGIN
			 KEY "CODICE GRUPPO"
			 PROMPT 3 1 ""
			 MESSAGE _USER,GRUPPOART,1|COPY,1450
			END
		END

		SECTION GRUPPI_CODART1 1 0 0 FILE LF_ANAMAG GROUP CODART
			STRINGA 60 40 1
			BEGIN
				FLAGS "H"
			  KEY "CATMER" 
			  PROMPT 2 1 ""
				MESSAGE RESET,13@
			END
			SECTION H_GCODART2 1 1 1 GROUP 
				STRINGA 16 12 2 
				BEGIN
					KEY "CODICE GRUPPO"
					PROMPT 2 1 ""
					MESSAGE _USER,CODGRUPPOART,2
				END
				STRINGA 17 30 2 
				BEGIN
				 KEY "CODICE GRUPPO"
				 PROMPT 3 1 ""
				 MESSAGE _USER,GRUPPOART,2|COPY,1350
				END
			END

			SECTION GRUPPI_CODART2 1 0 0 FILE LF_ANAMAG GROUP CODART
				STRINGA 60 40 1
				BEGIN
					FLAGS "H"
				  KEY "CATMER" 
				  PROMPT 2 1 ""
					MESSAGE RESET,12@
				END
				SECTION H_GCODART3 1 1 1 GROUP 
					STRINGA 16 12 2 
					BEGIN
						KEY "CODICE GRUPPO"
						PROMPT 2 1 ""
						MESSAGE _USER,CODGRUPPOART,3
					END
					STRINGA 17 30 2 
					BEGIN
					 KEY "CODICE GRUPPO"
					 PROMPT 3 1 ""
					 MESSAGE _USER,GRUPPOART,3|COPY,1250
					END
				END

				SECTION GRUPPI_CODART3 1 0 0 FILE LF_ANAMAG GROUP CODART
					STRINGA 60 40 1
					BEGIN
						FLAGS "H"
					  KEY "CATMER" 
					  PROMPT 2 1 ""
						MESSAGE RESET,11@
					END					
					SECTION H_GCODART4 1 1 1 GROUP 
						STRINGA 16 12 2 
						BEGIN
							KEY "CODICE GRUPPO"
							PROMPT 2 1 ""
							MESSAGE _USER,CODGRUPPOART,4
						END
						STRINGA 17 30 2 
						BEGIN
						 KEY "CODICE GRUPPO"
						 PROMPT 3 1 ""
						 MESSAGE _USER,GRUPPOART,4|COPY,1150
						END
					END

					SECTION GRUPPI_CODART4 1 0 0 FILE LF_ANAMAG GROUP CODART
						STRINGA 60 40 1
						BEGIN
							FLAGS "H"
						  KEY "CATMER" 
						  PROMPT 2 1 ""
							MESSAGE RESET,10@
						END
						SECTION H_GCODART5 1 1 1 GROUP 
							STRINGA 16 12 2 
							BEGIN
								KEY "CODICE GRUPPO"
								PROMPT 2 1 ""
								MESSAGE _USER,CODGRUPPOART,5
							END
							STRINGA 17 30 2 
							BEGIN
							 KEY "CODICE GRUPPO"
							 PROMPT 3 1 ""
							 MESSAGE _USER,GRUPPOART,5|COPY,1050
							END
						END

						SECTION GRUPPI_CODART5 1 0 0 FILE LF_ANAMAG GROUP CODART
							STRINGA 60 40 1
							BEGIN
								FLAGS "H"
							  KEY "CATMER" 
							  PROMPT 2 1 ""
								MESSAGE RESET,9@
							END							
							SECTION H_GCODART6 1 1 2 GROUP 
								STRINGA 16 12 2 
								BEGIN
									KEY "CODICE GRUPPO"
									PROMPT 2 1 ""
									MESSAGE _USER,CODGRUPPOART,6
								END
								STRINGA 17 30 2 
								BEGIN
								 KEY "CODICE GRUPPO"
								 PROMPT 3 1 ""
								 MESSAGE _USER,GRUPPOART,6|COPY,950
								END
							END

							SECTION GRUPPI_CODART6 1 0 0 FILE LF_ANAMAG GROUP CODART
								STRINGA 60 40 1
								BEGIN
									FLAGS "H"
								  KEY "CATMER" 
								  PROMPT 2 1 ""
									MESSAGE RESET,8@
								END							
								SECTION H_GCODART7 1 1 1 GROUP 
									STRINGA 16 12 2 
									BEGIN
										KEY "CODICE GRUPPO"
										PROMPT 2 1 ""
										MESSAGE _USER,CODGRUPPOART,7
									END
									STRINGA 17 30 2 
									BEGIN
									 KEY "CODICE GRUPPO"
									 PROMPT 3 1 ""
									 MESSAGE _USER,GRUPPOART,7|COPY,850
									END
								END

								SECTION GRUPPI_CODART7 1 0 0 FILE LF_ANAMAG GROUP CODART
									STRINGA 60 40 1
									BEGIN
										FLAGS "H"
									  KEY "CATMER" 
									  PROMPT 2 1 ""
										MESSAGE RESET,7@
									END							

									SECTION H_GCODART8 1 1 1 GROUP 
										STRINGA 16 12 2 
										BEGIN
											KEY "CODICE GRUPPO"
											PROMPT 2 1 ""
											MESSAGE _USER,CODGRUPPOART,8
										END
										STRINGA 17 30 2 
										BEGIN
										 KEY "CODICE GRUPPO"
										 PROMPT 3 1 ""
										 MESSAGE _USER,GRUPPOART,8|COPY,750
										END
									END

									SECTION GRUPPI_CODART8 1 0 0 FILE LF_ANAMAG GROUP CODART
										STRINGA 60 40 1
										BEGIN
											FLAGS "H"
										  KEY "CATMER" 
										  PROMPT 2 1 ""
											MESSAGE RESET,6@
										END							
										SECTION H_ARTICOLO 1 1 1 GROUP
											STRINGA 2020 12 2
											BEGIN
												KEY "CODICE articolo"
												PROMPT 2 1 ""
												FIELD CODART
											END
											STRINGA 21 30 2
											BEGIN
												KEY "DESCR.articolo"
												PROMPT 3 1 ""
												FIELD LF_ANAMAG->DESCR
												MESSAGE COPY,650
											END
										END										

										SECTION FILE_GIACENZE 1 1 0 FILE LF_MAG 
											STRINGA 60 40 1
											BEGIN
												FLAGS "H"
											  KEY "HGIAC" 
											  PROMPT 2 1 ""
												MESSAGE RESET,5@
											END							
											SECTION H_GLIVGIAC1 1 1 1 GROUP
												STRINGA 31 50 1
												BEGIN
												  KEY "Livello giac" 
												  PROMPT 2 1 ""
													MESSAGE _USER,GRUPPOGIAC,1|COPY,550
												END
											END										

											SECTION GRUPPI_LIVGIAC1 1 0 0 FILE LF_MAG GROUP LIVELLO
												STRINGA 60 40 1
												BEGIN
													FLAGS "H"
												  KEY "CATMER" 
												  PROMPT 2 1 ""
													MESSAGE RESET,4@
												END							
												SECTION H_GLIVGIAC2 1 1 1 GROUP
													STRINGA 31 50 1
													BEGIN
													  KEY "Livello giac" 
													  PROMPT 2 1 ""
														MESSAGE _USER,GRUPPOGIAC,2|COPY,450
													END
												END										

												SECTION GRUPPI_LIVGIAC2 1 0 0 FILE LF_MAG GROUP LIVELLO
													STRINGA 60 40 1
													BEGIN
														FLAGS "H"
													  KEY "CATMER" 
													  PROMPT 2 1 ""
														MESSAGE RESET,3@
													END							

													SECTION H_GLIVGIAC3 1 1 1 GROUP
														STRINGA 31 50 1
														BEGIN
														  KEY "Livello giac" 
														  PROMPT 2 1 ""
															MESSAGE _USER,GRUPPOGIAC,3|COPY,350
														END
													END										

													SECTION GRUPPI_LIVGIAC3 1 0 0 FILE LF_MAG GROUP LIVELLO
														STRINGA 60 40 1
														BEGIN
															FLAGS "H"
														  KEY "CATMER" 
														  PROMPT 2 1 ""
															MESSAGE RESET,2@
														END							

														SECTION H_GLIVGIAC4 1 1 1 GROUP
															STRINGA 31 50 1
															BEGIN
															  KEY "Livello giac" 
															  PROMPT 2 1 ""
																MESSAGE _USER,GRUPPOGIAC,4|COPY,250
															END
														END										

														SECTION GRUPPI_LIVGIAC4 1 0 0 FILE LF_MAG GROUP LIVELLO
															STRINGA 60 40 1
															BEGIN
																FLAGS "H"
															  KEY "MAGAZZ" 
															  PROMPT 2 1 ""
																MESSAGE RESET,1@
															END							
															SECTION H_MAGAZZINO 1 1 1 GROUP
																STRINGA 60 40 1
																BEGIN
																  KEY "codice magazzino" 
																  PROMPT 2 1 "Magazzino "
																  FIELD 500@->s0
																	MESSAGE COPY,150
																END
															END 

															SECTION GRUPPI_MAGAZZINO 1 0 0 FILE LF_MAG GROUP CODMAG[1,3]
																SECTION H_DEPOSITO 1 0 0 GROUP
																END
																SECTION TOT_DEPOSITO 1 1 1 GROUP
																		STRINGA 51 12 
																		BEGIN
																			KEY "CODICE"
																			PROMPT 2 1 "    Deposito"
																		END
																		STRINGA 52 30 
																		BEGIN
																			KEY "descr"
																			PROMPT 3 1 ""
																			FIELD 501@->s0
																		END
																		STRINGA 53 3
																		BEGIN
																			KEY "UM"
																			PROMPT 5 1 ""
																			FIELD LF_UMART->UM
																			MESSAGE COPY,153
																		END
																		NUMERO 41 12
																		BEGIN
																			KEY "GIAC"
																			PROMPT 6 1 ""
																			PICTURE "########,@##"
																			MESSAGE _USER,GIAC|ADD,141
																		END
																		NUMERO 42 15
																		BEGIN
																			KEY "VAL1"
																			PROMPT 7 1 ""
																			PICTURE "##.###.###.##@"
																			MESSAGE _USER,VAL1|ADD,142
																		END
																		NUMERO 82 12
																		BEGIN
																			KEY "VAL1M"
																			PROMPT 8 1 ""
																			PICTURE "###.###.##@"
																			MESSAGE _NUMEXPR,#42/#41
																			GROUP FG_COL1
																		END
																		NUMERO 43 15
																		BEGIN
																			KEY "VAL2"
																			PROMPT 9 1 ""
																			PICTURE "##.###.###.##@"
																			MESSAGE _USER,VAL2|ADD,143
																			GROUP FG_COL2
																		END
																		NUMERO 83 12
																		BEGIN
																			KEY "VAL2M"
																			PROMPT 10 1 ""
																			PICTURE "###.###.##@"
																			MESSAGE _NUMEXPR,#43/#41
																			GROUP FG_COL2
																		END
																		NUMERO 44 15
																		BEGIN
																			KEY "VAL3"
																			PROMPT 11 1 ""
																			PICTURE "##.###.###.##@"
																			MESSAGE _USER,VAL3|ADD,144
																			GROUP FG_COL3
																		END
																		NUMERO 84 12
																		BEGIN
																			KEY "VAL3M"
																			PROMPT 12 1 ""
																			PICTURE "###.###.##@"
																			MESSAGE _NUMEXPR,#44/#41
																			GROUP FG_COL3
																		END
																		NUMERO 45 15
																		BEGIN
																			KEY "VAL4"
																			PROMPT 13 1 ""
																			PICTURE "##.###.###.##@"
																			MESSAGE _USER,VAL4|ADD,145
																			GROUP FG_COL4
																		END
																		NUMERO 85 12
																		BEGIN
																			KEY "VAL4M"
																			PROMPT 14 1 ""
																			PICTURE "###.###.##@"
																			MESSAGE _NUMEXPR,#45/#41
																			GROUP FG_COL4
																		END
																		NUMERO 46 15
																		BEGIN
																			KEY "VAL5"
																			PROMPT 15 1 ""
																			PICTURE "##.###.###.##@"
																			MESSAGE _USER,VAL5|ADD,146
																			GROUP FG_COL5
																		END
																		NUMERO 86 12
																		BEGIN
																			KEY "VAL5M"
																			PROMPT 16 1 ""
																			PICTURE "###.###.##@"
																			MESSAGE _NUMEXPR,#46/#41
																			GROUP FG_COL5
																		END
																		NUMERO 47 15
																		BEGIN
																			KEY "VAL6"
																			PROMPT 17 1 ""
																			PICTURE "##.###.###.##@"
																			MESSAGE _USER,VAL6|ADD,147
																			GROUP FG_COL6
																		END
																		NUMERO 87 12
																		BEGIN
																			KEY "VAL6M"
																			PROMPT 18 1 ""
																			PICTURE "###.###.##@"
																			MESSAGE _NUMEXPR,#47/#41
																			GROUP FG_COL6
																		END
																END // depositi dello stesso magazzino
															END // MAGAZZ

															SECTION TOT_MAGAZZINO 1 1 1 GROUP
																STRINGA 150 30 2
																BEGIN
																  KEY "Magazzino" 
																  PROMPT 3 1 ""
																END
																STRINGA 151 12 2
																BEGIN
																  KEY "Magazzino" 
																  PROMPT 2 1 " Totale mag."
																END
																STRINGA 153 3
																BEGIN
																	KEY "UM"
																	PROMPT 5 1 ""
																	MESSAGE COPY,253
																END
																NUMERO 141 12
																BEGIN
																	KEY "GIAC"
																	PROMPT 6 1 ""
																	PICTURE "########,@##"
																	MESSAGE ADD,241
																	GROUP 1 
																END
																NUMERO 142 15
																BEGIN
																	KEY "VAL1"
																	PROMPT 7 1 ""
																	PICTURE "##.###.###.##@"
																	MESSAGE ADD,242
																	GROUP 1
																END
																NUMERO 182 12
																BEGIN
																	KEY "VAL1"
																	PROMPT 8 1 ""
																	PICTURE "###.###.##@"
																	MESSAGE _NUMEXPR,#142/#141
																	GROUP 1 FG_COL1
																END
																NUMERO 143 15
																BEGIN
																	KEY "VAL2"
																	PROMPT 9 1 ""
																	PICTURE "##.###.###.##@"
																	MESSAGE ADD,243
																	GROUP 1 FG_COL2
																END
																NUMERO 183 12
																BEGIN
																	KEY "VAL1"
																	PROMPT 10 1 ""
																	PICTURE "###.###.##@"
																	MESSAGE _NUMEXPR,#143/#141
																	GROUP 1 FG_COL2
																END
																NUMERO 144 15
																BEGIN
																	KEY "VAL3"
																	PROMPT 11 1 ""
																	PICTURE "##.###.###.##@"
																	MESSAGE ADD,244
																	GROUP 1 FG_COL3
																END
																NUMERO 184 15
																BEGIN
																	KEY "VAL1"
																	PROMPT 12 1 ""
																	PICTURE "##.###.###.##@"
																	MESSAGE _NUMEXPR,#144/#141
																	GROUP 1 FG_COL3
																END
																NUMERO 145 12
																BEGIN
																	KEY "VAL4"
																	PROMPT 13 1 ""
																	PICTURE "##.###.###.##@"
																	MESSAGE ADD,245
																	GROUP 1 FG_COL4
																END
																NUMERO 185 12
																BEGIN
																	KEY "VAL4"
																	PROMPT 14 1 ""
																	PICTURE "###.###.##@"
																	MESSAGE _NUMEXPR,#145/#141
																	GROUP 1 FG_COL4
																END
																NUMERO 146 15
																BEGIN
																	KEY "VAL5"
																	PROMPT 15 1 ""
																	PICTURE "##.###.###.##@"
																	MESSAGE ADD,246 
																	GROUP 1 FG_COL5
																END
																NUMERO 186 12
																BEGIN
																	KEY "VAL1"
																	PROMPT 16 1 ""
																	PICTURE "###.###.##@"
																	MESSAGE _NUMEXPR,#146/#141
																	GROUP 1 FG_COL5
																END
																NUMERO 147 15
																BEGIN
																	KEY "VAL6"
																	PROMPT 17 1 ""
																	PICTURE "##.###.###.##@"
																	MESSAGE ADD,247
																	GROUP 1 FG_COL6
																END
																NUMERO 187 12
																BEGIN
																	KEY "VAL6"
																	PROMPT 18 1 ""
																	PICTURE "###.###.##@"
																	MESSAGE _NUMEXPR,#147/#141
																	GROUP 1 FG_COL6
																END
															END	// tot magazz
	
														END // GGIAC4
														SECTION TOT_GLIVGIAC4 1 2 2 GROUP
															STRINGA 1 255
															BEGIN
																KEY "sep"
																PROMPT 6 1 ""
																MESSAGE _USER,LINEATOTALI
															END
															STRINGA 250 35 2
															BEGIN
																PROMPT 3 2 ""
															END
															STRINGA 251 7 2
															BEGIN
															  KEY "Livello giac4" 
															  PROMPT 2 2 " Totale"
															END
															STRINGA 253 3
															BEGIN
																KEY "UM"
																PROMPT 5 2 ""
																MESSAGE COPY,353
															END
															NUMERO 241 12
															BEGIN
																KEY "GIAC"
																PROMPT 6 2 ""
																PICTURE "########,@##"
																MESSAGE ADD,341
																GROUP 2
															END
															NUMERO 242 15
															BEGIN
																KEY "VAL1"
																PROMPT 7 2 ""
																PICTURE "##.###.###.##@"
																MESSAGE ADD,342
																GROUP 2 
															END
															NUMERO 282 12
															BEGIN
																KEY "VAL_MEDIO"
																PROMPT 8 2 ""
																PICTURE "###.###.##@"
																MESSAGE _NUMEXPR,#242/#241
																GROUP 2 FG_COL1
															END
															NUMERO 243 15
															BEGIN
																KEY "VAL2"
																PROMPT 9 2 ""
																PICTURE "##.###.###.##@"
																MESSAGE ADD,343
																GROUP 2 FG_COL2
															END
															NUMERO 283 12
															BEGIN
																KEY "VAL_MEDIO"
																PROMPT 10 2 ""
																PICTURE "###.###.##@"
																MESSAGE _NUMEXPR,#243/#241
																GROUP 2 FG_COL2
															END
															NUMERO 244 15
															BEGIN
																KEY "VAL3"
																PROMPT 11 2 ""
																PICTURE "##.###.###.##@"
																MESSAGE ADD,344
																GROUP 2 FG_COL3
															END
															NUMERO 284 12
															BEGIN
																KEY "VAL_MEDIO"
																PROMPT 12 2 ""
																PICTURE "###.###.##@"
																MESSAGE _NUMEXPR,#244/#241
																GROUP 2 FG_COL3
															END
															NUMERO 245 15
															BEGIN
																KEY "COL4"
																PROMPT 13 2 ""
																PICTURE "##.###.###.##@"
																MESSAGE ADD,345
																GROUP 2 FG_COL4
															END
															NUMERO 285 12
															BEGIN
																KEY "VAL_MEDIO"
																PROMPT 14 2 ""
																PICTURE "###.###.##@"
																MESSAGE _NUMEXPR,#245/#241
																GROUP 2 FG_COL4
															END
															NUMERO 246 15
															BEGIN
																KEY "COL5"
																PROMPT 15 2 ""
																PICTURE "##.###.###.##@"
																MESSAGE ADD,346
																GROUP 2 FG_COL5
															END
															NUMERO 286 12
															BEGIN
																KEY "VAL_MEDIO"
																PROMPT 16 2 ""
																PICTURE "###.###.##@"
																MESSAGE _NUMEXPR,#246/#241
																GROUP 2 FG_COL5
															END
															NUMERO 247 15
															BEGIN
																KEY "giac"
																PROMPT 17 2 ""
																PICTURE "##.###.###.##@"
																MESSAGE ADD,347
																GROUP 2 FG_COL6
															END
															NUMERO 287 12
															BEGIN
																KEY "VAL_MEDIO"
																PROMPT 18 2 ""
																PICTURE "###.###.##@"
																MESSAGE _NUMEXPR,#246/#241
																GROUP 2 FG_COL6
															END
														END	// tot ggiac4
	
													END // GGIAC3
													SECTION TOT_GLIVGIAC3 1 2 2 GROUP
														STRINGA 1 255
														BEGIN
															KEY "sep"
															PROMPT 6 1 ""
															MESSAGE _USER,LINEATOTALI
														END
														STRINGA 350 35 2
														BEGIN
														  KEY "" 
														  PROMPT 3 2 ""
														END
														STRINGA 351 7 2
														BEGIN
														  KEY "" 
														  PROMPT 2 2 " Totale"
														END
														STRINGA 353 3
														BEGIN
															KEY "UM"
															PROMPT 5 2 ""
															MESSAGE COPY,453
														END
														NUMERO 341 12
														BEGIN
															KEY "GIAC"
															PROMPT 6 2 ""
															PICTURE "########,@##"
															MESSAGE ADD,441
															GROUP 3
														END
														NUMERO 342 15
														BEGIN
															KEY "COL1"
															PROMPT 7 2 ""
															PICTURE "##.###.###.##@"
															MESSAGE ADD,442
															GROUP 3
														END
														NUMERO 382 12
														BEGIN
															KEY "VAL_MEDIO"
															PROMPT 8 2 ""
															PICTURE "###.###.##@"
															MESSAGE _NUMEXPR,#342/#341
															GROUP 3 FG_COL1
														END
														NUMERO 343 15
														BEGIN
															KEY "COL2"
															PROMPT 9 2 ""
															PICTURE "##.###.###.##@"
															MESSAGE ADD,443
															GROUP 3 FG_COL2
														END
														NUMERO 383 12
														BEGIN
															KEY "VAL_MEDIO"
															PROMPT 10 2 ""
															PICTURE "###.###.##@"
															MESSAGE _NUMEXPR,#343/#341
															GROUP 3 FG_COL2
														END
														NUMERO 344 15
														BEGIN
															KEY "COL3"
															PROMPT 11 2 ""
															PICTURE "##.###.###.##@"
															MESSAGE ADD,444
															GROUP 3 FG_COL3
														END
														NUMERO 384 12
														BEGIN
															KEY "VAL_MEDIO"
															PROMPT 12 2 ""
															PICTURE "###.###.##@"
															MESSAGE _NUMEXPR,#344/#341
															GROUP 3 FG_COL3
														END
														NUMERO 345 15
														BEGIN
															KEY "COL4"
															PROMPT 13 2 ""
															PICTURE "##.###.###.##@"
															MESSAGE ADD,445
															GROUP 3 FG_COL4
														END
														NUMERO 385 12
														BEGIN
															KEY "VAL_MEDIO"
															PROMPT 14 2 ""
															PICTURE "###.###.##@"
															MESSAGE _NUMEXPR,#345/#341
															GROUP 3 FG_COL4
														END
														NUMERO 346 15
														BEGIN
															KEY "COL5"
															PROMPT 15 2 ""
															PICTURE "##.###.###.##@"
															MESSAGE ADD,446
															GROUP 3 FG_COL5
														END
														NUMERO 386 12
														BEGIN
															KEY "VAL_MEDIO"
															PROMPT 16 2 ""
															PICTURE "###.###.##@"
															MESSAGE _NUMEXPR,#346/#341
															GROUP 3 FG_COL5
														END
														NUMERO 347 15
														BEGIN
															KEY "COL6"
															PROMPT 17 2 ""
															PICTURE "##.###.###.##@"
															MESSAGE ADD,447
															GROUP 3 FG_COL6
														END
														NUMERO 387 12
														BEGIN
															KEY "VAL_MEDIO"
															PROMPT 18 2 ""
															PICTURE "###.###.##@"
															MESSAGE _NUMEXPR,#347/#341
															GROUP 3 FG_COL6
														END
													END // tot ggiac3
	
												END // GGIAC2
												SECTION TOT_GLIVGIAC2 1 2 2 GROUP
													STRINGA 1 255
													BEGIN
														KEY "sep"
														PROMPT 6 1 ""
														MESSAGE _USER,LINEATOTALI
													END
													STRINGA 450 35 2
													BEGIN
													  KEY "" 
													  PROMPT 3 2 ""
													END
													STRINGA 451 7 2
													BEGIN
													  KEY "" 
													  PROMPT 2 2 " Totale"
													END
													STRINGA 453 3
													BEGIN
														KEY "UM"
														PROMPT 5 2 ""
														MESSAGE COPY,553
													END
													NUMERO 441 12
													BEGIN
														KEY "GIAC"
														PROMPT 6 2 ""
														PICTURE "########,@##"
														MESSAGE ADD,541
														GROUP 4
													END
													NUMERO 442 15
													BEGIN
														KEY "VAL1"
														PROMPT 7 2 ""
														PICTURE "##.###.###.##@"
														MESSAGE ADD,542
														GROUP 4
													END
													NUMERO 482 12
													BEGIN
														KEY "VAL_MEDIO"
														PROMPT 8 2 ""
														PICTURE "###.###.##@"
														MESSAGE _NUMEXPR,#442/#441
														GROUP 4 FG_COL1
													END
													NUMERO 443 15
													BEGIN
														KEY "COL2"
														PROMPT 9 2 ""
														PICTURE "##.###.###.##@"
														MESSAGE ADD,543
														GROUP 4 FG_COL2
													END
													NUMERO 483 12
													BEGIN
														KEY "VAL_MEDIO"
														PROMPT 10 2 ""
														PICTURE "###.###.##@"
														MESSAGE _NUMEXPR,#443/#441
														GROUP 4 FG_COL2
													END
													NUMERO 444 15
													BEGIN
														KEY "COL3"
														PROMPT 11 2 ""
														PICTURE "##.###.###.##@"
														MESSAGE ADD,544
														GROUP 4 FG_COL3
													END
													NUMERO 484 12
													BEGIN
														KEY "VAL_MEDIO"
														PROMPT 12 2 ""
														PICTURE "###.###.##@"
														MESSAGE _NUMEXPR,#444/#441
														GROUP 4 FG_COL3
													END
													NUMERO 445 15
													BEGIN
														KEY "COL4"
														PROMPT 13 2 ""
														PICTURE "##.###.###.##@"
														MESSAGE ADD,545
														GROUP 4 FG_COL4
													END
													NUMERO 485 12
													BEGIN
														KEY "VAL_MEDIO"
														PROMPT 14 2 ""
														PICTURE "###.###.##@"
														MESSAGE _NUMEXPR,#445/#441
														GROUP 4 FG_COL4
													END
													NUMERO 446 15
													BEGIN
														KEY "COL5"
														PROMPT 15 2 ""
														PICTURE "##.###.###.##@"
														MESSAGE ADD,546
														GROUP 4 FG_COL5
													END
													NUMERO 486 12
													BEGIN
														KEY "VAL_MEDIO"
														PROMPT 16 2 ""
														PICTURE "###.###.##@"
														MESSAGE _NUMEXPR,#446/#441
														GROUP 4 FG_COL5
													END
													NUMERO 447 15
													BEGIN
														KEY "giac"
														PROMPT 17 2 ""
														PICTURE "##.###.###.##@"
														MESSAGE ADD,547
														GROUP 4 FG_COL6
													END
													NUMERO 487 12
													BEGIN
														KEY "VAL_MEDIO"
														PROMPT 18 2 ""
														PICTURE "###.###.##@"
														MESSAGE _NUMEXPR,#447/#441
														GROUP 4 FG_COL6
													END
												END // tot ggiac2
											END // GGIAC1
											SECTION TOT_GLIVGIAC1 1 2 2 GROUP
												STRINGA 1 255
												BEGIN
													KEY "sep"
													PROMPT 6 1 ""
													MESSAGE _USER,LINEATOTALI
												END
												STRINGA 550 35 2
												BEGIN
												  KEY "" 
												  PROMPT 3 2 ""
												END
												STRINGA 551 7 2
												BEGIN
												  KEY "" 
												  PROMPT 2 2 " Totale"
												END
												STRINGA 553 3
												BEGIN
													KEY "UM"
													PROMPT 5 2 ""
													MESSAGE COPY,653
												END
												NUMERO 541 12
												BEGIN
													KEY "GIAC"
													PROMPT 6 2 ""
													PICTURE "########,@##"
													MESSAGE ADD,641
													GROUP 5
												END
												NUMERO 542 15
												BEGIN
													KEY "VAL1"
													PROMPT 7 2 ""
													PICTURE "##.###.###.##@"
													MESSAGE ADD,642
													GROUP 5
												END
												NUMERO 582 12
												BEGIN
													KEY "VAL_MEDIO"
													PROMPT 8 2 ""
													PICTURE "###.###.##@"
													MESSAGE _NUMEXPR,#542/#541
													GROUP 5 FG_COL1
												END
												NUMERO 543 15
												BEGIN
													KEY "COL2"
													PROMPT 9 2 ""
													PICTURE "##.###.###.##@"
													MESSAGE ADD,643
													GROUP 5 FG_COL2
												END
												NUMERO 583 12
												BEGIN
													KEY "VAL_MEDIO"
													PROMPT 10 2 ""
													PICTURE "###.###.##@"
													MESSAGE _NUMEXPR,#543/#541
													GROUP 5 FG_COL2
												END
												NUMERO 544 15
												BEGIN
													KEY "COL3"
													PROMPT 11 2 ""
													PICTURE "##.###.###.##@"
													MESSAGE ADD,644
													GROUP 5 FG_COL3
												END
												NUMERO 584 12
												BEGIN
													KEY "VAL_MEDIO"
													PROMPT 12 2 ""
													PICTURE "###.###.##@"
													MESSAGE _NUMEXPR,#544/#541
													GROUP 5 FG_COL3
												END
												NUMERO 545 15
												BEGIN
													KEY "COL4"
													PROMPT 13 2 ""
													PICTURE "##.###.###.##@"
													MESSAGE ADD,645
													GROUP 5 FG_COL4
												END
												NUMERO 585 12
												BEGIN
													KEY "VAL_MEDIO"
													PROMPT 14 2 ""
													PICTURE "###.###.##@"
													MESSAGE _NUMEXPR,#545/#541
													GROUP 5 FG_COL4
												END
												NUMERO 546 15
												BEGIN
													KEY "COL5"
													PROMPT 15 2 ""
													PICTURE "##.###.###.##@"
													MESSAGE ADD,646
													GROUP 5 FG_COL5
												END
												NUMERO 586 12
												BEGIN
													KEY "VAL_MEDIO"
													PROMPT 16 2 ""
													PICTURE "###.###.##@"
													MESSAGE _NUMEXPR,#546/#541
													GROUP 5 FG_COL5
												END
												NUMERO 547 15
												BEGIN
													KEY "giac"
													PROMPT 17 2 ""
													PICTURE "##.###.###.##@"
													MESSAGE ADD,647
													GROUP 5 FG_COL6
												END
												NUMERO 587 12
												BEGIN
													KEY "VAL_MEDIO"
													PROMPT 18 2 ""
													PICTURE "###.###.##@"
													MESSAGE _NUMEXPR,#547/#541
													GROUP 5 FG_COL6
												END
											END	// tot ggiac1									

										END // FILE GIACENZE
										SECTION TOT_ARTICOLO 1 2 2 GROUP
											STRINGA 1 255
											BEGIN
												KEY "sep"
												PROMPT 6 1 ""
												MESSAGE _USER,LINEATOTALI
											END
											STRINGA 650 30 2
											BEGIN
											  KEY "" 
											  PROMPT 3 2 ""
											END
											STRINGA 651 12 2
											BEGIN
											  KEY "" 
											  PROMPT 2 2 " Totale art."
											END
											STRINGA 653 3
											BEGIN
												KEY "UM"
												PROMPT 5 2 ""
												MESSAGE COPY,753
											END
											NUMERO 641 12
											BEGIN
												KEY "GIAC"
												PROMPT 6 2 ""
												PICTURE "########,@##"
												MESSAGE ADD,741 
												GROUP 6 
											END
											NUMERO 642 15
											BEGIN
												KEY "VAL1"
												PROMPT 7 2 ""
												PICTURE "##.###.###.##@"
												MESSAGE ADD,742
												GROUP 6
											END
											NUMERO 682 12
											BEGIN
												KEY "VAL_MEDIO"
												PROMPT 8 2 ""
												PICTURE "###.###.##@"
												MESSAGE _NUMEXPR,#642/#641
												GROUP 6 FG_COL1
											END
											NUMERO 643 15
											BEGIN
												KEY "COL2"
												PROMPT 9 2 ""
												PICTURE "##.###.###.##@"
												MESSAGE ADD,743
												GROUP 6  FG_COL2
											END
											NUMERO 683 12
											BEGIN
												KEY "VAL_MEDIO"
												PROMPT 10 2 ""
												PICTURE "###.###.##@"
												MESSAGE _NUMEXPR,#643/#641
												GROUP 6 FG_COL2
											END
											NUMERO 644 15
											BEGIN
												KEY "COL3"
												PROMPT 11 2 ""
												PICTURE "##.###.###.##@"
												MESSAGE ADD,744
												GROUP 6 FG_COL3
											END
											NUMERO 684 12
											BEGIN
												KEY "VAL_MEDIO"
												PROMPT 12 2 ""
												PICTURE "###.###.##@"
												MESSAGE _NUMEXPR,#644/#641
												GROUP 6 FG_COL3
											END
											NUMERO 645 15
											BEGIN
												KEY "COL4"
												PROMPT 13 2 ""
												PICTURE "##.###.###.##@"
												MESSAGE ADD,745
												GROUP 6  FG_COL4
											END
											NUMERO 685 12
											BEGIN
												KEY "VAL_MEDIO"
												PROMPT 14 2 ""
												PICTURE "###.###.##@"
												MESSAGE _NUMEXPR,#645/#641
												GROUP 6 FG_COL4
											END
											NUMERO 646 15
											BEGIN
												KEY "COL5"
												PROMPT 15 2 ""
												PICTURE "##.###.###.##@"
												MESSAGE ADD,746
												GROUP 6 FG_COL5
											END
											NUMERO 686 12
											BEGIN
												KEY "VAL_MEDIO"
												PROMPT 16 2 ""
												PICTURE "###.###.##@"
												MESSAGE _NUMEXPR,#646/#641
												GROUP 6 FG_COL5
											END
											NUMERO 647 15
											BEGIN
												KEY "giac"
												PROMPT 17 2 ""
												PICTURE "##.###.###.##@"
												MESSAGE ADD,747
												GROUP 6 FG_COL6
											END
											NUMERO 687 12
											BEGIN
												KEY "VAL_MEDIO"
												PROMPT 18 2 ""
												PICTURE "###.###.##@"
												MESSAGE _NUMEXPR,#647/#641
												GROUP 6 FG_COL6
											END
										END	// TOT ART

									END // GART8
									SECTION TOT_GART8 1 2 2 GROUP
										STRINGA 1 255
										BEGIN
											KEY "sep"
											PROMPT 6 1 ""
											MESSAGE _USER,LINEATOTALI
										END
										STRINGA 750 34 2
										BEGIN
										  KEY "" 
										  PROMPT 3 2 ""
										END
										STRINGA 751 8 2
										BEGIN
										  KEY "" 
										  PROMPT 2 2 " Totale"
										END
										STRINGA 753 3
										BEGIN
											KEY "UM"
											PROMPT 5 2 ""
											MESSAGE COPY,853
										END
										NUMERO 741 12
										BEGIN
											KEY "GIAC"
											PROMPT 6 2 ""
											PICTURE "########,@##"
											MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#741|ADD,841
											GROUP 7
										END
										NUMERO 742 15
										BEGIN
											KEY "VAL1"
											PROMPT 7 2 ""
											PICTURE "##.###.###.##@"
											MESSAGE ADD,842
											GROUP 7
										END
										NUMERO 782 12
										BEGIN
											KEY "VAL_MEDIO"
											PROMPT 8 2 ""
											PICTURE "###.###.##@"
											MESSAGE _NUMEXPR,#742/#741
											GROUP 7 FG_COL1
										END
										NUMERO 743 15
										BEGIN
											KEY "COL2"
											PROMPT 9 2 ""
											PICTURE "##.###.###.##@"
											MESSAGE ADD,843
											GROUP 7 FG_COL2
										END
										NUMERO 783 12
										BEGIN
											KEY "VAL_MEDIO"
											PROMPT 10 2 ""
											PICTURE "###.###.##@"
											MESSAGE _NUMEXPR,#743/#741
											GROUP 7 FG_COL2
										END
										NUMERO 744 15
										BEGIN
											KEY "COL3"
											PROMPT 11 2 ""
											PICTURE "##.###.###.##@"
											MESSAGE ADD,844
											GROUP 7 FG_COL3
										END
										NUMERO 784 12
										BEGIN
											KEY "VAL_MEDIO"
											PROMPT 12 2 ""
											PICTURE "###.###.##@"
											MESSAGE _NUMEXPR,#744/#741
											GROUP 7 FG_COL3
										END
										NUMERO 745 15
										BEGIN
											KEY "COL4"
											PROMPT 13 2 ""
											PICTURE "##.###.###.##@"
											MESSAGE ADD,845
											GROUP 7 FG_COL4
										END
										NUMERO 785 12
										BEGIN
											KEY "VAL_MEDIO"
											PROMPT 14 2 ""
											PICTURE "###.###.##@"
											MESSAGE _NUMEXPR,#745/#741
											GROUP 7 FG_COL4
										END
										NUMERO 746 15
										BEGIN
											KEY "COL5"
											PROMPT 15 2 ""
											PICTURE "##.###.###.##@"
											MESSAGE ADD,846
											GROUP 7 FG_COL5
										END
										NUMERO 786 12
										BEGIN
											KEY "VAL_MEDIO"
											PROMPT 16 2 ""
											PICTURE "###.###.##@"
											MESSAGE _NUMEXPR,#746/#741
											GROUP 7 FG_COL5
										END
										NUMERO 747 15
										BEGIN
											KEY "COL6"
											PROMPT 17 2 ""
											PICTURE "##.###.###.##@"
											MESSAGE ADD,847
											GROUP 7 FG_COL6
										END
										NUMERO 787 12
										BEGIN
											KEY "VAL_MEDIO"
											PROMPT 18 2 ""
											PICTURE "###.###.##@"
											MESSAGE _NUMEXPR,#747/#741
											GROUP 7 FG_COL6
										END
									END	// tot gart8

								END // GART7
								SECTION TOT_GART7 1 2 2 GROUP
									STRINGA 1 255
									BEGIN
										KEY "sep"
										PROMPT 6 1 ""
										MESSAGE _USER,LINEATOTALI
									END									
									STRINGA 850 34 2
									BEGIN
									  KEY "" 
									  PROMPT 3 2 ""
									END
									STRINGA 851 8 2
									BEGIN
									  KEY "" 
									  PROMPT 2 2 " Totale"
									END
									STRINGA 853 3
									BEGIN
										KEY "UM"
										PROMPT 5 2 ""
										MESSAGE COPY,953
									END
									NUMERO 841 12
									BEGIN
										KEY "GIAC"
										PROMPT 6 2 ""
										PICTURE "########,@##"
										MESSAGE ADD,941
										GROUP 8
									END
									NUMERO 842 15
									BEGIN
										KEY "VAL1"
										PROMPT 7 2 ""
										PICTURE "##.###.###.##@"
										MESSAGE ADD,942
										GROUP 8 
									END
									NUMERO 882 12
									BEGIN
										KEY "VAL_MEDIO"
										PROMPT 8 2 ""
										PICTURE "###.###.##@"
										MESSAGE _NUMEXPR,#842/#841
										GROUP 8 FG_COL1
									END
									NUMERO 843 15
									BEGIN
										KEY "COL2"
										PROMPT 9 2 ""
										PICTURE "##.###.###.##@"
										MESSAGE ADD,943
										GROUP 8 FG_COL2
									END
									NUMERO 883 12
									BEGIN
										KEY "VAL_MEDIO"
										PROMPT 10 2 ""
										PICTURE "###.###.##@"
										MESSAGE _NUMEXPR,#843/#841
										GROUP 8 FG_COL2
									END
									NUMERO 844 15
									BEGIN
										KEY "COL3"
										PROMPT 11 2 ""
										PICTURE "##.###.###.##@"
										MESSAGE ADD,944
										GROUP 8 FG_COL3
									END
									NUMERO 884 12
									BEGIN
										KEY "VAL_MEDIO"
										PROMPT 12 2 ""
										PICTURE "###.###.##@"
										MESSAGE _NUMEXPR,#844/#841
										GROUP 8 FG_COL3
									END
									NUMERO 845 15
									BEGIN
										KEY "COL4"
										PROMPT 13 2 ""
										PICTURE "##.###.###.##@"
										MESSAGE ADD,945
										GROUP 8 FG_COL4
									END
									NUMERO 885 12
									BEGIN
										KEY "VAL_MEDIO"
										PROMPT 14 2 ""
										PICTURE "###.###.##@"
										MESSAGE _NUMEXPR,#845/#841
										GROUP 8 FG_COL4
									END
									NUMERO 846 15
									BEGIN
										KEY "COL5"
										PROMPT 15 2 ""
										PICTURE "##.###.###.##@"
										MESSAGE ADD,946
										GROUP 8 FG_COL5
									END
									NUMERO 886 12
									BEGIN
										KEY "VAL_MEDIO"
										PROMPT 16 2 ""
										PICTURE "###.###.##@"
										MESSAGE _NUMEXPR,#846/#841
										GROUP 8 FG_COL5
									END
									NUMERO 847 15
									BEGIN
										KEY "giac"
										PROMPT 17 2 ""
										PICTURE "##.###.###.##@"
										MESSAGE ADD,947
										GROUP 8 FG_COL6
									END
									NUMERO 887 12
									BEGIN
										KEY "VAL_MEDIO"
										PROMPT 18 2 ""
										PICTURE "###.###.##@"
										MESSAGE _NUMEXPR,#847/#841
										GROUP 8 FG_COL6
									END
								END	// tot gart7									

							END // GART6
							SECTION TOT_GART6 1 2 2 GROUP
								STRINGA 1 255
								BEGIN
									KEY "sep"
									PROMPT 6 1 ""
									MESSAGE _USER,LINEATOTALI
								END									
								STRINGA 950 34 2
								BEGIN
								  KEY "" 
								  PROMPT 3 2 ""
								END
								STRINGA 951 8 2
								BEGIN
								  KEY "" 
								  PROMPT 2 2 " Totale"
								END
								STRINGA 953 3
								BEGIN
									KEY "UM"
									PROMPT 5 2 ""
									MESSAGE COPY,1053
								END
								NUMERO 941 12
								BEGIN
									KEY "GIAC"
									PROMPT 6 2 ""
									PICTURE "########,@##"
									MESSAGE ADD,1041
									GROUP 9
								END
								NUMERO 942 15
								BEGIN
									KEY "VAL1"
									PROMPT 7 2 ""
									PICTURE "##.###.###.##@"
									MESSAGE ADD,1042
									GROUP 9 
								END
								NUMERO 982 12
								BEGIN
									KEY "VAL_MEDIO"
									PROMPT 8 2 ""
									PICTURE "###.###.##@"
									MESSAGE _NUMEXPR,#942/#941
									GROUP 9 FG_COL1
								END
								NUMERO 943 15
								BEGIN
									KEY "COL2"
									PROMPT 9 2 ""
									PICTURE "##.###.###.##@"
									MESSAGE ADD,1043
									GROUP 9 FG_COL2
								END
								NUMERO 983 12
								BEGIN
									KEY "VAL_MEDIO"
									PROMPT 10 2 ""
									PICTURE "###.###.##@"
									MESSAGE _NUMEXPR,#943/#941
									GROUP 9 FG_COL2
								END
								NUMERO 944 15
								BEGIN
									KEY "COL3"
									PROMPT 11 2 ""
									PICTURE "##.###.###.##@"
									MESSAGE ADD,1044
									GROUP 9  FG_COL3
								END
								NUMERO 984 12
								BEGIN
									KEY "VAL_MEDIO"
									PROMPT 12 2 ""
									PICTURE "###.###.##@"
									MESSAGE _NUMEXPR,#944/#941
									GROUP 9 FG_COL3
								END
								NUMERO 945 15
								BEGIN
									KEY "COL4"
									PROMPT 13 2 ""
									PICTURE "##.###.###.##@"
									MESSAGE ADD,1045
									GROUP 9 FG_COL4
								END
								NUMERO 985 12
								BEGIN
									KEY "VAL_MEDIO"
									PROMPT 14 2 ""
									PICTURE "###.###.##@"
									MESSAGE _NUMEXPR,#945/#941
									GROUP 9 FG_COL4
								END
								NUMERO 946 15
								BEGIN
									KEY "COL5"
									PROMPT 15 2 ""
									PICTURE "##.###.###.##@"
									MESSAGE ADD,1046
									GROUP 9  FG_COL5
								END
								NUMERO 986 12
								BEGIN
									KEY "VAL_MEDIO"
									PROMPT 16 2 ""
									PICTURE "###.###.##@"
									MESSAGE _NUMEXPR,#946/#941
									GROUP 9 FG_COL5
								END
								NUMERO 947 15
								BEGIN
									KEY "giac"
									PROMPT 17 2 ""
									PICTURE "##.###.###.##@"
									MESSAGE ADD,1047
									GROUP 9 FG_COL6
								END
								NUMERO 987 12
								BEGIN
									KEY "VAL_MEDIO"
									PROMPT 18 2 ""
									PICTURE "###.###.##@"
									MESSAGE _NUMEXPR,#947/#941
									GROUP 9 FG_COL6
								END
							END	// tot gart6

						END // GART5
						SECTION TOT_GART5 1 2 2 GROUP
							STRINGA 1 255
							BEGIN
								KEY "sep"
								PROMPT 6 1 ""
								MESSAGE _USER,LINEATOTALI
							END									
							STRINGA 1050 34 2
							BEGIN
							  KEY "" 
							  PROMPT 3 2 ""
							END
							STRINGA 1051 8 2
							BEGIN
							  KEY "" 
							  PROMPT 2 2 " Totale"
							END
							STRINGA 1053 3
							BEGIN
								KEY "UM"
								PROMPT 5 2 ""
								MESSAGE COPY,1153
							END
							NUMERO 1041 12
							BEGIN
								KEY "GIAC"
								PROMPT 6 2 ""
								PICTURE "########,@##"
								MESSAGE ADD,1141
								GROUP 10
							END
							NUMERO 1042 15
							BEGIN
								KEY "VAL1"
								PROMPT 7 2 ""
								PICTURE "##.###.###.##@"
								MESSAGE ADD,1142
								GROUP 10 
							END
							NUMERO 1082 12
							BEGIN
								KEY "VAL_MEDIO"
								PROMPT 8 2 ""
								PICTURE "###.###.##@"
								MESSAGE _NUMEXPR,#1042/#1041
								GROUP FG_COL1
							END
							NUMERO 1043 15
							BEGIN
								KEY "COL2"
								PROMPT 9 2 ""
								PICTURE "##.###.###.##@"
								MESSAGE ADD,1143
								GROUP 10 FG_COL2
							END
							NUMERO 1083 12
							BEGIN
								KEY "VAL_MEDIO"
								PROMPT 10 2 ""
								PICTURE "###.###.##@"
								MESSAGE _NUMEXPR,#1043/#1041
								GROUP FG_COL2
							END
							NUMERO 1044 15
							BEGIN
								KEY "COL3"
								PROMPT 11 2 ""
								PICTURE "##.###.###.##@"
								MESSAGE ADD,1144
								GROUP 10  FG_COL3
							END
							NUMERO 1084 12
							BEGIN
								KEY "VAL_MEDIO"
								PROMPT 12 2 ""
								PICTURE "###.###.##@"
								MESSAGE _NUMEXPR,#1044/#1041
								GROUP FG_COL3
							END
							NUMERO 1045 15
							BEGIN
								KEY "COL4"
								PROMPT 13 2 ""
								PICTURE "##.###.###.##@"
								MESSAGE ADD,1145
								GROUP 10 FG_COL4
							END
							NUMERO 1085 12
							BEGIN
								KEY "VAL_MEDIO"
								PROMPT 14 2 ""
								PICTURE "###.###.##@"
								MESSAGE _NUMEXPR,#1045/#1041
								GROUP FG_COL4
							END
							NUMERO 1046 15
							BEGIN
								KEY "COL5"
								PROMPT 15 2 ""
								PICTURE "##.###.###.##@"
								MESSAGE ADD,1146
								GROUP 10  FG_COL5
							END
							NUMERO 1086 12
							BEGIN
								KEY "VAL_MEDIO"
								PROMPT 16 2 ""
								PICTURE "###.###.##@"
								MESSAGE _NUMEXPR,#1046/#1041
								GROUP FG_COL5
							END
							NUMERO 1047 15
							BEGIN
								KEY "giac"
								PROMPT 17 2 ""
								PICTURE "##.###.###.##@"
								MESSAGE ADD,1147
								GROUP 10 FG_COL6
							END
							NUMERO 1087 12
							BEGIN
								KEY "VAL_MEDIO"
								PROMPT 18 2 ""
								PICTURE "###.###.##@"
								MESSAGE _NUMEXPR,#1047/#1041
								GROUP FG_COL6
							END
						END // tot gart5

					END // GART4
					SECTION TOT_GART4 1 2 2 GROUP
						STRINGA 1 255
						BEGIN
							KEY "sep"
							PROMPT 6 1 ""
							MESSAGE _USER,LINEATOTALI
						END									
						STRINGA 1150 34 2
						BEGIN
						  KEY "" 
						  PROMPT 3 2 ""
						END
						STRINGA 1151 8 2
						BEGIN
						  KEY "" 
						  PROMPT 2 2 " Totale"
						END
						STRINGA 1153 3
						BEGIN
							KEY "UM"
							PROMPT 5 2 ""
							MESSAGE COPY,1253
						END
						NUMERO 1141 12
						BEGIN
							KEY "GIAC"
							PROMPT 6 2 ""
							PICTURE "########,@##"
							MESSAGE ADD,1241
							GROUP 11
						END
						NUMERO 1142 15
						BEGIN
							KEY "VAL1"
							PROMPT 7 2 ""
							PICTURE "##.###.###.##@"
							MESSAGE ADD,1242
							GROUP 11
						END
						NUMERO 1182 12
						BEGIN
							KEY "VAL_MEDIO"
							PROMPT 8 2 ""
							PICTURE "###.###.##@"
							MESSAGE _NUMEXPR,#1142/#1141
							GROUP FG_COL1
						END
						NUMERO 1143 15
						BEGIN
							KEY "COL2"
							PROMPT 9 2 ""
							PICTURE "##.###.###.##@"
							MESSAGE ADD,1243
							GROUP 11 FG_COL2
						END
						NUMERO 1183 12
						BEGIN
							KEY "VAL_MEDIO"
							PROMPT 10 2 ""
							PICTURE "###.###.##@"
							MESSAGE _NUMEXPR,#1143/#1141
							GROUP FG_COL2
						END
						NUMERO 1144 15
						BEGIN
							KEY "COL3"
							PROMPT 11 2 ""
							PICTURE "##.###.###.##@"
							MESSAGE ADD,1244
							GROUP 11 FG_COL3
						END
						NUMERO 1184 12
						BEGIN
							KEY "VAL_MEDIO"
							PROMPT 12 2 ""
							PICTURE "###.###.##@"
							MESSAGE _NUMEXPR,#1144/#1141
							GROUP FG_COL3
						END
						NUMERO 1145 15
						BEGIN
							KEY "COL4"
							PROMPT 13 2 ""
							PICTURE "##.###.###.##@"
							MESSAGE ADD,1245
							GROUP 11 FG_COL4
						END
						NUMERO 1185 12
						BEGIN
							KEY "VAL_MEDIO"
							PROMPT 14 2 ""
							PICTURE "###.###.##@"
							MESSAGE _NUMEXPR,#1145/#1141
							GROUP FG_COL4
						END
						NUMERO 1146 15
						BEGIN
							KEY "COL5"
							PROMPT 15 2 ""
							PICTURE "##.###.###.##@"
							MESSAGE ADD,1246
							GROUP 11 FG_COL5
						END
						NUMERO 1186 12
						BEGIN
							KEY "VAL_MEDIO"
							PROMPT 16 2 ""
							PICTURE "###.###.##@"
							MESSAGE _NUMEXPR,#1146/#1141
							GROUP FG_COL5
						END
						NUMERO 1147 15
						BEGIN
							KEY "giac"
							PROMPT 17 2 ""
							PICTURE "##.###.###.##@"
							MESSAGE ADD,1247
							GROUP 11 FG_COL6
						END
						NUMERO 1187 12
						BEGIN
							KEY "VAL_MEDIO"
							PROMPT 18 2 ""
							PICTURE "###.###.##@"
							MESSAGE _NUMEXPR,#1147/#1141
							GROUP FG_COL6
						END
					END	// tot gart4

				END // GART3
				SECTION TOT_GART3 1 2 2 GROUP
					STRINGA 1 255
					BEGIN
						KEY "sep"
						PROMPT 6 1 ""
						MESSAGE _USER,LINEATOTALI
					END									
					STRINGA 1250 34 2
					BEGIN
					  KEY "" 
					  PROMPT 3 2 ""
					END
					STRINGA 1251 8 2
					BEGIN
					  KEY "" 
					  PROMPT 2 2 " Totale"
					END
					STRINGA 1253 3
					BEGIN
						KEY "UM"
						PROMPT 5 2 ""
						MESSAGE COPY,1353
					END
					NUMERO 1241 12
					BEGIN
						KEY "GIAC"
						PROMPT 6 2 ""
						PICTURE "########,@##"
						MESSAGE ADD,1341
						GROUP 12
					END
					NUMERO 1242 15
					BEGIN
						KEY "VAL1"
						PROMPT 7 2 ""
						PICTURE "##.###.###.##@"
						MESSAGE ADD,1342
						GROUP 12 
					END
					NUMERO 1282 12
					BEGIN
						KEY "VALMEDIO"
						PROMPT 18 2 ""
						PICTURE "###.###.##@"
						MESSAGE _NUMEXPR,#1242/#1241
						GROUP 12 FG_COL1
					END
					NUMERO 1243 15
					BEGIN
						KEY "COL2"
						PROMPT 8 2 ""
						PICTURE "##.###.###.##@"
						MESSAGE ADD,1343
						GROUP 12 FG_COL2
					END
					NUMERO 1283 12
					BEGIN
						KEY "VALMEDIO"
						PROMPT 18 2 ""
						PICTURE "###.###.##@"
						MESSAGE _NUMEXPR,#1243/#1241
						GROUP 12 FG_COL2
					END
					NUMERO 1244 15
					BEGIN
						KEY "COL3"
						PROMPT 9 2 ""
						PICTURE "##.###.###.##@"
						MESSAGE ADD,1344
						GROUP 12 FG_COL3
					END
					NUMERO 1284 12
					BEGIN
						KEY "VALMEDIO"
						PROMPT 18 2 ""
						PICTURE "###.###.##@"
						MESSAGE _NUMEXPR,#1244/#1241
						GROUP 12 FG_COL3
					END
					NUMERO 1245 15
					BEGIN
						KEY "COL4"
						PROMPT 10 2 ""
						PICTURE "##.###.###.##@"
						MESSAGE ADD,1345
						GROUP 12 FG_COL4
					END
					NUMERO 1285 12
					BEGIN
						KEY "VALMEDIO"
						PROMPT 18 2 ""
						PICTURE "###.###.##@"
						MESSAGE _NUMEXPR,#1245/#1241
						GROUP 12 FG_COL4
					END
					NUMERO 1246 15
					BEGIN
						KEY "COL5"
						PROMPT 11 2 ""
						PICTURE "##.###.###.##@"
						MESSAGE ADD,1346
						GROUP 12 FG_COL5
					END
					NUMERO 1286 12
					BEGIN
						KEY "VALMEDIO"
						PROMPT 18 2 ""
						PICTURE "###.###.##@"
						MESSAGE _NUMEXPR,#1246/#1241
						GROUP 12 FG_COL5
					END
					NUMERO 1247 15
					BEGIN
						KEY "giac"
						PROMPT 12 2 ""
						PICTURE "##.###.###.##@"
						MESSAGE ADD,1347
						GROUP 12 FG_COL6
					END
					NUMERO 1287 12
					BEGIN
						KEY "VALMEDIO"
						PROMPT 18 2 ""
						PICTURE "###.###.##@"
						MESSAGE _NUMEXPR,#1247/#1241
						GROUP 12 FG_COL6
					END
				END	// tot gart3

			END // GART2
			SECTION TOT_GART2 1 2 2 GROUP
				STRINGA 1 255
				BEGIN
					KEY "sep"
					PROMPT 6 1 ""
					MESSAGE _USER,LINEATOTALI
				END									
				STRINGA 1350 34 2
				BEGIN
				  KEY "" 
				  PROMPT 3 2 ""
				END
				STRINGA 1351 8 2
				BEGIN
				  KEY "" 
				  PROMPT 2 2 " Totale"
				END
				STRINGA 1353 3
				BEGIN
					KEY "UM"
					PROMPT 5 2 ""
					MESSAGE COPY,1453
				END
				NUMERO 1341 12
				BEGIN
					KEY "GIAC"
					PROMPT 6 2 ""
					PICTURE "########,@##"
					MESSAGE ADD,1441
					GROUP 13
				END
				NUMERO 1342 15
				BEGIN
					KEY "VAL1"
					PROMPT 7 2 ""
					PICTURE "##.###.###.##@"
					MESSAGE ADD,1442
					GROUP 13 
				END
				NUMERO 1382 12
				BEGIN
					KEY "VALMEDIO"
					PROMPT 8 2 ""
					PICTURE "###.###.##@"
					MESSAGE _NUMEXPR,#1342/#1341
					GROUP 13 FG_COL1
				END
				NUMERO 1343 15
				BEGIN
					KEY "COL2"
					PROMPT 9 2 ""
					PICTURE "##.###.###.##@"
					MESSAGE ADD,1443
					GROUP 13 FG_COL2
				END
				NUMERO 1383 12
				BEGIN
					KEY "VALMEDIO"
					PROMPT 10 2 ""
					PICTURE "###.###.##@"
					MESSAGE _NUMEXPR,#1343/#1341
					GROUP 13 FG_COL2
				END
				NUMERO 1344 15
				BEGIN
					KEY "COL3"
					PROMPT 11 2 ""
					PICTURE "##.###.###.##@"
					MESSAGE ADD,1444
					GROUP 13 FG_COL3
				END
				NUMERO 1384 12
				BEGIN
					KEY "VALMEDIO"
					PROMPT 12 2 ""
					PICTURE "###.###.##@"
					MESSAGE _NUMEXPR,#1344/#1341
					GROUP 13 FG_COL3
				END
				NUMERO 1345 15
				BEGIN
					KEY "COL4"
					PROMPT 13 2 ""
					PICTURE "###.###.##@"
					MESSAGE ADD,1445
					GROUP 13 FG_COL4
				END
				NUMERO 1385 12
				BEGIN
					KEY "VALMEDIO"
					PROMPT 14 2 ""
					PICTURE "###.###.##@"
					MESSAGE _NUMEXPR,#1345/#1341
					GROUP 13 FG_COL4
				END
				NUMERO 1346 15
				BEGIN
					KEY "COL5"
					PROMPT 15 2 ""
					PICTURE "###.###.##@"
					MESSAGE ADD,1446
					GROUP 13 FG_COL5
				END
				NUMERO 1386 12
				BEGIN
					KEY "VALMEDIO"
					PROMPT 16 2 ""
					PICTURE "###.###.##@"
					MESSAGE _NUMEXPR,#1346/#1341
					GROUP 13 FG_COL5
				END
				NUMERO 1347 15
				BEGIN
					KEY "giac"
					PROMPT 17 2 ""
					PICTURE "###.###.##@"
					MESSAGE ADD,1447
					GROUP 13 FG_COL6
				END
				NUMERO 1387 12
				BEGIN
					KEY "VALMEDIO"
					PROMPT 18 2 ""
					PICTURE "###.###.##@"
					MESSAGE _NUMEXPR,#1347/#1341
					GROUP 13 FG_COL6
				END
			END	// tot gart2

		END // GART1
		SECTION TOT_GART1 1 2 2 GROUP
			STRINGA 1 255
			BEGIN
				KEY "sep"
				PROMPT 6 1 ""
				MESSAGE _USER,LINEATOTALI
			END									
			STRINGA 1450 34 2
			BEGIN
			  KEY "" 
			  PROMPT 3 2 ""
			END
			STRINGA 1451 8 2
			BEGIN
			  KEY "" 
			  PROMPT 2 2 " Totale"
			END
			STRINGA 1453 3
			BEGIN
				KEY "UM"
				PROMPT 5 2 ""
				MESSAGE COPY,1553
			END
			NUMERO 1441 12
			BEGIN
				KEY "GIAC"
				PROMPT 6 2 ""
				PICTURE "########,@##"
				MESSAGE ADD,1541
				GROUP 14 
			END
			NUMERO 1442 15
			BEGIN
				KEY "VAL1"
				PROMPT 7 2 ""
				PICTURE "##.###.###.##@"
				MESSAGE ADD,1542
				GROUP 14 
			END
			NUMERO 1482 12
			BEGIN
				KEY "VALMEDIO"
				PROMPT 8 2 ""
				PICTURE "###.###.##@"
				MESSAGE _NUMEXPR,#1442/#1441
				GROUP 14 FG_COL1
			END
			NUMERO 1443 15
			BEGIN
				KEY "COL2"
				PROMPT 9 2 ""
				PICTURE "##.###.###.##@"
				MESSAGE ADD,1543
				GROUP 14 FG_COL2
			END
			NUMERO 1483 12
			BEGIN
				KEY "VALMEDIO"
				PROMPT 10 2 ""
				PICTURE "###.###.##@"
				MESSAGE _NUMEXPR,#1443/#1441
				GROUP 14 FG_COL2
			END
			NUMERO 1444 15
			BEGIN
				KEY "COL3"
				PROMPT 11 2 ""
				PICTURE "##.###.###.##@"
				MESSAGE ADD,1544
				GROUP 14  FG_COL3
			END
			NUMERO 1484 12
			BEGIN
				KEY "VALMEDIO"
				PROMPT 12 2 ""
				PICTURE "###.###.##@"
				MESSAGE _NUMEXPR,#1444/#1441
				GROUP 14 FG_COL3
			END
			NUMERO 1445 15
			BEGIN
				KEY "COL4"
				PROMPT 13 2 ""
				PICTURE "##.###.###.##@"
				MESSAGE ADD,1545
				GROUP 14 FG_COL4
			END
			NUMERO 1485 12
			BEGIN
				KEY "VALMEDIO"
				PROMPT 14 2 ""
				PICTURE "###.###.##@"
				MESSAGE _NUMEXPR,#1445/#1441
				GROUP 14 FG_COL4
			END
			NUMERO 1446 15
			BEGIN
				KEY "COL5"
				PROMPT 15 2 ""
				PICTURE "##.###.###.##@"
				MESSAGE ADD,1546
				GROUP 14  FG_COL5
			END
			NUMERO 1486 12
			BEGIN
				KEY "VALMEDIO"
				PROMPT 16 2 ""
				PICTURE "###.###.##@"
				MESSAGE _NUMEXPR,#1446/#1441
				GROUP 14 FG_COL5
			END
			NUMERO 1447 15
			BEGIN
				KEY "giac"
				PROMPT 17 2 ""
				PICTURE "##.###.###.##@"
				MESSAGE ADD,1547
				GROUP 14 FG_COL6
			END
			NUMERO 1487 12
			BEGIN
				KEY "VALMEDIO"
				PROMPT 18 2 ""
				PICTURE "###.###.##@"
				MESSAGE _NUMEXPR,#1447/#1441
				GROUP 14 FG_COL6
			END
		END	// tot gart1

	END // GRUPPI_CATMER 
	SECTION TOT_CATMER 1 2 2 GROUP
		STRINGA 1 255
		BEGIN
			KEY "sep"
			PROMPT 6 1 ""
			MESSAGE _USER,LINEATOTALI
		END									
		STRINGA 1550 34 2
		BEGIN
		  KEY "" 
		  PROMPT 3 2 ""
		END
		STRINGA 1551 8 2
		BEGIN
		  KEY "" 
		  PROMPT 2 2 " Totale"
		END
		STRINGA 1553 3
		BEGIN
			KEY "UM"
			PROMPT 5 2 ""
		END
		NUMERO 1541 12
		BEGIN
			KEY "GIAC"
			PROMPT 6 2 ""
			PICTURE "########,@##"
			GROUP 15
		END
		NUMERO 1542 15
		BEGIN
			KEY "VAL1"
			PROMPT 7 2 ""
			PICTURE "##.###.###.##@"
			GROUP 15 
		END
		NUMERO 1582 12
		BEGIN
			KEY "VALMEDIO"
			PROMPT 8 2 ""
			PICTURE "###.###.##@"
			MESSAGE _NUMEXPR,#1542/#1541
			GROUP 15 FG_COL1
		END
		NUMERO 1543 15
		BEGIN
			KEY "COL2"
			PROMPT 9 2 ""
			PICTURE "##.###.###.##@"
			GROUP 15 FG_COL2
		END
		NUMERO 1583 12
		BEGIN
			KEY "VALMEDIO"
			PROMPT 10 2 ""
			PICTURE "###.###.##@"
			MESSAGE _NUMEXPR,#1543/#1541
			GROUP 15 FG_COL2
		END
		NUMERO 1544 15
		BEGIN
			KEY "COL3"
			PROMPT 11 2 ""
			PICTURE "##.###.###.##@"
			GROUP 15  FG_COL3
		END
		NUMERO 1584 12
		BEGIN
			KEY "VALMEDIO"
			PROMPT 12 2 ""
			PICTURE "###.###.##@"
			MESSAGE _NUMEXPR,#1544/#1541
			GROUP 15 FG_COL3
		END
		NUMERO 1545 15
		BEGIN
			KEY "COL4"
			PROMPT 13 2 ""
			PICTURE "##.###.###.##@"
			GROUP 15 FG_COL4
		END
		NUMERO 1585 12
		BEGIN
			KEY "VALMEDIO"
			PROMPT 14 2 ""
			PICTURE "###.###.##@"
			MESSAGE _NUMEXPR,#1545/#1541
			GROUP 15 FG_COL4
		END
		NUMERO 1546 15
		BEGIN
			KEY "COL5"
			PROMPT 15 2 ""
			PICTURE "##.###.###.##@"
			GROUP 15  FG_COL5
		END
		NUMERO 1586 12
		BEGIN
			KEY "VALMEDIO"
			PROMPT 16 2 ""
			PICTURE "###.###.##@"
			MESSAGE _NUMEXPR,#1546/#1541
			GROUP 15 FG_COL5
		END
		NUMERO 1547 15
		BEGIN
			KEY "COL6"
			PROMPT 17 2 ""
			PICTURE "##.###.###.##@"
			GROUP 15 FG_COL6
		END
		NUMERO 1587 12
		BEGIN
			KEY "VALMEDIO"
			PROMPT 18 2 ""
			PICTURE "###.###.##@"
			MESSAGE _NUMEXPR,#1547/#1541
			GROUP 15 FG_COL6
		END
	END	// tot catmerc

END // section body, loop anamag

SECTION FOOTER ODD 2
	STRINGA 100
	BEGIN
		KEY "NUMP"
		PROMPT 50 1 "--------------"
	END

	NUMERO 101
	BEGIN
		KEY "NUMPAGE"
		PROMPT 50 2 ""
		MESSAGE _PAGENO
		PICTURE "-###-"
	END

END // fine footer
END // fine form