USE FCA
JOIN GCA TO 5 ALIAS 500 INTO CODTAB[1,1]==CODTAB
END
	
DESCRIPTION
BEGIN
		5->* "Formato del codice"
    500->* "Gruppi codice"
END

GENERAL
BEGIN
    OFFSET 0 0
    FONT "Courier New"
    SIZE 12
    CARATTERE "X"
    INIZIALE 5 2
    FINALE 133
END

SECTION HEADER ODD 3
	STRINGA 100 132 1
	BEGIN
	 PROMPT 1 1 "----------------------------------------------------------------------------------------------"
	END
	STRINGA 101 132 1
	BEGIN
	 PROMPT 21 2 "Tabella Gruppi Formato Codice Articoli"
	END
	STRINGA 100 132 1
	BEGIN
	 PROMPT 1 3 "----------------------------------------------------------------------------------------------"
	END
END

SECTION BODY ODD 2

	STRINGA 110 20 1
	BEGIN
		KEY "CODICE livelo"
		PROMPT 2 1 "Livello "
		FIELD CODTAB
	END
	
	STRINGA 111 50 1
	BEGIN
		KEY "DESCR.livelo"
		PROMPT 12 1 ""
		FIELD S0
	END

	STRINGA 112 18 
	BEGIN
	 KEY "FORM.livelo"
	 PROMPT 4 2 "Formato "
	 FIELD S1
	 //PICTURE "('','')"
	END

	SECTION GRUPPO 3 1 0 FILE -500
		SECTION GRUPPI 1 1 1 GROUP
			STRINGA 120 20 1
			BEGIN
			 KEY "CODICE livelo"
			 PROMPT 12 1 ""
			 FIELD 500@->CODTAB[2,20]
			END
	
			STRINGA 121 50 1
			BEGIN
			 KEY "DESCR.livelo"
			 PROMPT 32 1 ""
			 FIELD 500@->S0
			END
		END // GRUPPI
	END
	STRINGA 131 20 1
	BEGIN
		KEY "CODICE livelo"
		FLAGS "H"
		PROMPT 2 1 ""
	END


END

SECTION FOOTER ODD 2

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

END