campo-sirio/m770/776100b.uml

// Menu' manutenzione quadri
#include "776100b.h"
TOOLBAR "" 0 19 0 0       

BUTTON DLG_CANCEL 20 2
BEGIN          
  PROMPT -22 -11 "Menu' precedente"
  GROUP 1
END

BUTTON DLG_QUIT 20 2
BEGIN
  PROMPT -12 -11 "Fine"
END

BUTTON DLG_CANCEL_MENU 20 2
BEGIN          
  PROMPT -22 -11 "Menu' precedente"
  GROUP 2
  FLAGS "H"
END

BUTTON DLG_CANCEL_MENU_ST 20 2
BEGIN          
  PROMPT -22 -11 "Menu' precedente"
  GROUP 3
  FLAGS "H"
END

BUTTON DLG_CANCEL_MENU_SD 20 2
BEGIN          
  PROMPT -22 -11 "Menu' precedente"
  GROUP 4
  FLAGS "H"
END

#define	DLG_CANCEL_MENUSTQ	303

BUTTON DLG_CANCEL_MENUSTQ 20 2
BEGIN          
  PROMPT -22 -11 "Menu' precedente"
  GROUP 5
  FLAGS "H"
  MESSAGE HIDE,5@|SHOW,3@
END

ENDPAGE

PAGE "Manutenzione dichiarazione" -1 -1 78 21

// Serve solo per rileggere i quadri compilati (nel suo handler)
NUMBER RILEGGI_QUADRI 1 
BEGIN      
  PROMPT 1 1 ""
  FLAGS "H"
END

GROUPBOX DLG_NULL 78 3
BEGIN
    PROMPT 1 0 ""
END

NUMBER F_CODDITTA 5
BEGIN
    PROMPT 3 1 "Ditta  "
    FLAGS "D"
    FIELD LF_BASE->CODDITTA
END

STRING F_RAGDITTA 50
BEGIN
    PROMPT 17 1 "Ragione "
    FLAGS "D"
END

NUMBER F_ANNODIC 4
BEGIN
    PROMPT 52 3 "Anno dichiarazione "
    FLAGS "DR"
END

TEXT DLG_NULL
BEGIN
  PROMPT 5 5 "Manutenzione dati anagrafici"
  GROUP 1
END

// Il menu' viene richiamato nell'handler di questo bottone
BUTTON DLG_MANUTENZ 1 1
BEGIN
  PROMPT 1 5 ""
  PICTURE 123
  GROUP 1
END

// Aggancia il menu' sogg.dich.
TEXT DLG_NULL_SD
BEGIN
  PROMPT 5 6 "Soggetto dichiarante"
  FLAGS "D"
  GROUP 1                      
END

// Il menu' viene richiamato nell'handler di questo bottone
BUTTON DLG_STOPREC_SD 1 1
BEGIN
  PROMPT 1 6 ""
  PICTURE 123  
  GROUP 1
END

TEXT DLG_NULL
BEGIN
  PROMPT 5 7 "Anagrafica dipendenti"
  GROUP 1  
END

BUTTON DLG_STOPREC_AD 1 1
BEGIN
  PROMPT 1 7 ""
  PICTURE 123       
  GROUP 1
  MESSAGE RUN,773mod,-1,771150a,45,"Anagrafica dipendenti"|K_TAB,RILEGGI_QUADRI
END

TEXT DLG_NULL
BEGIN
  PROMPT 5 8 "Scheda percipienti"
  GROUP 1  
END

BUTTON DLG_STOPREC_SP 1 1
BEGIN
  PROMPT 1 8 ""     
  GROUP 1
  MESSAGE RUN,770,-0
END

TEXT DLG_NULL_SOCI
BEGIN
  PROMPT 43 5 "Manutenzione amministratori"
  GROUP 1
END

BUTTON DLG_MANUTENZ_SOCI 1 1
BEGIN
  PROMPT 39 5 "" 
  PICTURE 123
  GROUP 1
END

TEXT DLG_NULL
BEGIN
  PROMPT 43 6 "Invio/Ricezione ministeriale"
  GROUP 1
END

BUTTON DLG_STOPREC_IR 1 1
BEGIN
  PROMPT 39 6 ""
  PICTURE 123
  FLAGS "D"
  GROUP 1
END

BUTTON DLG_STOPREC_DG 1 1
BEGIN
  PROMPT 39 7 ""
  MESSAGE RUN,771MOD,-2,W|K_TAB,RILEGGI_QUADRI
  GROUP 1
