Patch level :

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :


git-svn-id: svn://10.65.10.50/branches/R_10_00@21925 c028cbd2-c16b-5b4b-a496-9718f37d4682

ha/ha0200a.h

@@ -50,11 +50,13 @@
 #define F_CODICI_IVA        270
 
 //------------------------------
-//campi sheet aliqute-codici iva
+//campi sheet aliquote-codici iva
 #define S_ALIQUOTA_IVA      101
 #define S_CAMPO_CODIVA      102
 #define S_CAMPO_CODIVA_DES  103
 
+//==============================
+//pagina 3
 // configurazione Procedura Esselunga
 #define F_E_PATH						301
 #define F_E_PIVA_HARDY			302
@@ -63,3 +65,15 @@
 #define F_E_COD_ESSELUNGA		305
 #define F_E_TIPOEMISSIONE		306
 #define F_E_DATACONF				307
+
+//==============================
+//pagina 4
+//parametri documenti per generazione storico attrezzature
+#define F_TIPO_DOC2ELAB           401
+#define F_TIPO_DOC2ELAB_DESCR     402
+#define F_STATO_DOC2ELAB          403
+#define F_STATO_DOC2ELAB_DESCR    404
+#define F_CAUSMAG_APERTURA        405
+#define F_CAUSMAG_APERTURA_DESCR  406
+#define F_CAUSMAG_CHIUSURA        407
+#define F_CAUSMAG_CHIUSURA_DESCR  408

ha/ha0200a.uml

@@ -4,7 +4,8 @@ TOOLBAR "topbar" 0 0 0 2
 #include <stdbar.h>
 ENDPAGE
 
-PAGE "Contratti e NAC" -1 -1 78 23
+//----------------------------
+PAGE "Contratti e NAC" 0 2 0 0
 
 GROUPBOX DLG_NULL 76 4
 BEGIN
@@ -320,7 +321,9 @@ END
 
 ENDPAGE
 
-PAGE "Trasferimenti" -1 -1 78 23
+
+//----------------------------
+PAGE "Trasferimenti" 0 2 0 0
 
 GROUPBOX DLG_NULL 76 7
 BEGIN
@@ -519,7 +522,9 @@ END
 
 ENDPAGE
 
-PAGE "Configurazione Esselunga" -1 -1 78 23
+
+//-------------------------------------
+PAGE "Configurazione Esselunga" 0 2 0 0
 
 STRING F_E_PATH 255 39
 BEGIN
@@ -575,10 +580,119 @@ END
 
 ENDPAGE
 
