Patch level :

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :


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

lv/f169.trr

@@ -8,9 +8,9 @@ PREZZO|4|18|3|Prezzo in vigore
 PREZRIN|4|18|3|Prezzo di rinnovo
 QTACONG|4|15|5|Quantità conguaglio
 SCONTPERC|4|6|2|Percentuale di sconto
-DOTIN|3|6|0|Dotazione iniziale
+DOTIN|4|15|5|Dotazione iniziale
-DOTOD|3|6|0|Dotazione odierna
+DOTOD|4|15|5|Dotazione odierna
-DOTTMP|3|6|0|Dotazione temporanea
+DOTTMP|4|15|5|Dotazione temporanea
 PRZDTTMP|4|18|3|Prezzo Dotazione temporanea
 INDTTMP|5|8|0|Inizio Dotazione temporanea
 FIDTTMP|5|8|0|Fine Dotazione temporanea
@@ -33,8 +33,8 @@ CALCCONS|2|1|0|Calcolo consegnato
 TIPONOL|2|1|0|Tipo noleggio
 COLORE|1|20|0|Colore
 TIPOLOGIA|2|1|0|Caregoria merceologica
-PRZXPAC|3|6|0|Pezzi per pacco
+PRZXPAC|4|15|5|Pezzi per pacco
-PRZXSAC|3|6|0|Pezzi per sacco
+PRZXSAC|4|15|5|Pezzi per sacco
-PRZXCAR|3|6|0|Pezzi per carrello
+PRZXCAR|4|15|5|Pezzi per carrello
 1
 |

lv/lv0400b.uml

@@ -0,0 +1,193 @@
+#include "lv0400.h"
+
+TOOLBAR "" 0 0 0 2
+#include "Relapbar.h"
+ENDPAGE
+
+PAGE "Contratto" 0 2 0 0
+
+GROUPBOX DLG_NULL 78 6
+BEGIN
+	PROMPT 0 1 "@bContratti"
+END
+
+NUMBER F_CODCF 6
+BEGIN
+  PROMPT 2 5 "Cliente   " 
+  FIELD CODCF
+  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_CLI RAGSOC
+  CHECKTYPE REQUIRED  
+END
+
+STRING F_RAGSOC_CLI 50
+BEGIN
+  PROMPT 20 5 ""
+  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 6
+BEGIN
+  PROMPT 2 6 "Contratto N."
+  USE LF_LVCONDV
+  FLAGS "U"
+  FIELD CODCONT
+  KEY 1
+  
+  CHECKTYPE REQUIRED
+END
+
+STRING F_DES_CODCONT 50
+BEGIN
+  PROMPT 20 6 ""
+END
+
+SPREADSHEET F_SHEET_ATTIV
+BEGIN
+  PROMPT 0 8 "Righe contratto"
+  ITEM "Articolo "
+  ITEM "Descrizione @50"
+  ITEM "UM"
+  ITEM "Cong."
+  ITEM "Prezzo in vigore"
+  ITEM "Prezzo di Rinnovo"
+  ITEM "Sconto %"
+  ITEM "Dot.Iniziale"
+  ITEM "Dot.Odierna"
+  ITEM "Consegnato Mese*"
+  ITEM "Consegnato anno"
+  ITEM "Fatturato anno"
+  ITEM "Dot.Temporanea"
+END
+
+ENDPAGE
+
+PAGE "Opzioni" 0 2 0 0
+
+
+
+ENDPAGE
+
+ENDMASK
+
+PAGE "" -1 -1 60 10
+
+STRING S_ARTICOLO 20
+BEGIN
+	PROMPT 1 1 "Codice articolo"
+	FLAGS "U"
+      USE LF_ANAMAG
+      INPUT CODART S_ARTICOLO
+      DISPLAY "Articolo" CODART
+      DISPLAY "Descrizione@50" DESCR
+      OUTPUT S_ARTICOLO CODART
+      OUTPUT S_DESCR DESCR
+      OUTPUT S_PREZZOST COSTSTD
+      CHECKTYPE REQUIRED  
+END
+
+STRING S_DESCR 50
+BEGIN
+	PROMPT 2 4 "Descrizione   "
+      USE LF_ANAMAG KEY 2
+	INPUT DESCR S_DESCR
+      DISPLAY "Descrizone@50" DESCR
+      DISPLAY "Articolo" CODART
+      COPY OUTPUT S_ARTICOLO
+      CHECKTYPE REQUIRED  
+END
+
+STRING S_UM 2
+BEGIN
+  PROMPT 2 6 "Unità di misura "
+  USE LF_UMART 2
+  JOIN UMS INTO CODTAB=UM
+  INPUT CODART S_ARTICOLO SELECT
+  INPUT UM S_UM
+  DISPLAY "U.M." UM
+  DISPLAY "Descrione@50" LF_TAB->S0  
+  OUTPUT S_UM UM
+  CHECKTYPE REQUIRED
+END
+
+CURRENCY S_PREZZOST 18 3
+BEGIN
+  PROMPT 2 6 "Prezzo in vigore "
+  FLAGS "D"
+END
+
+CURRENCY S_PREZZORN 18 3
+BEGIN
+  PROMPT 2 6 "Prezzo di rinnovo "
+  FIELD PREZRIN
+END
+
+NUMBER S_SCONTO 6 2
+BEGIN
+  PROMPT 2 6 "Sconto %"
+  FIELD SCONTPERC
+END
+ 
+NUMBER S_DOTIN 6 
+BEGIN
+  PROMPT 2 6 "Dotazione iniziale"
+  FIELD DOTIN
+END
+
+NUMBER S_DOTIN 6 
+BEGIN
+  PROMPT 2 6 "Dotazione odierna"
+  FIELD DOTOD
+END
+
+NUMBER S_CONSMESE 15 5
+BEGIN
+  PROMPT 2 6 "Quantità consegnata al mese da fatturare nel prossimo periodo di fatturazione"
+  FIELD CONSMESE
+END
+
+NUMBER S_CONSANNO 15 5
+BEGIN
+  PROMPT 2 6 "Quantità consegnata all'anno "
+  FIELD CONSANNO
+END
+
+NUMBER S_FATTANNO 18 3
+BEGIN
+  PROMPT 2 6 "Fatturato anno "
+  FIELD FATTANNO
+END
+
+NUMBER S_DOTTMP 6 
+BEGIN
+  PROMPT 2 6 "Dotazione temporanea"
+  FIELD DOTTMP
+END
+
+BUTTON DLG_OK 10 2
+BEGIN
+  PROMPT -12 -1 ""
+END
+
+BUTTON DLG_CANCEL 10 2
+BEGIN
+  PROMPT -22 -1 ""
+END
+
+ENDPAGE
+
+ENDMASK
+