END

TEXT DLG_NULL_DG
BEGIN
  PROMPT 43 7 "Prospetto dati generali"
  GROUP 1
END

TEXT DLG_NULL_ST
BEGIN
  PROMPT 43 8 "Stampe"
  GROUP 1  
END

// Il menu' viene richiamato nell'handler di questo bottone
BUTTON DLG_STOPREC_ST 1 1
BEGIN
  PROMPT 39 8 ""
  PICTURE 123  
  GROUP 1
END


// Prima colonna
TEXT DLG_NULL_A 
BEGIN
  PROMPT 5 10 "Quadro A"
  GROUP 1
END

BUTTON DLG_STOPREC_A 1 1
BEGIN
  PROMPT 1 10 ""
  MESSAGE RUN,771MOD,-7,A|K_TAB,RILEGGI_QUADRI
  PICTURE 123
  GROUP 1
END

TEXT DLG_NULL_A1 
BEGIN
  PROMPT 5 11 "Quadro A1"
  GROUP 1
END

BUTTON DLG_STOPREC_A1 1 1
BEGIN
  PROMPT 1 11 ""
  MESSAGE RUN,771MOD,-7,1|K_TAB,RILEGGI_QUADRI
  PICTURE 123
  GROUP 1
END

TEXT DLG_NULL_A2 
BEGIN
  PROMPT 5 12 "Quadro A2"
  GROUP 1
  FLAGS "D"
END

BUTTON DLG_STOPREC_A2 1 1
BEGIN
  PROMPT 1 12 ""
  MESSAGE RUN,771MOD,-7,2|K_TAB,RILEGGI_QUADRI
  PICTURE 123
  GROUP 1
END

TEXT DLG_NULL_A3 
BEGIN
  PROMPT 5 13 "Quadro A3"
  GROUP 1
END

BUTTON DLG_STOPREC_A3 1 1
BEGIN
  PROMPT 1 13 ""
  MESSAGE RUN,771MOD,-7,3|K_TAB,RILEGGI_QUADRI
  PICTURE 123
  GROUP 1
END

TEXT DLG_NULL_B
BEGIN
  PROMPT 5 14 "Quadro B"
  GROUP 1  
END

BUTTON DLG_STOPREC_B 1 1
BEGIN
  PROMPT 1 14 ""
  PICTURE 123
  MESSAGE RUN,773mod,-4,77qb,59,"Quadro B","B"|K_TAB,RILEGGI_QUADRI
  GROUP 1
END

TEXT DLG_NULL_B1
BEGIN
  PROMPT 5 15 "Quadro B-1"
  GROUP 1  
END

BUTTON DLG_STOPREC_B1 1 1
BEGIN
  PROMPT 1 15 ""
  PICTURE 123  
  MESSAGE RUN,773mod,-4,77qb1,60,"Quadro B1","B1"|K_TAB,RILEGGI_QUADRI
  GROUP 1
END

TEXT DLG_NULL_C
BEGIN
  PROMPT 5 16 "Quadro C  "
  GROUP 1  
END

BUTTON DLG_STOPREC_C 1 1
BEGIN
  PROMPT 1 16 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-5,C|K_TAB,RILEGGI_QUADRI
  GROUP 1
END

// Fine prima colonna

//
// Seconda colonna
//

TEXT DLG_NULL_D
BEGIN
  PROMPT 24 10 "Quadro D  "  
  GROUP 1  
END

BUTTON DLG_STOPREC_D 1 1
BEGIN
  PROMPT 20 10 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-5,D|K_TAB,RILEGGI_QUADRI
  GROUP 1
END

TEXT DLG_NULL_D1
BEGIN
  PROMPT 24 11 "Quadro D-1  "
  GROUP 1  
END

BUTTON DLG_STOPREC_D1 1 1
BEGIN
  PROMPT 20 11 ""
  PICTURE 123  
  MESSAGE RUN,771MOD,-5,1|K_TAB,RILEGGI_QUADRI
  GROUP 1
END

TEXT DLG_NULL_E
BEGIN
  PROMPT 24 12 "Quadro E  "
  GROUP 1  
END

BUTTON DLG_STOPREC_E 1 1
BEGIN
  PROMPT 20 12 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-5,E|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    

