Errore MI2285
git-svn-id: svn://10.65.10.50/trunk@4309 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
6c05bdb650
commit
963e2aa96c
@ -1,6 +1,6 @@
|
||||
#include "batbitl.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
@ -8,35 +8,35 @@ PAGE "Libri sociali" -1 -1 78 9
|
||||
|
||||
NUMBER FLD_TABITL_CODTAB 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD %ITL->CODTAB
|
||||
HELP "Codice del libro sociale"
|
||||
USE %ITL
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB FLD_TABITL_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT FLD_TABITL_CODTAB CODTAB
|
||||
OUTPUT FLD_TABITL_S0 S0
|
||||
KEY 1
|
||||
FLAGS "Z"
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD %ITL->CODTAB
|
||||
HELP "Codice del libro sociale"
|
||||
USE %ITL
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB FLD_TABITL_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT FLD_TABITL_CODTAB CODTAB
|
||||
OUTPUT FLD_TABITL_S0 S0
|
||||
KEY 1
|
||||
FLAGS "Z"
|
||||
END
|
||||
|
||||
STRING FLD_TABITL_S0 50
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD %ITL->S0
|
||||
HELP "Nome del libro sociale"
|
||||
USE %ITL KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "Manca la descrizione"
|
||||
INPUT S0 FLD_TABITL_S0
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT FLD_TABITL_CODTAB
|
||||
KEY 2
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD %ITL->S0
|
||||
HELP "Nome del libro sociale"
|
||||
USE %ITL KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "Manca la descrizione"
|
||||
INPUT S0 FLD_TABITL_S0
|
||||
DISPLAY "Descrizione@60" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT FLD_TABITL_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
Loading…
x
Reference in New Issue
Block a user