campo-sirio/db/db1300b.uml

#include "db0500a.h"

TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_PRINT 10 2
BEGIN
  PROMPT -23 -11 "~Stampa"
END

BUTTON DLG_QUIT 10 2
BEGIN
  PROMPT -33 -11 ""
END

ENDPAGE
    
TOOLBAR "" 0 -2 0 2

BUTTON F_EXPLODE 10 2
BEGIN
  PROMPT -11 -11 "~Lista"
END

ENDPAGE

PAGE "Implosione" -1 -1 60 20

NUMBER F_CODICE 3
BEGIN
  PROMPT 1 0 "Risultato elaborazione "
  FLAGS "Z"
  SHEET "Codice|Articolo@30|Descrizione@50"
  INPUT F_CODICE
  OUTPUT F_CODICE
END

TREE F_TREE -3 -1
BEGIN
  PROMPT 0 1 ""
END

ENDPAGE

ENDMASK