TEXT DLG_NULL_E1
BEGIN
  PROMPT 24 13 "Quadro E-1  "   
  GROUP 1  
END

BUTTON DLG_STOPREC_E1 1 1
BEGIN
  PROMPT 20 13 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-5,2|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    

TEXT DLG_NULL_E2
BEGIN
  PROMPT 24 14 "Quadro E-2"
  FLAGS "D"  
  GROUP 1  
END

BUTTON DLG_STOPREC_E2 1 1
BEGIN
  PROMPT 20 14 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-5,3|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    

TEXT DLG_NULL_F
BEGIN
  PROMPT 24 15 "Quadro F"  
  GROUP 1  
END

BUTTON DLG_STOPREC_F 1 1
BEGIN
  PROMPT 20 15 ""
  PICTURE 123  
  MESSAGE RUN,771MOD,-6,0|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    

TEXT DLG_NULL_F1
BEGIN
  PROMPT 24 16 "Quadro F-1"
  GROUP 1  
END

BUTTON DLG_STOPREC_F1 1 1
BEGIN
  PROMPT 20 16 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-6,1|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    
// Fine seconda colonna

// Terza colonna

TEXT DLG_NULL_F2
BEGIN
  PROMPT 43 10 "Quadro F-2" 
  GROUP 1  
END

BUTTON DLG_STOPREC_F2 1 1
BEGIN
  PROMPT 39 10 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-6,2|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    

TEXT DLG_NULL_G
BEGIN
  PROMPT 43 11 "Quadro G"
  GROUP 1  
END

BUTTON DLG_STOPREC_G 1 1
BEGIN
  PROMPT 39 11 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-6,3|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    

TEXT DLG_NULL_G1
BEGIN
  PROMPT 43 12 "Quadro G-1"  
  GROUP 1  
END                    

BUTTON DLG_STOPREC_G1 1 1
BEGIN
  PROMPT 39 12 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-6,5|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    

TEXT DLG_NULL_H
BEGIN
  PROMPT 43 13 "Quadro H  "
  GROUP 1  
END                    

BUTTON DLG_STOPREC_H 1 1
BEGIN
  PROMPT 39 13 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-1|K_TAB,RILEGGI_QUADRI
  GROUP 1  
END                    

TEXT DLG_NULL_I
BEGIN
  PROMPT 43 14 "Quadro I  "
  GROUP 1  
END                    

BUTTON DLG_STOPREC_I 1 1
BEGIN
  PROMPT 39 14 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-2,I|K_TAB,RILEGGI_QUADRI
  GROUP 1  
END                    

TEXT DLG_NULL_L
BEGIN
  PROMPT 43 15 "Quadro L  "
  GROUP 1  
END                    

// Forza l'esecuzione di leggi_quadri()
BUTTON DLG_STOPREC_L 1 1
BEGIN
  PROMPT 39 15 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-3|K_TAB,RILEGGI_QUADRI
  GROUP 1  
END                    

TEXT DLG_NULL_N
BEGIN
  PROMPT 43 16 "Quadro N"
  GROUP 1  
END                    

BUTTON DLG_STOPREC_N 1 1
BEGIN
  PROMPT 39 16 ""
  PICTURE 123
  MESSAGE RUN,773mod,-2,77qn,72,"Quadro N","N"|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    
// Fine terza colonna

// QUARTA colonna
TEXT DLG_NULL_P
BEGIN
  PROMPT 62 10 "Quadro P"
  GROUP 1  
END

BUTTON DLG_STOPREC_P 1 1
BEGIN
  PROMPT 58 10 ""
  PICTURE 123
  MESSAGE RUN,773mod,-2,77qp,73,"Quadro P","P"|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    

TEXT DLG_NULL_Q
BEGIN
  PROMPT 62 11 "Quadro Q"
  GROUP 1  
END                    

BUTTON DLG_STOPREC_Q 1 1
BEGIN
  PROMPT 58 11 ""
  MESSAGE RUN,773mod,-2,77qq,74,"Quadro Q","Q"|K_TAB,RILEGGI_QUADRI  
  PICTURE 123
  GROUP 1
END                    

TEXT DLG_NULL_R
BEGIN
  PROMPT 62 12 "Quadro R"
  GROUP 1  
END                    

BUTTON DLG_STOPREC_R 1 1
BEGIN
  PROMPT 58 12 ""
  PICTURE 123
  MESSAGE RUN,773mod,-2,77qr,75,"Quadro R","R"|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    

