Patch level :10.0 284

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
0001251: range di selezione
Descrizione  nelle seguenti stampe non funziona il range di selezione:

Formule documento;
formule righe documento;
Elaborazioni differite;
Stato documento.


git-svn-id: svn://10.65.10.50/trunk@18721 c028cbd2-c16b-5b4b-a496-9718f37d4682

ve/vestabe.rep

@@ -35,5 +35,9 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE %ABE</sql>
+ <sql>
+   USE %ABE
+   FROM CODTAB=#FROM
+   TO CODTAB=#TO
+ </sql>
 </report>

ve/vestabe.uml

@@ -11,7 +11,7 @@ BEGIN
 PROMPT 2 1 "Da codice "
 FLAGS "U"
 HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
-FIELD LF_TABCOM->CODTAB
+FIELD FROM
 USE %ABE
 INPUT CODTAB F_INIZIO1
 DISPLAY "Codice" CODTAB
@@ -25,7 +25,7 @@ BEGIN
 PROMPT 2 3 "A codice  "
 FLAGS "U"
 HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
-FIELD LF_TABCOM->CODTAB
+FIELD TO
 COPY USE F_INIZIO1
 INPUT CODTAB F_FINE1
 COPY DISPLAY F_INIZIO1

ve/vesteld.rep

@@ -275,6 +275,9 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE %ELD
+ <sql>
-</sql>
+   USE %ELD
+   FROM CODTAB=#FROM
+   TO CODTAB=#TO
+ </sql>
 </report>

ve/vesteld.uml

@@ -11,7 +11,7 @@ BEGIN
   PROMPT 2 1 "Da cod. elaborazione "
   FLAGS "U"
   HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
-  FIELD LF_TABCOM->CODTAB
+  FIELD FROM
   USE %ELD
   INPUT CODTAB F_INIZIO1
   DISPLAY "Cod. elaborazione differita" CODTAB
@@ -25,7 +25,7 @@ BEGIN
   PROMPT 2 3 "A cod. elaborazione  "
   FLAGS "U"
   HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
-  FIELD LF_TABCOM->CODTAB
+  FIELD TO
   COPY USE F_INIZIO1
   INPUT CODTAB F_FINE1
   COPY DISPLAY F_INIZIO1

ve/vestfrd.rep

@@ -58,5 +58,8 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE %FRD</sql>
+ <sql>USE %FRD
+FROM CODTAB=#FROM
+TO CODTAB=#TO
+</sql>
 </report>

ve/vestfrd.uml

@@ -11,7 +11,7 @@ BEGIN
   PROMPT 2 1 "Da cod. formula "
   FLAGS "U"
   HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
-  FIELD LF_TABCOM->CODTAB
+  FIELD FROM
   USE %FRD
   INPUT CODTAB F_INIZIO1
   DISPLAY "Cod. formula documento" CODTAB
@@ -25,7 +25,7 @@ BEGIN
   PROMPT 2 3 "A cod. formula  "
   FLAGS "U"
   HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
-  FIELD LF_TABCOM->CODTAB
+  FIELD TO
   COPY USE F_INIZIO1
   INPUT CODTAB F_FINE1
   COPY DISPLAY F_INIZIO1

ve/vestfrm.rep

@@ -58,5 +58,9 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE %FRM</sql>
+ <sql>
+   USE %FRM
+   FROM CODTAB=#FROM
+   TO CODTAB=#TO
+ </sql>
 </report>

ve/vestfrm.uml

@@ -11,7 +11,7 @@ BEGIN
   PROMPT 2 1 "Da cod. formula "
   FLAGS "U"
   HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
-  FIELD LF_TABCOM->CODTAB
+  FIELD FROM
   USE %FRM
   INPUT CODTAB F_INIZIO1
   DISPLAY "Cod. formula magazzino" CODTAB
@@ -25,7 +25,7 @@ BEGIN
   PROMPT 2 3 "A cod. formula  "
   FLAGS "U"
   HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
