campo-sirio/ba/batbtrb.uml

#include "batbtrb.h"

TOOLBAR "" 0 20 0 2

#include <toolbar.h>

ENDPAGE

PAGE "Tabella Codici Tributo" -1 -1 78 8

GROUPBOX DLG_NULL 75 7
BEGIN 
 PROMPT 1 0 ""
 FLAGS "R"
END 

STRING F_CODICE 4
BEGIN
  PROMPT 4 2 "Codice      "
  FIELD CODTAB
  KEY 1
  USE %TRB
  INPUT CODTAB F_CODICE
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  DISPLAY "Sezione" S6
  OUTPUT F_CODICE CODTAB
  OUTPUT F_DESCR S0
  FLAGS "U"
  CHECKTYPE REQUIRED
END

STRING F_DESCR 50
BEGIN
  PROMPT 4 4 "Descrizione "
  FIELD S0
  KEY 2
  USE %TRB KEY 2
  INPUT S0 F_DESCR
  DISPLAY "Descrizione@50" S0
  DISPLAY "Codice" CODTAB
  DISPLAY "Sezione" S6
  COPY OUTPUT F_CODICE
  CHECKTYPE REQUIRED
END

LIST F_SEZIONE 1 50
BEGIN
  PROMPT 4 5 "Sezione     "
  ITEM "E|Erario"
  ITEM "I|INPS"
  ITEM "R|Regioni"
  ITEM "L|ICI ed altri tributi locali"
  ITEM "P|Altri enti previdenziali ed assicurativi"
  FIELD S6
END

ENDPAGE

ENDMASK