Corrette alcune imperfezioni sulla maschera.

git-svn-id: svn://10.65.10.50/trunk@3399 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-08-16 13:26:43 +00:00
parent bd25c5a620
commit 49b8af5ae1

View File

@ -19,24 +19,24 @@ BEGIN
FIELD CODCAT
FLAG "HU"
KEY 1
USE LF_SCONTI
USE LF_SCONTI SELECT CODCAT != ""
JOIN %CVE ALIAS 201 INTO CODTAB==CODCAT
INPUT TIPO F_R_TIPO SELECT
INPUT CODCAT F_R_RICERCA
INPUT CODART F_R_CODART
INPUT UM F_R_UM
DISPLAY "C.V." CODCAT
DISPLAY "Cat.Vend." CODCAT
DISPLAY "Codice art.@20" CODART
DISPLAY "U.M." UM
DISPLAY "N. scaglione" NSCAGL
DISPLAY "Sconto@25" SCONTO
OUTPUT F_R_RICERCA CODCAT
OUTPUT F_R_CODCAT CODCAT
OUTPUT F_R_DESCAT -201->S0
OUTPUT F_R_CODART CODART
OUTPUT F_R_UM UM
OUTPUT F_R_SCA NSCAGL
OUTPUT F_R_SCONTO SCONTO
OUTPUT F_R_QLIM QLIM
MESSAGE COPY,F_R_CODCAT
END
LIST F_R_TIPO 20
@ -77,8 +77,9 @@ BEGIN
KEY 1
USE LF_SCONTI
JOIN LF_ANAMAG INTO CODART==CODART
JOIN %CVE ALIAS 201 INTO CODTAB==CODCAT
INPUT TIPO F_R_TIPO SELECT
INPUT CODCAT F_R_RICERCA
INPUT CODCAT F_R_RICERCA SELECT
INPUT CODART F_R_RICERCA_A
INPUT UM F_R_UM
DISPLAY "Codice art.@20" CODART
@ -90,8 +91,6 @@ BEGIN
OUTPUT F_R_UM UM
OUTPUT F_R_DESART LF_ANAMAG->DESCR
OUTPUT F_R_SCA NSCAGL
OUTPUT F_R_SCONTO SCONTO
OUTPUT F_R_QLIM QLIM
MESSAGE COPY,F_R_CODART
END