-  FIELD LF_TABCOM->CODTAB
+  FIELD TO
   COPY USE F_INIZIO1
   INPUT CODTAB F_FINE1
   COPY DISPLAY F_INIZIO1

ve/vestfrr.rep

@@ -58,5 +58,9 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE %FRR</sql>
+ <sql>
+   USE %FRR
+   FROM CODTAB=#FROM
+   TO CODTAB=#TO
+ </sql>
 </report>

ve/vestfrr.uml

@@ -11,7 +11,7 @@ BEGIN
   PROMPT 2 1 "Da cod. formula "
   FLAGS "U"
   HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
-  FIELD LF_TABCOM->CODTAB
+  FIELD FROM
   USE %FRR
   INPUT CODTAB F_INIZIO1
   DISPLAY "Cod. formula documento" CODTAB
@@ -25,7 +25,7 @@ BEGIN
   PROMPT 2 3 "A cod. formula  "
   FLAGS "U"
   HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
-  FIELD LF_TABCOM->CODTAB
+  FIELD TO
   COPY USE F_INIZIO1
   INPUT CODTAB F_FINE1
   COPY DISPLAY F_INIZIO1

ve/vestimb.rep

@@ -63,5 +63,9 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE IMB</sql>
+ <sql>
+   USE IMB
+   FROM CODTAB=#FROM
+   TO CODTAB=#TO
+ </sql>
 </report>

ve/vestimb.uml

@@ -11,7 +11,7 @@ BEGIN
 PROMPT 2 1 "Da cod. imballaggio "
 FLAGS "U"
 HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
-FIELD LF_TABCOM->CODTAB
+FIELD FROM
 USE IMB
 INPUT CODTAB F_INIZIO1
 DISPLAY "Cod. imballaggio" CODTAB
@@ -25,7 +25,7 @@ BEGIN
 PROMPT 2 3 "A cod. imballaggio  "
 FLAGS "U"
 HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
-FIELD LF_TABCOM->CODTAB
+FIELD TO
 COPY USE F_INIZIO1
 INPUT CODTAB F_FINE1
 COPY DISPLAY F_INIZIO1

ve/vestnum.rep

@@ -82,5 +82,9 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE %NUM</sql>
+ <sql>
+   USE %NUM
+   FROM CODTAB=#FROM
+   TO CODTAB=#TO
+ </sql>
 </report>

ve/vestnum.uml

@@ -11,7 +11,7 @@ BEGIN
   PROMPT 2 1 "Da cod. numerazione "
   FLAGS "U"
   HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
-  FIELD LF_TABCOM->CODTAB
+  FIELD FROM
   USE %NUM
   INPUT CODTAB F_INIZIO1
   DISPLAY "Cod. numerazione" CODTAB
@@ -25,7 +25,7 @@ BEGIN
   PROMPT 2 3 "A cod. numerazione  "
   FLAGS "U"
   HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
-  FIELD LF_TABCOM->CODTAB
+  FIELD TO
   COPY USE F_INIZIO1
   INPUT CODTAB F_FINE1
   COPY DISPLAY F_INIZIO1

ve/veststd.rep

@@ -35,5 +35,9 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE %STD</sql>
+ <sql>
+   USE %STD
+   FROM CODTAB=#FROM
+   TO CODTAB=#TO
+ </sql>
 </report>

ve/veststd.uml

@@ -12,6 +12,7 @@ PROMPT 2 1 "Da cod. stato       "
 HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
 FLAGS "U"
 USE %STD
+FIELD FROM
 INPUT CODTAB F_INIZIO1
 DISPLAY "Cod. stato" CODTAB
 DISPLAY "Descrizione@50" S0
@@ -25,6 +26,7 @@ PROMPT 2 3 "A cod. stato        "
 HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
 FLAGS "U"
 COPY USE F_INIZIO1
+FIELD TO
 INPUT CODTAB F_FINE1
 COPY DISPLAY F_INIZIO1
 OUTPUT F_FINE1 CODTAB

ve/vesttag.rep