TEXT DLG_NULL_S
BEGIN
  PROMPT 62 13 "Quadro S"
  GROUP 1  
END                    

BUTTON DLG_STOPREC_S 1 1
BEGIN
  PROMPT 58 13 ""
  PICTURE 123
  MESSAGE RUN,773mod,-2,77qs,76,"Quadro S","S"|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    

TEXT DLG_NULL_T
BEGIN
  PROMPT 62 14 "Quadro T"
  GROUP 1  
END                    

BUTTON DLG_STOPREC_T 1 1
BEGIN
  PROMPT 58 14 ""
  PICTURE 123
  MESSAGE RUN,773mod,-2,77qt,77,"Quadro T","T"|K_TAB,RILEGGI_QUADRI
  GROUP 1
END                    
// Fine QUARTA colonna

//  
/////////// Colonna MENU' ANAGRAFICI ////////////////////////////
//          
TEXT DLG_NULL_DICH
BEGIN
  PROMPT 5 5 "Dichiarante"
  FLAGS "H" 
  GROUP 2
END

BUTTON DLG_STOPREC_DICH 1 1
BEGIN
  PROMPT 1 5 ""
  MESSAGE RUN,771MOD,-0,A
  PICTURE 123
  FLAGS "H"
  GROUP 2
END

TEXT DLG_NULL_RAPP
BEGIN
  PROMPT 5 6 "Rappresentante"
  FLAGS "H"
  GROUP 2  
END

BUTTON DLG_STOPREC_RAPP 1 1
BEGIN
  PROMPT 1 6 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-0,C 
  FLAGS "H"  
  GROUP 2
END

TEXT DLG_NULL_SCRIT
BEGIN
  PROMPT 5 7 "Scritture contabili"
  FLAGS "H"
  GROUP 2  
END

BUTTON DLG_STOPREC_SCRIT 1 1
BEGIN
  PROMPT 1 7 ""
  PICTURE 123  
  MESSAGE RUN,771MOD,-0,D
  FLAGS "H"
  GROUP 2
END

TEXT DLG_NULL_CAAF
BEGIN
  PROMPT 5 8 "Dati C.A.A.F."
  FLAGS "H"
  GROUP 2  
END

BUTTON DLG_STOPREC_CAAF 1 1
BEGIN
  PROMPT 1 8 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-0,E  
  FLAGS "H"
  GROUP 2
END

TEXT DLG_NULL_DIRET
BEGIN
  PROMPT 5 9 "Direttore / Professionista"
  FLAGS "H"
  GROUP 2  
END

BUTTON DLG_STOPREC_DIRET 1 1
BEGIN
  PROMPT 1 9 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-0,F
  FLAGS "H"
  GROUP 2
END

TEXT DLG_NULL_CONC
BEGIN
  PROMPT 5 10 "Concessione / UIDD"
  FLAGS "H"  
  GROUP 2  
END

BUTTON DLG_STOPREC_CONC 1 1
BEGIN
  PROMPT 1 10 ""
  PICTURE 123  
  MESSAGE RUN,771MOD,-0,G   
  FLAGS "H"
  GROUP 2
END

TEXT DLG_NULL_DIC0
BEGIN
  PROMPT 5 11 "Gestione dichiarante / estinti"
  FLAGS "HD"  
  GROUP 2  
END

BUTTON DLG_STOPREC_DIC0 1 1
BEGIN
  PROMPT 1 11 ""
  PICTURE 123  
  MESSAGE RUN,776MOD,-5   
  FLAGS "H"
  GROUP 2
END

TEXT DLG_NULL_SOCTRA
BEGIN
  PROMPT 5 12 "Manutenzione dati societa' trasformate"
  FLAGS "HD"  
  GROUP 2  
END

BUTTON DLG_STOPREC_SOCTRA 1 1
BEGIN
  PROMPT 1 12 ""
  PICTURE 123  
  MESSAGE RUN,773mod,-1,771100h,102,"Manutenzione dati societa' trasformate"   
  FLAGS "H"
  GROUP 2
END

/////////// Fine colonna MENU' ANAGRAFICI ////////////////////////////

/////////// Inizio colonna MENU' STAMPE ////////////////////////////
TEXT DLG_NULL_ST0
BEGIN
  PROMPT 5 5 "Stampa schede percipienti"
  FLAGS "H" 
  GROUP 3
END

