Maschere per modifica formati date/numeri

git-svn-id: svn://10.65.10.50/trunk@2206 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-11-24 09:59:59 +00:00
parent b94c516540
commit 7e7aec3dea
2 changed files with 105 additions and 0 deletions

69
ba/ba21dt.uml Executable file
View File

@ -0,0 +1,69 @@
#include "ba2100.h"
PAGE "Impostazione formato date" -1 -1 55 10
LIST F_DFORMAT 16
BEGIN
PROMPT 1 1 "Tipo data "
ITEM "1|Giorno Mese Anno"
ITEM "2|Mese Anno Giorno"
ITEM "3|Anno Giorno Mese"
ITEM "7|Mese Anno"
ITEM "4|Anno"
ITEM "5|Mese"
ITEM "6|Giorno"
END
LIST F_DDAY 16
BEGIN
PROMPT 1 2 "Formato giorno "
ITEM "4|Con zeri(es. 02)"
ITEM "2|Normale (es. 2)"
ITEM "5|In lettere"
ITEM "6|Giorno settimana"
END
LIST F_DMONTH 16
BEGIN
PROMPT 1 3 "Formato mese "
ITEM "4|Con zeri(es. 02)"
ITEM "2|Normale (es. 2)"
ITEM "5|In lettere"
ITEM "7|Trimestre"
END
LIST F_DYEAR 16
BEGIN
PROMPT 1 4 "Formato anno "
ITEM "2|Breve (2 cifre)"
ITEM "4|Lungo (4 cifre)"
END
LIST F_DSEP 5
BEGIN
PROMPT 1 5 "Separatore "
ITEM "-|-"
ITEM "/|/"
ITEM ".|."
ITEM ",|,"
ITEM "S|Spazio"
END
STRING F_DEXAMPLE 40
BEGIN
PROMPT 1 7 "Esempio "
FLAGS "D"
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_CANCEL 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK

36
ba/ba21nm.uml Executable file
View File

@ -0,0 +1,36 @@
#include "ba2100.h"
PAGE "Impostazione formato numeri" -1 -1 50 7
NUMBER F_WIDTH 3
BEGIN
PROMPT 1 1 "Larghezza "
HELP "Lunghezza massima da stampare"
CHECKTYPE REQUIRED
END
NUMBER F_DECIMALS 2
BEGIN
PROMPT 1 2 "Decimali "
HELP "Numero di decimali"
END
STRING F_PICTURE 80 35
BEGIN
PROMPT 1 3 "Formato "
HELP "Formato di stampa (# = ' ', @ = '0', ~ = '')"
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_CANCEL 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK