campo-sirio/tp/tp0900el.uml

56 lines
787 B
Plaintext
Raw Normal View History

TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_PRINT 10 2
BEGIN
PROMPT -12 -11 "~Stampa"
PICTURE BMP_PRINT
MESSAGE EXIT,K_ENTER
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -11 "Fine"
END
ENDPAGE
PAGE "Lista clienti in esenzione CONAI" 0 2 0 0
GROUPBOX DLG_NULL 78 3
BEGIN
PROMPT 1 0 "@bDitta"
END
NUMBER 101 5
BEGIN
PROMPT 2 1 ""
USE LF_NDITTE
INPUT CODDITTA 101
OUTPUT 102 RAGSOC
FLAGS "DFG"
CHECKTYPE FORCED
END
STRING 102 60
BEGIN
PROMPT 17 1 ""
FLAGS "D"
END
LIST 103 12
BEGIN
PROMPT 2 3 "Specie CONAI da considerare"
ITEM "ESCAR|Carta "
ITEM "ESPLA|Plastica "
ITEM "ESACC|Acciaio "
ITEM "ESALL|Alluminio "
ITEM "ESLEG|Legno "
ITEM "ESVET|Vetro "
HELP "Codice spesa per contributo CONAI"
FIELD #SPECIECONAI
END
ENDPAGE
ENDMASK