campo-sirio/ve/ve7700a.uml

#include "ve7700a.h"

TOOLBAR "" 0 -3 0 3

BUTTON DLG_OK 10 2
BEGIN
  PROMPT -12 -11 "~Elabora"
  PICTURE BMP_ELABORA
END

BUTTON DLG_QUIT 10 2
BEGIN
  PROMPT -22 -11 "Fine"
END

ENDPAGE

PAGE "Trasferimento da Galileo Cantieri" -1 -1 78 18

GROUPBOX DLG_NULL 78 3
BEGIN
  PROMPT 1 1 "@bDitta"
END

NUMBER F_FIRM 5
BEGIN
  PROMPT 2 2 ""
  USE LF_NDITTE
  INPUT CODDITTA F_FIRM
  OUTPUT F_RAGSOC RAGSOC
  CHECKTYPE REQUIRED
  FLAGS "DF"
END

STRING F_RAGSOC 60
BEGIN
  PROMPT 17 2 ""
  FLAGS "D"
END

GROUPBOX DLG_NULL 58 4
BEGIN
  PROMPT 1 4 "@bTabelle"
END

BOOLEAN F_CLIFO
BEGIN
  PROMPT 2 5 "Clienti/Fornitori"
END

BOOLEAN F_ARTICOLI
BEGIN
  PROMPT 2 6 "Articoli"
END

DATE F_DATA
BEGIN
  PROMPT 2 8 "Record modificati dal "
END

ENDPAGE

PAGE "Configurazione" -1 -1 78 18

GROUPBOX DLG_NULL 48 5
BEGIN
  PROMPT 1 1 "@bParametri database per clienti/fornitori"
END

STRING F_DSN1 30
BEGIN
  PROMPT 2 2 "DSN      "
END

STRING F_USR1 16
BEGIN
  PROMPT 2 3 "User     "
END

STRING F_PWD1 16
BEGIN
  PROMPT 2 4 "Password "
  FLAGS "*"
END

GROUPBOX DLG_NULL 48 5
BEGIN
  PROMPT 1 7 "@bParametri database per articoli"
END

STRING F_DSN2 30
BEGIN
  PROMPT 2 8 "DSN      "
END

STRING F_USR2 16
BEGIN
  PROMPT 2 9 "User     "
END

STRING F_PWD2 16
BEGIN
  PROMPT 2 10 "Password "
  FLAGS "*"
END

STRING F_PATH 100 35
BEGIN
  PROMPT 2 12 "Percorso file da importare/esportare "
END

ENDPAGE

ENDMASK