From ba217ad4dbf79da8a0137258fc3f6ca69038bd76 Mon Sep 17 00:00:00 2001
From: guy <guy@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Mon, 13 Feb 2012 16:44:17 +0000
Subject: [PATCH] Patch level         : 10.0 Files correlati     : ef0
 Ricompilazione Demo : [ ] Commento            : Ammessa selezione di distinte
 cui manca la prima riga

git-svn-id: svn://10.65.10.50/branches/R_10_00@22576 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 ef/ef0300a.uml | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/ef/ef0300a.uml b/ef/ef0300a.uml
index b29294304..884d259b3 100755
--- a/ef/ef0300a.uml
+++ b/ef/ef0300a.uml
@@ -39,18 +39,19 @@ NUMBER F_NUMBER 5
 BEGIN
   PROMPT 48 1 "Numero Distinta      "
   FIELD LF_EFFETTI->NDIST
-  FLAGS "R"
   KEY 4
-  USE LF_EFFETTI KEY 4 SELECT NRIGADIST == 1
+  USE LF_EFFETTI KEY 4 SELECT (NRIGADIST>0)&&(NRIGADIST==883@->NRIGADIST)
+  JOIN LF_EFFETTI KEY 4 ALIAS 883 INTO TIPODIST==TIPODIST NDIST==NDIST
+  JOIN %BAN INTO CODTAB==CODABIP+CODCABP
   INPUT TIPODIST F_TIPODIST
   INPUT NDIST F_NUMBER
-  INPUT NRIGADIST F_NUMBERRIGA
   DISPLAY "Numero" NDIST
   DISPLAY "Tipo" TIPODIST
   DISPLAY "Data@10" DATADIST
+  DISPLAY "C/F@2" TIPOCF
   DISPLAY "ABI@5" CODABIP
   DISPLAY "CAB@5" CODCABP
-  DISPLAY "C/F@5" TIPOCF
+  DISPLAY "Banca@50" LF_TABCOM->S0
   OUTPUT F_NUMBER NDIST
   OUTPUT F_TIPODIST TIPODIST
   OUTPUT F_NUMBERRIGA NRIGADIST