Patch level :2.0 424

Files correlati     :ve2400.msk
Ricompilazione Demo : [ ]
Commento            :CM701059
		     Non ci sono i bottoni di Nuovo e gestione all'interno della ricerca dei
		     conti per l'imputazione del ricavo per la contabilizzazione.


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

ve/ve2400.uml

@@ -343,8 +343,6 @@ BEGIN
    PROMPT 1 9 "Conto d'acquisto "
    FIELD LF_ANAMAG->GRUPPOA
    GROUP G_CONACQ
-//   MESSAGE CLEAR,G_CATACQ@
-//   MESSAGE EMPTY ENABLE,G_CATACQ@
 END
 
 NUMBER F_CONTOA 3
@@ -360,8 +358,6 @@ BEGIN
    FIELD LF_ANAMAG->SOTTOCA
    GROUP G_CONACQ
    USE LF_PCON
-//   USE LF_PCON SELECT (500@->INDBIL=="3")
-//   JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
    INPUT GRUPPO F_GRUPPOA
    INPUT CONTO  F_CONTOA
    INPUT SOTTOCONTO F_SOTTOCA
@@ -375,17 +371,15 @@ BEGIN
    OUTPUT F_DESCRA  DESCR
    CHECKTYPE NORMAL
    WARNING "Conto assente"
-//  WARNING "Il conto deve essere un costo"
+   ADD RUN cg0 -0
 END
 
 
-STRING F_DESCRA 40
+STRING F_DESCRA 50 38
 BEGIN
    PROMPT  36 9 ""
-   FLAG "D"
    GROUP G_CONACQ
    USE LF_PCON KEY 2
-//   USE LF_PCON KEY 2 SELECT INDBIL=="3"
    INPUT DESCR F_DESCRA
    DISPLAY "Descrizione@50" DESCR
    DISPLAY "Gruppo" GRUPPO
@@ -393,6 +387,7 @@ BEGIN
    DISPLAY "Sottoconto" SOTTOCONTO
    COPY OUTPUT F_SOTTOCA
    WARNING "Conto assente"
+   ADD RUN cg0 -0
 END
 
 STRING F_CATCONV 3
@@ -411,8 +406,6 @@ BEGIN
    OUTPUT F_CATCONV CODTAB
    OUTPUT F_CATCONV1 S0
    CHECKTYPE NORMAL
-//   MESSAGE CLEAR,G_CONVEN@
-//   MESSAGE EMPTY ENABLE,G_CONVEN@
 END
 
 STRING F_CATCONV1 40
@@ -435,8 +428,6 @@ BEGIN
    PROMPT 1 11 "Conto di vendita "
    FIELD LF_ANAMAG->GRUPPOV
    GROUP G_CONVEN
-//   MESSAGE CLEAR,G_CATVEN@
-//   MESSAGE EMPTY ENABLE,G_CATVEN@
 END
 
 NUMBER F_CONTOV 3
@@ -452,8 +443,6 @@ BEGIN
    FIELD LF_ANAMAG->SOTTOCV
    GROUP G_CONVEN
    USE LF_PCON
-//   USE LF_PCON SELECT (500@->INDBIL=="4")
-//   JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
    INPUT GRUPPO F_GRUPPOV
    INPUT CONTO  F_CONTOV
    INPUT SOTTOCONTO F_SOTTOCV
@@ -467,14 +456,13 @@ BEGIN
    OUTPUT F_DESCRV  DESCR
    CHECKTYPE NORMAL
    WARNING "Conto assente"
+   ADD RUN cg0 -0
 END
 
-STRING F_DESCRV 40
+STRING F_DESCRV 50 38
 BEGIN
    PROMPT  36 11 ""
-   FLAG "D"
    GROUP G_CONVEN
-//   USE LF_PCON KEY 2 SELECT INDBIL=="4"
    USE LF_PCON KEY 2
    INPUT DESCR F_DESCRV
    DISPLAY "Descrizione@50" DESCR
@@ -483,6 +471,7 @@ BEGIN
    DISPLAY "Sottoconto" SOTTOCONTO
    COPY OUTPUT F_SOTTOCV
    WARNING "Conto assente"
+   ADD RUN cg0 -0
 END
 
 NUMBER F_GRUPPOPCIA 3
@@ -520,7 +509,7 @@ BEGIN
   ADD RUN BA3 -0 PCI
 END
 
-STRING F_DESCRCONTOPCIA 50
+STRING F_DESCRCONTOPCIA 50 38
 BEGIN
   PROMPT 36 12 ""
   FLAG "U"
@@ -571,7 +560,7 @@ BEGIN
   ADD RUN BA3 -0 PCI
 END
 
-STRING F_DESCRCONTOPCIV 50
+STRING F_DESCRCONTOPCIV 50 38
 BEGIN
   PROMPT 36 13 ""
   FLAG "U"