campo-sirio/lv/lvstmez.uml
lvietri e00d63cf0b Patch level :
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :


git-svn-id: svn://10.65.10.50/trunk@17036 c028cbd2-c16b-5b4b-a496-9718f37d4682
2008-08-08 11:07:30 +00:00

56 lines
860 B
Plaintext
Executable File

#include "lvstmez.h"
TOOLBAR "topbar" 0 0 0 2
#include "printbar.h"
ENDPAGE
PAGE "Stampa Mezzi di Trasporto" -1 -1 40 5
GROUPBOX DLG_NULL 76 5
BEGIN
PROMPT 1 1 "@b Parametri Mezzi di Trasporto"
END
STRING F_COD_MEZZO 8
BEGIN
PROMPT 2 2 "Da codice"
FLAGS "U"
USE &MEZ
INPUT CODTAB F_COD_MEZZO
DISPLAY "Codice@8" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_COD_MEZZO CODTAB
OUTPUT F_DES_MEZZO S0
CHECKTYPE SEARCH
FIELD #FROM
END
STRING F_DES_MEZZO 50
BEGIN
PROMPT 25 2 ""
FLAGS "D"
END
STRING F_COD_MEZZO_TO 8
BEGIN
PROMPT 2 3 "A codice "
FLAGS "U"
USE &MEZ
INPUT CODTAB F_COD_MEZZO
DISPLAY "Codice@8" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_COD_MEZZO_TO CODTAB
OUTPUT F_DES_MEZZO_TO S0
CHECKTYPE SEARCH
FIELD #TO
END
STRING F_DES_MEZZO_TO 50
BEGIN
PROMPT 25 3 ""
FLAGS "D"
END
ENDPAGE
ENDMASK