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 60 14

LIST F_CLASS 10
BEGIN
  PROMPT 1 1 "Tipo    "
  FLAGS "DG"
  ITEM "STRINGA|Testo" MESSAGE HIDE,F_DECIMALS|SHOW,F_HEIGHT|HIDE,F_ITEMS|HIDE,8@
  ITEM "NUMERO|Numero" MESSAGE SHOW,F_DECIMALS|HIDE,F_HEIGHT|HIDE,F_ITEMS|HIDE,8@
  ITEM "DATA|Data"     MESSAGE HIDE,F_DECIMALS|HIDE,F_HEIGHT|HIDE,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

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

BOOLEAN F_HIDDEN
BEGIN
  PROMPT 60 3 "Nascosto"
  HELP "Il campo va elaborato ma non stampato"
END

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

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

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

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

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

STRING F_FILE 40
BEGIN
  PROMPT 1 7 "Archivio      "
  HELP "Nome dell'archivio relativo al campo"
  GROUP 7   
  FLAGS "D"
END
           
BUTTON F_BUT_FILE 2 1
BEGIN          
	PROMPT  56 7 "*"
	PICTURE 109         
	MESSAGE EXIT,F_BUT_FILE
END
           
STRING F_FIELD 40
BEGIN
  PROMPT 1 8 "Campo su file "
  HELP "Nome del campo su file"
  GROUP 7  
  FLAGS "D"
END

BUTTON F_BUT_FIELD 2 1
BEGIN          
	PROMPT  56 8 "*"
	PICTURE 109                            
	MESSAGE EXIT,F_BUT_FIELD
END

STRING F_FIELD2 40
BEGIN
  PROMPT 1 9 "II campo      "
  HELP "Nome del campo su file da utilizzare se il primo e' vuoto"
  GROUP 7
END

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

BOOLEAN F_AUTOMAGIC
BEGIN
  PROMPT 62 9 "Automatico"
  HELP "Il campo viene calcolato automaticamente"
  GROUP 7
END

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

LIST F_DFORMAT 16
BEGIN
   PROMPT 3 15  "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 15 "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 16  "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 16 "Formato anno   "  
   ITEM "2|Breve (2 cifre)"
   ITEM "4|Lungo (4 cifre)"
   GROUP 8
END           
	   
LIST F_DSEP 5
BEGIN
   PROMPT 3 17 "Separatore     "     
   ITEM "-|-"
   ITEM "/|/"
   ITEM ".|."
   ITEM ",|,"
   ITEM "S|Spazio"
   GROUP 8
END           
	   
STRING F_DEXAMPLE 40
BEGIN
   PROMPT 28 17 "Esempio  "  
   FLAGS "D"
   GROUP 8
END           
	   
// fine gruppo 8

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