Skip to main content

PLSQL Programming Part 5 - CURSOR AND ITS ATTRIBUTES

/**
What is a cursor?
A cursor is a pointer that points a set of records for processing. Private SQL area is where cursor results are placed.
Implicit cursors and Explicit cursors are two types of cursors.

There are a number of ways a cursor can be declared and used based on the requirement. They are as follows:
1. Simple FOR loop cursor
2. Explicit declaration and invoking it

***/
clear screen
set serveroutput on size 100000
declare
--Cursor Declaration
cursor cur_Customer_Data
is
Select *
from cust_table;

cur_Variable cur_Customer_Data%rowtype; -- Cursor variable to hold recordset
var1 cust_table%rowtype; -- variable to hold data on FOR loop cursor
begin

dbms_output.put_line('-------------------------------------------------------------------');
dbms_output.put_line('FOR loop started at => '||to_char(sysdate,'hh:mi:ss'));
dbms_output.put_line('-------------------------------------------------------------------');
for var1 in (Select * from cust_table)
loop
dbms_output.put_line(var1.cust_id||','||var1.cust_name);
end loop;
dbms_output.put_line('-------------------------------------------------------------------');
dbms_output.put_line('FOR loop ended at => '||to_char(sysdate,'hh:mi:ss'));
dbms_output.put_line('-------------------------------------------------------------------');


dbms_output.put_line('-------------------------------------------------------------------');
dbms_output.put_line('Fetch loop started at => '||to_char(sysdate,'hh:mi:ss'));
dbms_output.put_line('-------------------------------------------------------------------');
open cur_Customer_Data;
loop
fetch cur_Customer_Data into cur_Variable;
exit when cur_Customer_Data%NOTFOUND;
dbms_output.put_line(cur_Variable.cust_id||','||cur_Variable.cust_name);
end loop;
dbms_output.put_line('-------------------------------------------------------------------');
dbms_output.put_line('Fetch loop ended at => '||to_char(sysdate,'hh:mi:ss'));
dbms_output.put_line('-------------------------------------------------------------------');

if (cur_Customer_Data%isopen)
then
dbms_output.put_line('Cursor is still open and now I am closing it!');
close cur_Customer_Data;
else
dbms_output.put_line('Cursor already closed');
end if;

end;
/

Comments

Popular posts from this blog

Design and Operations ( Employee- Model )

-- DB design drop table emp_Salary; drop table emp_Designation; drop table emp; drop table Designations; drop table Departments; drop table Salary_Bands; drop table Addresses; Create table emp( emp_id number, emp_Name varchar2(20), emp_address_id varchar2(10), emp_created_date date, emp_created_by varchar2(20), constraint e_pk primary key(emp_id) ); Create table Departments( dept_id number, dept_name Varchar2(20), constraints dept_pk primary key(dept_id) ); Create table Designations( dept_id number references Departments(dept_id), desg_id number, desg_description varchar2(20), constraints desg_pk primary key(dept_id,desg_id) ); Create table emp_Designation( emp_id number references emp(emp_id), emp_des_dept_id number references departments(dept_...

How to remove duplicate rows without using DISTINCT or ROWID or GROUP BY methods in Oracle?

Make use of SET operators and CTAS (Create Table AS) method.. Example: Create table tmp_tb1 as Select * from table1 intersect Select * from table1; truncate table table1; insert into table1 select * from tmp_tb1; -- This will now have removed all duplicates in the table... commit; *** You can use UNION operator in place of INTERSECT

Identify current and prev details of a customer

  create table customer_rating( id char, name char, irrating char, jcrrating char, procDate date, flag char ); insert into customer_rating values('A','D','X','Y','28-Jul-21','M'); insert into customer_rating values('A','D','M','L','27-Jul-21','M'); Select cr.id, cr.name, cr_prev.irrating pcob_rating, cr.irrating cob_rating, cr_prev.jcrrating pcob_jcr_rating, cr.jcrrating cob_jcr_rating From Customer_Rating cr join Customer_Rating cr_Prev  ON cr.procdate = '28-Jul-21' AND cr_prev.id = cr.id AND cr_prev.procdate = (  Select max(procdate) from Customer_Rating  Where id=cr.id and procdate < cr.procdate ) ;