+
+//------------------------------------
+PAGE "Cartellini attrezzature" 0 2 0 0
+
+GROUPBOX DLG_NULL 76 6
+BEGIN
+  PROMPT 1 1 "@bParametri documenti"
+END
+
+STRING F_TIPO_DOC2ELAB 4
+BEGIN
+  PROMPT 2 2 "Tipo  "
+  USE %TIP
+  INPUT CODTAB F_TIPO_DOC2ELAB
+  DISPLAY "Codice@8" CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_TIPO_DOC2ELAB CODTAB
+  OUTPUT F_TIPO_DOC2ELAB_DESCR S0
+  FLAGS "U"
+  CHECKTYPE REQUIRED
+  FIELD Doc2ElabTip
+END
+
+STRING F_TIPO_DOC2ELAB_DESCR 50
+BEGIN
+  PROMPT 20 2 ""
+  USE %TIP KEY 2
+  INPUT S0 F_TIPO_DOC2ELAB_DESCR
+  DISPLAY "Descrizione@50" S0
+  DISPLAY "Codice" CODTAB
+  COPY OUTPUT F_TIPO_DOC2ELAB
+  CHECKTYPE NORMAL
+END
+
+STRING F_STATO_DOC2ELAB 1
+BEGIN
+  PROMPT 2 3 "Stato "
+  USE %STD
+  INPUT CODTAB F_STATO_DOC2ELAB
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_STATO_DOC2ELAB CODTAB
+  OUTPUT F_STATO_DOC2ELAB_DESCR S0
+  FLAGS "U"
+  CHECKTYPE REQUIRED
+  FIELD Doc2ElabSta
+END
+
+STRING F_STATO_DOC2ELAB_DESCR 50
+BEGIN
+  PROMPT 20 3 ""
+  USE %STD KEY 2
+  INPUT S0 F_STATO_DOC2ELAB_DESCR
+  DISPLAY "Descrizione@50" S0
+  DISPLAY "Codice" CODTAB
+  COPY OUTPUT F_STATO_DOC2ELAB
+  CHECKTYPE NORMAL
+END
+
+STRING F_CAUSMAG_APERTURA 5
+BEGIN
+  PROMPT 2 4 "Causale apertura  "
+  USE MAG
+  INPUT CODTAB F_CAUSMAG_APERTURA
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_CAUSMAG_APERTURA CODTAB
+  OUTPUT F_CAUSMAG_APERTURA_DESCR S0
+  CHECKTYPE REQUIRED
+  FLAGS "U"
+  FIELD CausOpen
+END
+
+STRING F_CAUSMAG_APERTURA_DESCR 50 46
+BEGIN
+  PROMPT 28 4 ""
+  USE MAG KEY 2
+  INPUT S0 F_CAUSMAG_APERTURA_DESCR
+  DISPLAY "Descrizione@50" S0
+  DISPLAY "Codice" CODTAB
+  COPY OUTPUT F_CAUSMAG_APERTURA
+  CHECKTYPE NORMAL
+END
+
+STRING F_CAUSMAG_CHIUSURA 5
+BEGIN
+  PROMPT 2 5 "Causale chiusura  "
+  COPY USE F_CAUSMAG_APERTURA
+  INPUT CODTAB F_CAUSMAG_CHIUSURA
+  COPY DISPLAY F_CAUSMAG_APERTURA
+  OUTPUT F_CAUSMAG_CHIUSURA CODTAB
+  OUTPUT F_CAUSMAG_CHIUSURA_DESCR S0
+  CHECKTYPE REQUIRED
+  FLAGS "U"
+  FIELD CausClose
+END
+
+STRING F_CAUSMAG_CHIUSURA_DESCR 50 46
+BEGIN
+  PROMPT 28 5 ""
+  COPY USE F_CAUSMAG_APERTURA_DESCR
+  INPUT S0 F_CAUSMAG_CHIUSURA_DESCR
+  COPY DISPLAY F_CAUSMAG_APERTURA_DESCR
+  COPY OUTPUT F_CAUSMAG_CHIUSURA
+  CHECKTYPE NORMAL
+END
+
+ENDPAGE
+
 ENDMASK
 
-//---------------------------------------------------
+//--------------------------------------------------------------
-//maschera di riga dello sheet 2 (Codici iva)
+//maschera di riga dello sheet pagina trasferimenti (Codici iva)
 
 PAGE "Riga" -1 -1 64 4
 

ha/ha3.cpp

@@ -3,7 +3,7 @@
 
 #include "ha3.h"
 
-#define usage   "Error - usage : %s -{0|8}"
+#define usage   "Error - usage : %s -{0|7|8}"
 
 int main(int argc,char** argv)
 {
@@ -13,7 +13,8 @@ int main(int argc,char** argv)
   switch (r)
   {
   case  0: rt = ha3100(argc, argv);   break; //Gestione giri
-  case  8: rt = ha3900(argc, argv);   break; //Gestione attrezzature
+  case  7: rt = ha3800(argc, argv);   break; //Inserimento righe storico da documenti
+  case  8: rt = ha3900(argc, argv);   break; //Gestione storico attrezzature
   default: error_box(usage, argv[0]); break;
   }
   return rt;

ha/ha3.h

@@ -1,2 +1,3 @@
 int ha3100(int argc, char* argv[]);
+int ha3800(int argc, char* argv[]);
 int ha3900(int argc, char* argv[]);

ha/ha3800.cpp

@@ -234,8 +234,7 @@ void TInserimento_storico::elabora(const TMask& mask)
         tab_his.put("R1", importo);
 
         tab_his.write_rewrite();
-      } //if (caus==caus_open || ...
+      } //if (caus==caus_open || ..
-
 
     } //for (bool ok = rdoc_recset.move_first()...
     

ha/ha3900.cpp

@@ -457,6 +457,6 @@ void TGestione_attrezzature::main_loop()
 int ha3900(int argc, char* argv[])
 {
   TGestione_attrezzature app;
-  app.run(argc, argv, TR("Gestione attrezzature"));
+  app.run(argc, argv, TR("Gestione storico attrezzature"));
   return 0;
 }

ha/hamenu.men

@@ -65,4 +65,5 @@ Picture = <ha01>
 Module  = 46
 Flags   = "F"
 Item_01 = "Tabella attrezzature", "ha0 -0 &ATT", ""
-Item_02 = "Gestione attrezzature", "ha3 -8", "F"
+Item_02 = "Gestione attrezzature", "ha3 -8", ""
+Item_03 = "Generazione storico da documenti", "ha3 -7", ""