declare 
a number;         -- Student ID
b varchar2(300);  --Student Name
c varchar2(30);  --Mobile
CURSOR cc IS
select distinct stuid,,name,mobile from student where status='PRESENT';
BEGIN
open cc;
LOOP
fetch Cc into A,B,C;
insert into msgout (id,msgto,msg)
values 
(a,c,'Marks Sheet of student '|| b || 'is as under: '|| :SNO ||':'|| :obtmarks ||' / '|| tmarks);
EXIT when Cc%NOTFOUND;
next_record;
END LOOP;
Close c;
end;

(a,c,'Marks Sheet of student '|| b || 'is as under: '|| :SNO ||':'|| :obtmarks ||' / '|| tmarks); 

(a,c,'Marks Sheet of student '|| b || 'is as under: '|| :SNO ||':'|| :obtmarks ||' / '|| :tmarks); 

DECLARE
	B VARCHAR2(30);
  A VARCHAR2(30);
  C VARCHAR2(500);
  D VARCHAR2(33);
  E VARCHAR2(50);
  F VARCHAR2(30);
CURSOR CC IS
SELECT DISTINCT S.STUID,F.MOBILE,S.NAME,S.CLASS,TS.TSUBJ,T.EXAMC 
       FROM STUDENT S,FAMILY F,TSUBJ TS,TEST T
       WHERE S.CLASS=:TEST.CLASS AND S.SECTION=:TEST.SEC AND S.STATUS='PRESENT'
       AND S.STUID IN (SELECT DISTINCT STUID FROM STUDENT 
       WHERE STATUS='PRESENT') AND F.FAM_ID=S.FAM_ID AND TS.CNAME=:CLASS; 
BEGIN
OPEN CC;
LOOP
 FETCH CC INTO A,B,C,D,E,F;
  	  INSERT INTO MSGOUT (ID,MSGTO,MSG) 
   	  VALUES
   	  (A,'+92'||B,'>> Respected Parents!  Marks Sheet of  '|| C || ' of class ' || d || ' for the '|| F || ' is as under. '|| E ||':' 
   	  || round(:TEST1.OBTMARKS,2) || ' / ' || :totmarks || ' His/Her Perct. is '|| :perct .);
-- NEXT_RECORD;
 EXIT WHEN CC%NOTFOUND;
 END LOOP;
 COMMIT;
 CLOSE CC;
END; 

Respected Parents! Marks Sheet of Amina Fardous of class NineS for the DECEMBER TEST 2016 is as under. 

Math: 37/50
Bio/Comp: 37/50
Phy: 27/50

His/Her Perct. is 74.

STUID	NAME	CLASS	SECTION	  MAX(T.EXAMC)	SUBJECT	TOTMARKS	OBTMARKS
560	Sandal	NineA	A	DECEMBER TEST 2016	Eng	50	10
124	Seemab Kanwal	NineA	A	DECEMBER TEST 2016	Isl.O	50	43
140	Aiman Jaleel	NineA	A	DECEMBER TEST 2016	Isl.O	50	0
560	Sandal	NineA	A	DECEMBER TEST 2016	Isl.O	50	44
551	Maryam Maqbool	NineA	A	DECEMBER TEST 2016	Edu	50	37
134	Faiza Iqbal	NineA	A	DECEMBER TEST 2016	G.Sci	50	17
140	Aiman Jaleel	NineA	A	DECEMBER TEST 2016	G.Sci	50	34
560	Sandal	NineA	A	DECEMBER TEST 2016	G.Sci	50	25
8	Husnaina Yousaf	NineA	A	DECEMBER TEST 2016	Math	50	15
124	Seemab Kanwal	NineA	A	DECEMBER TEST 2016	Math	50	25
124	Seemab Kanwal	NineA	A	DECEMBER TEST 2016	Edu	50	41
124	Seemab Kanwal	NineA	A	DECEMBER TEST 2016	G.Sci	50	48
544	Sana Munir	NineA	A	DECEMBER TEST 2016	Math	50	18
560	Sandal	NineA	A	DECEMBER TEST 2016	Math	50	23
8	Husnaina Yousaf	NineA	A	DECEMBER TEST 2016	Edu	50	20
497	Ayesha Noreen	NineA	A	DECEMBER TEST 2016	Edu	50	37
544	Sana Munir	NineA	A	DECEMBER TEST 2016	Eng	50	31

 CREATE OR REPLACE FORCE VIEW W
(
  STUID, NAME, CLASS, SECTION, T, SUBJECT, TOTMARKS, MOBILE, OBTMARKS
)
AS 
SELECT DISTINCT S.STUID,S.NAME,S.CLASS,S.SECTION,MAX(T.EXAMC) as t,
T.SUBJECT,T.TOTMARKS,F.MOBILE,
       TEST1.OBTMARKS
       FROM STUDENT S,TEST T,TEST1,FAMILY F
       WHERE T.TID=TEST1.TID
       AND T.TDATE=TEST1.TDATE
       AND TEST1.TSTUID=S.STUID
       AND F.FAM_ID=S.FAM_ID
       AND S.STUID=TEST1.TSTUID
       AND T.CLASS=S.CLASS
       AND T.SECTION=S.SECTION
       AND STATUS='PRESENT'
       AND S.CLASS='NineA'
       AND S.SECTION='A'
       AND T.EXAMC='DECEMBER TEST 2016'
       GROUP BY S.CLASS,S.STUID,S.NAME,S.CLASS,S.SECTION,T.SUBJECT,T.TOTMARKS,
       TEST1.OBTMARKS,F.MOBILE
/

select st.stuid,
       'Respected Parents! Marks Sheet of ' || st.name || 
       ' of class NineS for the DECEMBER TEST 2016 is as under.' || 
       chr(10) || listagg( obtmarks || '/' || tmarks, chr(10)) within group (order by tmarks) sms
from   student st
join   test1 t1
on     st.stuid = t1.tstuid
join   test t
on     t.sno = st.stuid
group  by st.stuid, st.name;

STUID  SMS                                                                                                         
1      Respected Parents! Marks Sheet of ABC of class NineS for the DECEMBER TEST 2016 is as under.
30/50
39/50    
2      Respected Parents! Marks Sheet of A of class NineS for the DECEMBER TEST 2016 is as under.
16.7/50
16.7/50