sample  GAizMcJIED      0
BEGIN DECLARE SECTION 
END DECLARE SECTION 
INCLUDE SQLDA 
DECLARE GetOrgLst CURSOR FOR    SELECT * FROM ORG 
DECLARE GetStaffLst CURSOR FOR    SELECT * FROM STAFF    WHERE DEPT=:DeptNbr 
DECLARE GetOrg CURSOR FOR    SELECT * FROM ORG    WHERE DEPTNUMB = :DeptNbr 
DECLARE GetStats CURSOR FOR    SELECT AVG(SALARY), MIN(SALARY),           MAX(SALARY),SUM(SALARY)    FROM STAFF    WHERE DEPT = :DeptNbr 
OPEN  GetStaffLst 
FETCH GetStaffLst INTO             :ID,:Name :NameNul,:DeptNbr :DeptNul,:Job :JobNul,:Years:YearNul,      :Salary:SalNul,:Comm:ComNul 
CLOSE GetStaffLst 
OPEN GetStats 
FETCH GetStats INTO         :AvgSalary,:MinSalary,:MaxSalary,:TotalSalary 
CLOSE GetStats 
OPEN GetOrgLst 
FETCH GetOrgLst INTO       :DeptNbr,:DeptName,:Manager,:Division,       :Location 
CLOSE getOrgLst 
DeptNbr
Years
Salary
NameNul
DeptNul
JobNul
YearNul
SalNul
ComNul
DeptNbr
DeptName
Manager
Division
Location
MgrName
TotalSalary
AvgSalary
MinSalary
MaxSalary