ENABLE User's Guide

TAILORING AN APPLICATION
Providing User Information for a Box
S5044-041
Provides
user
instructions
for
employ-box
Employee Information Screen
Page 1/1
* Employee Name _______________________________
* Department
Region Number ____ Branch Number ___
Job Title _____________ Vacation ___ * Employee Number _____
* DEP-KEY
DEPENDENT-NO ____
DEPENDENT-NAME __________________________
RELATIONSHIP ____
DEPENDENT-AGE ____
Ready for input F3 for Help, shift F16 to exit
SET BOX HEADINGS DDLHEADINGS
SET BOX INCLUDE (empname, dept, job, vacation, empnum)
SET BOX SCREENFORMAT COMPRESSED
SET BOX BOXTITLE 1 "To find an employee, enter the first name then
the last name:"
SET BOX RECORD employee
ADD BOX employ-box
RESET BOX *
SET BOX RECORD dependents
ADD BOX depends-box
SET APPL TITLE "Employee Information Screen"
SET APPL TREE (01 employ-box
02 depends-box LINK empnum TO OPTIONAL emp-no)
SET APPL PATHCOMFILE emppath !
ADD APPL employee-info
GENERATE APPL employee-info
Terminal
Screen:
ENABLE
Commands:
Figure 6-7. Screen With User-Defined Information Displayed in a
Box
You can provide up to three lines of user information within a
box by supplying values for the BOXTITLE 1, BOXTITLE 2, and
BOXTITLE 3 attributes.
6-16