campo-sirio/ps/pd6342200a.uml

#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