campo-sirio/ba/ba2100f.uml

#include "ba2100.h"

TOOLBAR "" 0 20 0 2

BUTTON DLG_OK 10 2
BEGIN
  PROMPT -12 -1 ""
END

BUTTON DLG_CANCEL 10 2
BEGIN
  PROMPT -22 -1 ""
END

ENDPAGE

PAGE "CAMPO DI STAMPA" -1 -1 78 20

LIST F_CLASS 10
BEGIN
  PROMPT 1 1 "Tipo          "
  FLAGS "G"
  ITEM "STRINGA|Testo" MESSAGE HIDE,F_DECIMALS|SHOW,F_HEIGHT|SHOW,F_ITEMS|HIDE,8@
  ITEM "NUMERO|Numero" MESSAGE SHOW,F_DECIMALS|HIDE,F_HEIGHT|SHOW,F_ITEMS|HIDE,8@
  ITEM "DATA|Data"     MESSAGE HIDE,F_DECIMALS|HIDE,F_HEIGHT|SHOW,F_ITEMS|SHOW,8@
  ITEM "LISTA|Lista"   MESSAGE HIDE,F_DECIMALS|HIDE,F_HEIGHT|SHOW,F_ITEMS|HIDE,8@
  ITEM "GRUPPO|Gruppo" MESSAGE HIDE,F_DECIMALS|HIDE,F_HEIGHT|HIDE,F_ITEMS|HIDE,8@
  ITEM "LINEA|Linea"   MESSAGE HIDE,F_DECIMALS|SHOW,F_HEIGHT|HIDE,F_ITEMS|HIDE,8@
  ITEM "FIGURA|Figura" MESSAGE HIDE,F_DECIMALS|SHOW,F_HEIGHT|HIDE,F_ITEMS|HIDE,8@
END

NUMBER F_ID 4
BEGIN
  PROMPT 56 1 "Identificatore "
  FLAGS "D"
END

STRING F_KEY 80 60
BEGIN
  PROMPT 1 2 "Descrizione   "
  HELP "Descrizione del campo da configurare"
  CHECKTYPE REQUIRED
  GROUP 7
END

NUMBER F_Y 3
BEGIN
  PROMPT 1 3 "Riga    "
  HELP "Riga in cui stampare"
END

NUMBER F_X 3
BEGIN
  PROMPT 24 3 "Colonna "
  HELP "Colonna in cui stampare"
END

NUMBER F_WIDTH 3
BEGIN
  PROMPT 44 3 "Larghezza "
  HELP "Lunghezza massima da stampare"
  GROUP 7
END

NUMBER F_HEIGHT 2
BEGIN
  PROMPT 64 3 "Altezza  "
  HELP "Righe massime su cui stampare"
  GROUP 7
END

NUMBER F_DECIMALS 2
BEGIN
  PROMPT 64 3 "Decimali "
  HELP "Numero di decimali"
  MESSAGE COPY,F_HEIGHT
  GROUP 7
END

STRING F_PICTURE 80 40
BEGIN
  PROMPT 1 4 "Formato       "
  HELP "Formato di stampa (# = ' ', @ = '0', ~ = '')"
END

BOOLEAN F_HIDDEN
BEGIN
  PROMPT 64 4 "Nascosto"
  HELP "Il campo viene elaborato ma non stampato"
END

STRING F_PROMPT 80 60
BEGIN
  PROMPT 1 5 "Testo fisso   "
  HELP "Eventuale testo fisso da stampare"
END

// Gruppo 8 per edit formato data
GROUPBOX DLG_NULL 78 5
BEGIN
  PROMPT 1 6 "Formato data"
  GROUP 8
END

LIST F_DFORMAT 16
BEGIN
  PROMPT 3 7  "Tipo data      "   
  ITEM "1|Giorno Mese Anno"
  ITEM "2|Mese Anno Giorno"
  ITEM "3|Anno Giorno Mese"
  ITEM "7|Mese Anno"
  ITEM "4|Anno"
  ITEM "5|Mese"
  ITEM "6|Giorno"
  GROUP 8
