From 21f5b5d47d14cb1393f0f7310061b61be33459f5 Mon Sep 17 00:00:00 2001
From: alex <alex@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Tue, 3 Jun 1997 10:00:35 +0000
Subject: [PATCH] Reso permanente il campo Livello

git-svn-id: svn://10.65.10.50/trunk@4497 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 mg/batbgcg.uml | 52 +++++++++++++++++++++++++-------------------------
 1 file changed, 26 insertions(+), 26 deletions(-)

diff --git a/mg/batbgcg.uml b/mg/batbgcg.uml
index 891d36bd8..839cb1ec6 100755
--- a/mg/batbgcg.uml
+++ b/mg/batbgcg.uml
@@ -11,17 +11,17 @@ NUMBER F_CODLIV 1
 BEGIN
   PROMPT 2 2 "Numero livello "
   FIELD CODTAB[1,1]
-	KEY 1 
-  FLAG "U"
+        KEY 1
+  FLAG "UP"
   USE FCG
   INPUT CODTAB[1,1] F_CODLIV
   DISPLAY "N.Liv." CODTAB[1,1]
   DISPLAY "Descrizione@50 " S0
-  OUTPUT F_CODLIV CODTAB  
-  OUTPUT F_DESLIV S0  
-  OUTPUT F_FORMLIV S1  
-	CHECKTYPE FORCED
-	ADD NONE
+  OUTPUT F_CODLIV CODTAB
+  OUTPUT F_DESLIV S0
+  OUTPUT F_FORMLIV S1
+        CHECKTYPE FORCED
+        ADD NONE
 END
 
 // descrizione parte del formato codice
@@ -29,57 +29,57 @@ STRING F_DESLIV 50
 BEGIN
   PROMPT 2 3 "Descrizione    "
   USE FCG KEY 2
-	INPUT S0 F_DESLIV 
+        INPUT S0 F_DESLIV
   DISPLAY "Descrizione@50 " S0
   DISPLAY "N.Liv." CODTAB[1,1]
-	COPY OUTPUT F_CODLIV
-	CHECKTYPE FORCED
-	ADD NONE
+        COPY OUTPUT F_CODLIV
+        CHECKTYPE FORCED
+        ADD NONE
 END
 
 // STRINGA DEL FORMATO CODICE
 STRING F_FORMLIV 23
 BEGIN
   PROMPT 2 5 "Formato previsto per il codice gruppo "
-	FLAGS "D"
+        FLAGS "D"
 END
 
 STRING F_CODGROUP 23
 BEGIN
-	FLAGS "U"
+        FLAGS "U"
   PROMPT 22 6 "Codice del gruppo "
-	FIELD CODTAB[2,25]
-	KEY 1
+        FIELD CODTAB[2,25]
+        KEY 1
   USE GCG
-	JOIN FCG ALIAS 500 INTO CODTAB==CODTAB[1,1]
+        JOIN FCG ALIAS 500 INTO CODTAB==CODTAB[1,1]
   INPUT CODTAB[1,1]  F_CODLIV SELECT
   INPUT CODTAB[2,25]  F_CODGROUP
   DISPLAY "N.Liv." CODTAB[1,1]
   DISPLAY "Livello@20 " 500@->S0
   DISPLAY "Codice@23" CODTAB[2,25]
   DISPLAY "Descrizione@50 " GCG->S0
-  OUTPUT F_CODLIV CODTAB[1,1]  
-  OUTPUT F_CODGROUP CODTAB[2,25]  
-  OUTPUT F_DESGROUP S0  
-	MESSAGE DISABLE,F_DESLIV
-	MESSAGE EMPTY ENABLE,F_DESLIV
-	CHECKTYPE REQUIRED
+  OUTPUT F_CODLIV CODTAB[1,1]
+  OUTPUT F_CODGROUP CODTAB[2,25]
+  OUTPUT F_DESGROUP S0
+        MESSAGE DISABLE,F_DESLIV
+        MESSAGE EMPTY ENABLE,F_DESLIV
+        CHECKTYPE REQUIRED
 END
 
 STRING F_DESGROUP 50
 BEGIN
   PROMPT 2 7 "Descr. gruppo  "
-	FIELD S0
-	KEY 2
+        FIELD S0
+        KEY 2
   USE GCG KEY 2
-	JOIN FCG ALIAS 500 INTO CODTAB==CODTAB[1,1]
+        JOIN FCG ALIAS 500 INTO CODTAB==CODTAB[1,1]
   INPUT S0 F_DESGROUP
   DISPLAY "Descrizione@50 " GCG->S0
   DISPLAY "N.Liv." CODTAB[1,1]
   DISPLAY "Livello@20 " 500@->S0
   DISPLAY "Codice@23" CODTAB[2,25]
   COPY OUTPUT F_CODGROUP
-	CHECKTYPE REQUIRED
+        CHECKTYPE REQUIRED
 END
 
 ENDPAGE