DECLARE
	CURSOR C1 IS SELECT EMPLOYEE_ID,LAST_NAME,HIRE_DATE,SALARY  FROM EMPLOYEES WHERE FIRST_NAME||' '||LAST_NAME = :BLOCK3.L ;
	E NUMBER;
	L VARCHAR2(22);
	H DATE;
	S NUMBER;
BEGIN
	OPEN C1;
	LOOP
		FETCH C1 INTO
		E,L,H,S;
		EXIT WHEN C1%NOTFOUND;
	END LOOP;
	
	--GO_BLOCK('EMPLOYEES');
	go_item('EMPLOYEES.EMPLOYEE_ID');
	:EMPLOYEES.EMPLOYEE_ID:=E;
	go_item('EMPLOYEES.LAST_NAME');
	:EMPLOYEES.LAST_NAME:=L;
	go_item('EMPLOYEES.HIRE_DATE');
	:EMPLOYEES.HIRE_DATE:=H;
	go_item('EMPLOYEES.SALARY');
	:EMPLOYEES.SALARY:=S;



EXECUTE_QUERY;

END;

DECLARE
	CURSOR C1 IS SELECT EMPLOYEE_ID,LAST_NAME,HIRE_DATE,SALARY  FROM EMPLOYEES WHERE FIRST_NAME||' '||LAST_NAME = :BLOCK3.L ;
	E NUMBER;
	L VARCHAR2(22);
	H DATE;
	S NUMBER;
BEGIN
	GO_BLOCK('EMPLOYEES');
	
	OPEN C1;
	LOOP
		FETCH C1 INTO E,L,H,S;
		EXIT WHEN C1%NOTFOUND;
		
		:EMPLOYEES.EMPLOYEE_ID:=E;
		:EMPLOYEES.LAST_NAME:=L;
		:EMPLOYEES.HIRE_DATE:=H;
		:EMPLOYEES.SALARY:=S;
	
	END LOOP;
END;