Files correlati : tc2.exe Ricompilazione Demo : [ ] Commento : Trasferimento IPSOA Eliminata la riclassificazione dei codici pagamento Corretta l'impostazione del codice cliente sui movimenti non lo metteva git-svn-id: svn://10.65.10.50/branches/R_10_00@21626 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			141 lines
		
	
	
		
			1.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			141 lines
		
	
	
		
			1.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
| #include "ipconf.h"
 | |
| 
 | |
| TOOLBAR "topbar" 0 0 0 2
 | |
| 
 | |
| #include <stdbar.h>
 | |
| 
 | |
| ENDPAGE
 | |
| 
 | |
| PAGE "Configurazione ditta per invio a IPSOA"  0 2 0 0
 | |
| 
 | |
| GROUPBOX DLG_NULL 76 3
 | |
| BEGIN
 | |
|   PROMPT 1 1 "@bDitta corrente"
 | |
| END
 | |
| 
 | |
| NUMBER F_CODDITTA 5
 | |
| BEGIN
 | |
|   PROMPT 2 2 "Codice      "
 | |
|   FLAGS "FD"
 | |
|   USE LF_NDITTE
 | |
|   INPUT CODDITTA F_CODDITTA
 | |
|   OUTPUT F_RAGSOC RAGSOC
 | |
|   CHECKTYPE REQUIRED
 | |
| END
 | |
| 
 | |
| STRING F_RAGSOC 50
 | |
| BEGIN
 | |
|   PROMPT 22 2 ""
 | |
|   FLAGS "D"
 | |
| END
 | |
| 
 | |
| BOOLEAN F_RICLNAZ
 | |
| BEGIN
 | |
| 	PROMPT 2 6 "Trascodifica Nazioni"
 | |
| 	FIELD IPRNAZ
 | |
| END
 | |
| 
 | |
| BOOLEAN F_RICLIVA
 | |
| BEGIN
 | |
| 	PROMPT 42 6 "Trascodifica Codici IVA"
 | |
| 	FIELD IPRIVA
 | |
| END
 | |
| 
 | |
| BOOLEAN F_RICLATT
 | |
| BEGIN
 | |
| 	PROMPT 2 8 "Trascodifica Codici Attività"
 | |
| 	FIELD IPATT
 | |
| END
 | |
| 
 | |
| BOOLEAN F_RICLREG
 | |
| BEGIN
 | |
| 	PROMPT 2 10 "Trascodifica Registri"
 | |
| 	FIELD IPRREG
 | |
| END
 | |
| 
 | |
| BOOLEAN F_RICLCONTI
 | |
| BEGIN
 | |
| 	PROMPT 42 10 "Trascodifica Piano dei conti"
 | |
| 	FIELD IPRCONTI
 | |
| END
 | |
| 
 | |
| BOOLEAN F_RICLCAU
 | |
| BEGIN
 | |
| 	PROMPT 2 12 "Trascodifica Causali"
 | |
| 	FIELD IPRCAU
 | |
| END
 | |
| 
 | |
| BOOLEAN F_RICLVALUTE
 | |
| BEGIN
 | |
| 	PROMPT 42 12 "Trascodifica valute"
 | |
| 	FIELD IPRVAL
 | |
| END
 | |
| 
 | |
| BOOLEAN F_RICLCCONS
 | |
| BEGIN
 | |
| 	PROMPT 2 14 "Trascodifica condizioni di consegna"
 | |
| 	FIELD IPRICC
 | |
| END
 | |
| 
 | |
| NUMBER F_LIVPC1 2
 | |
| BEGIN
 | |
| 	PROMPT 2 16 "Lunghezza livelli piano dei conti : 1 "
 | |
| 	FIELD IPLIVPC[1]
 | |
| END
 | |
| 
 | |
| NUMBER F_LIVPC2 2
 | |
| BEGIN
 | |
| 	PROMPT 46 16 "2 "
 | |
| 	FIELD IPLIVPC[2]
 | |
| END
 | |
| 
 | |
| NUMBER F_LIVPC3 2
 | |
| BEGIN
 | |
| 	PROMPT 52 16 "3 "
 | |
| 	FIELD IPLIVPC[3]
 | |
| END
 | |
| 
 | |
| NUMBER F_LIVPC4 2
 | |
| BEGIN
 | |
| 	PROMPT 58 16 "4 "
 | |
| 	FIELD IPLIVPC[4]
 | |
| END
 | |
| 
 | |
| NUMBER F_LIVPC5 2
 | |
| BEGIN
 | |
| 	PROMPT 64 16 "5 "
 | |
| 	FIELD IPLIVPC[5]
 | |
| END
 | |
| 
 | |
| NUMBER F_LIVPC6 2
 | |
| BEGIN
 | |
| 	PROMPT 70 16 "6 "
 | |
| 	FIELD IPLIVPC[6]
 | |
| END
 | |
| 
 | |
| BOOLEAN F_RIPRISTINO
 | |
| BEGIN
 | |
| 	PROMPT 2 18 "Ripristina alla data"
 | |
| 	MESSAGE FALSE DISABLE,F_ULTINVIO|DISABLE,F_ULTSCADID
 | |
| 	MESSAGE TRUE ENABLE,F_ULTINVIO|ENABLE,F_ULTSCADID
 | |
| END
 | |
| 
 | |
| DATE F_ULTINVIO
 | |
| BEGIN
 | |
|   PROMPT 42 18 "Data ultimo invio "
 | |
| 	FIELD IPULTINV
 | |
| 	FLAGS "D"
 | |
| END
 | |
| 
 | |
| NUMBER F_ULTSCADID 10
 | |
| BEGIN
 | |
|   PROMPT 42 19 "Ultimo ID scadenze "
 | |
| 	FIELD IPULTSCADID
 | |
| 	FLAGS "D"
 | |
| END
 | |
| 
 | |
| ENDPAGE
 | |
| 
 | |
| ENDMASK
 | |
| 
 |