#include "veuml.h"

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

PAGE "Estremi del documento" 1 1 80 14

GROUPBOX DLG_NULL 78 7
BEGIN
	PROMPT 1 4 "Estremi del documento definitivo"
END

STRING F_CODNUM 4
BEGIN
  PROMPT 2 5 "Numerazione  "
  FIELD CODNUM
  HELP "Codice numerazione"
  USE %NUM
  INPUT CODTAB F_CODNUM
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT F_CODNUM CODTAB
  OUTPUT F_DESNUM S0
  CHECKTYPE FORCED
  FLAG "UPA"
  WARNING "Numerazione assente"
  KEY 1 2
END

STRING F_DESNUM 50
BEGIN
  PROMPT 24 5 ""
  HELP "Descrizione numerazione"
  USE %NUM KEY 2
  INPUT S0 F_DESNUM
  DISPLAY "Descrizione@50" S0
  DISPLAY "Codice" CODTAB
  COPY OUTPUT F_CODNUM
END

STRING F_TIPODOC 4
BEGIN
  PROMPT 2 6 "Tipo         "
  FIELD TIPODOC
  HELP "Codice tipo documento"
  USE %TIP
  INPUT CODTAB F_TIPODOC
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT F_TIPODOC CODTAB
  OUTPUT F_DESTIPODOC S0
  CHECKTYPE FORCED
  FLAG "UP"
END

STRING F_DESTIPODOC 50
BEGIN
  PROMPT 24 6 ""
  HELP "Descrizione tipo documento"
  USE %TIP KEY 2
  INPUT S0 F_DESTIPODOC
  DISPLAY "Descrizione@50" S0
  DISPLAY "Codice" CODTAB
  COPY OUTPUT F_TIPODOC
END

ENDPAGE

ENDMASK