campo-sirio/ha/ha1200a.uml

#include "ha1200a.h"

PAGE "Esportazione archivi in formato .txt" -1 -1 78 12

STRING F_PATH 256 50
BEGIN
  PROMPT 1 1 "Cartella creazione files "
  FLAGS "D"
END

GROUPBOX DLG_NULL 76 8
BEGIN
  PROMPT 1 2 "@bArchivi da trasferire"
END

BOOLEAN F_AGENTI
BEGIN
  PROMPT 2 3 "Agenti"
  GROUP 1
END

BOOLEAN F_CLIENTI
BEGIN
  PROMPT 2 4 "Clienti"
  GROUP 1
END

NUMBER F_DA_CODCLI 6
BEGIN
  PROMPT 12 4 "Dal: "
  USE LF_CLIFO
  INPUT TIPOCF "C"
  INPUT CODCF F_DA_CODCLI
  DISPLAY "Codice" CODCF
  DISPLAY "Ragione Sociale@50" RAGSOC
  OUTPUT F_DA_CODCLI CODCF
  CHECKTYPE NORMAL
  GROUP 1
END

BOOLEAN F_SOSPESI
BEGIN
  PROMPT 2 5 "Sospesi"
  GROUP 1
END

BOOLEAN F_LISTINI
BEGIN
  PROMPT 2 6 "Listini"
  GROUP 1
END

BOOLEAN F_CONTRATTI
BEGIN
  PROMPT 2 7 "Contratti"
  GROUP 1
END

BOOLEAN F_PROMOZIONI
BEGIN
  PROMPT 2 8 "Promozioni"
  GROUP 1
END

BOOLEAN F_PRODOTTI
BEGIN
  PROMPT 28 3 "Prodotti"
  GROUP 1
END

BOOLEAN F_LINEE
BEGIN
  PROMPT 28 4 "Linee"
  GROUP 1
END

BOOLEAN F_BARCODE
BEGIN
  PROMPT 28 5 "Barcode"
  GROUP 1
END

BOOLEAN F_DECODART
BEGIN
  PROMPT 28 6 "Codici articolo alternativi"
  GROUP 1
END

BOOLEAN F_ATTREZZA
BEGIN
  PROMPT 53 3 "Attrezzature"
  GROUP 1
END

BOOLEAN F_TABPAG
BEGIN
  PROMPT 53 4 "Condizioni pagamento"
  GROUP 1
END

BOOLEAN F_CARICO
BEGIN
  PROMPT 53 5 "Documenti di carico"
  GROUP 1
END

STRING DLG_PROFILE 50
BEGIN
  PROMPT 1 -1 "Profilo "
  PSELECT
END

ENDPAGE

TOOLBAR "topbar" 0 0 0 2

#include <elabar.h>

ENDPAGE

ENDMASK