END           
	   
LIST F_DDAY 16
BEGIN
  PROMPT 42 7 "Formato giorno " 
  ITEM "4|Con zeri(es. 02)"
  ITEM "2|Normale (es. 2)"
  ITEM "5|In lettere"
  ITEM "6|Giorno settimana"
  GROUP 8
END           
	   
LIST F_DMONTH 16
BEGIN
  PROMPT 3 8 "Formato mese   " 
  ITEM "4|Con zeri(es. 02)"
  ITEM "2|Normale (es. 2)"
  ITEM "5|In lettere"
  ITEM "7|Trimestre"
  GROUP 8
END           
	   
LIST F_DYEAR 16
BEGIN
  PROMPT 42 8 "Formato anno   "  
  ITEM "2|Breve (2 cifre)"
  ITEM "4|Lungo (4 cifre)"
  GROUP 8
END           
	   
LIST F_DSEP 5
BEGIN
  PROMPT 3 9 "Separatore     "     
  ITEM "-|-"
  ITEM "/|/"
  ITEM ".|."
  ITEM ",|,"
  ITEM "S|Spazio"
  GROUP 8
END           
	   
STRING F_DEXAMPLE 40
BEGIN
   PROMPT 28 9 "Esempio  "  
   FLAGS "D"
   GROUP 8
END           
	   
// fine gruppo 8


STRING F_FILE1 60
BEGIN
  PROMPT 2 12 "Archivio "
  HELP "Nome dell'archivio relativo al campo"
  FLAGS "D"
END
	   
BUTTON F_BUT_FILE1 2 1
BEGIN          
  PROMPT 73 12 "*"
  PICTURE 109         
  GROUP 7  
END
	   
STRING F_FIELD1 60
BEGIN
  PROMPT 2 13 "Campo 1  "
  HELP "Nome del campo su file"
  FLAGS "D"
END

BUTTON F_BUT_FIELD1 2 1
BEGIN          
  PROMPT 73 13 "*"
  PICTURE 109                            
  GROUP 7  
END

STRING F_FIELDREF1 16
BEGIN
  PROMPT 60 14 ""
  FLAGS "D"
END

NUMBER F_FROM1 2
BEGIN
  PROMPT 2 14 "Da       "
  FLAGS "U"
  GROUP 7  
END

NUMBER F_TO1 2
BEGIN
  PROMPT 22 14 "A "
  FLAGS "U"
  GROUP 7  
END


STRING F_FILE2 60
BEGIN
  PROMPT 2 15 "Archivio "
  HELP "Nome dell'archivio relativo al campo"
  FLAGS "D"
END
	   
BUTTON F_BUT_FILE2 2 1
BEGIN          
  PROMPT 73 15 "*"
  PICTURE 109         
  GROUP 7  
END
	   
STRING F_FIELD2 60
BEGIN
  PROMPT 2 16 "Campo 2  "
  HELP "Nome del campo su file"
  FLAGS "D"
END

BUTTON F_BUT_FIELD2 2 1
BEGIN          
  PROMPT 73 16 "*"
  PICTURE 109                            
  GROUP 7  
END

STRING F_FIELDREF2 16
BEGIN
  PROMPT 60 17 ""
  FLAGS "D"
END

NUMBER F_FROM2 2
BEGIN
  PROMPT 2 17 "Da       "
  FLAGS "U"
  GROUP 7  
END

NUMBER F_TO2 2
BEGIN
  PROMPT 22 17 "A "
  FLAGS "U"
  GROUP 7  
END

GROUPBOX DLG_NULL 78 8
BEGIN 
  PROMPT 1 11 "Campi su file"
END

ENDPAGE

PAGE "SUPERPRASSI" -1 -1 78 20

GROUPBOX DLG_NULL 78 3
BEGIN
  PROMPT 1 5 "Caratteristiche speciali"
END

BOOLEAN F_DISABLED
BEGIN
  PROMPT 4 6 "Disabilitato"
  HELP "Il campo viene completamente ignorato e quindi nemmeno stampato"
  GROUP 7
