diff --git a/ve/batbspp.uml b/ve/batbspp.uml
index efb2d164c..756cd1ed1 100755
--- a/ve/batbspp.uml
+++ b/ve/batbspp.uml
@@ -179,9 +179,10 @@ NUMBER F_SOTTOV 6
 BEGIN
   PROMPT 30 15 ""
   FIELD I2
-  USE LF_PCON
-  INPUT GRUPPO      F_GRUPPOV SELECT
-  INPUT CONTO       F_CONTOV SELECT
+  USE LF_PCON SELECT (SOTTOCONTO!="") && ($-500->INDBIL=="4")
+  JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
+  INPUT GRUPPO      F_GRUPPOV
+  INPUT CONTO       F_CONTOV
   INPUT SOTTOCONTO  F_SOTTOV
   DISPLAY "Gruppo" GRUPPO
   DISPLAY "Conto" CONTO
@@ -230,9 +231,10 @@ NUMBER F_SOTTOA 6
 BEGIN
   PROMPT 30 17 ""
   FIELD I5
-  USE LF_PCON
-  INPUT GRUPPO      F_GRUPPOA SELECT
-  INPUT CONTO       F_CONTOA SELECT
+  USE LF_PCON SELECT (SOTTOCONTO!="") && ($-500->INDBIL=="3")
+  JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
+  INPUT GRUPPO      F_GRUPPOA
+  INPUT CONTO       F_CONTOA
   INPUT SOTTOCONTO  F_SOTTOA
   DISPLAY "Gruppo" GRUPPO
   DISPLAY "Conto" CONTO