BUTTON DLG_STOPREC_ST0 1 1
BEGIN
  PROMPT 1 5 ""
  MESSAGE RUN,772MOD,-0
  PICTURE 123
  FLAGS "H"
  GROUP 3
END

TEXT DLG_NULL_ST1
BEGIN
  PROMPT 5 6 "Stampa certificazioni"
  FLAGS "H"
  GROUP 3  
END

BUTTON DLG_STOPREC_ST1 1 1
BEGIN                                  
  PROMPT 1 6 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-1 
  FLAGS "H"  
  GROUP 3
END

TEXT DLG_NULL_ST2
BEGIN
  PROMPT 5 7 "Stampa movimenti percipienti"
  FLAGS "H"
  GROUP 3  
END

BUTTON DLG_STOPREC_ST2 1 1
BEGIN
  PROMPT 1 7 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-2 
  FLAGS "H"  
  GROUP 3
END

TEXT DLG_NULL_ST3
BEGIN
  PROMPT 5 8 "Stampa controllo versamento ritenute"
  FLAGS "H"
  GROUP 3  
END

BUTTON DLG_STOPREC_ST3 1 1
BEGIN
  PROMPT 1 8 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-3 
  FLAGS "H"  
  GROUP 3
END

TEXT DLG_NULL_STQD
BEGIN
  PROMPT 5 9 "Menu' stampe dichiarazioni"
  FLAGS "H"       
  GROUP 3  
END

BUTTON DLG_STOPREC_STQD 1 1
BEGIN
  PROMPT 1 9 ""
  PICTURE 123
  FLAGS "H"  
  MESSAGE HIDE,3@|SHOW,5@
  GROUP 3
END

#define	COL1	5
#define	COL2	24
#define	COL3	5
#define	COL4	5

#define	ROW1	7
#define	ROW2	8
#define	ROW3	9
#define	ROW4	10
#define	ROW5	11
#define	ROW6	12

#define	HIDDEN	"H"
#define	MYFLAGS	"H"
#define	GRUPPO	5

// Prima colonna
TEXT T_BASE
BEGIN
  PROMPT COL1 ROW1 "Quadro Base"
  GROUP GRUPPO
  FLAGS MYFLAGS
END

BUTTON B_BASE 1 1
BEGIN
  PROMPT 1 ROW1 ""
  MESSAGE RUN,772MOD,-4,Base,D
  PICTURE 123
  FLAGS MYFLAGS
  GROUP GRUPPO
END

TEXT T_LAGG
BEGIN
  PROMPT COL1 ROW2 "Quadro L agg."
  GROUP GRUPPO
  FLAGS MYFLAGS
END

BUTTON B_LAGG 1 1
BEGIN
  PROMPT 1 ROW2 ""
  MESSAGE RUN,772MOD,-4,L,D
  PICTURE 123
  FLAGS MYFLAGS
  GROUP GRUPPO
END

TEXT T_NAGG 
BEGIN
  PROMPT COL1 ROW3 "Quadro N agg."
  GROUP GRUPPO
  FLAGS MYFLAGS
END

BUTTON B_NAGG 1 1
BEGIN
  PROMPT 1 ROW3 ""
  MESSAGE RUN,772MOD,-4,N,D
  PICTURE 123
  FLAGS MYFLAGS
  GROUP GRUPPO
END

TEXT T_ALLSOC 
BEGIN
  PROMPT COL1 ROW4 "Allegato Soci "
  GROUP GRUPPO
  FLAGS MYFLAGS
END

BUTTON B_ALLSOC 1 1
BEGIN
  PROMPT 1 ROW4 ""
  MESSAGE RUN,772MOD,-4,S,D
  PICTURE 123
  FLAGS MYFLAGS
  GROUP GRUPPO
END

TEXT T_ALLG
BEGIN
  PROMPT COL1 ROW5 "Allegato G "
  FLAGS MYFLAGS  
  GROUP GRUPPO  
END

BUTTON B_ALLG 1 1
BEGIN
  PROMPT 1 ROW5 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,J,D
  FLAGS MYFLAGS
  GROUP GRUPPO
END
// Fine prima colonna


// Seconda colonna
TEXT T_A
BEGIN
  PROMPT 24 ROW1 "Quadro A  "  
  FLAGS MYFLAGS
  GROUP GRUPPO  
END

