campo-sirio/ba/ba1800a.uml
luca fcffd0c3f4 Patch level :10.0 256
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
utilizzata la nuova standardizzazione pictures nelle maschere di ba0 e ba1


git-svn-id: svn://10.65.10.50/trunk@18482 c028cbd2-c16b-5b4b-a496-9718f37d4682
2009-03-10 16:23:28 +00:00

133 lines
1.7 KiB
Plaintext
Executable File

#include "ba1800.h"
TOOLBAR "" 0 20 0 3
BUTTON F_SAVE 10 2
BEGIN
PROMPT -13 -11 "~Registra"
PICTURE TOOL_SAVEREC
END
BUTTON F_IMPORT 10 2
BEGIN
PROMPT -23 -11 "~Importa"
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -33 -11 ""
END
ENDPAGE
PAGE "Importazione" -1 -1 78 23
STRING F_FILE 50
BEGIN
PROMPT 1 1 "File da importare "
FLAGS "B"
END
STRING F_INI 50
BEGIN
PROMPT 1 2 "File di configurazione "
FLAGS "B"
END
BOOLEAN F_FIXEDLEN
BEGIN
PROMPT 1 3 "Record a lunghezza fissa"
MESSAGE FALSE HIDE,F_RECLEN|SHOW,F_RECSEP
MESSAGE TRUE SHOW,F_RECLEN|HIDE,F_RECSEP
END
STRING F_RECSEP 4
BEGIN
PROMPT 45 3 "Separatore di record "
END
NUMBER F_RECLEN 5
BEGIN
PROMPT 45 3 "Lunghezza "
FLAGFS "U"
CHECKTYPE REQUIRED
END
NUMBER F_SKIPLINES 5
BEGIN
PROMPT 1 4 "Righe iniziali da ignorare "
FLAGS "U"
END
STRING F_FIELDSEP 1
BEGIN
PROMPT 45 4 "Separatore dei campi "
END
NUMBER F_DISPLINES 5
BEGIN
PROMPT 1 5 "Righe da visualizzare "
FLAGS "U"
END
STRING F_ISAM 4
BEGIN
PROMPT 1 6 "File ISAM di destinazione "
FLAGS "BU"
END
BOOLEAN F_ZAP
BEGIN
PROMPT 41 6 "Azzera il file di destinazione"
END
BROWSEFILE F_COLUMNIZER 75 5
BEGIN
PROMPT 1 7 ""
END
SPREADSHEET F_FIELDS 78
BEGIN
PROMPT 1 15 ""
ITEM "Campo@12"
ITEM "Descrizione@50"
END
ENDPAGE
ENDMASK
PAGE "Riga" -1 -1 70 5
STRING F_FIELD 12
BEGIN
PROMPT 1 1 "Campo "
FLAGS "BU"
END
STRING F_DESCR 70 50
BEGIN
PROMPT 1 2 "Descrizione "
FLAGS "D"
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -13 -1 ""
END
BUTTON DLG_DELREC 10 2
BEGIN
PROMPT -23 -1 ""
END
BUTTON DLG_CANCEL 10 2
BEGIN
PROMPT -33 -1 ""
END
ENDPAGE
ENDMASK