116 lines
1.5 KiB
Plaintext
Executable File
116 lines
1.5 KiB
Plaintext
Executable File
#include "ba0100a.h"
|
|
|
|
TOOLBAR "" 0 20 0 2
|
|
#include <toolbar.h>
|
|
ENDPAGE
|
|
|
|
PAGE "Gestione utenti" -1 -1 35 7
|
|
|
|
STRING F_USER 8
|
|
BEGIN
|
|
PROMPT 1 1 "Utente "
|
|
HELP "Inserire il nome dell'utente"
|
|
FLAGS "U"
|
|
USE LF_USER
|
|
CHECKTYPE NORMAL
|
|
INPUT USERNAME F_USER
|
|
DISPLAY "Utente" USERNAME
|
|
DISPLAY "Descrizione@50" USERDESC
|
|
OUTPUT F_USER USERNAME
|
|
KEY 1
|
|
CHECHTYPE REQUIRED
|
|
FIELD USERNAME
|
|
END
|
|
|
|
STRING F_USERDESC 50
|
|
BEGIN
|
|
PROMPT 1 3 "Descrizione "
|
|
FIELD USERDESC
|
|
MESSAGE "X",F_BASE
|
|
END
|
|
|
|
STRING F_PASSWORD 8 0
|
|
BEGIN
|
|
PROMPT 1 5 "Password "
|
|
HELP "Inserire la password"
|
|
MESSAGE "X",F_BASE
|
|
MESSAGE "X",F_MU
|
|
END
|
|
|
|
GROUPBOX DLG_NULL 76 13
|
|
BEGIN
|
|
PROMPT 0 7 "Moduli"
|
|
END
|
|
|
|
BOOLEAN F_BASE
|
|
BEGIN
|
|
PROMPT 1 8 "Base"
|
|
FLAGS "D"
|
|
FIELD AUTSTR[1,1]
|
|
END
|
|
|
|
BOOLEAN F_CG
|
|
BEGIN
|
|
PROMPT 31 8 "Contabilita'"
|
|
FIELD AUTSTR[2,2]
|
|
END
|
|
|
|
BOOLEAN F_MU
|
|
BEGIN
|
|
PROMPT 59 8 "Multiutenza"
|
|
FIELD AUTSTR[3,3]
|
|
FLAGS "D"
|
|
END
|
|
|
|
BOOLEAN F_SC
|
|
BEGIN
|
|
PROMPT 1 9 "Saldaconto"
|
|
FIELD AUTSTR[4,4]
|
|
END
|
|
|
|
BOOLEAN F_EF
|
|
BEGIN
|
|
PROMPT 31 9 "Portafoglio"
|
|
FIELD AUTSTR[5,5]
|
|
END
|
|
|
|
BOOLEAN F_VE
|
|
BEGIN
|
|
PROMPT 59 9 "Vendite"
|
|
FIELD AUTSTR[6,6]
|
|
END
|
|
|
|
BOOLEAN F_MG
|
|
BEGIN
|
|
PROMPT 1 10 "Magazzino"
|
|
FIELD AUTSTR[7,7]
|
|
END
|
|
|
|
BOOLEAN F_770
|
|
BEGIN
|
|
PROMPT 31 10 "770"
|
|
FIELD AUTSTR[8,8]
|
|
END
|
|
|
|
BOOLEAN F_AB
|
|
BEGIN
|
|
PROMPT 59 10 "Bilanci"
|
|
FIELD AUTSTR[21,21]
|
|
END
|
|
|
|
BOOLEAN F_NI
|
|
BEGIN
|
|
PROMPT 1 11 "Nota integrativa"
|
|
FIELD AUTSTR[22,22]
|
|
END
|
|
|
|
BOOLEAN F_NR
|
|
BEGIN
|
|
PROMPT 31 11 "Nota integrativa ridotta"
|
|
FIELD AUTSTR[23,23]
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
ENDMASK
|