BUTTON B_A 1 1
BEGIN
  PROMPT 20 ROW1 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,A,D|K_TAB,RILEGGI_QUADRI
  FLAGS MYFLAGS
  GROUP GRUPPO
END

TEXT T_A1
BEGIN
  PROMPT 24 ROW2 "Quadro A1  "
  FLAGS MYFLAGS
  GROUP GRUPPO  
END

BUTTON B_A1 1 1
BEGIN
  PROMPT 20 ROW2 ""
  PICTURE 123  
  FLAGS MYFLAGS  
  MESSAGE RUN,772MOD,-4,A1,D|K_TAB,RILEGGI_QUADRI
  GROUP GRUPPO
END

TEXT T_A2
BEGIN
  PROMPT 24 ROW3 "Quadro A2  "
  FLAGS MYFLAGS 
  GROUP GRUPPO  
END

BUTTON B_A2 1 1
BEGIN
  PROMPT 20 ROW3 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,A2,D|K_TAB,RILEGGI_QUADRI
  FLAGS MYFLAGS  
  GROUP GRUPPO
END                    

TEXT T_A3
BEGIN
  PROMPT 24 ROW4 "Quadro A3  "   
  FLAGS MYFLAGS
  GROUP GRUPPO  
END

BUTTON B_A3 1 1
BEGIN
  PROMPT 20 ROW4 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,A3,D|K_TAB,RILEGGI_QUADRI
  FLAGS MYFLAGS  
  GROUP GRUPPO
END                    

TEXT T_B
BEGIN
  PROMPT 24 ROW5 "Quadro B"
  FLAGS MYFLAGS 
  GROUP GRUPPO  
END

BUTTON B_B 1 1
BEGIN
  PROMPT 20 ROW5 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,B,D|K_TAB,RILEGGI_QUADRI
  FLAGS MYFLAGS 
  GROUP GRUPPO
END                    

TEXT T_B1
BEGIN
  PROMPT 24 ROW6 "Quadro B1"  
  FLAGS MYFLAGS
  GROUP GRUPPO  
END

BUTTON B_B1 1 1
BEGIN
  PROMPT 20 ROW6 ""
  PICTURE 123  
//  MESSAGE RUN,771MOD,-6,0|K_TAB,RILEGGI_QUADRI
  FLAGS MYFLAGS
  GROUP GRUPPO
END                    
// Fine seconda colonna

// Terza colonna
TEXT T_C
BEGIN
  PROMPT 43 ROW1 "Quadro C" 
  FLAGS MYFLAGS
  GROUP GRUPPO  
END

BUTTON B_C 1 1
BEGIN
  PROMPT 39 ROW1 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,C,D|K_TAB,RILEGGI_QUADRI
  FLAGS MYFLAGS
  GROUP GRUPPO
END                    

TEXT T_D
BEGIN
  PROMPT 43 ROW2 "Quadro D"
  FLAGS HIDDEN
  GROUP GRUPPO  
END

BUTTON B_D 1 1
BEGIN
  PROMPT 39 ROW2 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,D,D
  FLAGS HIDDEN
  GROUP GRUPPO
END                    

TEXT T_D1
BEGIN
  PROMPT 43 ROW3 "Quadro D1"  
  FLAGS MYFLAGS
  GROUP GRUPPO  
END                    

BUTTON B_D1 1 1
BEGIN
  PROMPT 39 ROW3 ""
  PICTURE 123
  FLAGS MYFLAGS
  MESSAGE RUN,772MOD,-4,D1,D|K_TAB,RILEGGI_QUADRI
  GROUP GRUPPO
END                    

TEXT T_E
BEGIN
  PROMPT 43 ROW4 "Quadro E  " 
  FLAGS MYFLAGS
  GROUP GRUPPO  
END                    

BUTTON B_E 1 1
BEGIN
  PROMPT 39 ROW4 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,E,D|K_TAB,RILEGGI_QUADRI
  FLAGS MYFLAGS
  GROUP GRUPPO  
END                    

TEXT T_E1
BEGIN
  PROMPT 43 ROW5 "Quadro E1  "
  FLAGS MYFLAGS
  GROUP GRUPPO  
END                    

BUTTON B_E1 1 1
BEGIN
  PROMPT 39 ROW5 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,E1,D|K_TAB,RILEGGI_QUADRI
  FLAGS MYFLAGS
  GROUP GRUPPO  
END                    

TEXT T_E2
BEGIN
  PROMPT 43 ROW6 "Quadro E2  "
  FLAGS MYFLAGS
  GROUP GRUPPO  
