Sistemata la maschera di selezione stampa documenti.

git-svn-id: svn://10.65.10.50/trunk@3108 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-06-27 09:51:10 +00:00
parent 9059f96bb6
commit 70151080d9

View File

@ -1,6 +1,6 @@
#include "ve1100.h" #include "ve1100.h"
PAGE "STAMPA DOCUMENTI VENDITA" -1 -1 40 19 PAGE "Stampa Documenti Vendita" -1 -1 40 19
STRING F_CODNUM 4 4 STRING F_CODNUM 4 4
BEGIN BEGIN
@ -20,18 +20,18 @@ BEGIN
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
LIST F_PROVV 8
BEGIN
PROMPT 26 4 ""
ITEM "P|Provvis."
ITEM "D|Definit."
END
RADIOBUTTON F_DATA_O_NUM 20 RADIOBUTTON F_DATA_O_NUM 20
BEGIN BEGIN
PROMPT 1 3 "Selezione su " PROMPT 1 3 "Selezione su "
ITEM "N|Numero" MESSAGE ENABLE,1@|DISABLE,2@ ITEM "N|Numero" MESSAGE ENABLE,1@|CLEAR,2@
ITEM "D|Data" MESSAGE ENABLE,2@|DISABLE,1@ ITEM "D|Data" MESSAGE ENABLE,2@|CLEAR,1@
END
LIST F_PROVV 12
BEGIN
PROMPT 24 4 ""
ITEM "P|Provvisoria"
ITEM "D|Definitiva"
END END
GROUPBOX DLG_NULL 38 5 GROUPBOX DLG_NULL 38 5
@ -47,7 +47,7 @@ END
NUMBER F_DA_NDOC 7 0 NUMBER F_DA_NDOC 7 0
BEGIN BEGIN
PROMPT 2 8 "Dal num. " PROMPT 2 8 "Dal num. "
USE 33 KEY 1 SELECT CODNUM==#F_CODNUM|ANNO==#F_ANNO USE 33 KEY 1 SELECT (CODNUM==#F_CODNUM) && (ANNO==#F_ANNO) && (PROVV==#F_PROVV)
JOIN 20 INTO CODCF=CODCF TIPOCF=TIPOCF JOIN 20 INTO CODCF=CODCF TIPOCF=TIPOCF
JOIN 13 TO 20 INTO COM=COMCF JOIN 13 TO 20 INTO COM=COMCF
INPUT CODNUM F_CODNUM SELECT INPUT CODNUM F_CODNUM SELECT
@ -59,30 +59,30 @@ BEGIN
DISPLAY "Cliente/Fornitore@40" 20->RAGSOC DISPLAY "Cliente/Fornitore@40" 20->RAGSOC
DISPLAY "Comune@20" 13->DENCOM DISPLAY "Comune@20" 13->DENCOM
OUTPUT F_DA_NDOC NDOC OUTPUT F_DA_NDOC NDOC
OUTPUT F_DA_DATADOC DATADOC // OUTPUT F_DA_DATADOC DATADOC
GROUP 1 GROUP 1
CHECKTYPE NORMAL
END END
NUMBER F_A_NDOC 7 0 NUMBER F_A_NDOC 7 0
BEGIN BEGIN
PROMPT 2 10 "Al num. " PROMPT 2 10 "Al num. "
COPY USE F_DA_NDOC USE 33 KEY 1 SELECT (CODNUM==#F_CODNUM) && (ANNO==#F_ANNO) && (PROVV==#F_PROVV)
JOIN 20 INTO CODCF=CODCF TIPOCF=TIPOCF
JOIN 13 TO 20 INTO COM=COMCF
INPUT CODNUM F_CODNUM SELECT INPUT CODNUM F_CODNUM SELECT
INPUT ANNO F_ANNO SELECT INPUT ANNO F_ANNO SELECT
INPUT NDOC F_A_NDOC INPUT NDOC F_A_NDOC
INPUT PROVV F_PROVV INPUT PROVV F_PROVV
COPY DISPLAY F_DA_NDOC COPY DISPLAY F_DA_NDOC
OUTPUT F_A_NDOC NDOC OUTPUT F_A_NDOC NDOC
OUTPUT F_A_DATADOC DATADOC // OUTPUT F_A_DATADOC DATADOC
GROUP 1 GROUP 1
CHECKTYPE NORMAL
END END
DATE F_DA_DATADOC DATE F_DA_DATADOC
BEGIN BEGIN
PROMPT 2 13 "Dalla data " PROMPT 2 13 "Dalla data "
USE 33 KEY 3 SELECT CODNUM==#F_CODNUM|ANNO==#F_ANNO USE 33 KEY 3 SELECT (CODNUM==#F_CODNUM) && (ANNO==#F_ANNO) && (PROVV==#F_PROVV)
JOIN 20 INTO CODCF=CODCF TIPOCF=TIPOCF JOIN 20 INTO CODCF=CODCF TIPOCF=TIPOCF
JOIN 13 TO 20 INTO COM=COMCF JOIN 13 TO 20 INTO COM=COMCF
INPUT CODNUM F_CODNUM INPUT CODNUM F_CODNUM
@ -93,7 +93,6 @@ BEGIN
OUTPUT F_DA_NDOC NDOC OUTPUT F_DA_NDOC NDOC
OUTPUT F_DA_DATADOC DATADOC OUTPUT F_DA_DATADOC DATADOC
GROUP 2 GROUP 2
CHECKTYPE NORMAL
END END
DATE F_A_DATADOC DATE F_A_DATADOC
@ -108,16 +107,15 @@ BEGIN
OUTPUT F_A_NDOC NDOC OUTPUT F_A_NDOC NDOC
OUTPUT F_A_DATADOC DATADOC OUTPUT F_A_DATADOC DATADOC
GROUP 2 GROUP 2
CHECKTYPE NORMAL
END END
BUTTON DLG_SELECT 9 2 BUTTON DLG_SELECT 10 2
BEGIN BEGIN
PROMPT -12 -1 "Selezione" PROMPT -12 -1 "Selezione"
MESSAGE EXIT,K_ENTER MESSAGE EXIT,K_ENTER
END END
BUTTON DLG_QUIT 9 2 BUTTON DLG_QUIT 10 2
BEGIN BEGIN
PROMPT -22 -1 "" PROMPT -22 -1 ""
END END