END

BOOLEAN F_AUTOMAGIC
BEGIN
  PROMPT 42 6 "Automatico"
  HELP "Il campo viene calcolato automaticamente"
  GROUP 7
END

GROUPBOX F_GROUP 78 4
BEGIN
  PROMPT 1 8 "Gruppi di stampa"
  GROUP 7
END

BOOLEAN F_GROUP1
BEGIN
  PROMPT 4 9 "1"
  GROUP 7
END

BOOLEAN F_GROUP2
BEGIN
  PROMPT 10 9 "2"
  GROUP 7
END

BOOLEAN F_GROUP3
BEGIN
  PROMPT 16 9 "3"
  GROUP 7
END

BOOLEAN F_GROUP4
BEGIN
  PROMPT 22 9 "4"
  GROUP 7
END

BOOLEAN F_GROUP5
BEGIN
  PROMPT 28 9 "5"
  GROUP 7
END

BOOLEAN F_GROUP6
BEGIN
  PROMPT 34 9 "6"
  GROUP 7
END

BOOLEAN F_GROUP7
BEGIN
  PROMPT 40 9 "7"
  GROUP 7
END

BOOLEAN F_GROUP8
BEGIN
  PROMPT 46 9 "8"
  GROUP 7
END

BOOLEAN F_GROUP9
BEGIN
  PROMPT 52 9 "9"
  GROUP 7
END

BOOLEAN F_GROUP10
BEGIN
  PROMPT 58 9 "10"
  GROUP 7
END

BOOLEAN F_GROUP11
BEGIN
  PROMPT 64 9 "11"
  GROUP 7
END

BOOLEAN F_GROUP12
BEGIN
  PROMPT 70 9 "12"
  GROUP 7
END

BOOLEAN F_GROUP13
BEGIN
  PROMPT 4 10 "13"
  GROUP 7
END

BOOLEAN F_GROUP14
BEGIN
  PROMPT 10 10 "14"
  GROUP 7
END

BOOLEAN F_GROUP15
BEGIN
  PROMPT 16 10 "15"
  GROUP 7
END

BOOLEAN F_GROUP16
BEGIN
  PROMPT 22 10 "16"
  GROUP 7
END

BOOLEAN F_GROUP17
BEGIN
  PROMPT 28 10 "17"
  GROUP 7
END

BOOLEAN F_GROUP18
BEGIN
  PROMPT 34 10 "18"
  GROUP 7
END

BOOLEAN F_GROUP19
BEGIN
  PROMPT 40 10 "19"
  GROUP 7
END

BOOLEAN F_GROUP20
BEGIN
  PROMPT 46 10 "20"
  GROUP 7
END

BOOLEAN F_GROUP21
BEGIN
  PROMPT 52 10 "21"
  GROUP 7
END

BOOLEAN F_GROUP22
BEGIN
  PROMPT 58 10 "22"
  GROUP 7
END

BOOLEAN F_GROUP23
BEGIN
  PROMPT 64 10 "23"
  GROUP 7
END

BOOLEAN F_GROUP24
BEGIN
  PROMPT 70 10 "24"
  GROUP 7
END

SPREADSHEET F_ITEMS
BEGIN
  PROMPT 0 12 "Spreadsheet"
  ITEM "Codice@8"
  ITEM "Testo@32"
  ITEM "Messaggio@80"
  GROUP 7
END

ENDPAGE

ENDMASK

PAGE "Spreadsheet" -1 -1 46  6

STRING 101 8
BEGIN
  PROMPT 1 1 "Codice    "
END

STRING 102 32
BEGIN
  PROMPT 1 2 "Testo     "
  FLAGS "_"
END

STRING 103 80 32
BEGIN
  PROMPT 1 3 "Messaggio "
END

BUTTON DLG_OK 10 2
BEGIN
  PROMPT -12 -1 ""
END

BUTTON DLG_CANCEL 10 2
BEGIN
  PROMPT -22 -1 ""
END

ENDPAGE