102 lines
		
	
	
		
			1.3 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			102 lines
		
	
	
		
			1.3 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
#include "batblng.h"
 | 
						|
 | 
						|
TOOLBAR "" 0 20 0 2
 | 
						|
 | 
						|
#include <toolbar.h>
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
PAGE "Tabella lingue" -1 -1 78 8
 | 
						|
 | 
						|
GROUPBOX DLG_NULL 75 7
 | 
						|
BEGIN
 | 
						|
 PROMPT 1 0 ""
 | 
						|
 FLAGS "R"
 | 
						|
END
 | 
						|
 | 
						|
STRING F_CODICE 1
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 2 "Codice      "
 | 
						|
  FIELD CODTAB
 | 
						|
  FLAGS "U"
 | 
						|
  KEY 1
 | 
						|
  USE %LNG
 | 
						|
  INPUT CODTAB F_CODICE
 | 
						|
  DISPLAY "Codice" CODTAB
 | 
						|
  DISPLAY "Descrizione @50" S0
 | 
						|
  OUTPUT F_CODICE CODTAB
 | 
						|
  OUTPUT F_DESCR S0
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
END
 | 
						|
 | 
						|
STRING F_DESCR 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 4 "Descrizione "
 | 
						|
  FIELD LF_TABCOM->S0
 | 
						|
  KEY 2
 | 
						|
  USE %LNG KEY 2
 | 
						|
  INPUT S0 F_DESCR
 | 
						|
  DISPLAY "Descrizione @50" S0
 | 
						|
  DISPLAY "Codice" CODTAB
 | 
						|
  OUTPUT F_CODICE CODTAB
 | 
						|
  OUTPUT F_DESCR S0
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
END
 | 
						|
 | 
						|
GROUPBOX DLG_NULL 75 3
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 7 "Formato data"
 | 
						|
END
 | 
						|
 | 
						|
LIST F_DATA 3 20
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 8 "Ordine data   "
 | 
						|
  ITEM "GMA|Giorno-Mese-Anno"
 | 
						|
  ITEM "MGA|Mese-Giorno-Anno"
 | 
						|
  ITEM "AMG|Anno-Mese-Giorno"
 | 
						|
  FIELD S7[1,3]
 | 
						|
END
 | 
						|
 | 
						|
STRING F_DATASEP 1
 | 
						|
BEGIN
 | 
						|
  PROMPT 40 8 "Separatore data     "
 | 
						|
  FIELD S7[4,4]
 | 
						|
END
 | 
						|
 | 
						|
 | 
						|
GROUPBOX DLG_NULL 75 3
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 10 "Formato valuta"
 | 
						|
END
 | 
						|
 | 
						|
LIST F_MIGLIAIA 1 14
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 11 "Separatore migliaia "
 | 
						|
  ITEM ".|Punto   (.)" MESSAGE "I",F_DECIMALI
 | 
						|
  ITEM ",|Virgola (,)" MESSAGE "E",F_DECIMALI
 | 
						|
  FIELD S8
 | 
						|
END
 | 
						|
 | 
						|
LIST F_DECIMALI 1 14
 | 
						|
BEGIN
 | 
						|
  PROMPT 40 11 "Separatore decimali "
 | 
						|
  ITEM "I|Virgola (,)"
 | 
						|
  ITEM "E|Punto   (.)"
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
ENDMASK
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 |