cg0500.cpp Aggiunto include <recarray.h>

cg2100a.uml  Abbassato groupbox
cg21cg.uml   Corretta maschera
cg3100.cpp   Corretto uso movimenti provvisori
cg3200.cpp   Corretto uso movimenti provvisori
cg3600.cpp   Aggiunto include <recarray.h>


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

cg/cg0500.cpp

@@ -3,6 +3,7 @@
 #include <applicat.h>
 #include <config.h>
 #include <msksheet.h>
+#include <recarray.h>
 #include <relapp.h>
 #include <tabutil.h>
 #include <utility.h>

cg/cg2100a.uml

@@ -27,7 +27,7 @@ BEGIN
   FLAGS "D"
 END
 
-GROUPBOX DLG_NULL 78 8
+GROUPBOX DLG_NULL 78 7
 BEGIN
   PROMPT 1 5 "@bMovimento di prima nota"
   FLAGS "R"
@@ -83,7 +83,7 @@ END
 
 STRING F_CODCAUS 3
 BEGIN
-  PROMPT 3 11 "Causale    "
+  PROMPT 3 10 "Causale    "
   FLAGS "UZ"
   FIELD CODCAUS
   USE LF_CAUSALI
@@ -101,7 +101,7 @@ END
 
 STRING F_DESCRCAUS 50
 BEGIN
-  PROMPT 23 11 ""
+  PROMPT 23 10 ""
   USE LF_CAUSALI KEY 2
   CHECKTYPE NORMAL
   INPUT DESCR F_DESCRCAUS

cg/cg21cg.uml

@@ -8,7 +8,6 @@ END
 STRING 108 5
 BEGIN
   PROMPT 2 2 ""
-  HELP "Codice della descrizione aggiuntiva della riga"
   FLAGS "UZ"
   USE %DPN
   INPUT CODTAB 108
@@ -27,7 +26,6 @@ BEGIN
   DISPLAY "Descrizione@50" S0
   DISPLAY "Codice" CODTAB
   COPY OUTPUT 108
-  HELP "Descrizione aggiuntiva della riga"
   FIELD DESCR
 END
 
@@ -39,7 +37,6 @@ END
 NUMBER CG_DARE 15
 BEGIN
   PROMPT 2 5 "Dare "
-  HELP "Importo 'dare' del conto della riga"
   FLAGS "RV"
   PICTURE "."
 END
@@ -47,7 +44,6 @@ END
 NUMBER CG_AVERE 15
 BEGIN
   PROMPT 43 5 "Avere "
-  HELP "Importo 'avere' del conto della riga"
   FLAGS "RV"
   PICTURE "."
 END
@@ -55,7 +51,6 @@ END
 LIST CG_TIPO 1 10
 BEGIN
   PROMPT 2 6 "Tipo "
-  HELP "Tipo del conto principale della riga"
   FLAGS "U"
   ITEM " |Conto"     MESSAGE SHOW,106|HIDE,206|HIDE,306|SHOW,107|HIDE,207|HIDE,307
   ITEM "C|Cliente"   MESSAGE SHOW,206|HIDE,106|HIDE,306|SHOW,207|HIDE,107|HIDE,307
@@ -65,13 +60,11 @@ END
 NUMBER CG_GRUPPO 3
 BEGIN
   PROMPT 20 6 "Gruppo "
-  HELP "Codice del conto delle riga"
 END
 
 NUMBER CG_CONTO 3
 BEGIN
   PROMPT 32 6 "Conto "
-  HELP "Codice del conto delle riga"
   FIELD LF_PCON->CONTO
   USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="")
   INPUT GRUPPO 104
@@ -93,7 +86,6 @@ END
 NUMBER CG_SOTTOCONTO 6
 BEGIN
   PROMPT 45 6 "Sottoconto "
-  HELP "Codice del conto delle riga"
   FIELD LF_PCON->SOTTOCONTO
   USE LF_PCON SELECT SOTTOCONTO!=""
   INPUT GRUPPO 104
@@ -115,7 +107,6 @@ END
 NUMBER 206 6
 BEGIN
   PROMPT 45 6 "Cliente    "
-  HELP "Codice del cliente delle riga"
   FIELD LF_PCON->SOTTOCONTO
   USE LF_CLIFO
   INPUT TIPOCF "C"
@@ -135,7 +126,6 @@ END
 NUMBER 306 6
 BEGIN
   PROMPT 45 6 "Fornitore  "
-  HELP "Codice del fornitore delle riga"
   FIELD LF_PCON->SOTTOCONTO
   USE LF_CLIFO
   INPUT TIPOCF "F"
@@ -156,7 +146,6 @@ END
 STRING 107 50
 BEGIN
   PROMPT 2 7 "Descriz.  "
-  HELP "Descrizione del conto delle riga"
   FIELD LF_PCON->DESCR
   USE LF_PCON KEY 2
   INPUT DESCR 107
@@ -173,7 +162,6 @@ END
 STRING 207 50
 BEGIN
   PROMPT 2 7 "Cliente   "
-  HELP "Ragione sociale del cliente delle riga"
   FIELD LF_CLIFO->RAGSOC
   USE LF_CLIFO KEY 2
   INPUT TIPOCF "C"
