Permessa l'introduzione dei sottogruppi solo quando il codice gruppo e' lungo 3 car.

git-svn-id: svn://10.65.10.50/trunk@5502 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto 1997-10-31 13:56:52 +00:00
parent e35d75f96e
commit 4f9f5a5d23

View File

@ -46,9 +46,9 @@ BEGIN
MESSAGE SHOW,F_DESGRU|HIDE,H_DESGRU|SHOW,F_DESSGR
MESSAGE EMPTY HIDE,F_DESGRU|SHOW,H_DESGRU|HIDE,F_DESSGR
//VALIDATE AUTOEXIT_FUNC 2 F_CODGRU F_CODSGR
STR_EXPR (#H_CODGRU!="")||(#F_CODSGR=="")
STR_EXPR (#H_CODGRU?="???")||(#F_CODSGR=="")
GROUP GR_SEARCH
WARNING "Gruppo merceologico inesistente"
WARNING "Gruppo merceologico non corretto"
CHECKTYPE NORMAL
END