Step 1. Create the Employee Object.
VFW106 – Using a List Collection
The Employee Object is a simple non visual component that stores values for each employee.
1. Create a new
:iiiVFW31
Employee Object
2. Define the properties this object needs to store the employee data, allowing values to be set and retrieved (get).
Define_Pty Name(UEMPLOYEENUMBER) Get(*AUTO #EMPNO) Set(*AUTO #EMPNO)
Define_Pty Name(UEMPLOYEESURNAME) Get(*AUTO #SURNAME) Set(*AUTO #SURNAME)
Define_Pty Name(UEMPLOYEEGIVENAME) Get(*AUTO #GIVENAME) Set(*AUTO #GIVENAME)
Define_Pty Name(UEMPLOYEESALARY) Get(*AUTO #SALARY) Set(*AUTO #SALARY)
3. Compile the reusable part.