campo-sirio/m770/batbent.uml
luciano 32ddf6cbf0 Con questo spero di aver terminato l'adeguamento a XI (LA)
git-svn-id: svn://10.65.10.50/trunk@4077 c028cbd2-c16b-5b4b-a496-9718f37d4682
1997-01-15 14:38:42 +00:00

37 lines
612 B
Plaintext
Executable File

#include "batb%ent.h"
TOOLBAR "" 0 20 0 2
#include <toolbar.h>
ENDPAGE
PAGE "Tabella enti previdenziali" -1 -1 78 18
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 "Codice Ente " CODTAB
DISPLAY "Descrizione@60 " S0
OUTPUT F_CODENTE CODTAB
OUTPUT F_DESCR S0
KEY 1
END
STRING F_DESCR 60
BEGIN
PROMPT 4 3 "Descrizione "
FIELD LF_TABCOM->S0
HELP "Inserire la descrizione dell' Ente"
WARNING "Manca la descrizione"
CHECKTYPE REQUIRED
END
ENDPAGE
ENDMASK