#include "cotbcmp.h"

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

PAGE "Compagnie" 0 2 0 0

NUMBER FLD_TABCMP_CODTAB 4
BEGIN
  PROMPT 3 1 "Codice compagnia "
  FIELD CODTAB
  KEY 1
  USE %CMP
  FLAGS "Z"
  INPUT CODTAB FLD_TABCMP_CODTAB
  DISPLAY "Cod. compagnia" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT FLD_TABCMP_CODTAB CODTAB
  OUTPUT FLD_TABCMP_DESCR S0
  CHECKTYPE REQUIRED
END

STRING FLD_TABCMP_DESCR 50
BEGIN
  PROMPT 3 2 "Descrizione      "
  USE %CMP
  KEY 2
  FIELD S0
END

ENDPAGE

ENDMASK