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

Patch level : 10.0 patch 710

Browse Source 
Files correlati     : lv0400e.msk lv0400e.rep lvmenu
Ricompilazione Demo : [ ]
Commento            :
Aggiunta la stampa lista dotazionin temporanee scadute dopo lavoro di reverse engineering


git-svn-id: svn://10.65.10.50/trunk@20361 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2010-04-20 13:53:41 +00:00
parent 8700b4dbd4
commit de6eb5402c
4 changed files with 172 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lv/lv0400e.h Executable file
View File

@ -0,0 +1,7 @@
//Definizione campi per maschera lv0400e
//Lista dotazioni temporanee scadute
#define F_CODCF 201
#define F_RAGSOC 202
#define F_DATA 203
#define F_PERANNO 204
#define F_ANNO 205

89
lv/lv0400e.rep Executable file
View File

@ -0,0 +1,89 @@
<?xml version="1.0" encoding="UTF-8" ?>
<report name="lv0400e" orientation="1" lpi="6">
<description>Lista dotazioni temporanee scadute</description>
<font face="Courier New" size="7" />
<section type="Head" height="3">
<field x="0.5" type="Testo" width="15" height="1.5" pattern="1" text="Data elab.:" />
<field x="15.5" type="Stringa" width="15" pattern="1">
<prescript description="H0.0 PRESCRIPT">MESSAGE _TODAY</prescript>
</field>
<field x="27" type="Testo" align="center" width="60" pattern="1" text="Lista Dotazioni temporanee scadute">
<font face="Courier New" bold="1" size="12" />
</field>
<field x="85" type="Testo" align="right" width="6" pattern="1" text="al">
<font face="Courier New" bold="1" size="12" />
</field>
<field x="93.5" type="Stringa" align="right" width="14.5" pattern="1">
<font face="Courier New" bold="1" size="10" />
<source>#F_DATA_TO</source>
</field>
<field x="113.37" y="0.12" type="Testo" width="5" height="1.5" pattern="1" text="Pag." />
<field x="118.5" y="0.12" type="Stringa" width="10" pattern="1">
<prescript description="H0.0 PRESCRIPT">MESSAGE _PAGENO</prescript>
</field>
</section>
<section type="Head" level="1" />
<section type="Head" level="2" height="2.5">
<groupby>169.CODCF</groupby>
<field border="2" radius="100" x="0.5" type="Rettangolo" bg_color="#E5E5E5" width="130.5" height="1.5" />
<field x="1" y="0.25" type="Testo" width="7.5" pattern="1" text="Cliente:">
<font face="Courier New" bold="1" size="7" />
</field>
<field x="8" y="0.25" type="Numero" align="right" width="7" pattern="1">
<font face="Courier New" bold="1" size="7" />
<source>169.CODCF</source>
</field>
<field x="16.5" y="0.25" type="Stringa" width="58" pattern="1">
<font face="Courier New" bold="1" size="8" />
<source>20.RAGSOC</source>
</field>
<field x="75" y="0.25" type="Stringa" width="30" pattern="1">
<source>20.INDCF</source>
</field>
<field x="105.5" y="0.25" type="Stringa" width="25" pattern="1">
<source>20.LOCALITACF</source>
</field>
<field x="1" y="1.75" type="Testo" width="8" pattern="1" text="Codice">
<font face="Courier New" bold="1" size="7" />
</field>
<field x="20" y="1.75" type="Testo" width="15" pattern="1" text="Descrizione">
<font face="Courier New" bold="1" size="7" />
</field>
<field x="58" y="1.75" type="Testo" align="right" width="28" pattern="1" text="Qt&#E0; dotazione temporanea">
<font face="Courier New" bold="1" size="7" />
</field>
<field x="87" y="1.75" type="Testo" align="right" width="16" pattern="1" text="Data iniziale">
<font face="Courier New" bold="1" size="7" />
</field>
<field x="104" y="1.75" type="Testo" align="right" width="16" pattern="1" text="Data finale">
<font face="Courier New" bold="1" size="7" />
</field>
</section>
<section type="Body" />
<section type="Body" level="1">
<field x="1" type="Stringa" width="18.5" pattern="1">
<source>169.CODART</source>
</field>
<field x="20" type="Stringa" width="51" pattern="1">
<source>47.DESCR</source>
</field>
<field x="71" type="Numero" align="right" width="15" pattern="1">
<source>166.DOTTM</source>
</field>
<field x="93" type="Data" width="10" pattern="1">
<source>169.INDTTMP</source>
</field>
<field x="110" type="Data" align="right" width="10" pattern="1">
<source>169.FIDTTMP</source>
</field>
</section>
<section type="Foot" />
<section type="Foot" level="1" />
<section type="Foot" level="2" />
<sql>USE 169 KEY 1 SELECT BETWEEN(169.FIDTTMP,'01-01-2001',#F_DATA_TO)&#26;&#26;(166.DOTTM&#3E;0)
BY CODCF CODART
JOIN 166 TO 169 INTO ANNOES==#F_ANNO_TO TIPOCF=="C" CODCF==CODCF INDSPED=='' CODART==CODART NRIGA==1
JOIN 20 TO 169 INTO TIPOCF=='C' CODCF==CODCF
JOIN 47 TO 169 INTO CODART==CODART
</sql>
</report>

74
lv/lv0400e.uml Executable file
View File

@ -0,0 +1,74 @@
#include "lv0400e.h"
TOOLBAR "topbar" 0 0 0 2
#include "printbar.h"
ENDPAGE
PAGE "Lista dotazioni temporanee scadute" -1 -1 40 5
GROUPBOX DLG_NULL 85 3
BEGIN
PROMPT 1 1 "@bParametri Cliente"
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
END
STRING F_RAGSOC 50
BEGIN
PROMPT 20 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
GROUPBOX DLG_NULL 85 4
BEGIN
PROMPT 1 4 "@bParametri data"
END
BOOLEAN F_PERANNO
BEGIN
PROMPT 2 5 "Per Anno"
MESSAGE TRUE DISABLE,F_DATA|ENABLE,F_ANNO
MESSAGE FALSE ENABLE,F_DATA|DISABLE,F_ANNO
FIELD #F_CHECK_ANNO_TO
END
DATE F_DATA
BEGIN
PROMPT 2 6 "Sino alla Data "
CHECKTYPE REQUIRED
FLAGS "A"
FIELD #F_DATA_TO
END
NUMBER F_ANNO 4
BEGIN
PROMPT 30 6 ""
FLAGS "A"
CHECKTYPE REQUIRED
FIELD #F_ANNO_TO
END
ENDPAGE
ENDMASK

2
lv/lvmenu.men
View File

@ -70,6 +70,8 @@ Item_02 = "Passaggi per cliente", "lv0 -1 lv0500c", "F"
Item_03 = "Periodi di sospensione", "lv0 -1 lv0500d", "F"
Item_04 = "Elenco Clienti per Articolo", "lv0 -1 lv0400d", "F"
Item_05 = "Contratti in scadenza Da/A", "lv0 -1 lv0400b", "F"
Item_05 = "Stampa lista dotazioni temporanee scadute", "lv0 -1 lv0400e", "F"
[LVMENU_030]
Caption = "Giri"