END                    

BUTTON B_E2 1 1
BEGIN
  PROMPT 39 ROW6 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,E2,D|K_TAB,RILEGGI_QUADRI
  FLAGS MYFLAGS
  GROUP GRUPPO  
END                    
// Fine terza colonna

// QUARTA colonna
TEXT T_F
BEGIN
  PROMPT 62 ROW1 "Quadro F"
  FLAGS MYFLAGS
  GROUP GRUPPO  
END

BUTTON B_F 1 1
BEGIN
  PROMPT 58 ROW1 ""
  PICTURE 123
//  MESSAGE RUN,771MOD,-1 
  FLAGS MYFLAGS
  GROUP GRUPPO
END                    

TEXT T_F1
BEGIN
  PROMPT 62 ROW2 "Quadro F1"
  FLAGS MYFLAGS
  GROUP GRUPPO  
END                    

BUTTON B_F1 1 1
BEGIN
  PROMPT 58 ROW2 ""
  PICTURE 123
//  MESSAGE RUN,771MOD,-1
  FLAGS MYFLAGS
  GROUP GRUPPO
END                    

TEXT T_F2
BEGIN
  PROMPT 62 ROW3 "Quadro F2"
  FLAGS MYFLAGS 
  GROUP GRUPPO  
END                    

BUTTON B_F2 1 1
BEGIN
  PROMPT 58 ROW3 ""
  PICTURE 123
//  MESSAGE RUN,771MOD,-1
  FLAGS MYFLAGS
  GROUP GRUPPO
END                    

TEXT T_G
BEGIN
  PROMPT 62 ROW4 "Quadro G"
  FLAGS MYFLAGS  
  GROUP GRUPPO  
END                    

BUTTON B_G 1 1
BEGIN
  PROMPT 58 ROW4 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,G,D
  FLAGS MYFLAGS
  GROUP GRUPPO
END                    

TEXT T_G1
BEGIN
  PROMPT 62 ROW5 "Quadro G1"
  FLAGS MYFLAGS 
  GROUP GRUPPO  
END                    

BUTTON B_G1 1 1
BEGIN
  PROMPT 58 ROW5 ""
  PICTURE 123
//  MESSAGE RUN,771MOD,-1     
  FLAGS MYFLAGS
  GROUP GRUPPO
END             
       
TEXT T_H
BEGIN
  PROMPT 62 ROW6 "Quadro H"
  FLAGS MYFLAGS  
  GROUP GRUPPO  
END                    

BUTTON B_H 1 1
BEGIN
  PROMPT 58 ROW6 ""
  PICTURE 123
  MESSAGE RUN,772MOD,-4,H,D
  FLAGS MYFLAGS
  GROUP GRUPPO
END             
// Fine QUARTA colonna


/////////// Fine colonna MENU' STAMPE ////////////////////////////

/////////// Inizio colonna MENU' SOGG. DICHIARANTE ////////////////////////////
TEXT DLG_NULL_SD0
BEGIN
  PROMPT 5 5 "Quadro I"
  FLAGS "H" 
  GROUP 4
END

BUTTON DLG_STOPREC_SD0 1 1
BEGIN
  PROMPT 1 5 ""
  MESSAGE RUN,771MOD,-2,1|K_TAB,RILEGGI_QUADRI    
  PICTURE 123
  FLAGS "H"
  GROUP 4
END

TEXT DLG_NULL_SD1
BEGIN
  PROMPT 5 6 "Prospetto dati generali"
  FLAGS "H"
  GROUP 4  
END

BUTTON DLG_STOPREC_SD1 1 1
BEGIN
  PROMPT 1 6 ""
  PICTURE 123
  MESSAGE RUN,771MOD,-2,2|K_TAB,RILEGGI_QUADRI  
  FLAGS "H"  
  GROUP 4
END

TEXT DLG_NULL_SD2
BEGIN
  PROMPT 5 7 "Generazione riporti"
  FLAGS "H"
  GROUP 4 
END

BUTTON DLG_STOPREC_SD2 1 1
BEGIN
  PROMPT 1 7 ""
  PICTURE 123
  MESSAGE RUN,774,-1,D 
  FLAGS "H"  
  GROUP 4
END

/////////// Fine colonna MENU' SOGG. DICHIARANTE ////////////////////////////

ENDPAGE

ENDMASK