Aggiunti i FLAG "U" per rendere upper il codice lingua immesso;
aggiunte le warning per i campi obbligatori. git-svn-id: svn://10.65.10.50/trunk@2348 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
c01366115c
commit
86c2ec4ef7
@ -46,6 +46,7 @@ END
|
||||
STRING F_CCODELS 1
|
||||
BEGIN
|
||||
PROMPT 40 3 "Codice lingua "
|
||||
FLAGS "U"
|
||||
HELP "Codice lingua del profilo"
|
||||
USE %LNG
|
||||
INPUT CODTAB F_CCODELS
|
||||
@ -72,11 +73,13 @@ BEGIN
|
||||
PROMPT 2 7 "Codice profilo "
|
||||
FLAGS "Z"
|
||||
VALIDATE NOT_EMPTY_FUNC
|
||||
WARNING "Il codice profilo di destinazione e' obbligatorio"
|
||||
END
|
||||
|
||||
STRING F_CCODELD 1
|
||||
BEGIN
|
||||
PROMPT 40 7 "Codice lingua "
|
||||
FLAGS "U"
|
||||
COPY USE F_CCODELS
|
||||
INPUT CODTAB F_CCODELD
|
||||
COPY DISPLAY F_CCODELS
|
||||
@ -88,6 +91,7 @@ STRING F_CDESCD 50
|
||||
BEGIN
|
||||
PROMPT 2 8 "Descrizione "
|
||||
VALIDATE NOT_EMPTY_FUNC
|
||||
WARNING "La descrizione del profilo di destinazione e' obbligatoria"
|
||||
END
|
||||
|
||||
BUTTON DLG_OK 9 2
|
||||
|
Loading…
x
Reference in New Issue
Block a user