root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Corretti Errori MI4256 MI4257 MI4255

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3270 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-07-29 13:11:39 +00:00
parent 70c6939302
commit 82146fe9f8
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ba/bastver.uml
View File

@ -9,10 +9,11 @@ BEGIN
FLAGS "ZR"
USE %VER KEY 1
INPUT CODTAB[1,4] F_INIZIO1
DISPLAY "Anno esercizio@20" CODTAB[1,4]
DISPLAY "Mese esercizio@20" CODTAB[5,6]
DISPLAY "Anno esercizio@23" CODTAB[1,4]
DISPLAY "Mese esercizio@23" CODTAB[5,6]
OUTPUT F_INIZIO1 CODTAB[1,4]
OUTPUT F_INIZIO2 CODTAB[5,6]
GROUP 1
END
NUMBER F_INIZIO2 2
@ -25,7 +26,7 @@ BEGIN
INPUT CODTAB[5,6] F_INIZIO2
COPY DISPLAY F_INIZIO1
COPY OUTPUT F_INIZIO1
CHECKTYPE REQUIRED
GROUP 1
END
NUMBER F_FINE1 4
@ -38,6 +39,7 @@ BEGIN
COPY DISPLAY F_INIZIO1
OUTPUT F_FINE1 CODTAB[1,4]
OUTPUT F_FINE2 CODTAB[5,6]
GROUP 2
END
NUMBER F_FINE2 2
@ -50,6 +52,7 @@ BEGIN
INPUT CODTAB[5,6] F_FINE2
COPY DISPLAY F_INIZIO1
COPY OUTPUT F_FINE1
GROUP 2
END
BUTTON DLG_OK 10 2