#include "77tbent.h"

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

PAGE "Enti previdenziali" 0 2 0 0

STRING F_CODENTE 8
BEGIN
  PROMPT 4 1 "Codice Ente    "
  FIELD CODTAB
  HELP "Inserire il codice dell'Ente"
  USE %ENT
  CHECKTYPE REQUIRED
  INPUT CODTAB F_CODENTE
  DISPLAY "Cod.Ente" CODTAB
  DISPLAY "Denominazione@60" S0
  OUTPUT F_CODENTE CODTAB
  OUTPUT F_DESCR S0
  KEY 1  
  FLAGS "U"
END

STRING F_DESCR 60
BEGIN
  PROMPT 4 2 "Denominazione  "
  FIELD S0
  HELP "Inserire la descrizione dell'Ente"
  WARNING "Manca la denominazione"
  CHECKTYPE REQUIRED
  KEY 2
END

STRING F_COCU 1
BEGIN
  PROMPT 4 4 "Codice C.U.    "
  FIELS S6
  CHECKTYPE REQUIRED
  FLAGS "U"
END

TEXT DLG_NULL
BEGIN
  PROMPT 24 4 "2=ENPAM; 4=ENPAPI; A=Altro"
END

STRING F_COFI 16
BEGIN
  PROMPT 4 5 "Codice Fiscale "
  FIELS S5
  FLAGS "U"
  CHECKTYPE REQUIRED
END

SPREADSHEET F_CODICI 80 -1
BEGIN
  PROMPT 1 7 ""
  ITEM "Ditta"
  ITEM "Ragione Sociale@50"
  ITEM "Codice previdenziale@16"
END

ENDPAGE

ENDMASK

PAGE "Dati" -1 -1 60 5

NUMBER 101 5
BEGIN
  PROMPT 1 1 "Ditta "
  FLAGS "D"
END

STRING 102 50
BEGIN
  PROMPT 7 2 ""
  FLAGS "D"
END

STRING 103 16
BEGIN
  PROMPT 1 3 "Codice presso ente previdenziale "
  FLAGS "U"
END

ENDPAGE

TOOLBAR "" 0 0 0 0

BUTTON DLG_OK 2 2
BEGIN
  PROMPT 1 1 ""
END 

BUTTON DLG_CANCEL 2 2
BEGIN
  PROMPT 2 1 ""
END 

ENDPAGE

ENDMASK