SAMPLE1 fAr4RCEHUSERID  0
INCLUDE SQLCA
INCLUDE SQLDA
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE CURSOR_10119 CURSOR FOR SELECT           DEPTNAME,           DEPTNUMB,           DIVISION,           LOCATION,           MANAGER           FROM ORG 
OPEN CURSOR_10119
FETCH CURSOR_10119 INTO      :ORG_DEPTNAME :ORG_DEPTNAME_N,      :ORG_DEPTNUMB,      :ORG_DIVISION :ORG_DIVISION_N,      :ORG_LOCATION :ORG_LOCATION_N,      :ORG_MANAGER :ORG_MANAGER_N
CLOSE CURSOR_10119
COMMIT WORK
ORG_DEPTNAME
ORG_DEPTNAME_N
ORG_DEPTNUMB
ORG_DIVISION
ORG_DIVISION_N
ORG_LOCATION
ORG_LOCATION_N
ORG_MANAGER
ORG_MANAGER_N
STAFF_COMM
STAFF_COMM_N
STAFF_DEPT
STAFF_DEPT_N
STAFF_ID
STAFF_JOB
STAFF_JOB_N
STAFF_NAME
STAFF_NAME_N
STAFF_SALARY
STAFF_SALARY_N
STAFF_YEARS
STAFF_YEARS_N