HP System Dictionary/XL SDMAIN Reference Manual (32256-90001)

3- 32
hired, and social-security-no of entity-type element.
>>ENTITY-TYPE = element;
>>ATTRIBUTE-LIST = (element-type = X,
>>BYTE-LENGTH = 10,
>>COBOL-ALIAS = emp-last-name).
>CREATE ENTITY first-name;
>>ENTITY-TYPE = element;
>>ATTRIBUTE-LIST = (element-type = X,
>>BYTE-LENGTH = 20,
>>COBOL-ALIAS = emp-first-name).
>CREATE ENTITY date-hired;
>>ENTITY-TYPE = element;
>>ATTRIBUTE-LIST = (element-type = 9,
>>BYTE-LENGTH = 6,
>>BLANK = yes,
>>DESCRIPTION = "date in mmddyy format").
>CREATE ENTITY social-security-no;
>>ENTITY-TYPE = element;
>>ATTRIBUTE-LIST = (element-type = 9,
>>BYTE-LENGTH = 9,
>>COBOL-ALIAS = emp-ss-no).
>CREATE RELATIONSHIP employee-record,
last-name; Createsrelationshipsoftype recordcontainselement by
>>RELATIONSHIP-TYPE = record, element; relating last-name, first-name, date-hired, and
>>RELATIONSHIP-CLASS = contains. social-security-no, to employee-record.
>CREATE RELATIONSHIP employee-record, first-name;
>>RELATIONSHIP-TYPE = record, element;
>>RELATIONSHIP-CLASS = contains.
>CREATE RELATIONSHIP employee-record, date-hired;
>>RELATIONSHIP-TYPE = record, element;
>>RELATIONSHIP-CLASS = contains.
>CREATE RELATIONSHIP employee-record,
>>social-security-no;