campo-sirio/ba/ba1100c.uml

47 lines
800 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 "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