51 lines
		
	
	
		
			931 B
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			51 lines
		
	
	
		
			931 B
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
#include <defmask.h>
 | 
						|
#include "ba1100a.h"
 | 
						|
 | 
						|
PAGE "Carico Archivio" -1 -1 70 13
 | 
						|
 | 
						|
STRING FLD_INFILE 50 
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 1 "File di input  "
 | 
						|
  HELP "Nome del file dove caricare i dati"
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN FLD_FIXLEN
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 3 "Lunghezza fissa"
 | 
						|
  HELP "Indicare se i record hanno lunghezza fissa"
 | 
						|
  MESSAGE FALSE ENABLE,FLD_FS|ENABLE,FLD_FD|ENABLE,FLD_RS|"\0x7c",FLD_FS|"\0",FLD_FD|"\n",FLD_RS
 | 
						|
  MESSAGE TRUE DISABLE,FLD_FS|DISABLE,FLD_FD|DISABLE,FLD_RS|"\0",FLD_FS|"\0",FLD_FD|"\n",FLD_RS
 | 
						|
END
 | 
						|
 | 
						|
STRING FLD_FS 5
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 5 "Separatore di campi   "
 | 
						|
  HELP "Carattere separatore dei campi"
 | 
						|
END
 | 
						|
 | 
						|
STRING FLD_FD 5 
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 7 "Delimitatore di campi "
 | 
						|
  HELP "Carattere delimitatore dei campi"
 | 
						|
END
 | 
						|
 | 
						|
STRING FLD_RS 5
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 9 "Separatore di record  "
 | 
						|
  HELP "Carattere delimitatore dei record"
 | 
						|
END
 | 
						|
 | 
						|
BUTTON DLG_OK 9 2
 | 
						|
BEGIN
 | 
						|
  PROMPT -14 -1 ""
 | 
						|
END
 | 
						|
 | 
						|
BUTTON DLG_CANCEL 9 2
 | 
						|
BEGIN
 | 
						|
  PROMPT -24 -1 ""
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
ENDMASK
 |