Files correlati : Ricompilazione Demo : [ ] Commento : ammodernate maschere git-svn-id: svn://10.65.10.50/trunk@18500 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			79 lines
		
	
	
		
			1.5 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			79 lines
		
	
	
		
			1.5 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
| #include "tcts.h"
 | |
| 
 | |
| TOOLBAR "topbar" 0 0 0 2
 | |
| #include <relapbar.h>
 | |
| ENDPAGE
 | |
| 
 | |
| PAGE "Codici IVA 11" 0 2 0 0
 | |
| 
 | |
| GROUPBOX DLG_NULL 78 3
 | |
| BEGIN
 | |
|   PROMPT 1 1 "Codice IVA 11 TeamSystem"
 | |
| END
 | |
| 
 | |
| LIST F_COD 5
 | |
| BEGIN
 | |
|   PROMPT 50 50 ""
 | |
|   ITEM "TSI11|TSI11"
 | |
|   FIELD COD
 | |
|   FLAGS "D"
 | |
|   KEY 1
 | |
| END
 | |
| 
 | |
| NUMBER F_CODTAB 2
 | |
| BEGIN
 | |
|   PROMPT 2 2 ""
 | |
|   USE LF_MULTIREL
 | |
|   INPUT COD F_COD SELECT
 | |
|   INPUT FIRST F_CODTAB
 | |
|   DISPLAY "Codice" FIRST
 | |
|   DISPLAY "Descrizione@60" DATA
 | |
|   DISPLAY "Tipo spesa/ricavo" SECOND
 | |
|   OUTPUT F_CODTAB FIRST
 | |
|   OUTPUT F_DESC DATA
 | |
| 	OUTPUT F_COD_CAMPO SECOND
 | |
|   CHECKTYPE REQUIRED
 | |
|   FIELD FIRST
 | |
|   FLAGS "Z"
 | |
|   KEY 1
 | |
| END
 | |
| 
 | |
| STRING F_DESC 50
 | |
| BEGIN
 | |
|   PROMPT 10 2 "Descrizione "
 | |
|   USE LF_MULTIREL KEY 2
 | |
|   INPUT COD F_COD SELECT
 | |
|   INPUT DATA F_DESC
 | |
|   DISPLAY "Descrizione@60" DATA
 | |
|   DISPLAY "Codice" FIRST
 | |
|   DISPLAY "Tipo spesa/ricavo" SECOND
 | |
|   COPY OUTPUT F_CODTAB
 | |
|   FIELD DATA
 | |
|   KEY 3
 | |
|   CHECKTYPE REQUIRED
 | |
| END
 | |
| 
 | |
| LIST F_COD_CAMPO 2 50
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Codice "
 | |
|   FIELD SECOND
 | |
|   ITEM "0|0. Acquisti o vendite in genere"
 | |
|   ITEM "1|1. Acquisti beni per rivendita"
 | |
|   ITEM "2|2. Acquisti beni ammortizzabili"
 | |
|   ITEM "3|3. Acquisti beni ammortizzabili con detr. 6%"
 | |
|   ITEM "4|4. Vendita beni strumentali art. 17"
 | |
|   ITEM "5|5. Beni per rivendita da non ventilare"
 | |
|   ITEM "8|8. Altri beni strumentali acquistati in leasing"
 | |
|   ITEM "9|9. Spese Generali"
 | |
| 	ITEM "13|13. Subappalti in edilizia (Reverse charge)"
 | |
| 	ITEM "50|50. Importazione di oro o argento (Reverse charge)"
 | |
| 	ITEM "51|51. Rottami (Reverse charge)"
 | |
| 
 | |
| 	KEY 1
 | |
| 	GROUP 1
 | |
| END
 | |
| 
 | |
| ENDPAGE
 | |
| 
 | |
| ENDMASK
 |