47 lines
800 B
Plaintext
47 lines
800 B
Plaintext
|
#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 "Inserire il nome del file di input"
|
||
|
|
END
|
||
|
|
|
||
|
|
BOOLEAN FLD_FIXLEN
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 3 "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 "
|
||
|
|
END
|
||
|
|
|
||
|
|
STRING FLD_FD 5
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 7 "Delimitatore di campi "
|
||
|
|
END
|
||
|
|
|
||
|
|
STRING FLD_RS 5
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 9 "Separatore di record "
|
||
|
|
END
|
||
|
|
|
||
|
|
BUTTON DLG_OK 9 2
|
||
|
|
BEGIN
|
||
|
|
PROMPT -14 -1 ""
|
||
|
|
END
|
||
|
|
|
||
|
|
BUTTON DLG_CANCEL 9 2
|
||
|
|
BEGIN
|
||
|
|
PROMPT -24 -1 ""
|
||
|
|
END
|
||
|
|
|
||
|
|
ENDPAGE
|
||
|
|
|
||
|
|
ENDMASK
|