diff --git a/ve/ve0100a.uml b/ve/ve0100a.uml
index a7df82026..27fcbf4ef 100755
--- a/ve/ve0100a.uml
+++ b/ve/ve0100a.uml
@@ -113,7 +113,7 @@ NUMBER F_NDOC 6
 BEGIN
   PROMPT 24 7 "Numero      "
   FIELD NDOC
-  USE LF_DOC           
+  USE LF_DOC SELECT (#F_STATO=="")||(STATO==#F_STATO)     
   JOIN LF_CLIFO TO LF_DOC INTO TIPOCF==TIPOCF CODCF==CODCF 
   INPUT PROVV F_PROVV SELECT
   INPUT ANNO F_ANNO SELECT
@@ -142,7 +142,14 @@ STRING F_STATO 1
 BEGIN
   PROMPT 69 7 "Stato "
   FIELD STATO
-  FLAG "D"
+  USE %STD
+  CHECKTYPE REQUIRED
+  INPUT CODTAB F_STATO
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_STATO CODTAB  
+  KEY 1
+  FLAG "U"  
 END
 
 LIST F_TIPOCF 1 12
@@ -156,7 +163,7 @@ END
 NUMBER F_CODCF 6
 BEGIN
   PROMPT 24 8 "Codice      " 
-  USE LF_DOC KEY 2 SELECT (CODNUM==#F_CODNUM) && (PROVV==#F_PROVV) && (ANNO==#F_ANNO) 
+  USE LF_DOC KEY 2 SELECT (CODNUM==#F_CODNUM) && (PROVV==#F_PROVV) && (ANNO==#F_ANNO) && ((#F_STATO=="")||(STATO==#F_STATO))
   JOIN LF_CLIFO INTO TIPOCF==TIPOCF CODCF==CODCF
   INPUT TIPOCF F_TIPOCF SELECT
   INPUT CODCF F_CODCF