From 0ebd9771dc597e748abf54861a102bfdb35f7609 Mon Sep 17 00:00:00 2001
From: bonazzi <bonazzi@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Sat, 29 Jul 2017 14:16:12 +0000
Subject: [PATCH] Patch level         : 12.0 426 Files correlati     : ve0.exe
 ve0300a.ini ve0100a.msk ve0200g.msk ve1300.alx ve1.exe ve17001.rep
 ve17002.rep ve1700a.msk ve1700a.msk ve2.exe ve6.exe ve61000a.msk ve17001.rep
 ve17002.rep ve17002.rep ve17001.rep ve1700a.msk ve6b00a.msk
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

MODIFICHE CRPA

Se si mette il flag P sulla data documento della maschera di un tipo documento viene proposta l’ultima data inserita.
Possibilità di impostare il numero di copie nell’inserimento/modifica di un documento.
Righe documento massime 10000
Aggiunta ricerca per riferimento cliente (ricerca alternativa).
Aggiunto indirizzo cliente/fornitore sulla ricerca documenti.
Lista documenti avanzata (report).
Aggiunte le regolarizzazioni nella contabilizzazione documenti
Sistema abilitazione della data registrazione in contabilizzazione documenti
Aggiunta la possibilità di usare campi del documento nella dicitura del riferimento.
Gestiti i movimenti di sola iva in contabilizzazione.
Riferimento per mese nelle partite.
Ordinamento per documento nell’evasione ordini con un flag in configurazione
Impostato il tipo CF in base al tipo documento
Aggiunto il messaggio cliente alla stampa report delle vendite



git-svn-id: svn://10.65.10.50/branches/R_10_00@24024 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 src/ve/ve0100a.uml | 14 ++------------
 src/ve/ve1700.cpp  |  7 +++----
 src/ve/velib07.cpp |  3 ++-
 3 files changed, 7 insertions(+), 17 deletions(-)

diff --git a/src/ve/ve0100a.uml b/src/ve/ve0100a.uml
index b9b68946e..15a117a6d 100755
--- a/src/ve/ve0100a.uml
+++ b/src/ve/ve0100a.uml
@@ -164,27 +164,17 @@ END
 NUMBER F_CODCF 6
 BEGIN
   PROMPT 24 8 "Codice      " 
-  
-  /*
-  USE LF_DOC KEY 2 SELECT (CODNUM==#F_CODNUM)&&(PROVV==#F_PROVV)&&(ANNO==#F_ANNO)&&((#F_STATO=="")||(STATO==#F_STATO))
-  JOIN LF_CLIFO INTO TIPOCF==TIPOCF CODCF==CODCF
-  JOIN LF_COMUNI TO LF_CLIFO INTO STATO==STATOCF COM==COMCF
-  INPUT TIPOCF F_TIPOCF SELECT
-  INPUT CODCF F_CODCF SELECT
-  INPUT PROVV F_PROVV
-  INPUT ANNO F_ANNO 
-  */
-  
   USE LF_DOC SELECT (TIPOCF==#F_TIPOCF)&&((#F_CODCF="")||(CODCF==#F_CODCF))&&((#F_STATO=="")||(STATO==#F_STATO)) 
   BY LF_CLIFO->CODCF NDOC
   JOIN LF_CLIFO INTO TIPOCF==TIPOCF CODCF==CODCF
+  JOIN LF_COMUNI TO LF_CLIFO INTO STATO==STATOCF COM==COMCF
   INPUT PROVV F_PROVV SELECT
   INPUT ANNO F_ANNO SELECT
   INPUT CODNUM F_CODNUM SELECT
   
   DISPLAY "Codice" CODCF
   DISPLAY "Ragione Sociale@50" LF_CLIFO->RAGSOC
-	DISPLAY "Partita IVA@12" LF_CLIFO->PAIV
+  DISPLAY "Partita IVA@12" LF_CLIFO->PAIV
   DISPLAY "Num." CODNUM
   DISPLAY "Anno" ANNO
   DISPLAY "Provv" PROVV
diff --git a/src/ve/ve1700.cpp b/src/ve/ve1700.cpp
index 105e0d363..266ccdaac 100644
--- a/src/ve/ve1700.cpp
+++ b/src/ve/ve1700.cpp
@@ -201,7 +201,7 @@ bool TStampa_lista_docs_mask::on_field_event(TOperable_field& o, TField_event e,
 }
 
 TStampa_lista_docs_mask::TStampa_lista_docs_mask()
-												: TAutomask("ve1600a"), 
+												: TAutomask("ve1700a"), 
 												  _clifo(new TCursor(new TRelation(LF_CLIFO)),
 												  " |CODCF|RAGSOC", TR("Selezione Clienti/Fornitori"),
                           HR("@1|Codice@6R|Descrizione@50"), 0, 1)
@@ -458,7 +458,7 @@ void TListaDoc_application::main_loop()
   TStampa_lista_docs_mask m;
   TLista_documenti_report report(&m);
 
-	m.set(F_REPORT, "ve16001");
+	m.set(F_REPORT, "ve17001");
 
   while (m.run() != K_QUIT)
   {
@@ -466,12 +466,11 @@ void TListaDoc_application::main_loop()
     TFilename report_name = m.get(F_REPORT);
 
 		if (report_name.blank())
-			report_name = "ve16001";
+			report_name = "ve17001";
     report.load(report_name); 
     book.add(report);
     if (book.pages() > 0)
       book.print_or_preview();
-		m.set(F_REPORT, "ve16001");
   } 
 }
 
diff --git a/src/ve/velib07.cpp b/src/ve/velib07.cpp
index a307c5404..2566714c8 100755
--- a/src/ve/velib07.cpp
+++ b/src/ve/velib07.cpp
@@ -751,7 +751,8 @@ bool TDocument_report::execute_usr_word(unsigned int opcode, TVariant_stack& sta
     default: break;
   }
 
-  while (!stack.pop().is_null());  // Svuota eventuali parametri variabili inutilizzati
+  while (stack.items() > 0)
+		stack.pop();  // Svuota eventuali parametri variabili inutilizzati
 
   return true;
 }