Tolti migliaia di include inutili

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

cg/cg0200.cpp

@@ -3,7 +3,6 @@
 #include <msksheet.h>
 #include <relapp.h>
 #include <sheet.h>
-#include <utility.h>
 #include <validate.h>
 
 #include <pconti.h>
@@ -31,6 +30,8 @@ class TClifo_application : public TRelation_application
   bool _lbcn, _gesven;
   bool _savenew;
   bool _ignoreven;
+  
+  TToken_string _tmp;
 
 protected:
   bool user_create();
@@ -110,8 +111,9 @@ const char* TClifo_application::get_next_key()
       if ( tipocf == tipo )
         codcf += clifo.get_long(CLI_CODCF);
     }
-  }
+  }                 
-  return format("%d|%s|%d|%ld", F_TIPOCF, (const char*) tipo, F_CODCF, codcf);
+  _tmp.format("%d|%s|%d|%ld", F_TIPOCF, (const char*) tipo, F_CODCF, codcf);
+  return _tmp;
 }
 
 HIDDEN bool no_dup_fis(TMask_field& f, KEY key)
@@ -182,10 +184,11 @@ HIDDEN bool autoexit_rsoc_handler(TMask_field& f, KEY key)
 
 { 
   if (f.mask().query_mode() && key == K_TAB)
-  {
+  {                  
+    TString16 tmp;
     TArray parms;
-    parms.add((TString)format("%d", F_RAGSOC));
+    parms.add(tmp.format("%d", F_RAGSOC));
-    parms.add((TString)format("%d", F_RAGSOCA));
+    parms.add(tmp.format("%d", F_RAGSOCA));
     ::validate(AUTOEXIT_FUNC, (TEdit_field&) f, key, parms);
   } 
   return TRUE;
@@ -197,9 +200,10 @@ HIDDEN bool autoexit_handler(TMask_field& f, KEY key)
   if (f.mask().query_mode())
   {
     if (key == K_TAB && f.focusdirty())
-    {
+    {           
+      TString16 tmp;
       TArray parms;
-      parms.add((TString)format("%d", f.dlg()));
+      parms.add(tmp.format("%d", f.dlg()));
       ::validate(AUTOEXIT_FUNC, (TEdit_field&) f, key, parms);
     } 
   }  

cg/cg0300.cpp

@@ -1,6 +1,5 @@
 #include <relapp.h>
-#include <lffiles.h>
+
-#include <utility.h>
 #include "cg0.h"
 #include "cg0300.h"
 
@@ -64,7 +63,7 @@ bool CG0300_application::user_create()
   _attiv = new TLocalisamfile(LF_ATTIV);
   _clifo = new TLocalisamfile(LF_CLIFO);
   const long ditta = get_firm();
-  _msk->set(F_CODDITTA, format("%ld", ditta));
+  _msk->set(F_CODDITTA, ditta);
   _ditte->zero();
   _ditte->put(N_CODDITTA, ditta);
   _ditte->read();

cg/cg0400.cpp

@@ -1,21 +1,21 @@
 //********************************
 //*  Riepilogo Progressivi IVA   *
 //********************************
-#include <applicat.h>
-#include <date.h>
-#include <lffiles.h>
 #include <mask.h>
-#include <isam.h>
 #include <printapp.h>
 #include <tabutil.h>
 #include <utility.h>
+
+#include "cg0.h"
+#include "cg0400.h"
+
+#include "classpim.h"
+
 #include <anagr.h>
 #include <comuni.h>   
 #include <attiv.h>   
 #include <nditte.h>   
-#include "classpim.h"
+
-#include "cg0.h"
-#include "cg0400.h"
 
 HIDDEN TString80 TMP;
 

cg/cg0500a.uml

@@ -16,7 +16,6 @@ END
 STRING F_COD_CAUS 3
 BEGIN
   PROMPT 2 1 "Codice "
-  HELP "Codice identificativo della causale"
   FIELD CODCAUS
   KEY 1
   FLAGS "UZ"
@@ -32,7 +31,6 @@ BEGIN
   DISPLAY "Cespiti" COLLCESP
   OUTPUT F_COD_CAUS CODCAUS
   OUTPUT F_DESCR DESCR
-  HELP "Codice causale"
   CHECKTYPE REQUIRED
   MESSAGE COPY, F_COD_CAUS2
 END
@@ -55,14 +53,12 @@ BEGIN
   CHECKTYPE REQUIRED
   KEY 2
   WARNING "Descrizione assente"
-  HELP "Descrizione della causale"
   MESSAGE COPY, F_DESCR2
 END
 
 STRING F_TIPO_DOC 2
 BEGIN
   PROMPT 2 3 "Tipo documento "
-  HELP "Tipo di documento collegato alla causale"
   FIELD TIPODOC
   USE %TPD
   INPUT CODTAB F_TIPO_DOC
@@ -70,7 +66,6 @@ BEGIN
   DISPLAY "Descrizione @50" S0
   OUTPUT F_TIPO_DOC CODTAB
   OUTPUT F_DES_DOC S0
-  HELP "Tipo documento"
   WARNING "Tipo documento errato"
   CHECKTYPE NORMAL
   FLAGS "U"
@@ -80,13 +75,11 @@ END
 STRING F_DES_DOC 50
 BEGIN
   PROMPT 24 3 ""
-  HELP "Tipo di documento collegato alla causale"
   USE %TPD KEY 2
   INPUT S0 F_DES_DOC
   DISPLAY "Descrizione @50" S0
   DISPLAY "Tipo " CODTAB
   COPY OUTPUT F_TIPO_DOC
-  HELP "Tipo documento"
   WARNING "Tipo documento errato"
   CHECKTYPE NORMAL
   ADD NONE
@@ -95,7 +88,6 @@ END
 STRING F_COD_REG 3
 BEGIN
   PROMPT 2 4 "Cod. registro  "
-  HELP "Codice registro collegato alla causale"
   FIELD REG
   USE REG
   INPUT CODTAB[1,4] F_ANNOES
@@ -152,9 +144,7 @@ END
 LISTBOX F_TIPO_MOV_1 1 20
 BEGIN
   PROMPT 2 5 "Tipo movimento        "
-  HELP "Tipo di movimento generato dalla causale"
   FIELD TIPOMOV
-  HELP "Tipo movimento"
   ITEM " |Nessuno"   MESSAGE COPY,F_TIPO_MOV
   ITEM "1|Fattura"  MESSAGE COPY,F_TIPO_MOV
   ITEM "2|Nota credito"  MESSAGE COPY,F_TIPO_MOV
@@ -166,7 +156,6 @@ LISTBOX F_TIPO_MOV_2 1 20
 BEGIN
   PROMPT 2 5 "Tipo movimento        "
   FIELD TIPOMOV
-  HELP "Tipo di movimento generato dalla causale"
   ITEM " |Nessuno"  MESSAGE COPY,F_TIPO_MOV
   ITEM "3|Incasso/pagamento "  MESSAGE COPY,F_TIPO_MOV
   ITEM "5|Insoluto"  MESSAGE COPY,F_TIPO_MOV
@@ -178,7 +167,6 @@ LISTBOX F_M_770 1 48
 BEGIN
   PROMPT 2 6 "Collegamento Mod.770  "
   FIELD M770
-  HELP "Tipo di collegamento Mod.770"
   ITEM " |Nessuno" 
   ITEM "1|Ricevuta e/o pagamento fattura percipiente" 
   ITEM "2|Versamento ritenute percipiente"
@@ -238,7 +226,6 @@ BOOLEAN F_DATA_DOC
 BEGIN
   PROMPT 2 4 "Data documento"
   FIELD DATADOC
-  HELP "Data del documento collegato con la causale"
   CHECKTYPE NORMAL
 END
 
@@ -246,14 +233,12 @@ BOOLEAN F_NUM_DOC
 BEGIN
   PROMPT 34 4 "Numero documento"
   FIELD NUMDOC
-  HELP "Numero del documento collegato con la causale"
   CHECKTYPE NORMAL
 END
 
 BOOLEAN F_AUTO_FAT
 BEGIN
   PROMPT 2 6 "Autofattura art.34"
-  HELP "Indicare se si tratta di autofattura ex art.34"
   FIELD AUTOFATT 
   CHECKTYPE NORMAL
   GROUP 2
@@ -262,7 +247,6 @@ END
 BOOLEAN F_ALLEGAT
 BEGIN
   PROMPT 34 6 "Doc. non va in allegati fine anno"
-  HELP "Indicare se non inserire negli allegati IVA del documento"
   FIELD ALLEG
   GROUP 2
 END
@@ -270,7 +254,6 @@ END
 BOOLEAN F_FAT_RITARDO
 BEGIN
   PROMPT 2 8 "Fattura in ritardo"
-  HELP "Indicare se le fatture vengono registrate al ricevimento"
   FIELD RITFATT
   GROUP 2
 END
@@ -278,7 +261,6 @@ END
 STRING F_COD_CAUS_IM 3
 BEGIN
   PROMPT 34 8 "Codice causale per l'incasso immediato "
-  HELP "Codice causale nel caso di incasso immediato"
   FLAGS "UZ"
   FIELD CODCAUSIM
   COPY USE F_COD_CAUS
@@ -292,7 +274,6 @@ END
 BOOLEAN F_OP_INTRACOM
 BEGIN
   PROMPT 2 10 "Operazione intracomunitaria"
-  HELP "Indicare se gestire le fatture intracomunitarie"
   FIELD INTRACOM
   GROUP 2
 END
@@ -300,7 +281,6 @@ END
 BOOLEAN F_VALINTRA
 BEGIN
   PROMPT 34 10 "Gestione valuta per operazioni intrac."
-  HELP "Indicare se registrare l'importo delle fatture CEE in valute"
   FIELD VALINTRA
   GROUP 2
 END
@@ -308,7 +288,6 @@ END
 BOOLEAN F_MOV_VALU
 BEGIN
   PROMPT 2 12 "Movimento in valuta"
-  HELP "Indicare se si utilizzano gli importi in valuta"
   FIELD MOVVAL
   GROUP 2
 END
@@ -316,7 +295,6 @@ END
 BOOLEAN F_MOV_SEZ
 BEGIN
   PROMPT 34 12 "Movimento solo sezionale"
-  HELP "Indicare se si tratta solo di moviemto di sezione"
   FIELD MOVSEZ
   FLAGS "H"
 END
@@ -324,7 +302,6 @@ END
 LISTBOX F_OP_FINE_ANNO 1 11
 BEGIN
   PROMPT 2 14 "Operazioni di fine anno "
-  HELP "Tipo di movimento di fine anno"
   ITEM " | "
   ITEM "C|Chiusura"
   ITEM "A|Apertura"
@@ -337,7 +314,6 @@ LISTBOX F_COLL_CESP 1 40
 BEGIN
   PROMPT 2 16 "Collegamento cespiti "
   FIELD COLLCESP
-  HELP "Tipo di collegamento cespiti"
   ITEM " |Nessuno"
   ITEM "A|Acquisto cespite"
   ITEM "B|Rettifica acquisto"