campo-sirio/ve/vetbtri.uml
guy 30a4b60bb3 Aggiunte maschere mancanti per handlers copiandole da vecchia 11.0
git-svn-id: svn://10.65.10.50/branches/R_10_00@22649 c028cbd2-c16b-5b4b-a496-9718f37d4682
2012-04-24 10:27:58 +00:00

80 lines
1.4 KiB
Plaintext
Executable File

#include "vetbtri.h"
TOOLBAR "Toolbar" 0 0 0 2
#include <filebar.h>
BUTTON DLG_NULL 2 2
BEGIN
END
BUTTON DLG_CONFIG 2 2
BEGIN
PROMPT -12 -1 "~Handlers"
PICTURE TOOL_CONFIG
END
#include <cancelbar.h>
ENDPAGE
PAGE "Tipo di riga" 0 0 0 0
GROUPBOX DLG_NULL 75 7
BEGIN
PROMPT 1 0 ""
FLAGS "R"
END
STRING F_CODICE 4
BEGIN
PROMPT 2 2 "Codice "
FIELD CODTAB
FLAGS "U"
USE %TRI
INPUT CODTAB F_CODICE
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_CODICE CODTAB
OUTPUT F_DESCR S0
CHECKTYPE REQUIRED
KEY 1
END
STRING F_DESCR 50
BEGIN
PROMPT 2 4 "Descrizione "
FIELD S0
USE %TRI KEY 2
INPUT S0 F_DESCR
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_CODICE
CHECKTYPE REQUIRED
KEY 2
END
LIST F_TPR 16
BEGIN
PROMPT 2 8 "Tipo "
ITEMS "M|<M>erce"
ITEMS "S|<S>pese"
ITEMS "P|<P>restazioni"
ITEMS "R|Risorse"
ITEMS "A|Attrezzature"
ITEMS "C|S<c>onti"
ITEMS "O|<O>maggi"
ITEMS "D|<D>escrizioni"
ITEMS "T|Re<T>tifiche"
FIELD S7
END
BOOLEAN F_FORMFEED
BEGIN
PROMPT 2 10 "Salto pagina dopo questo tipo"
FIELD B0
END
ENDPAGE
ENDMASK