169 lines
		
	
	
		
			2.8 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			169 lines
		
	
	
		
			2.8 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
#include "cg4900.h"
 | 
						|
 | 
						|
TOOLBAR "" 0 20 0 2
 | 
						|
 | 
						|
/*
 | 
						|
BUTTON DLG_SAVEREC 10 2
 | 
						|
BEGIN
 | 
						|
PROMPT -12 -1 "~Registra"
 | 
						|
MESSAGE EXIT,K_SAVE
 | 
						|
END
 | 
						|
*/
 | 
						|
 | 
						|
BUTTON DLG_CANCEL 10 2
 | 
						|
BEGIN
 | 
						|
PROMPT -12 -1 ""
 | 
						|
MESSAGE EXIT,K_ESC
 | 
						|
END  
 | 
						|
 | 
						|
BUTTON DLG_QUIT 10 2
 | 
						|
BEGIN
 | 
						|
PROMPT -22 -1 ""
 | 
						|
MESSAGE EXIT,K_QUIT
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
PAGE "Acconto su operazioni effettuate"  -1 -1 77 20
 | 
						|
         
 | 
						|
GROUPBOX DLG_NULL 78 3
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 0 "@bDitta corrente"
 | 
						|
END                 
 | 
						|
                                        
 | 
						|
NUMBER F_CODDITTA 5
 | 
						|
BEGIN         
 | 
						|
  PROMPT 3 1  "Codice "
 | 
						|
  FLAGS "DFR" 
 | 
						|
  USE LF_NDITTE KEY 1
 | 
						|
  INPUT CODDITTA F_CODDITTA
 | 
						|
  OUTPUT F_RAGSOC RAGSOC
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
END
 | 
						|
 | 
						|
STRING F_RAGSOC 50
 | 
						|
BEGIN                       
 | 
						|
  PROMPT 17 1 "Rag. Soc. "
 | 
						|
  FLAGS "D"
 | 
						|
END                                                           
 | 
						|
 | 
						|
TEXT DLG_NULL 
 | 
						|
BEGIN 
 | 
						|
  PROMPT 51 3 "Credito"
 | 
						|
END
 | 
						|
 | 
						|
TEXT DLG_NULL 
 | 
						|
BEGIN 
 | 
						|
  PROMPT 66 3 "Debito"
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_IVAVEN 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 4 "Iva sulle operazioni di vendita                              "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_IVARED 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 5 "Rettifiche iva a debito                                      "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_IVARIM 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 6 "Iva chiesta a rimborso                                       "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_RISVEN 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 7 "RISULTATO                                                    "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."     
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_IVAACQ 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 9 "Iva sulle operazioni di acquisto              "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_PERPRO 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 10 "meno % di prorata pari a Lire "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_CREPRE 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 11 "Credito precedente                            "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_ULTDET 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 12 "Ulteriori detrazioni                          "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_IVAREC 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 13 "Rettifiche iva a credito                      "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_RISACQ 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 14 "RISULTATO                                     "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_IVACRE 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 15 15 "IVA A CREDITO                   "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_CREEVI 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 6 17 "CREDITO DA EVIDENZIARE                   "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_IVADEB 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 16 15 "IVA A DEBITO                                  "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "." 
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_ACCVER 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 10 17 "ACCONTO DA VERSARE                                  "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_ACCNVER 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 6 17 "ACCONTO DA NON VERSARE                   "
 | 
						|
  FLAGS "RD"
 | 
						|
  PICTURE "."
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
ENDMASK
 | 
						|
 |