Patch level :10.0
Files correlati : Ricompilazione Demo : [ ] Commento :Nuova stampa Interrogazione Cliente\Articolo git-svn-id: svn://10.65.10.50/trunk@19101 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
lvietri
parent
3df8b29015
commit
d778bfcf4e
15
lv/lv0700a.h
Executable file
15
lv/lv0700a.h
Executable file
@ -0,0 +1,15 @@
|
||||
//Definizione campi per maschera lv0700a
|
||||
//Interrogazione Cliente\Articolo
|
||||
#define F_CODCF_1 201
|
||||
#define F_RAGSOC_1 202
|
||||
#define F_CODART_1 203
|
||||
#define F_DESART_1 204
|
||||
#define F_CODAGG1_1 205
|
||||
#define F_DESCODAGG1_1 206
|
||||
#define F_CODNUM_1 207
|
||||
#define F_DESCODNUM_1 208
|
||||
#define F_TIPODOC_1 209
|
||||
#define F_DESTIPODOC_1 210
|
||||
#define F_DATADOC_DA_1 211
|
||||
#define F_DATADOC_A_1 212
|
||||
#define F_TOT_1 213
|
||||
201
lv/lv0700a.rep
Executable file
201
lv/lv0700a.rep
Executable file
@ -0,0 +1,201 @@
|
||||
<?xml version="1.0" encoding="UTF-8" ?>
|
||||
<report libraries="ve1300" name="lv0700a" lpi="6">
|
||||
<description>Interrogazione Cliente\Articolo</description>
|
||||
<font face="Courier New" size="10" />
|
||||
<section type="Head" />
|
||||
<section type="Head" level="1" />
|
||||
<section type="Head" level="2">
|
||||
<groupby>CODCF</groupby>
|
||||
</section>
|
||||
<section type="Head" level="3" page_break="1">
|
||||
<groupby>34.CODART</groupby>
|
||||
<prescript description="H3 PRESCRIPT">MESSAGE RESET,F3.1000
|
||||
MESSAGE RESET,F3.2000</prescript>
|
||||
<field x="27" y="0.75" type="Testo" width="40" height="2" pattern="1" text="Stampa Cliente\Articolo">
|
||||
<font face="Courier New" bold="1" size="14" />
|
||||
</field>
|
||||
<field x="1" y="1" type="Testo" width="12" pattern="1" text="Data Elab.:" />
|
||||
<field x="12" y="1" type="Stringa" width="12" pattern="1">
|
||||
<prescript description="H3.0 PRESCRIPT">MESSAGE _TODAY</prescript>
|
||||
</field>
|
||||
<field x="72" y="1" type="Testo" width="6" pattern="1" text="Pag.:" />
|
||||
<field x="77" y="1" type="Stringa" width="12" pattern="1">
|
||||
<prescript description="H3.0 PRESCRIPT">MESSAGE _PAGENO</prescript>
|
||||
</field>
|
||||
<field border="2" x="0.5" y="3.5" type="Rettangolo" width="92" height="7" pattern="1" />
|
||||
<field x="1" y="4" type="Testo" width="10" pattern="1" text="Cliente:">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="13" y="4" type="Numero" align="right" width="6" pattern="1">
|
||||
<source>#F_CODCF</source>
|
||||
</field>
|
||||
<field x="20" y="4" type="Stringa" width="50" pattern="1">
|
||||
<source>#F_RAGSOC</source>
|
||||
</field>
|
||||
<field x="1" y="5" type="Testo" width="10" pattern="1" text="Articolo:">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="13" y="5" type="Stringa" width="20" pattern="1">
|
||||
<source>#F_CODART</source>
|
||||
</field>
|
||||
<field x="34" y="5" type="Stringa" width="50" pattern="1">
|
||||
<source>#F_DESART</source>
|
||||
</field>
|
||||
<field x="1" y="6" type="Testo" width="10" pattern="1" text="Cau.Lav.:">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="13" y="6" type="Stringa" width="4" pattern="1">
|
||||
<source>#F_CODAGG1</source>
|
||||
</field>
|
||||
<field x="18" y="6" type="Stringa" width="50" pattern="1">
|
||||
<source>#F_DESCODAGG1</source>
|
||||
</field>
|
||||
<field x="1" y="7" type="Testo" width="12" pattern="1" text="Numerazione:">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="13" y="7" type="Stringa" width="4" pattern="1">
|
||||
<source>#F_CODNUM</source>
|
||||
</field>
|
||||
<field x="18" y="7" type="Stringa" width="50" pattern="1">
|
||||
<source>#F_DESCODNUM</source>
|
||||
</field>
|
||||
<field x="1" y="8" type="Testo" width="10" pattern="1" text="Tipo:">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="13" y="8" type="Stringa" width="4" pattern="1">
|
||||
<source>#F_TIPODOC</source>
|
||||
</field>
|
||||
<field x="18" y="8" type="Stringa" width="50" pattern="1">
|
||||
<source>#F_DESTIPODOC</source>
|
||||
</field>
|
||||
<field x="1" y="9" type="Testo" width="10" pattern="1" text="Da Data:">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="13" y="9" type="Data" width="10" pattern="1">
|
||||
<source>#F_DATADOC_DA</source>
|
||||
</field>
|
||||
<field x="25" y="9" type="Testo" width="10" pattern="1" text="a Data:">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="32.5" y="9" type="Data" width="10" pattern="1">
|
||||
<source>#F_DATADOC_A</source>
|
||||
</field>
|
||||
<field x="46" y="9" type="Testo" width="12" pattern="1" text="Solo Totali:">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="58" y="9" type="Stringa" width="3" pattern="1">
|
||||
<source>IF(#F_TOT=='X';'Si';'No')</source>
|
||||
</field>
|
||||
<field x="1" y="11" type="Testo" width="10" pattern="1" text="Articolo:" />
|
||||
<field x="50" y="11" type="Testo" width="10" pattern="1" text="Dotazione:" />
|
||||
<field x="61" y="11" type="Testo" align="right" width="10" pattern="1" text="Iniziale" />
|
||||
<field x="72" y="11" type="Testo" align="right" width="10" pattern="1" text="Odierna" />
|
||||
<field x="82.5" y="11" type="Testo" align="right" width="10" pattern="1" text="Temp." />
|
||||
<field x="61" y="12" type="Numero" align="right" width="10" pattern="1">
|
||||
<source>166.DOTIN</source>
|
||||
</field>
|
||||
<field x="72" y="12" type="Numero" align="right" width="10" pattern="1">
|
||||
<source>166.DOTOD</source>
|
||||
</field>
|
||||
<field x="82.5" y="12" type="Numero" align="right" width="10" pattern="1">
|
||||
<source>166.DOTTM</source>
|
||||
</field>
|
||||
<field x="1" y="13.25" type="Stringa" width="15" pattern="1">
|
||||
<source>IF(#F_TOT=='X';' ';'Num. Tipo Anno')</source>
|
||||
</field>
|
||||
<field x="20" y="13.25" type="Stringa" width="12" pattern="1">
|
||||
<source>IF(#F_TOT=='X';' ';'Num.Doc.')</source>
|
||||
</field>
|
||||
<field x="31" y="13.25" type="Stringa" width="12" pattern="1">
|
||||
<source>IF(#F_TOT=='X';' ';'Data Doc.')</source>
|
||||
</field>
|
||||
<field x="41.5" y="13.25" type="Stringa" width="12" pattern="1">
|
||||
<source>IF(#F_TOT=='X';' ';'Caus.Lav.')</source>
|
||||
</field>
|
||||
<field x="62" y="13.25" type="Testo" width="12" pattern="1" text="Qta Ritirata">
|
||||
<source>IF(#F_TOT=='X';' ';'')</source>
|
||||
</field>
|
||||
<field x="76.5" y="13.25" type="Testo" width="16" pattern="1" text="Qta Consegnata">
|
||||
<source>IF(#F_TOT=='X';' ';'')</source>
|
||||
</field>
|
||||
<field x="1" y="12" type="Stringa" width="59" id="1000" pattern="1">
|
||||
<source>TRIM(34.CODART) + "-" + TRIM(47.DESCR)</source>
|
||||
</field>
|
||||
</section>
|
||||
<section type="Body" />
|
||||
<section type="Body" level="1">
|
||||
<condition>#F_TOT!='X'</condition>
|
||||
<field x="2" type="Stringa" width="4" pattern="1">
|
||||
<source>33.CODNUM</source>
|
||||
</field>
|
||||
<field x="7" type="Stringa" width="4" pattern="1">
|
||||
<source>33.TIPODOC</source>
|
||||
</field>
|
||||
<field x="12" type="Numero" width="4" pattern="1">
|
||||
<source>33.ANNO</source>
|
||||
</field>
|
||||
<field x="20" type="Numero" width="10" pattern="1">
|
||||
<source>33.NDOC</source>
|
||||
</field>
|
||||
<field x="31" type="Data" width="10" pattern="1">
|
||||
<source>33.DATADOC</source>
|
||||
</field>
|
||||
<field x="42.5" type="Stringa" width="4" pattern="1">
|
||||
<source>34.CODAGG1</source>
|
||||
</field>
|
||||
<field x="61" type="Numero" align="right" width="13" pattern="1">
|
||||
<source>34.QTAGG1</source>
|
||||
<prescript description="B1.0 PRESCRIPT">MESSAGE ADD,F3.1000</prescript>
|
||||
</field>
|
||||
<field x="76" type="Numero" align="right" width="15" pattern="1">
|
||||
<source>34.QTA</source>
|
||||
<prescript description="B1.0 PRESCRIPT">MESSAGE ADD,F3.2000</prescript>
|
||||
</field>
|
||||
</section>
|
||||
<section type="Body" level="2">
|
||||
<condition>#F_TOT=='X'</condition>
|
||||
<field x="1" type="Stringa" hidden="1" width="4" pattern="1">
|
||||
<source>33.CODNUM</source>
|
||||
</field>
|
||||
<field x="6" type="Stringa" hidden="1" width="4" pattern="1">
|
||||
<source>33.TIPODOC</source>
|
||||
</field>
|
||||
<field x="11" type="Numero" hidden="1" align="right" width="4" pattern="1">
|
||||
<source>33.ANNO</source>
|
||||
</field>
|
||||
<field x="19" type="Numero" hidden="1" align="right" width="10" pattern="1">
|
||||
<source>33.NDOC</source>
|
||||
</field>
|
||||
<field x="30" type="Data" hidden="1" width="10" pattern="1">
|
||||
<source>33.DATADOC</source>
|
||||
</field>
|
||||
<field x="41.5" type="Stringa" hidden="1" width="4" pattern="1">
|
||||
<source>34.CODAGG1</source>
|
||||
</field>
|
||||
<field x="60" type="Numero" hidden="1" align="right" width="13" pattern="1">
|
||||
<source>34.QTAGG1</source>
|
||||
<prescript description="B2.0 PRESCRIPT">MESSAGE ADD,F3.1000</prescript>
|
||||
</field>
|
||||
<field x="75" type="Numero" hidden="1" align="right" width="15" pattern="1">
|
||||
<source>34.QTA</source>
|
||||
<prescript description="B2.0 PRESCRIPT">MESSAGE ADD,F3.2000</prescript>
|
||||
</field>
|
||||
</section>
|
||||
<section type="Foot" />
|
||||
<section type="Foot" level="1" />
|
||||
<section type="Foot" level="2" />
|
||||
<section type="Foot" level="3">
|
||||
<field x="61" y="1" type="Numero" align="right" width="13" id="1000" pattern="1">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="76" y="1" type="Numero" align="right" width="15" id="2000" pattern="1">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
</section>
|
||||
<sql>USE 34 KEY 5
|
||||
SELECT (BETWEEN(33.TIPODOC,#F_TIPODOC,#F_TIPODOC)(34.CODART!='')(BETWEEN(33.CODCF,#F_CODCF,#F_CODCF))(BETWEEN(34.CODNUM,#F_CODNUM,#F_CODNUM))(BETWEEN(33.DATADOC,#F_DATADOC_DA,#F_DATADOC_A))(BETWEEN(34.CODART,#F_CODART,#F_CODART))(BETWEEN(34.CODAGG1,#F_CODAGG1,#F_CODAGG1)))
|
||||
JOIN 33 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC
|
||||
JOIN 20 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF
|
||||
JOIN 47 TO 34 INTO CODART==CODART
|
||||
JOIN 166 TO 34 INTO ANNOES==ANNO TIPOCF=="C" CODCF==#F_CODCF CODART==CODART </sql>
|
||||
</report>
|
||||
173
lv/lv0700a.uml
Executable file
173
lv/lv0700a.uml
Executable file
@ -0,0 +1,173 @@
|
||||
#include "lv0700a.h"
|
||||
|
||||
TOOLBAR "topbar" 0 0 0 2
|
||||
#include "printbar.h"
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Stampa Interrogazione Cliente\Articolo" -1 -1 40 5
|
||||
|
||||
GROUPBOX DLG_NULL 85 14
|
||||
BEGIN
|
||||
PROMPT 1 1 "@b Parametri Estrazione"
|
||||
END
|
||||
|
||||
NUMBER 201 6
|
||||
BEGIN
|
||||
PROMPT 2 2 "Cliente "
|
||||
FIELD #F_CODCF
|
||||
FLAGS "U"
|
||||
KEY 1
|
||||
USE LF_CLIFO
|
||||
INPUT TIPOCF "C"
|
||||
INPUT CODCF 201
|
||||
DISPLAY "Codice" CODCF
|
||||
DISPLAY "Ragione Sociale@50" RAGSOC
|
||||
OUTPUT 201 CODCF
|
||||
OUTPUT 202 RAGSOC
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING 202 50
|
||||
BEGIN
|
||||
PROMPT 24 2 ""
|
||||
KEY 2
|
||||
USE LF_CLIFO KEY 2
|
||||
INPUT TIPOCF "C"
|
||||
INPUT RAGSOC 202
|
||||
DISPLAY "Ragione Sociale@50" RAGSOC
|
||||
DISPLAY "Codice" CODCF
|
||||
COPY OUTPUT 201
|
||||
FIELD #F_RAGSOC
|
||||
END
|
||||
|
||||
STRING 203 20
|
||||
BEGIN
|
||||
PROMPT 2 3 "Articolo "
|
||||
FLAG "U"
|
||||
USE 47
|
||||
INPUT CODART 203
|
||||
DISPLAY "Codice@20" CODART
|
||||
DISPAY "Descrizione@50" DESCR
|
||||
OUTPUT 203 CODART
|
||||
OUTPUT 204 DESCR
|
||||
FIELD #F_CODART
|
||||
END
|
||||
|
||||
STRING 204 50
|
||||
BE
|
||||
PR 2 4 "Descrizione "
|
||||
USE 47 KEY 2
|
||||
INPUT DESCR 204
|
||||
DISPLAY "Codice@20" CODART
|
||||
DISPALY "Descrizione@50" DESCR
|
||||
OUTPUT 203 CODART
|
||||
OUTPUT 204 DESCR
|
||||
FIELD #F_DESART
|
||||
END
|
||||
|
||||
STRING 205 3
|
||||
BEGIN
|
||||
PROMPT 2 6 "Causale Lav."
|
||||
FLAGS "U"
|
||||
USE &CAU
|
||||
INPUT CODTAB 205
|
||||
DISPLAY "Codice@8" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT 205 CODTAB
|
||||
OUTPUT 206 S0
|
||||
FIELD #F_CODAGG1
|
||||
END
|
||||
|
||||
STRING 206 50
|
||||
BEGIN
|
||||
PROMPT 24 6 ""
|
||||
FLAGS "D"
|
||||
FIELD #F_DESCODAGG1
|
||||
END
|
||||
|
||||
|
||||
STRING 207 4
|
||||
BEGIN
|
||||
PROMPT 2 8 "Numerazione "
|
||||
HELP "Codice numerazione"
|
||||
USE %NUM
|
||||
INPUT CODTAB 207
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT 207 CODTAB
|
||||
OUTPUT 208 S0
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "UPA"
|
||||
WARNING "Numerazione assente"
|
||||
FIELD #F_CODNUM
|
||||
END
|
||||
|
||||
STRING 208 50
|
||||
BEGIN
|
||||
PROMPT 24 8 ""
|
||||
HELP "Descrizione Numerazione"
|
||||
USE %NUM KEY 2
|
||||
INPUT S0 208
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
OUTPUT 207 CODTAB
|
||||
OUTPUT 208 S0
|
||||
FIELD #F_DESCODNUM
|
||||
END
|
||||
|
||||
|
||||
|
||||
STRING 209 4
|
||||
BEGIN
|
||||
PROMPT 2 9 "Tipo "
|
||||
HELP "Codice tipo documento"
|
||||
USE %TIP
|
||||
INPUT CODTAB 209
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT 209 CODTAB
|
||||
OUTPUT 210 S0
|
||||
FLAGS "UP"
|
||||
FIELD #F_TIPODOC
|
||||
END
|
||||
|
||||
STRING 210 50
|
||||
BEGIN
|
||||
PROMPT 24 9 ""
|
||||
HELP "Descrizione tipo documento"
|
||||
USE %TIP KEY 2
|
||||
INPUT S0 210
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT 209
|
||||
FIELD #F_DESTIPODOC
|
||||
END
|
||||
|
||||
DATE 211
|
||||
BEGIN
|
||||
PROMP 2 11 "Da Data "
|
||||
FIELD #F_DATADOC_DA
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
DATE 212
|
||||
BEGIN
|
||||
PROMP 40 11 "Da Data "
|
||||
FIELD #F_DATADOC_A
|
||||
VALIDATE DATE_CMP_FUNC >= 211
|
||||
WARNING "La data finale non deve essere successiva a quella finale"
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "A"
|
||||
END
|
||||
|
||||
BOOLEAN 213
|
||||
BEGIN
|
||||
FIELD #F_TOT
|
||||
PROMPT 2 13 "Solo Totali"
|
||||
END
|
||||
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
|
||||
|
||||
@ -116,3 +116,4 @@ Item_01 = "Riepilogo Bolle di Lavanderie", "lv2 -6 lv2700a", "F"
|
||||
Item_02 = "Venduto Per Cliente nei 12 Mesi", "lv2 -7 lv2800a", "F"
|
||||
Item_03 = "Storico Consegne per Cliente", "lv0 -1 lv0600a", "F"
|
||||
Item_04 = "Stampa Documenti", "ve1 -2", "F"
|
||||
Item_05 = "Interrogazione Cliente\Articolo", "lv0 -1 lv0700a", "F"
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user