campo-sirio/m770/77tbent.uml

37 lines
623 B
Plaintext
Raw Normal View History

#include "77tbent.h"
TOOLBAR "" 0 0 0 2
#include <relapbar.h>
ENDPAGE
PAGE "Tabella enti previdenziali" 0 2 0 0
NUMBER F_CODENTE 2
BEGIN
PROMPT 4 1 "Codice Ente "
FIELD LF_TABCOM->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 "RZ"
END
STRING F_DESCR 60
BEGIN
PROMPT 4 3 "Denominazione "
FIELD LF_TABCOM->S0
HELP "Inserire la descrizione dell' Ente"
WARNING "Manca la denominazione"
CHECKTYPE REQUIRED
END
ENDPAGE
ENDMASK