From fc0fd09d4608a17c7ceba82c1baf88c0ad79e254 Mon Sep 17 00:00:00 2001
From: augusto <augusto@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Mon, 28 Jul 1997 15:46:10 +0000
Subject: [PATCH] Maschera di Stampa tabella Ubicazioni

git-svn-id: svn://10.65.10.50/trunk@4957 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 mg/bastubi.uml | 39 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)
 create mode 100755 mg/bastubi.uml

diff --git a/mg/bastubi.uml b/mg/bastubi.uml
new file mode 100755
index 000000000..f6423d696
--- /dev/null
+++ b/mg/bastubi.uml
@@ -0,0 +1,39 @@
+#include "../ba/ba3200.h"
+
+PAGE "Stampa Tabella Ubicazioni" -1 -1 58 8
+
+STRING F_INIZIO1 4
+BEGIN
+  PROMPT 2 1 "Da codice "
+  USE UBI
+  INPUT CODTAB F_INIZIO1
+  DISPLAY "Codice " CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_INIZIO1 CODTAB
+  GROUP 1
+END
+
+STRING F_FINE1 4
+BEGIN
+  PROMPT 2 3 " A codice "
+  HELP "Inserire il codice di fine  "
+  FIELD LF_TABCOM->CODTAB[1,3]
+  COPY USE F_INIZIO1
+  INPUT CODTAB F_FINE1
+  COPY DISPLAY F_INIZIO1
+  OUTPUT F_FINE1 CODTAB
+  GROUP 2
+END
+
+BUTTON DLG_OK 10 2
+BEGIN
+  PROMPT -12 -1 ""
+END
+
+BUTTON DLG_QUIT 10 2
+BEGIN
+  PROMPT -22 -1 ""
+END
+
+ENDPAGE
+ENDMASK