campo-sirio/ve/ve7700a.uml

#include "ve7700a.h"

TOOLBAR "" 0 0 0 2

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

BUTTON DLG_INFO 10 2
BEGIN
  PROMPT -24 -11 ""
END

BUTTON DLG_HELP 10 2
BEGIN
  PROMPT -34 -11 ""
END

BUTTON DLG_QUIT 10 2
BEGIN
	PROMPT -44 -1 ""
END

ENDPAGE

PAGE "Trasferimento da Galileo Cantieri" 0 0 0 0

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 6 "@bParametri database per articoli"
END

STRING F_DSN2 30
BEGIN
  PROMPT 2 7 "DSN      "
END

STRING F_USR2 16
BEGIN
  PROMPT 2 8 "User     "
END

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

GROUPBOX DLG_NULL 48 5
BEGIN
  PROMPT 1 11 "@bParametri database per costi"
END

STRING F_DSN3 30
BEGIN
  PROMPT 2 12 "DSN      "
END

STRING F_USR3 16
BEGIN
  PROMPT 2 13 "User     "
END

STRING F_PWD3 16
BEGIN
  PROMPT 2 14 "Password "
  FLAGS "*"
END

STRING F_PATH 256 35
BEGIN
  PROMPT 2 16 "Percorso file da importare/esportare "
END

STRING F_DITTA 3
BEGIN
  PROMPT 2 17 "Codice ditta Galileo    "
END

STRING F_CMS 4
BEGIN
  PROMPT 2 18 "Codice commessa Galileo "
END

STRING F_CANT 10
BEGIN
  PROMPT 2 19 "Codice cantiere Galileo "
END

ENDPAGE

ENDMASK