campo-sirio/ba/batbnot.uml
pirro 40137908ec Correzioni sulle tabelle di Pg
git-svn-id: svn://10.65.10.50/trunk@3609 c028cbd2-c16b-5b4b-a496-9718f37d4682
1996-09-17 16:13:35 +00:00

62 lines
984 B
Plaintext
Executable File

#include "batbnot.h"
TOOLBAR "" 0 20 0 2
#include <toolbar.h>
ENDPAGE
PAGE "Tabella Note cliente" -1 -1 78 8
GROUPBOX DLG_NULL 75 7
BEGIN
PROMPT 1 0 ""
FLAGS "R"
END
STRING F_CODICE 2
BEGIN
PROMPT 4 2 "Codice "
HELP "Codice note del cliente"
FIELD CODTAB
FLAGS "U"
KEY 1
USE %NOT
INPUT CODTAB F_CODICE
DISPLAY "Codice" CODTAB
DISPLAY "Destinazione@50" S0
DISPLAY "Blocca immissione" B0
OUTPUT F_CODICE CODTAB
OUTPUT F_DEST S0
OUTPUT F_BLOCCA B0
CHECKTYPE REQUIRED
END
STRING F_DEST 50
BEGIN
PROMPT 4 4 "Descrizione "
HELP "Descrizione della nota del cliente"
FIELD LF_TABCOM->S0
USE %NOT KEY 2
INPUT S0 F_DEST
DISPLAY "Destinazione@50" S0
DISPLAY "Codice" CODTAB
DISPLAY "Blocca immissione" B0
DISPLAY "Documento" B1
OUTPUT F_CODICE CODTAB
OUTPUT F_DEST S0
OUTPUT F_BLOCCA B0
CHECKTYPE REQUIRED
KEY 2
END
BOOLEAN F_BLOCCA
BEGIN
PROMPT 4 8 "Blocca immissione "
HELP "Indicare se bloccare l'inserimento del documento"
FIELD LF_TABCOM->B0
END
ENDPAGE
ENDMASK