@@ -192,7 +180,6 @@ END
 STRING 307 50
 BEGIN
   PROMPT 2 7 "Fornitore "
-  HELP "Ragione sociale del fonitore delle riga"
   FIELD LF_PCON->SOTTOCONTO
   USE LF_CLIFO KEY 2
   INPUT TIPOCF "F"
@@ -216,7 +203,6 @@ END
 LIST 110 1 10
 BEGIN
   PROMPT 2 10 "Tipo "
-  HELP "Tipo del conto di contropartita della riga"
   FLAGS "U"
   ITEM " |Conto"     MESSAGE SHOW,113|HIDE,213|HIDE,313|SHOW,114|HIDE,214|HIDE,314
   ITEM "C|Cliente"   MESSAGE SHOW,213|HIDE,113|HIDE,313|SHOW,214|HIDE,114|HIDE,314
@@ -226,13 +212,11 @@ END
 NUMBER 111 3
 BEGIN
   PROMPT 20 10 "Gruppo "
-  HELP "Codice del conto di contropartita delle riga"
 END
 
 NUMBER 112 3
 BEGIN
   PROMPT 32 10 "Conto "
-  HELP "Codice del conto di contropartita delle riga"
   FIELD LF_PCON->CONTO
   COPY USE 105
   INPUT GRUPPO 111
@@ -251,7 +235,6 @@ END
 NUMBER 113 6
 BEGIN
   PROMPT 45 10 "Sottoconto "
-  HELP "Codice del conto di contropartita delle riga"
   FIELD LF_PCON->SOTTOCONTO
   COPY USE 106
   COPY INPUT 112
@@ -267,7 +250,6 @@ END
 NUMBER 213 6
 BEGIN
   PROMPT 45 10 "Cliente    "
-  HELP "Codice del cliente di contropartita delle riga"
   FIELD LF_CLIFO->CODCF
   COPY USE 206
   INPUT TIPOCF "C"
@@ -282,7 +264,6 @@ END
 NUMBER 313 6
 BEGIN
   PROMPT 45 10 "Fornitore  "
-  HELP "Codice del fornitore di contropartita delle riga"
   FIELD LF_CLIFO->CODCF
   COPY USE 306
   INPUT TIPOCF "F"
@@ -297,7 +278,6 @@ END
 STRING 114 50
 BEGIN
   PROMPT 2 11 "Descriz.  "
-  HELP "Descrizione del conto di contropartita delle riga"
   FIELD LF_PCON->DESCR
   COPY USE 107
   INPUT DESCR 114
@@ -310,7 +290,6 @@ END
 STRING 214 50
 BEGIN
   PROMPT 2 11 "Cliente   "
-  HELP "Ragione sociale del cliente di contropartita delle riga"
   FIELD LF_CLIFO->RAGSOC
   COPY USE 207
   INPUT TIPOCF "C"
@@ -325,7 +304,6 @@ END
 STRING 314 50
 BEGIN
   PROMPT 2 11 "Fornitore "
-  HELP "Ragione sociale del fornitore di contropartita delle riga"
   FIELD LF_CLIFO->RAGSOC
   COPY USE 307
   INPUT TIPOCF "F"

cg/cg3100.cpp

@@ -791,7 +791,7 @@ void TListaMov_application::set_page(int file, int count)
         set_row (_n, "@103greg @3s",FLD(LF_MOV,MOV_REG));
         set_row (_n, "@111gpr @5n",FLD(LF_MOV,MOV_PROTIVA));
       }
-      else if (_provvis == 2 && (prov == 'P' || prov == 'N'))
+      else if (_provvis == 2 && prov >= ' ')
         set_row (_n, "@103gMov.Provvisorio");
       //15/12/1995
       /*

cg/cg3200.cpp

@@ -776,14 +776,14 @@ void TMastrini_application::saldi_zero()
       _mov->read();
       if (_mov->bad())
         _mov->zero();
-      int provvis (_mov->curr().get_int(MOV_PROVVIS));
+      char provvis = _mov->curr().get_char(MOV_PROVVIS);
       int gruppo = atoi(rmov.get(RMV_GRUPPO));
       int conto = atoi(rmov.get(RMV_CONTO));
       long sottoc = atol(rmov.get(RMV_SOTTOCONTO));
 
       if ((gruppo == _gruppo)&&(conto == _conto)&&(sottoc == _sottoc)) 
       {
-        if (_stampa_mov_prov || provvis == 0)
+        if (_stampa_mov_prov || provvis <= ' ')
         {
           char sezione = rmov.curr().get(RMV_SEZIONE)[0];
           real importo = rmov.curr().get_real(RMV_IMPORTO);

cg/cg3600.cpp

@@ -6,6 +6,7 @@
 #include <execp.h>
 #include <mailbox.h>
 #include <progind.h>
+#include <recarray.h>
 #include <relation.h>
 #include <urldefid.h>
 #include <utility.h>
@@ -14,7 +15,6 @@
 #include "cg3.h"
 #include "cglib01.h"
 #include "cg3600.h"
-//#include "conto.h"
 
 #include <causali.h>
 #include <mov.h>