Corretto errore MI4013

git-svn-id: svn://10.65.10.50/trunk@475 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-10-27 13:33:43 +00:00
parent d2d8caf956
commit 86f781e5e8

View File

@ -5,7 +5,7 @@ PAGE "Selezione Ditta" -1 -1 64 7
NUMBER F_CODDITTA 5
BEGIN
PROMPT 1 1 "Codice "
HELP "Inserire il codice della ditta"
HELP "Codice della ditta"
FLAGS "FR"
USE LF_NDITTE KEY 1
CHECKTYPE NORMAL
@ -36,13 +36,12 @@ STRING F_RAGSOC 50
BEGIN
PROMPT 1 3 "Rag. Soc. "
USE LF_NDITTE KEY 2
HELP "Inserire la ragione sociale della ditta"
HELP "Ragione sociale della ditta"
INPUT RAGSOC F_RAGSOC
INPUT CODDITTA F_CODDITTA
DISPLAY "Codice" CODDITTA
DISPLAY "Ragione sociale@50" RAGSOC
OUTPUT F_CODDITTA CODDITTA
OUTPUT F_RAGSOC RAGSOC
DISPLAY "Codice" CODDITTA
COPY OUTPUT F_CODDITTA
KEY 2
GROUP 1
END