campo-sirio/src/ba/ba7500a.uml
mtollari 7c1e1fb941 Patch level : 12.0 418
Files correlati     : ba
Commento            : 
- Sistemata maschera
- Aggiunto messaggio tutto ok fine esportazione
- Aggiunto file perso da patch precedente

git-svn-id: svn://10.65.10.50/branches/R_10_00@23925 c028cbd2-c16b-5b4b-a496-9718f37d4682
2017-07-07 14:21:41 +00:00

93 lines
1.4 KiB
Plaintext

#include <ba7500a.h>
TOOLBAR "topbar" 0 0 0 2
#include <elabar.h>
ENDPAGE
PAGE "Aggiornamento Stati" -1 -1 78 13
GROUPBOX DLG_NULL 75 4
BEGIN
PROMPT 0 0 ""
FLAGS "R"
END
NUMBER FLD_CODTAB 3
BEGIN
PROMPT 1 1 "Codice "
FIELD CODTAB
FLAGS "RZ"
KEY 1
USE %STA
INPUT CODTAB FLD_CODTAB
DISPLAY "Codice" CODTAB
DISPLAY "Denominazione@50" S0
OUTPUT FLD_CODTAB CODTAB
OUTPUT FLD_S0 S0
HELP "Codice dello stato"
END
STRING FLD_S0 50
BEGIN
PROMPT 1 2 "Denominazione "
FIELD S0
KEY 2
USE %STA KEY 2
INPUT S0 FLD_S0
DISPLAY "Denominazione@60" S0
DISPLAY "Codice" CODTAB
OUTPUT FLD_CODTAB CODTAB
OUTPUT FLD_S0 S0
HELP "Nome dello stato"
END
SPREADSHEET F_STATI 75 15
BEGIN
PROMPT 0 5 "Righe movimenti"
ITEM "Codice@5F"
ITEM "Denominazione@50"
ITEM "Codice ISO@10"
DEFAULT "*" // Impedisce il salvataggio su profilo .ini
END
ENDPAGE
ENDMASK
PAGE "Riga" -1 -1 69 14
NUMBER A_CODICE 3
BEGIN
PROMPT 1 0 "Codice"
HELP "Codice interno per identificare lo stato"
END
STRING A_DENOMINAZIONE 50
BEGIN
PROMPT 1 2 "Denominazione"
HELP "Denominazione dello stato"
END
STRING A_ISO 2
BEGIN
PROMPT 1 3 "Codice ISO"
HELP "Codice ISO 3166-1 alpha-2 dello stato"
END
ENDPAGE
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_OK 2 2
BEGIN
PROMPT 1 1 ""
END
BUTTON DLG_CANCEL 2 2
BEGIN
PROMPT 4 1 ""
END
ENDPAGE
ENDMASK