campo-sirio/src/ps/pd6342200a.uml
mtollari 1b14ec9415 Spostamento cartella sorgenti
git-svn-id: svn://10.65.10.50/branches/R_10_00@23236 c028cbd2-c16b-5b4b-a496-9718f37d4682
2016-09-09 13:59:02 +00:00

57 lines
830 B
Plaintext
Executable File

#include "pd6342200a.h"
TOOLBAR "topbar" 0 0 0 2
#include <elabar.h>
ENDPAGE
PAGE "Parametri" 0 2 0 0
STRING DLG_PROFILE 50
BEGIN
PROMPT 9 -12 "Profilo "
PSELECT
FLAGS "H"
END
GROUPBOX DLG_NULL 90 4
BEGIN
PROMPT 1 1 "@bParametri Importazione"
END
STRING F_FILE 255 50
BEGIN
PROMPT 2 2 "File "
FSELECT "*.txt"
CHECKTYPE REQUIRED
FIELD ComInPath
END
STRING F_CODCAU 4
BEGIN
PROMPT 2 3 "Cod. cau. "
USE LF_CAUSALI
INPUT CODCAUS F_CODCAU
DISPLAY "Codice " CODCAUS
DISPLAY "Descrizione@50" DESCR
OUTPUT F_CODCAU CODCAUS
OUTPUT F_DESCAU DESCR
CHECKTYPE REQUIRED
FIELD CodCau
END
STRING F_DESCAU 50
BEGIN
PROMPT 25 3 ""
USE LF_CAUSALI KEY 2
INPUT DESCR F_DESCAU
DISPLAY "Descrizione@50" DESCR
DISPLAY "Codice " CODCAUS
COPY OUTPUT F_CODCAU
CHECKTYPE NORMAL
END
ENDPAGE
ENDMASK