Files correlati : Ricompilazione Demo : [ ] Commento :tabelle BA in new style git-svn-id: svn://10.65.10.50/trunk@16514 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			100 lines
		
	
	
		
			1.3 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			100 lines
		
	
	
		
			1.3 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
#include "batblng.h"
 | 
						|
 | 
						|
TOOLBAR "topbar" 0 0 0 2
 | 
						|
#include <relapbar.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 @60" 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 4
 | 
						|
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 2 12 "Separatore decimali "
 | 
						|
  ITEM "I|Virgola (,)"
 | 
						|
  ITEM "E|Punto   (.)"
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
ENDMASK
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 | 
						|
 |