@@ -81,5 +81,9 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE TAG</sql>
+ <sql>
+   USE TAG
+   FROM CODTAB=#FROM
+   TO CODTAB=#TO
+ </sql>
 </report>

ve/vesttag.uml

@@ -11,7 +11,7 @@ BEGIN
 PROMPT 2 1 "Da cod. taglia "
 FLAGS "U"
 HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
-FIELD LF_TABCOM->CODTAB
+FIELD FROM
 USE TAG
 INPUT CODTAB F_INIZIO1
 DISPLAY "Cod. Taglia" CODTAB
@@ -25,7 +25,7 @@ BEGIN
 PROMPT 2 3 "A cod. taglia  "
 FLAGS "U"
 HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
-FIELD LF_TABCOM->CODTAB
+FIELD TO
 COPY USE F_INIZIO1
 INPUT CODTAB F_FINE1
 COPY DISPLAY F_INIZIO1

ve/vesttip.rep

@@ -60,5 +60,9 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE %TIP</sql>
+ <sql>
+   USE %TIP
+   FROM CODTAB=#FROM
+   TO CODTAB=#TO
+ </sql>
 </report>

ve/vesttip.uml

@@ -11,7 +11,7 @@ BEGIN
   PROMPT 2 1 "Da cod. tipo documento "
   FLAGS "U"
   HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
-  FIELD LF_TABCOM->CODTAB
+  FIELD FROM
   USE %NUM
   INPUT CODTAB F_INIZIO1
   DISPLAY "Cod. tipo documento" CODTAB
@@ -25,7 +25,7 @@ BEGIN
   PROMPT 2 3 "A cod. tipo documento  "
   FLAGS "U"
   HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
-  FIELD LF_TABCOM->CODTAB
+  FIELD TO
   COPY USE F_INIZIO1
   INPUT CODTAB F_FINE1
   COPY DISPLAY F_INIZIO1

ve/vesttri.rep

@@ -49,5 +49,9 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE %TRI</sql>
+ <sql>
+   USE %TRI
+   FROM CODTAB=#FROM
+   TO CODTAB=#TO
+ </sql>
 </report>

ve/vesttri.uml

@@ -11,7 +11,7 @@ BEGIN
   PROMPT 2 1 "Da cod. tipo riga doc. "
   FLAGS "U"
   HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
-  FIELD LF_TABCOM->CODTAB
+  FIELD FROM
   USE %TRI
   INPUT CODTAB F_INIZIO1
   DISPLAY "Cod. profilo riga doc." CODTAB
@@ -25,7 +25,7 @@ BEGIN
   PROMPT 2 3 "A cod. tipo riga doc.  "
   FLAGS "U"
   HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
-  FIELD LF_TABCOM->CODTAB
+  FIELD TO
   COPY USE F_INIZIO1
   INPUT CODTAB F_FINE1
   COPY DISPLAY F_INIZIO1

ve/vestums.rep

@@ -47,5 +47,9 @@
   <field border="2" x="1" y="2.5" type="Linea" width="93" height="0" />
  </section>
  <section keep_with_next="1" type="Foot" level="1" />
- <sql>USE %UMS</sql>
+ <sql>
+   USE %UMS
+   FROM CODTAB=#FROM
+   TO CODTAB=#TO
+ </sql>
 </report>

ve/vestums.uml

@@ -11,7 +11,7 @@ BEGIN
 PROMPT 2 1 "Da Unita' di misura "
 FLAGS "U"
 HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
-FIELD LF_TABCOM->CODTAB
+FIELD FROM
 USE %UMS
 INPUT CODTAB F_INIZIO1
 DISPLAY "Unita' di misura" CODTAB
@@ -25,7 +25,7 @@ BEGIN
 PROMPT 2 3 "A Unita' di misura  "
 FLAGS "U"
 HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
-FIELD LF_TABCOM->CODTAB
+FIELD TO
 COPY USE F_INIZIO1
 INPUT CODTAB F_FINE1
 COPY DISPLAY F_INIZIO1