From 406b3cde919975cf93ba8d7fd3bae2ece3fb0da4 Mon Sep 17 00:00:00 2001 From: alex Date: Fri, 14 Oct 1994 18:17:21 +0000 Subject: [PATCH] Corretto errore n.ro 1201 git-svn-id: svn://10.65.10.50/trunk@379 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- ba/bast%lng.uml | 61 +++++++++++++++++++++++++------------------------ 1 file changed, 31 insertions(+), 30 deletions(-) diff --git a/ba/bast%lng.uml b/ba/bast%lng.uml index 31bd0ca4a..62ce3fe7f 100755 --- a/ba/bast%lng.uml +++ b/ba/bast%lng.uml @@ -1,31 +1,32 @@ -#include "ba3200.h" - -PAGE "Stampa lingue" -1 -1 50 8 - -STRING F_INIZIO1 1 -BEGIN - PROMPT 4 1 "Da codice " - FLAGS "U" - USE %LNG - INPUT CODTAB F_INIZIO1 - DISPLAY "Codice" CODTAB - DISPLAY "Descrizione @50" S0 - OUTPUT F_INIZIO1 CODTAB - FIELD LF_TABCOM->CODTAB - GROUP 1 -END - -STRING F_FINE1 1 -BEGIN - PROMPT 4 3 "A codice " - FLAGS "U" - COPY USE F_INIZIO1 - INPUT CODTAB F_FINE1 - COPY DISPLAY F_INIZIO1 - OUTPUT F_FINE1 CODTAB - GROUP 2 -END - +#include "ba3200.h" + +PAGE "Stampa lingue" -1 -1 50 8 + +STRING F_INIZIO1 1 +BEGIN + PROMPT 4 1 "Da codice " + FLAGS "U" + USE %LNG + INPUT CODTAB F_INIZIO1 + DISPLAY "Codice" CODTAB + DISPLAY "Descrizione @50" S0 + OUTPUT F_INIZIO1 CODTAB + FIELD CODTAB + GROUP 1 +END + +STRING F_FINE1 1 +BEGIN + PROMPT 4 3 "A codice " + FLAGS "U" + COPY USE F_INIZIO1 + INPUT CODTAB F_FINE1 + COPY DISPLAY F_INIZIO1 + OUTPUT F_FINE1 CODTAB + FILED CODTAB + GROUP 2 +END + BUTTON DLG_OK 8 2 BEGIN PROMPT -12 -1 "" @@ -36,5 +37,5 @@ BEGIN PROMPT -22 -1 "" END -ENDPAGE -ENDMASK +ENDPAGE +ENDMASK