root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level :

Browse Source 
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 2008-10-02 13:14:57 +00:00
parent 48794925b5
commit 64ea13da21
3 changed files with 236 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lv/lv0400c.h Executable file
View 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
View 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
View 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