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

Corretta formattazione

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@634 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-11-16 12:05:55 +00:00
parent 971509e7c7
commit 35da5cc118
1 changed files with 80 additions and 80 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

160
ba/batbvid.uml
View File

@ -1,80 +1,80 @@
#include "batbvid.h"
TOOLBAR "" 0 20 0 2
#include <toolbar.h>
ENDPAGE
PAGE "Tabella Vidimazioni" -1 -1 78 18
STRING F_CODICE 3
BEGIN
PROMPT 4 1 "Codice vidimazione "
USE VID
FIELD VID->CODTAB
INPUT CODTAB F_CODICE
DISPLAY "Codice" CODTAB
DISPLAY "Intestatario@50" S0
OUTPUT F_CODICE CODTAB
OUTPUT F_INTESTA S0
OUTPUT F_DATAVID D0
OUTPUT F_UFFVID S1
OUTPUT F_NUMFOGLI I0
OUTPUT F_PAGDA I1
OUTPUT F_PAGA I2
CHECKTYPE REQUIRED
KEY 1
END
STRING F_INTESTA 50
BEGIN
PROMPT 4 3 "Intestatario "
HELP "Inserire l' intestatario del codice di vidimazione"
FIELD VID->S0
CHECKTYPE REQUIRED
END
DATE F_DATAVID
BEGIN
PROMPT 4 5 "Data vidimazione "
FIELD VID->D0
FLAGS "A"
CHECKTYPE REQUIRED
END
STRING F_UFFVID 50
BEGIN
PROMPT 4 7 "Ufficio vidimazione "
FIELD VID->S1
CHECKTYPE REQUIRED
END
NUMBER F_NUMFOGLI 5
BEGIN
PROMPT 4 9 "Numero fogli libro "
FIELD VID->I0
FLAGS "R"
CHECKTYPE REQUIRED
END
NUMBER F_PAGDA 5
BEGIN
PROMPT 4 11 "Dalla pagina "
FIELD VID->I1
FLAGS "R"
CHECKTYPE REQUIRED
END
NUMBER F_PAGA 5
BEGIN
PROMPT 30 11 "Alla pagina "
FIELD VID->I2
FLAGS "R"
CHECKTYPE REQUIRED
NUM_EXPR {(#THIS_FIELD>=#F_PAGDA)}
END
ENDPAGE
ENDMASK
#include "batbvid.h"
TOOLBAR "" 0 20 0 2
#include <toolbar.h>
ENDPAGE
PAGE "Tabella Vidimazioni" -1 -1 78 18
STRING F_CODICE 3
BEGIN
PROMPT 4 1 "Codice vidimazione "
USE VID
FIELD VID->CODTAB
INPUT CODTAB F_CODICE
DISPLAY "Codice" CODTAB
DISPLAY "Intestatario@50" S0
OUTPUT F_CODICE CODTAB
OUTPUT F_INTESTA S0
OUTPUT F_DATAVID D0
OUTPUT F_UFFVID S1
OUTPUT F_NUMFOGLI I0
OUTPUT F_PAGDA I1
OUTPUT F_PAGA I2
CHECKTYPE REQUIRED
KEY 1
END
STRING F_INTESTA 50
BEGIN
PROMPT 4 3 "Intestatario "
HELP "Inserire l' intestatario del codice di vidimazione"
FIELD VID->S0
CHECKTYPE REQUIRED
END
DATE F_DATAVID
BEGIN
PROMPT 4 5 "Data vidimazione "
FIELD VID->D0
FLAGS "A"
CHECKTYPE REQUIRED
END
STRING F_UFFVID 50
BEGIN
PROMPT 4 7 "Ufficio vidimazione "
FIELD VID->S1
CHECKTYPE REQUIRED
END
NUMBER F_NUMFOGLI 5
BEGIN
PROMPT 4 9 "Numero fogli libro "
FIELD VID->I0
FLAGS "R"
CHECKTYPE REQUIRED
END
NUMBER F_PAGDA 5
BEGIN
PROMPT 4 11 "Dalla pagina "
FIELD VID->I1
FLAGS "R"
CHECKTYPE REQUIRED
END
NUMBER F_PAGA 5
BEGIN
PROMPT 30 11 "Alla pagina "
FIELD VID->I2
FLAGS "R"
CHECKTYPE REQUIRED
NUM_EXPR {(#THIS_FIELD>=#F_PAGDA)}
END
ENDPAGE
ENDMASK