campo-sirio/cg/cg2104a.uml

#include "cg2104a.h"  

TOOLBAR "" 0 20 0 2

#include <toolbar.h>

ENDPAGE

PAGE "Registrazione Scadenze"  -1 -1 77 20
		 
GROUPBOX DLG_NULL 79 3
BEGIN
  PROMPT 0 1 "@bScadenzario"
END                 
										
NUMBER F_IMPONIBILE 15
BEGIN         
	PROMPT 2 2  "Imponibile "
	PICTURE "."
	FLAGS "DR"
END

NUMBER F_IMPOSTA 15
BEGIN                       
	PROMPT 29 2 "Imposta "
	PICTURE "."
	FLAGS "DR"
END

NUMBER F_SPESE 15
BEGIN
	PROMPT 53 2 "Spese  "
	PICTURE "."
	FLAGS "DR"
END


RADIOBUTTON F_RDIFFER 31
BEGIN
	PROMPT 1 4 "Opzioni ricalcolo rate" 
	ITEM   "1|Differenziate"
	ITEM   "2|Uguali"
	ITEM   "3|Uguali dall'ultima modificata" 
	ITEM   "4|Uguali finche' possibile"
END

BOOLEAN F_RECALC
BEGIN
	PROMPT 53 5 "Ricalcolo automatico"       
	MESSAGE TRUE  ENABLE,F_RDIFFER|ENABLE,F_MCOMM
	MESSAGE FALSE DISABLE,F_RDIFFER|DISABLE,F_MCOMM
END          

BOOLEAN F_MCOMM
BEGIN
	PROMPT 53 6 "Mese commerciale"       
END          


STRING F_NAMEPAG 27
BEGIN 
	PROMPT 36 7 "Pagamento       "
	FLAGS "D"
END

STRING F_TIPOPR 27
BEGIN 
	PROMPT 36 8 "Tipo prima rata "
	FLAGS "D"
END

SPREADSHEET F_RATESHEET 80 8
BEGIN  
	PROMPT 1 10 "Rate"                        
	ITEM   "Scadenza@10"
	ITEM   "Importo@15"
	ITEM   "Percentuale@12"
	ITEM   "Tipo"              
	ITEM   "Pagamento@32"              
END

ENDPAGE
ENDMASK

PAGE "Rata pagamento" -1 -1 50 7

DATE 101
BEGIN        
	PROMPT 1 2 "Scadenza       "
END

NUMBER 102 15 0
BEGIN
	PROMPT 1 3 "Importo        "
END

NUMBER 103 3 2
BEGIN
	PROMPT 1 4 "Percentuale    "
END

NUMBER 104 2 0
BEGIN
	PROMPT 1 5  "Tipo pagamento "
	HELP ""
	SHEET "Codice|Tipo pagamento@32"
	INPUT 104
	OUTPUT 104  
	OUTPUT 105
	ITEM "1|Rimessa diretta o contanti"
	ITEM "2|Tratta"
	ITEM "3|Ricevuta Bancaria"
	ITEM "4|Cessione"
	ITEM "5|Paghero'"
	ITEM "6|Lettera di credito"
	ITEM "7|Tratta accettata"
	ITEM "8|Altro pagamento"
END                                                

STRING 105 36 
BEGIN
	PROMPT 22 6 ""                                
    FLAGS "D"
END
			    
BUTTON DLG_CANCEL 10 2
BEGIN
	PROMPT -12 -1 ""
END

BUTTON DLG_OK 10 2
BEGIN
	PROMPT -22 -1 ""
END


ENDPAGE
ENDMASK