Files correlati : Ricompilazione Demo : [ ] Commento : Correzione tipi codtab (diventati number) git-svn-id: svn://10.65.10.50/trunk@17205 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			45 lines
		
	
	
		
			734 B
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			45 lines
		
	
	
		
			734 B
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
| #include "lvtblnd.h"
 | |
| 
 | |
| TOOLBAR "" 0 0 0 2
 | |
| #include "relapbar.h"
 | |
| ENDPAGE
 | |
| 
 | |
| PAGE "Linea di Destinazione" -1 -1 78 10
 | |
| 
 | |
| GROUPBOX DLG_NULL 80 4
 | |
| BEGIN
 | |
|   PROMPT 1 1 "@b Linea di Destinazione"
 | |
| END
 | |
| 
 | |
| STRING F_COD_LND 3
 | |
| BEGIN 
 | |
|   PROMPT 2 2 "Codice      "
 | |
|   HELP "Inserire il codice della linea di destinazione"
 | |
|   FLAGS "BU"
 | |
|   FIELD CODTAB
 | |
|   KEY 1  
 | |
|   USE &LND KEY 1
 | |
|   INPUT CODTAB F_COD_LND 
 | |
|   DISPLAY "Codice" CODTAB
 | |
|   DISPLAY "Descrizione @50" S0
 | |
|   OUTPUT F_COD_LND CODTAB
 | |
|   OUTPUT F_DES_LND S0  
 | |
|   CHECKTYPE REQUIRED
 | |
| END
 | |
| 
 | |
| STRING F_DES_LND 50
 | |
| BEGIN
 | |
|   PROMPT 2 3 "Descrizione "
 | |
|   FLAGS "U"  
 | |
|   FIELD S0
 | |
|   KEY 2  
 | |
|   USE &LND KEY 2
 | |
|   INPUT S0 F_DES_LND
 | |
|   COPY DISPLAY F_COD_LND
 | |
|   COPY OUTPUT F_COD_LND  
 | |
|   CHECKTYPE REQUIRED
 | |
| END  
 | |
| 
 | |
| ENDPAGE
 | |
| 
 | |
| ENDMASK |