efe85b451a
Files correlati : Ricompilazione Demo : [ ] Commento : Stampa sezioni: possibilita' di selezionare se stampare o no le sezioni estinte git-svn-id: svn://10.65.10.50/trunk@6629 c028cbd2-c16b-5b4b-a496-9718f37d4682
98 lines
2.0 KiB
Plaintext
Executable File
98 lines
2.0 KiB
Plaintext
Executable File
#include "at6200a.h"
|
|
|
|
TOOLBAR "" 0 20 0 2
|
|
|
|
BUTTON F_ELENCO 9 2
|
|
BEGIN
|
|
PROMPT -13 -11 "Elenco"
|
|
MESSAGE EXIT,F_ELENCO
|
|
END
|
|
|
|
BUTTON F_ETICHETTE 9 2
|
|
BEGIN
|
|
PROMPT -23 -11 "Etichette"
|
|
MESSAGE EXIT,F_ETICHETTE
|
|
END
|
|
|
|
BUTTON DLG_QUIT 9 2
|
|
BEGIN
|
|
PROMPT -33 -11 ""
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
PAGE "Stampa di controllo tabella sezioni" -1 -1 78 20
|
|
|
|
RADIOBUTTON F_SORT 25
|
|
BEGIN
|
|
PROMPT 1 1 "Ordinamento"
|
|
HELP "Selezionare il tipo di ordinamento per la stampa"
|
|
ITEM "1|per Codice"
|
|
MESSAGE DISABLE,5@|ENABLE,4@|RESET,5@
|
|
ITEM "2|per Sezione"
|
|
MESSAGE DISABLE,4@|ENABLE,5@|RESET,4@
|
|
END
|
|
|
|
GROUPBOX DLG_NULL 65 5
|
|
BEGIN
|
|
PROMPT 1 5 "Opzioni per la stampa"
|
|
END
|
|
|
|
STRING F_CODFR 6
|
|
BEGIN
|
|
PROMPT 2 6 "da Codice "
|
|
USE LF_SEZIONI KEY 1
|
|
INPUT CODSEZ F_CODFR
|
|
DISPLAY "Codice" CODSEZ
|
|
DISPLAY "Sezione@25" DENSEZ
|
|
DISPLAY "Sottogruppo@25" DENSOT
|
|
OUTPUT F_CODFR CODSEZ
|
|
FLAGS "R"
|
|
HELP "Codice sezione da cui iniziare la stampa: vuoto = inizio"
|
|
GROUP 1 4
|
|
END
|
|
|
|
STRING F_CODTO 6
|
|
BEGIN
|
|
PROMPT 2 7 " a Codice "
|
|
COPY USE F_CODFR
|
|
INPUT CODSEZ F_CODTO
|
|
COPY DISPLAY F_CODFR
|
|
OUTPUT F_CODTO CODSEZ
|
|
FLAGS "R"
|
|
HELP "Codice sezione finale per la stampa: vuoto = fine archivio"
|
|
GROUP 1 4
|
|
END
|
|
|
|
STRING F_DENFR 25
|
|
BEGIN
|
|
PROMPT 27 6 "da Sezione "
|
|
USE LF_SEZIONI KEY 2
|
|
INPUT DENSEZ F_DENFR
|
|
DISPLAY "Sezione@25" DENSEZ
|
|
DISPLAY "Sottogruppo@25" DENSOT
|
|
DISPLAY "Codice" CODSEZ
|
|
OUTPUT F_DENFR DENSEZ
|
|
HELP "Sezione da cui iniziare stampa: vuoto = inizio archivio"
|
|
GROUP 1 5
|
|
END
|
|
|
|
STRING F_DENTO 25
|
|
BEGIN
|
|
PROMPT 27 7 " a Sezione "
|
|
COPY USE F_DENFR
|
|
INPUT DENSEZ F_DENTO
|
|
COPY DISPLAY F_DENFR
|
|
OUTPUT F_DENTO DENSEZ
|
|
HELP "Sezione finale per la stampa: vuoto = fine archivio"
|
|
GROUP 1 5
|
|
END
|
|
|
|
BOOLEAN F_ESTINTE
|
|
BEGIN
|
|
PROMPT 2 8 "Stampa anche sezioni estinte"
|
|
END
|
|
|
|
ENDPAGE
|
|
ENDMASK
|