campo-sirio/cg/cg1300l.uml

#include "cg1300l.h"

TOOLBAR "topbar" 0 0 0 2

BUTTON F_RESET 10 2 
BEGIN
  PROMPT -13 -11 "Deselezione"
END

BUTTON DLG_SAVEREC 10 2 
BEGIN
  PROMPT -23 -11 ""
  PICTURE BMP_SAVEREC
  PICTURE BMP_SAVERECDN
END

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

ENDPAGE

PAGE "Controllo Partita IVA" 0 0 0 2

RADIOBUTTON F_TIPO 1 28
BEGIN
  PROMPT 1 0 "Tipo"
  ITEM "C|Clienti"
  ITEM "F|Fornitori"
  FLAGS "Z"
END

BOOLEAN F_COFI
BEGIN
  PROMPT 31 1 "Controllo Codice Fiscale"
END

SPREADSHEET F_CLIFO 0 -1
BEGIN
  PROMPT 0 3 ""
  ITEM "@1"
  ITEM "Codice@7"
  ITEM "Ragione Sociale@50"
  ITEM "Partita IVA"
  ITEM "Codice Fiscale@16"
  ITEM "Problema riscontrato@50"
END

ENDPAGE

ENDMASK

PAGE "Dati" -1 -1 52 10 

BOOLEAN S_DIRTY
BEGIN
  PROMPT 1 0 "Modificato"
END

NUMBER S_CODCF 7
BEGIN
  PROMPT 21 0 "Codice "
  FLAGS "D"
END

STRING S_RAGSOC 50
BEGIN
  PROMPT 1 1 ""
  FLAGS "D"
END

STRING S_PAIV 12
BEGIN
  PROMPT 1 3 "Partita IVA    "
END

STRING S_COFI 16
BEGIN
  PROMPT 1 4 "Codice Fiscale "
END

BUTTON DLG_USER 10 2
BEGIN
  PROMPT -1 3 "Allinea"
END

MEMO S_ERROR 50 3
BEGIN
  PROMPT 1 5 "Problema riscontrato"
  FLAGS "D"
END

ENDPAGE

TOOLBAR "topbar" 0 0 0 2

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

BUTTON DLG_LINK 10 2
BEGIN
  PROMPT -23 -1 ""
  PICTURE BMP_LINK
END

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

ENDPAGE

ENDMASK