campo-sirio/at/at9800a.uml

#include "at9800a.h"

PAGE "Importazione da CT - Rimini" -1 -1 80 13

GROUPBOX DLG_NULL 76 4
BEGIN
  PROMPT 1 1 "@bfile da importare"
END

STRING F_PATH 256 60
BEGIN
  PROMPT 2 2 "Cartella    "
  DSELECT
  FLAGS "M"
  CHECKTYPE REQUIRED
END

STRING F_NAME 12
BEGIN
  PROMPT 2 3 "File (*.txt)"
  FLAGS "B"
  CHECKTYPE REQUIRED
END

TEXT DLG_NULL
BEGIN
  PROMPT 2 5 "@bSezioni che non importano i controlli"
END

SPREADSHEET F_SEZIONI -1 5
BEGIN
  PROMPT 2 6 "@bSezioni"
  ITEM "Codice"
  ITEM "Descrizione@50"
END

STRING DLG_PROFILE 256 60
BEGIN
  PROMPT 2 -1 "Profilo "
  PSELECT
END

ENDPAGE

TOOLBAR "" 0 0 0 2
#include <stdbar.h>
ENDPAGE

ENDMASK

//maschera di riga
PAGE "Sezione" -1 -1 78 8

STRING SF_CODSEZ 2
BEGIN
  PROMPT 1 1 "Codice "
  USE LF_SEZIONI
  CHECKTYPE REQUIRED
  INPUT CODSEZ SF_CODSEZ
  DISPLAY "Codice" CODSEZ
  DISPLAY "Descrizione@25" DENSEZ
  OUTPUT SF_CODSEZ CODSEZ
  OUTPUT SF_DESCR DENSEZ
  FLAGS "UZ"
END

STRING SF_DESCR 50
BEGIN
  PROMPT 1 3 "Descrizione "
  USE LF_SEZIONI KEY 2
  INPUT S0 SF_DESCR
  DISPLAY "Descrizione@50" DENSEZ
  DISPLAY "Codice" CODSEZ
  COPY OUTPUT SF_CODSEZ
END

ENDPAGE

TOOLBAR "topbar" 0 0 0 2

BUTTON DLG_OK 10 2
BEGIN
  PROMPT -13 -1 ""
END

BUTTON DLG_DELREC 10 2
BEGIN
  PROMPT -23 -1 ""
END

BUTTON DLG_CANCEL 10 2
BEGIN
  PROMPT -33 -1 ""
END

ENDPAGE

ENDMASK