63 lines
		
	
	
		
			789 B
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			63 lines
		
	
	
		
			789 B
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
| #include "cg2900.h"
 | |
| 
 | |
| PAGE "Invio contabilita'" -1 -1 76 11
 | |
| 
 | |
| NUMBER F_DITTAINV 5
 | |
| BEGIN
 | |
|   PROMPT 2 1 "Codice ditta inviante "
 | |
|   FLAGS "Z"
 | |
|   CHECKTYPE REQUIRED
 | |
| END
 | |
| 
 | |
| STRING F_RAGSOC 50
 | |
| BEGIN
 | |
|   PROMPT 2 2 "Ragione sociale       "
 | |
|   FLAGS "D"
 | |
| END
 | |
| 
 | |
| NUMBER F_NUMULINV 3
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Numero ultimo invio   "
 | |
|   FLAGS "R"
 | |
| END
 | |
| 
 | |
| DATE F_DATAULIN 
 | |
| BEGIN
 | |
|   PROMPT 44 4 "Data ultimo invio   "
 | |
| END
 | |
|             
 | |
| STRING F_STATO 1
 | |
| BEGIN
 | |
|   PROMPT 2 5 "Stato ultimo invio    "
 | |
| END             
 | |
| 
 | |
| STRING F_USELAB 1
 | |
| BEGIN
 | |
|   PROMPT 27 5 ""
 | |
| END
 | |
| 
 | |
| STRING F_CHIAVE 15
 | |
| BEGIN
 | |
|   PROMPT 30 5 ""
 | |
| END
 | |
| 
 | |
| DATE F_DATALIM
 | |
| BEGIN
 | |
|   PROMPT 2 7 "Data limite invio     "
 | |
|   CHECKTYPE REQUIRED
 | |
| END
 | |
| 
 | |
| BUTTON DLG_OK 9 2
 | |
| BEGIN 
 | |
|   PROMPT -12 -1 ""
 | |
| END
 | |
| 
 | |
| BUTTON DLG_QUIT 9 2
 | |
| BEGIN
 | |
|   PROMPT -22 -1 ""
 | |
| END
 | |
|                 
 | |
| ENDPAGE
 | |
| 
 | |
| ENDMASK
 |