campo-sirio/tp/tp0100a.uml

#include "tp0100a.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 "Trasferimenti" -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 6
BEGIN
  PROMPT 1 4 "@bTabelle"
END

BOOLEAN F_CONTI
BEGIN
  PROMPT 2 5 "Piano dei conti"
END

BOOLEAN F_PAG
BEGIN
  PROMPT 2 6 "Tabella Pagamenti"
END

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

BOOLEAN F_BOLLE
BEGIN
  PROMPT 2 8 "Documenti di trasporto"
	MESSAGE FALSE ENABLE,F_CLIFO
	MESSAGE TRUE "X",F_CLIFO
END

DATA F_DATABOLLE
BEGIN
  PROMPT 32 8 "Data limite "
END

ENDPAGE

PAGE "Configurazione" -1 -1 78 18

GROUPBOX DLG_NULL 48 5
BEGIN
  PROMPT 1 1 "@bDatabase"
END

STRING F_DSN 30
BEGIN
  PROMPT 2 2 "DSN      "
  CHECKTYPE REQUIRED
END

STRING F_USR 16
BEGIN
  PROMPT 2 3 "User     "
END

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

GROUPBOX DLG_NULL 68 4
BEGIN
  PROMPT 1 6 "@bDocumenti di trasporto"
END

BOOLEAN F_CUSTREF
BEGIN
  PROMPT 2 7 "Inserire righe riferimento cliente"
END

BOOLEAN F_PAPER
BEGIN
  PROMPT 2 8 "Inserire informazioni estese nella descrizione aggiuntiva"
END


ENDPAGE

ENDMASK