Patch level :
Files correlati : Ricompilazione Demo : [ ] Commento : git-svn-id: svn://10.65.10.50/trunk@17339 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
lvietri
parent
48794925b5
commit
64ea13da21
6
lv/lv0400c.h
Executable file
6
lv/lv0400c.h
Executable file
@ -0,0 +1,6 @@
|
|||||||
|
//Definizione campi per maschera lv0400c
|
||||||
|
//Stampa Contratti per Cliente
|
||||||
|
#define F_CODCF 201
|
||||||
|
#define F_RAGSOC 202
|
||||||
|
#define F_CODCONT_DA 203
|
||||||
|
#define F_CODCONT_A 204
|
||||||
143
lv/lv0400c.rep
Executable file
143
lv/lv0400c.rep
Executable file
@ -0,0 +1,143 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8" ?>
|
||||||
|
<report name="lv0400c" orientation="1" lpi="6" command="lv0 -1 lv0400c">
|
||||||
|
<description>Stampa Contratto per Cliente</description>
|
||||||
|
<font face="Courier New" size="8" />
|
||||||
|
<section type="Head" />
|
||||||
|
<section type="Head" level="1">
|
||||||
|
<field x="32.5" type="Testo" width="50" pattern="1" text="STAMPA DETTAGLIATA CONTRATTO LAVANDERIA">
|
||||||
|
<font face="Courier New" bold="1" size="9" />
|
||||||
|
</field>
|
||||||
|
<field border="2" x="1" y="2" type="Linea" width="115" height="0" pattern="1" />
|
||||||
|
<field x="2" y="2" type="Testo" width="20" pattern="1" text="Contratto Base Nr.">
|
||||||
|
<font face="Courier New" bold="1" size="8" />
|
||||||
|
</field>
|
||||||
|
<field x="22" y="2" type="Numero" align="right" width="6" pattern="1">
|
||||||
|
<source>168.CODCONT</source>
|
||||||
|
</field>
|
||||||
|
<field x="43.5" y="2" type="Testo" width="10" pattern="1" text="Cliente">
|
||||||
|
<font face="Courier New" bold="1" size="8" />
|
||||||
|
</field>
|
||||||
|
<field x="52" y="2" type="Stringa" width="50" pattern="1">
|
||||||
|
<source>20.RAGSOC</source>
|
||||||
|
</field>
|
||||||
|
<field x="2" y="3" type="Testo" width="3" pattern="1" text="del" />
|
||||||
|
<field x="11" y="3" type="Data" width="12" pattern="1">
|
||||||
|
<source>168.DATAIN</source>
|
||||||
|
</field>
|
||||||
|
<field x="52" y="3" type="Stringa" width="35" pattern="1">
|
||||||
|
<source>20.INDCF</source>
|
||||||
|
</field>
|
||||||
|
<field x="88.5" y="3" type="Stringa" width="10" pattern="1">
|
||||||
|
<source>20.CIVCF</source>
|
||||||
|
</field>
|
||||||
|
<field x="2" y="4" type="Testo" width="10" pattern="1" text="Scadenza" />
|
||||||
|
<field x="11" y="4" type="Data" width="12" pattern="1">
|
||||||
|
<source>168.DATASC</source>
|
||||||
|
</field>
|
||||||
|
<field x="52" y="4" type="Stringa" width="6" pattern="1">
|
||||||
|
<source>20.CAPCF</source>
|
||||||
|
</field>
|
||||||
|
<field x="59" y="4" type="Stringa" width="35" pattern="1">
|
||||||
|
<source>20.LOCALITACF</source>
|
||||||
|
</field>
|
||||||
|
<field x="52" y="5" type="Testo" width="5" pattern="1" text="C.F." />
|
||||||
|
<field x="57" y="5" type="Stringa" width="16" pattern="1">
|
||||||
|
<source>20.COFI</source>
|
||||||
|
</field>
|
||||||
|
<field border="2" x="1" y="6" type="Linea" width="115" height="0" pattern="1" />
|
||||||
|
<field x="2" y="6" type="Testo" width="10" pattern="1" text="Pagamento" />
|
||||||
|
<field x="13" y="6" type="Stringa" width="4" pattern="1">
|
||||||
|
<source>20.CODPAG</source>
|
||||||
|
</field>
|
||||||
|
<field x="18" y="6" type="Stringa" width="30" pattern="1">
|
||||||
|
<source>201@.S0</source>
|
||||||
|
</field>
|
||||||
|
<field x="55" y="6" type="Testo" width="14" pattern="1" text="Consegnare a" />
|
||||||
|
<field x="2" y="7" type="Testo" width="12" pattern="1" text="Banca: ABI " />
|
||||||
|
<field x="14" y="7" type="Numero" align="right" width="7" pattern="1">
|
||||||
|
<source>20.CODABI</source>
|
||||||
|
</field>
|
||||||
|
<field x="22.5" y="7" type="Testo" width="4" pattern="1" text="CAB" />
|
||||||
|
<field x="27.5" y="7" type="Numero" align="right" width="5" pattern="1">
|
||||||
|
<source>20.CODCAB</source>
|
||||||
|
</field>
|
||||||
|
<field x="52" y="7" type="Stringa" width="50" pattern="1">
|
||||||
|
<source>200@.RAGSOC</source>
|
||||||
|
</field>
|
||||||
|
<field x="3" y="8" type="Stringa" width="40" pattern="1">
|
||||||
|
<source>204@.S0</source>
|
||||||
|
</field>
|
||||||
|
<field x="52" y="8" type="Stringa" width="35" pattern="1">
|
||||||
|
<source>200@.INDIR</source>
|
||||||
|
</field>
|
||||||
|
<field x="88" y="8" type="Stringa" width="10" pattern="1">
|
||||||
|
<source>200@.CIV</source>
|
||||||
|
</field>
|
||||||
|
<field x="2" y="9" type="Testo" width="10" pattern="1" text="Valuta" />
|
||||||
|
<field x="11" y="9" type="Stringa" width="35" pattern="1">
|
||||||
|
<source>207@.S0</source>
|
||||||
|
</field>
|
||||||
|
<field x="52" y="9" type="Stringa" width="6" pattern="1">
|
||||||
|
<source>200@.CAP</source>
|
||||||
|
</field>
|
||||||
|
<field x="59" y="9" type="Stringa" width="35" pattern="1">
|
||||||
|
<source>200@.LOCALITA</source>
|
||||||
|
</field>
|
||||||
|
<field x="2" y="10" type="Testo" width="10" pattern="1" text="Iva" />
|
||||||
|
<field border="2" x="1" y="11" type="Linea" width="115" height="0" pattern="1" />
|
||||||
|
<field x="2" y="11" type="Testo" width="10" pattern="1" text="Vettori" />
|
||||||
|
<field border="2" x="1" y="14" type="Linea" width="115" height="0" pattern="1" />
|
||||||
|
<field x="2" y="14" type="Testo" width="50" pattern="1" text="Commenti di Testata" />
|
||||||
|
<field x="2" y="15" type="Stringa" width="50" pattern="1">
|
||||||
|
<source>168.COMMENTI</source>
|
||||||
|
</field>
|
||||||
|
<field border="2" x="1" y="16" type="Linea" width="115" height="0" pattern="1" />
|
||||||
|
<field x="2" y="17" type="Testo" width="20" pattern="1" text="Articolo" />
|
||||||
|
<field x="24" y="17" type="Testo" width="50" pattern="1" text="Descrizione Articolo" />
|
||||||
|
<field x="80" y="17" type="Testo" width="10" pattern="1" text="Prezzo" />
|
||||||
|
<field x="96" y="17" type="Testo" width="3" pattern="1" text="UM" />
|
||||||
|
<field x="100" y="17" type="Testo" width="15" pattern="1" text="Q.t&#E0; Contratto" />
|
||||||
|
<field border="2" x="1" y="18" type="Linea" width="115" height="0" pattern="1" />
|
||||||
|
</section>
|
||||||
|
<section type="Body" />
|
||||||
|
<section type="Body" level="1">
|
||||||
|
<field x="2" y="1" type="Stringa" width="20" pattern="1">
|
||||||
|
<source>169.CODART</source>
|
||||||
|
</field>
|
||||||
|
<field x="24" y="1" type="Stringa" width="50" pattern="1">
|
||||||
|
<source>47.DESCR</source>
|
||||||
|
</field>
|
||||||
|
<field x="76" y="1" type="Numero" align="right" width="18" pattern="1" hide_zero="1">
|
||||||
|
<source>169.PREZZO</source>
|
||||||
|
</field>
|
||||||
|
<field x="96" y="1" type="Stringa" width="3" pattern="1">
|
||||||
|
<source>169.UM</source>
|
||||||
|
</field>
|
||||||
|
<field x="100" y="1" type="Numero" align="right" width="15" pattern="1" hide_zero="1">
|
||||||
|
<source>169.QTACONG</source>
|
||||||
|
</field>
|
||||||
|
</section>
|
||||||
|
<section type="Foot" />
|
||||||
|
<section type="Foot" level="1" />
|
||||||
|
<sql>USE 168
|
||||||
|
|
||||||
|
SELECT BETWEEN (CODCONT,#F_CODCONT_DA,#F_CODCONT_A)
|
||||||
|
|
||||||
|
JOIN 20 TO 168 INTO TIPOCF=="C" CODCF==CODCF
|
||||||
|
|
||||||
|
JOIN 169 TO 168 INTO CODCF==CODCF CODCONT==CODCONT
|
||||||
|
|
||||||
|
JOIN 16 TO 168 ALIAS 200 INTO TIPOCF=="C" CODCF==CODCF CODIND==CODINDSP
|
||||||
|
|
||||||
|
JOIN 47 TO 169 INTO CODART==CODART
|
||||||
|
|
||||||
|
JOIN %CPG TO 20 ALIAS 201 INTO CODTAB==CODPAG
|
||||||
|
|
||||||
|
JOIN %BAN TO 20 ALIAS 204 INTO CODTAB==CODABI+CODCAB
|
||||||
|
|
||||||
|
JOIN %VAL TO 20 ALIAS 207 INTO CODTAB==CODVAL
|
||||||
|
|
||||||
|
FROM CODCF=#F_CODCF
|
||||||
|
|
||||||
|
TO CODCF=#F_CODCF</sql>
|
||||||
|
</report>
|
||||||
87
lv/lv0400c.uml
Executable file
87
lv/lv0400c.uml
Executable file
@ -0,0 +1,87 @@
|
|||||||
|
#include "lv0400c.h"
|
||||||
|
|
||||||
|
TOOLBAR "topbar" 0 0 0 2
|
||||||
|
#include "printbar.h"
|
||||||
|
ENDPAGE
|
||||||
|
|
||||||
|
PAGE "Stampa Contratti per Cliente" -1 -1 40 5
|
||||||
|
|
||||||
|
GROUPBOX DLG_NULL 85 5
|
||||||
|
BEGIN
|
||||||
|
PROMPT 1 1 "@b Parametri Estrazione"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_CODCF 6
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 2 "Cliente "
|
||||||
|
FLAGS "U"
|
||||||
|
KEY 1
|
||||||
|
USE LF_CLIFO
|
||||||
|
INPUT TIPOCF "C"
|
||||||
|
INPUT CODCF F_CODCF
|
||||||
|
DISPLAY "Codice" CODCF
|
||||||
|
DISPLAY "Ragione Sociale@50" RAGSOC
|
||||||
|
OUTPUT F_CODCF CODCF
|
||||||
|
OUTPUT F_RAGSOC RAGSOC
|
||||||
|
CHECKTYPE REQUIRED
|
||||||
|
FIELD #F_CODCF
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_RAGSOC 50
|
||||||
|
BEGIN
|
||||||
|
PROMPT 30 2 ""
|
||||||
|
KEY 2
|
||||||
|
USE LF_CLIFO KEY 2
|
||||||
|
INPUT TIPOCF "C"
|
||||||
|
INPUT RAGSOC F_RAGSOC
|
||||||
|
DISPLAY "Ragione Sociale@50" RAGSOC
|
||||||
|
DISPLAY "Codice" CODCF
|
||||||
|
COPY OUTPUT F_CODCF
|
||||||
|
CHECKTYPE REQUIRED
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_CODCONT_DA 6
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 4 "Da Contratto N."
|
||||||
|
USE LF_LVCONDV
|
||||||
|
JOIN LF_CLIFO INTO TIPOCF="C" CODCF=F_CODCF
|
||||||
|
INPUT CODCF F_CODCF SELECT
|
||||||
|
INPUT CODCONT F_CODCONT_DA
|
||||||
|
DISPLAY "Cliente" CODCF
|
||||||
|
DISPLAY "Contratto" CODCONT
|
||||||
|
DISPLAY "Dalla data" DATAIN
|
||||||
|
DISPLAY "alla data" DATASC
|
||||||
|
DISPLAY "Stato" STATUS
|
||||||
|
DISPLAY "Ragione sociale@50" LF_CLIFO->RAGSOC
|
||||||
|
OUTPUT F_CODCF CODCF
|
||||||
|
OUTPUT F_CODCONT_DA CODCONT
|
||||||
|
FLAGS "U"
|
||||||
|
FIELD #F_CODCONT_DA
|
||||||
|
CHECKTYPE REQUIRED
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_CODCONT_A 6
|
||||||
|
BEGIN
|
||||||
|
PROMPT 30 4 "A Contratto N. "
|
||||||
|
USE LF_LVCONDV
|
||||||
|
JOIN LF_CLIFO INTO TIPOCF="C" CODCF=F_CODCF
|
||||||
|
INPUT CODCF F_CODCF SELECT
|
||||||
|
INPUT CODCONT F_CODCONT_A
|
||||||
|
DISPLAY "Cliente" CODCF
|
||||||
|
DISPLAY "Contratto" CODCONT
|
||||||
|
DISPLAY "Dalla data" DATAIN
|
||||||
|
DISPLAY "alla data" DATASC
|
||||||
|
DISPLAY "Stato" STATUS
|
||||||
|
DISPLAY "Ragione sociale@50" LF_CLIFO->RAGSOC
|
||||||
|
OUTPUT F_CODCF CODCF
|
||||||
|
OUTPUT F_CODCONT_A CODCONT
|
||||||
|
FLAGS "U"
|
||||||
|
FIELD #F_CODCONT_A
|
||||||
|
CHECKTYPE REQUIRED
|
||||||
|
END
|
||||||
|
|
||||||
|
|
||||||
|
ENDPAGE
|
||||||
|
ENDMASK
|
||||||
|
|
||||||
|
|
||||||
Loading…
x
Reference in New Issue
Block a user