From 908206c98f6d9da9926b4eae58e266a8ed9d1cad Mon Sep 17 00:00:00 2001
From: angelo <angelo@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Tue, 2 Jul 1996 08:09:46 +0000
Subject: [PATCH] Corrette le ricerche sui gruppi/conti/sottoconti.

git-svn-id: svn://10.65.10.50/trunk@3129 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 cg/cg5200a.uml | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

diff --git a/cg/cg5200a.uml b/cg/cg5200a.uml
index 430e8ede9..d3972bf08 100755
--- a/cg/cg5200a.uml
+++ b/cg/cg5200a.uml
@@ -47,11 +47,10 @@ NUMBER F_GRUPPO 3
 BEGIN
   PROMPT 26 3 "Gruppo "
   HELP "Codice del conto da visualizzare"
-  WARNING "Gruppo inesistente"
   FLAGS "R" 
   KEY 1
   FIELD GRUPPO
-  USE LF_PCON KEY 1 SELECT CONTO=""
+  USE LF_PCON SELECT CONTO=""
   INPUT GRUPPO F_GRUPPO
   DISPLAY "Gruppo" GRUPPO 
   DISPLAY "Descrizione@50" DESCR
@@ -59,14 +58,15 @@ BEGIN
   OUTPUT F_DESCR_CONTO DESCR
   CHECKTYPE REQUIRED
   VALIDATE CHECK_FIELD F_GRUPPO
+  WARNING "Gruppo inesistente"
 END
 
 NUMBER F_CONTO 3 
 BEGIN
   PROMPT 40 3 "Conto "  
   HELP "Codice del conto da visualizzare"
-  WARNING "Conto inesistente"
-  USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="")
+  //USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="")
+  USE LF_PCON SELECT SOTTOCONTO=""
   FIELD CONTO
   FLAGS "R"
   KEY 1
@@ -82,14 +82,15 @@ BEGIN
   OUTPUT F_DESCR_CONTO DESCR
   CHECKTYPE NORMAL
   VALIDATE CHECK_FIELD F_CONTO
-  WARNING "Conto inesistente o mancante"
+  WARNING "Conto inesistente"
 END
 
 NUMBER F_SOTTOCONTO 6
 BEGIN
   PROMPT 54 3 "Sottoconto "
   HELP "Codice del conto da visualizzare"
-  USE LF_PCON SELECT SOTTOCONTO!=""
+  //USE LF_PCON SELECT SOTTOCONTO!=""
+  USE LF_PCON 
   FIELD SOTTOCONTO 
   FLAGS "R" 
   KEY 1
@@ -106,7 +107,7 @@ BEGIN
   OUTPUT F_DESCR_CONTO DESCR
   CHECKTYPE NORMAL
   VALIDATE CHECK_FIELD F_SOTTOCONTO
-  WARNING "Conto inesistente"
+  WARNING "Sottoconto inesistente"
   GROUP 1         
 END