From 50f055c05f5fbfed7ab2e42a741d3344d9aa9faa Mon Sep 17 00:00:00 2001
From: luca <luca@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Wed, 22 Apr 2009 09:16:26 +0000
Subject: [PATCH] =?UTF-8?q?Patch=20level=20=20=20=20=20=20=20=20=20:10.0?=
 =?UTF-8?q?=20288=20Files=20correlati=20=20=20=20=20:=20Ricompilazione=20D?=
 =?UTF-8?q?emo=20:=20[=20]=20Commento=20=20=20=20=20=20=20=20=20=20=20=20:?=
 =?UTF-8?q?migliorata=20ricerca=20della=20banca=20di=20presentazione=20per?=
 =?UTF-8?q?=20descrizione;=20non=20fa=20pi=C3=B9=20riferimento=20alla=20ta?=
 =?UTF-8?q?bella=20di=20tutte=20le=20banche=20%BAN=20ma=20direttamente=20a?=
 =?UTF-8?q?=20quella=20delle=20banche=20di=20presentazione=20BNP?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

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

diff --git a/ef/ef0300a.uml b/ef/ef0300a.uml
index 742639442..4c897c080 100755
--- a/ef/ef0300a.uml
+++ b/ef/ef0300a.uml
@@ -120,15 +120,14 @@ END
 STRING F_DENBANP 50
 BEGIN
   PROMPT 2 5 "Banca di Presentazione  "
-  USE %BAN KEY 2 SELECT 100@->CODTAB!=""
-  JOIN BNP ALIAS 100 INTO CODTAB==CODTAB 
-  INPUT S0 F_DENBANP
-  DISPLAY "Denominazione@50" S0
+  USE BNP SELECT 100@->S0=F_DENBANP
+  JOIN %BAN ALIAS 100 INTO CODTAB==CODTAB
+  DISPLAY "Denominazione@50" 100@->S0
   DISPLAY "Codice ABI" CODTAB[1,5]
   DISPLAY "Codice CAB" CODTAB[6,10]
   OUTPUT F_CODABIP CODTAB[1,5]
   OUTPUT F_CODCABP CODTAB[6,10]
-  OUTPUT F_DENBANP S0
+  OUTPUT F_DENBANP 100@->S0
   CHECKTYPE SEARCH
 END