0xV3NOMx
Linux ip-172-26-7-228 5.4.0-1103-aws #111~18.04.1-Ubuntu SMP Tue May 23 20:04:10 UTC 2023 x86_64



Your IP : 3.145.73.167


Current Path : /var/www/oasis/Report_details/
Upload File :
Current File : /var/www/oasis/Report_details/report_marks_entry_subwise_list.php

<?php
function GenerateMarksEntrySubjectWiseReport($aobj_context)
{	
	session_start();
    $aobj_context->mobj_db->SetFetchMode(ADODB_FETCH_ASSOC);  
    $college_code = $_SESSION['collcode'];
	$FUNIVCODE = $_SESSION['FUNIVCODE'];

	// if($FUNIVCODE=='020'){
	// 	if($_SESSION['usrtype'] == '17'){
	// 		echo "please contact admin";
	// 		return;
	// 	}
	// }
	$degree_code = $aobj_context->mobj_data["degree_code"]; 
	$exam_code = $aobj_context->mobj_data["exam_code"]; 
	$sublist_start = $aobj_context->mobj_data["subwise_start"]; 
	$sublist_end = $aobj_context->mobj_data["subwise_end"]; 
	$sectionfrom = $aobj_context->mobj_data["sectionfrom"]; 
	$reg_start = $aobj_context->mobj_data["reg_start"]; 
	$reg_end = $aobj_context->mobj_data["reg_end"];
	$sectionto = $aobj_context->mobj_data["sectionto"];
	$percentage = $aobj_context->mobj_data["percentage"];
	$percent = $aobj_context->mobj_data["percent"];
	$iatype = $aobj_context->mobj_data["iatype"];
	
	$userid = $_SESSION['user_id'];
	$main_src_obj=(explode("/",$_SERVER["REQUEST_URI"]));
	$main_src=$main_src_obj[1];
	
	$pdf_writer_class=$aobj_context->main_src."/maya-pdf/fpdf.php";	

	// $root_pdf_file_download=$aobj_context->main_src."/Report_details/output/report_general_list.pdf";
	
	$getnumword=$aobj_context->main_src."/src/getnumword.php";

	include($getnumword);
	// global varibales
	$p_count =1;
	
	include($pdf_writer_class);		
	$pdf= new FPDF();

	$pdf->SetFont('Times','',10);
	// $pdf->SetMargins(28.35,15);		
	$pdf->AliasNbPages();	
	// query for the page header	
	$page_header_university = "select FUNIVNAME,FTOWN,FUNIVADD1, date_format(now(),'%d/%m/%Y') as date,
	ifnull(fdegas,'Degree') as fdegas,
	ifnull(fcollas,'College') as fcollas,
	ifnull(fsubas,'Subject') as fsubas,
	ifnull(FREGROLL,'Reg. No.') as FREGROLL,
	ifnull(FUNIVTYPE,'')as FUNIVTYPE
	from control";
	$lobj_page_header_university = $aobj_context->mobj_db->GetRow($page_header_university);
	$fdegas = $lobj_page_header_university['fdegas'];
	$fcollas = $lobj_page_header_university['fcollas'];
	$fsubas = $lobj_page_header_university['fsubas'];
	$FUNIVTYPE = $lobj_page_header_university['FUNIVTYPE'];
	
	$page_header_college ="select concat('[ ',FCOLLCODE,' ]  ',FCOLLNAME,', ',FTOWN) as college_name
							from college where FCOLLCODE='{$college_code}'";
	$lobj_page_header_college = $aobj_context->mobj_db->GetRow($page_header_college); 


	$page_header_degree = "select concat('[ ',FDEGREE,' ] - ', FDESCPN) as Degree_name, 
							concat(' ', FEXAMNAME ,' Examination ',FEXAMDATE,'') as Exam ,FADYEAR
							from degree where FDEGREE = '{$degree_code}' and FEXAMNO='{$exam_code}' ";
	$lobj_page_header_degree = $aobj_context->mobj_db->GetRow($page_header_degree);
	
	$page_header_REGROLL = "select ifnull(FREGROLL,'')as FREGROLL,
	ifnull(fsnglent,'')as fsnglent,
	ifnull(FMULTEXAM,'F') as FMULTEXAM from control";
	$lobj_page_header_REGROLL = $aobj_context->mobj_db->GetRow($page_header_REGROLL);
		
	 
	$pdf->aobj_context =$aobj_context ;
	//$pdf->WhichReport = 'MARKS_SUBJECTWISE';
	$pdf->FUNIVNAME = $lobj_page_header_university['FUNIVNAME'];
	$pdf->FTOWN = $lobj_page_header_university['FTOWN'];
	$pdf->FUNIVADD1 = $lobj_page_header_university['FUNIVADD1'];
	$pdf->date_1 = $lobj_page_header_university['date'];
	$pdf->college_name = $lobj_page_header_college['college_name'];
	$pdf->Degree_name = $lobj_page_header_degree['Degree_name'];
	$pdf->Exam = $lobj_page_header_degree['Exam'];
	$pdf->AdmissionYear = $lobj_page_header_degree['FADYEAR'];
	$pdf->REGROLL=$lobj_page_header_REGROLL['FREGROLL'];
	$fsnglent=$lobj_page_header_REGROLL['fsnglent'];
	$FMULTEXAM=$lobj_page_header_REGROLL['FMULTEXAM'];
	$pdf->RFROM=strtoupper(substr($sublist_start,-4));
	$pdf->RTO=strtoupper(substr($sublist_end,-4));

	$canddettmp = "canddet";
	$candsumttmp = "candsum"; 
	$degreetmp = "degree";
	$subjecttmp = "subject";

	$get_total_absent = "select m.FSUBCODE, sum(case when m.fmarks = -2 then 1 else 0 end) as total_absent  
	from marks m inner join student stu on m.fdegree = stu.fdegree and m.FREGNO = stu.FREGNO
	inner join {$subjecttmp} s on m.fdegree = s.fdegree and m.fexamno = s.fexamno and m.FSUBCODE = s.FCSUBCODE
	where m.FDEGREE = '{$degree_code}' and m.FEXAMNO = '{$exam_code}'
	and m.FSUBCODE between '{$sublist_start}' and '{$sublist_end}'
	and m.fregno between '{$reg_start}' and '{$reg_end}'
	and m.FCOLLCODE = '{$college_code}' and IFNULL(stu.FDELETED,'F') <> 'T' 
	group by m.FSUBCODE order by m.FSUBCODE"; 


	$lobj_get_total_absent = $aobj_context->mobj_db->GetAll($get_total_absent);		
	
	foreach($lobj_get_total_absent as $key => $absentcnt)
	{
		$sub_wise_total_absent[$absentcnt['FSUBCODE']]=$absentcnt['total_absent'];
	}	
	
	if($FUNIVCODE == '030')
	{
		$sectionrage = "and stu.fsection between '{$sectionfrom}' and '{$sectionto}'";
		$order = "stu.fsection,";
		
	}
	else
	{
		$sectionrage = "and 1=1";
		$order = " ";
	}
	
	$ltable = '';

	$sys = "select * from s_sysdb where internal_code = '{$userid}'";
	$res = $aobj_context->mobj_db->GetRow($sys);
	$user_type = $res['user_type']; 
	$sysusr = $res['sysusr'];


	if($user_type =='40' || $user_type == '14' || $sysusr == '839')
	{
		$ltable = '';
	}
	else
	{
		$ltable = "inner join usersub us on m.fdegree = us.fdegree and instr(us.fsubcode,m.fsubcode) > 0 and m.fcollcode = us.fcollegecode and us.fuser = '{$userid}'";
	}

	if($user_type =='40' || $user_type == '14' || $sysusr == '839')
	{
		$ltable = '';
	}
	else
	{
		if($FUNIVCODE == '052')
			$ltablesc = "inner join usrsection sc on m.fdegree = sc.fdegree and sc.fsection = stu.fsection and m.fcollcode = sc.fcollcode and sc.fuserid = '{$userid}'";
		else
		$ltablesc = "";
	}
	
	if($percentage == 'T')
	{
		$percentvalue = "and (FMARKS/ifnull(s.FVALMAX,s.FSMAXMARKS)*100 < {$percent})";
	}else
	{
		$percentvalue = "";
	}

	if($FMULTEXAM != 'T')
	{

		if($FUNIVCODE == '050')
		{
			$frrez = "if(ifnull(c.ffreezed, '') = 'T' and ifnull(c.ffreezed2, '') = 'T','T','F') as ffreezed";
		}else
		{
			$frrez = "ifnull(c.ffreezed, '') as ffreezed";
		}
		$repeter = "";
		if(strtolower($iatype) == 'repeter')
			$repeter = "and m.fcreateuser = 'repeater'";

		$get_subject_data = " select m.FREGNO, SUBSTRING(stu.FNAME,1,36) as Name1,
		SUBSTRING(stu.FNAME,37) as Name2,
		concat(s.FSUBNAME,', ', FSSUBNAME) as sub_name, 
		if(ifnull(m.FMARKS,-1) >= 0,right(concat('0000',m.FMARKS),4),if(ifnull(m.FMARKS,-1) = -2,'ABSENT','Marks Not Entered')) as Marks, 
		m.FSUBCODE, ifnull(s.FVALMAX,s.FSMAXMARKS) as FSMAXMARKS, 
		{$frrez},
		stu.fsection,
		ifnull(c.ffreezed, '') as teachfreez 
		from marks m inner join student stu on m.fdegree = stu.fdegree and m.FREGNO=stu.FREGNO
		inner join {$subjecttmp} s on m.fdegree = s.fdegree and m.fexamno = s.fexamno and m.FSUBCODE = s.FCSUBCODE
		inner join collia c on m.fdegree = c.fdegree and c.fexamno = m.fexamno and c.fcollcode = m.FCOLLCODE
		and m.fsubcode = c.fsubcode
		{$ltable}
		{$ltablesc}
		where m.FDEGREE = '{$degree_code}' and m.FEXAMNO = '{$exam_code}' {$sectionrage}
		and m.FSUBCODE between '{$sublist_start}' and '{$sublist_end}'
		and m.fregno between '{$reg_start}' and '{$reg_end}'
		and m.FCOLLCODE = '{$college_code}' and c.FCOLLCODE = '{$college_code}' 
		and IFNULL(stu.FDELETED,'F') <> 'T' {$percentvalue} 
		{$repeter}
		group by {$order}FCSUBCODE, m.FREGNO order by {$order}FCSUBCODE, m.FREGNO"; 
			  
		
	}else
	{
		$get_subject_data = "select m.FREGNO, SUBSTRING(stu.FNAME,1,36) as Name1,
		SUBSTRING(stu.FNAME,37) as Name2,
		concat(s.FSUBNAME,', ', FSSUBNAME) as sub_name, 
		if(ifnull(m.FMARKS11,-1)>=0,m.FMARKS11,if(ifnull(m.FMARKS11,-1) =-2,'ABSENT','-')) as marks11,
		if(ifnull(m.FMARKS21,-1)>=0,m.FMARKS21,if(ifnull(m.FMARKS21,-1) =-2,'ABSENT','-')) as marks21,
		if(ifnull(m.FMARKS31,-1)>=0,m.FMARKS31,if(ifnull(m.FMARKS31,-1) =-2,'ABSENT','-')) as marks31,		
		m.FSUBCODE, ifnull(s.FVALMAX,s.FSMAXMARKS) as FSMAXMARKS, stu.fsection,
		ifnull(c.ffreezed, '') as teachfreez 
		from marks m inner join student stu on m.fdegree = stu.fdegree and m.FREGNO=stu.FREGNO
		inner join {$subjecttmp} s on m.fdegree = s.fdegree and m.fexamno = s.fexamno and m.FSUBCODE = s.FCSUBCODE
		inner join collia c on m.fdegree = c.fdegree and c.fexamno = m.fexamno and c.fcollcode = m.FCOLLCODE
		{$ltable}
		and m.fsubcode = c.fsubcode
		where m.FDEGREE = '{$degree_code}' and m.FEXAMNO = '{$exam_code}' {$sectionrage}
		and m.FSUBCODE between '{$sublist_start}' and '{$sublist_end}'
		and m.fregno between '{$reg_start}' and '{$reg_end}'
		and m.FCOLLCODE = '{$college_code}' and c.FCOLLCODE = '{$college_code}' 
		and IFNULL(stu.FDELETED,'F') <> 'T' {$percentvalue} 
		group by {$order}FCSUBCODE, m.FREGNO order by {$order}FCSUBCODE, m.FREGNO";
		
	}
	
	$lobj_get_subject_data = $aobj_context->mobj_db->GetAll($get_subject_data);		 
	$first=true;
	$sl_no=1;
	$k2=1;
	$pdf->SetFont('Times','',10);
	$oldsub = "";
	$oldsection = "";
	$newsub = "";
	$newsection = "";
	$pdf->page_absent_count=0;
	foreach($lobj_get_subject_data as $key => $value)
	{
		$newsub = $value['FSUBCODE'];
		$newsection = $value['fsection'];
		
		$tot_absent = $sub_wise_total_absent[$value['FSUBCODE']];
		if($pdf->GetY() > 240)
		{
			$new_y=$pdf->GetY();				
			$first=true;
		}
		if($FUNIVCODE == '030' || $FUNIVCODE == '052')
			$cond = "|| ('{$newsection}' != '{$oldsection}')";
		else
			$cond = true;

		if(($newsub != $oldsub) && $cond)
		{
			$first = true;
			$sl_no=1;
			if($oldsub != '' && $oldsection != '')
			{
				$pdf->Ln(2);
				if($FUNIVCODE == '018')
				{
					if($pdf->FFREEZE=="F")
					{
						$pdf->Cell(1500,3,'Marks Enterd By                           									Marks verified by          																								Marks Authorised by','0',1,'L');
						$pdf->Ln(2);
						$pdf->Cell(1500,3,'Signature                                 						     			Faculty Signature          																							Hod/Principal Signature','0',1,'L');
						$pdf->Ln(2);
						$pdf->Cell(1500,3,'Name                                      						     			 Faculty Name              		 																					 Hod/Principal Name','0',1,'L');
						$pdf->Ln(2);
						$pdf->Cell(1500,3,'Date                                      							     		   Date                       				      										 									Date  ','0',1,'L');
					}
					else
					{
						$pdf->SetFont('Arial','B',20);  
						$pdf->Cell(1500,3,'DRAFT COPY','0',1,'L');
						$pdf->SetFont('Times','',10);  
					}
					
				}
				else
				{
					//$pdf->Cell(50,3,"Date : {$pdf->date_1}",'0',1,'L');
					$pdf->Ln(2);
					$pdf->Cell(50,3,'Entered by','0',0,'L');
					$pdf->Cell(110,3,'Signature of the Teaching Faculty','0',1,'R');
					$pdf->Ln(2);
					if($FUNIVCODE == '038')
						$pdf->Cell(50,3,'Signature of the Dean','0',0,'L');
					else
						$pdf->Cell(50,3,'Signature of the HOD','0',0,'L');
					if($FUNIVCODE == '038')
						$pdf->Cell(110,3,'Signature of the Chairman','0',1,'R');
					else if($FUNIVCODE == '050')
						$pdf->Cell(110,3,'Signature of the Dean','0',1,'R');
					else
						$pdf->Cell(110,3,'Signature of the Principal','0',1,'R');
				}
			}
		}
		$oldsub = $newsub;

		$oldsection = $newsection;
		if($FMULTEXAM != 'T')
		{
			if($first)
			{
				if($k2 != 1)
				{
					$pdf->Ln(4);
					$pdf->SetFont('Times','B',10);
					$pdf->Cell(50,7,"Note : ** Marks not entered will be treated as Absent for results processing",'0',1,'L');
					$pdf->SetFont('Times','',10);
					$pdf->Cell(50,3,"Date : {$pdf->date_1}",'0',1,'L');
					$pdf->Ln(8);
					$pdf->Cell(50,3,'Entered by','0',0,'L');
					$pdf->Cell(110,3,'Signature of the Teaching Faculty','0',1,'R');
					$pdf->Ln(6);
					/* $pdf->Cell(50,3,'Signature of the HOD','0',0,'L');
					$pdf->Cell(110,3,'Signature of the Principal','0',1,'R'); */

					if($FUNIVCODE == '038')
						$pdf->Cell(50,3,'Signature of the Dean','0',0,'L');
					else
						$pdf->Cell(50,3,'Signature of the HOD','0',0,'L');
					if($FUNIVCODE == '038')
						$pdf->Cell(110,3,'Signature of the Chairman','0',1,'R');
					else if($FUNIVCODE == '050')
						$pdf->Cell(110,3,'Signature of the Dean','0',1,'R');
					else
						$pdf->Cell(110,3,'Signature of the Principal','0',1,'R');
			
					$pdf->SetY(-20); 
					$pdf->SetFont('Arial','',7);  
					
					$pdf->page_absent_count=0;			
					$pdf->Ln(5);
					$pdf->Cell(0,3,'Absent on this page : '.$pdf->page_absent_count.'       Total Absent : '.$tot_absent,'0',0,'L');	
					$pdf->Cell(0,3,'IP Address : '.$_SERVER['REMOTE_ADDR'].",  Date ".$pdf->date_1,'0',1,'R');
					
				}
				$pdf->SetMargins(25,10);
				$pdf->AddPage();
				$pdf->Rect(5,05,200,288);
				$pdf->SetMargins(10,10);
			
				$pdf->SetFont('Times','B',10);
				if($percentage == 'T')
					$text = "(Percentage less than {$percent})";
				else
					$text = '';

				$reptext = "";
				if(strtolower($iatype) == 'repeter')
				$reptext = " - Repeater";

				$pdf->Cell(0,6," Subjectwise I.A. Marks List {$text} {$reptext}",0,1,'C');
				// $pdf->Ln(1);
				$pdf->SetFont('Times','',11);
				$pdf->Cell(0,4,$fdegas.' :  '.$pdf->Degree_name,0,1,'C'); 
				// $pdf->Ln(1);
				$pdf->Cell(0,4,$pdf->Exam,0,1,'C'); 								
				$pdf->Cell(0,6,$fsubas.' :  '.$value['FSUBCODE'].' - '.$value['sub_name'].',  Max. Marks: '.$value['FSMAXMARKS'],0,1,'C'); 								
				$pdf->SetFont('Times','',11);
		
					
				if($value['ffreezed'] == 'T')
				{
					$pdf->Cell(0,5,' Status : MARKS FREEZED',0,1,'C');
					$pdf->Cell(0,5,' (READY TO SEND TO THE EXAM SECTION)',0,1,'C');
					$pdf->FFREEZE = "F";
				}
				else
				{
					if($value['teachfreez'] == 'T')
					{
						$pdf->Cell(0,5,' Status : MARKS FREEZING PENDING',0,1,'C');
						$pdf->Cell(0,5,' (TO BE SENT TO THE EXAM SECTION AFTER PRINCIPAL FREEZING)',0,1,'C');
						$pdf->FFREEZE = "P";
					}else
					{
						$pdf->Cell(0,5,' Status : MARKS FREEZING PENDING',0,1,'C');
						$pdf->Cell(0,5,' (TO BE SENT TO THE EXAM SECTION AFTER TEACHER AND PRINCIPAL FREEZING)',0,1,'C');
						$pdf->FFREEZE = "P";				
					}
				}

				$pdf->SetFont('Times','B',9);
				if($FUNIVCODE == '030' || $FUNIVCODE == '052')
				{	
					$pdf->SetFont('Times','B',10);
					$pdf->Cell(0,6,' Section : '.$value['fsection'] ,0,1,'L');
					$pdf->SetFont('Times','B',9); 
				}
				$pdf->Ln(2);
				$pdf->Cell(10,6,'Sl.No.','1',0,'C');
				$pdf->Cell(32,6,$pdf->REGROLL,'1',0,'C');
				$pdf->Cell(70,6,'Name','1',0,'C');

				if($fsnglent == 'T')
					$pdf->Cell(20,6,'Marks','1',0,'C');	
				else
				{	$pdf->Cell(20,6,'Marks 1','1',0,'C');
					$pdf->Cell(20,6,'Marks 2','1',0,'C');
				}
				$pdf->Cell(40,6,'Remarks ','1',1,'C');								
				$first=false;
			}
			
			$pdf->SetFont('Times','',9);	
			$pdf->Cell(10,6,$sl_no,'LBR',0,'C');
			$pdf->Cell(32,6,$value['FREGNO'],'LBR',0,'C');
			$pdf->Cell(70,6,$value['Name1'],'LBR',0,'L');			
			
			if($value['Marks']=='ABSENT')
			{			
				$pdf->page_absent_count++;
				if($fsnglent == 'T')
					$pdf->Cell(20,6,$value['Marks'],'LBR',0,'C');	
				else
				{	
					$pdf->Cell(20,6,'-','LBR',0,'C');
					$pdf->Cell(20,6,'-','LBR',0,'C');
				}
				// $pdf->Cell(20,6,'-','LBR',0,'C');				
				$pdf->Cell(40,6,$value['Marks'],'LBR',1,'L');				
			}
			else if($value['Marks']=='Marks Not Entered')
			{
				if($fsnglent == 'T')
					$pdf->Cell(20,6,'-','LBR',0,'C');
				else
				{	$pdf->Cell(20,6,'-','LBR',0,'C');
					$pdf->Cell(20,6,'-','LBR',0,'C');
				}
				// $pdf->Cell(20,6,'-','LBR',0,'C');
				$pdf->SetFont('Times','B',9);	
				$pdf->Cell(40,6,$value['Marks'].'**','LBR',1,'L');
				$pdf->SetFont('Times','',9);
			}
			else
			{
				$marksw = getNumber(floatval($value['Marks']));
				
				if(trim(strtolower($marksw)) == 'only')
				{	
					$marksw = "Zero Only";
				}	
				if($fsnglent == 'T')
					$pdf->Cell(20,6,$value['Marks'],'LBR',0,'C');	
				else
				{	if($value['Marks'] != "" && $value['Marks'] != " - "){
						$pdf->Cell(20,6,$value['Marks'],'LBR',0,'C');	
						$pdf->Cell(20,6,' - ','LBR',0,'C');
					}else{
						$pdf->Cell(20,6," - ",'LBR',0,'C');	
						$pdf->Cell(20,6,' - ','LBR',0,'C');
					}
				}
				
				// $pdf->Cell(20,6,$value['Marks'],'LBR',0,'C');	
				$pdf->Cell(40,6,$marksw,'LBR',1,'L');		
			}					

			if($value['Name2'] != '')
			{
				$pdf->Cell(10,6,' ','LRB',0,'C');
				$pdf->Cell(32,6,' ','LRB',0,'L');
				$pdf->Cell(70,6,$value['Name2'],'LBR',0,'L');
				$pdf->Cell(20,6,' ','LRB',0,'L');
				$pdf->Cell(40,6,' ','LRB',1,'L'); 
			}
	}
	else
	{
		if($first)
		{
			if($k2 != 1)
			{	 
		        $pdf->Ln(4);
		        $pdf->SetFont('Times','B',10);
		       // $pdf->Cell(50,7,"Note : ** Marks not entered will be treated as Absent for results processing",'0',1,'L');
		        $pdf->SetFont('Times','',10);
                $pdf->Cell(50,3,"Date : {$pdf->date_1}",'0',1,'L');
				$pdf->Ln(8);
				$pdf->Cell(50,3,'Entered by','0',0,'L');
				$pdf->Cell(110,3,'Signature of the Teaching Faculty','0',1,'R');
				$pdf->Ln(6);
				/* $pdf->Cell(50,3,'Signature of the HOD','0',0,'L');
				$pdf->Cell(110,3,'Signature of the Principal','0',1,'R'); */

				if($FUNIVCODE == '038')
					$pdf->Cell(50,3,'Signature of the Dean','0',0,'L');
				else
					$pdf->Cell(50,3,'Signature of the HOD','0',0,'L');
				if($FUNIVCODE == '038')
					$pdf->Cell(110,3,'Signature of the Chairman','0',1,'R');
				else
					$pdf->Cell(110,3,'Signature of the Principal','0',1,'R');
		
				$pdf->SetY(-20); 
				$pdf->SetFont('Arial','',7);  
				
				$pdf->page_absent_count=0;			
				$pdf->Ln(5);
				$pdf->Cell(0,3,'Absent on this page : '.$pdf->page_absent_count.'       Total Absent : '.$tot_absent,'0',0,'L');	
				$pdf->Cell(0,3,'IP Address : '.$_SERVER['REMOTE_ADDR'].",  Date ".$pdf->date_1,'0',1,'R');
				
			}

			$pdf->AddPage();
			// $pdf->Rect(5,05,200,288);
			// $pdf->SetMargins(28.35,10);
		
			$pdf->SetFont('Times','B',12);
			if($percentage == 'T')
				$text = "(Percentage less than {$percent})";
			else
				$text = '';

			$reptext = "";
			if(strtolower($iatype) == 'repeter')
			$reptext = " - Repeater";

			$pdf->Cell(0,6," Subjectwise I.A. Marks List {$text} {$reptext}",0,1,'C');
			
			$pdf->SetFont('Times','',11);
			$pdf->Cell(0,4,$fdegas.' :  '.$pdf->Degree_name,0,1,'C'); 
			
			$pdf->Cell(0,4,$pdf->Exam,0,1,'C'); 								
			$pdf->Cell(0,6,$fsubas.' :  '.$value['FSUBCODE'].' - '.$value['sub_name'].',  Max. Marks: '.$value['FSMAXMARKS'],0,1,'C'); 								
			$pdf->SetFont('Times','',11);
	
				
			// if($value['ffreezed'] == 'T')
			// {
				
			// 	$pdf->Cell(0,5,' Status : FREEZED (READY TO SEND TO UNIVERSITY)',0,1,'C'); 
			// 	$pdf->FFREEZE = "F";

			// }
			// else
			// {
			// 	if($value['teachfreez'] == 'T')
			// 	{
			// 		$pdf->Cell(0,5,' Status : FREEZING PENDING (TO BE SENT TO UNIVERSITY AFTER PRINCIPAL FREEZING)',0,1,'C'); 
			// 		$pdf->FFREEZE = "P";				

			// 	}else
			// 	{
			// 		$pdf->Cell(0,5,' Status : FREEZING PENDING (TO BE SENT TO UNIVERSITY AFTER TEACHER AND PRINCIPAL FREEZING)',0,1,'C'); 
			// 		$pdf->FFREEZE = "P";				
					
			// 	}
			// }
			$pdf->SetFont('Times','B',9);
			if($FUNIVCODE == '030' || $FUNIVCODE == '052')
			{	
				$pdf->SetFont('Times','B',10);
				$pdf->Cell(0,6,' Section : '.$value['fsection'] ,0,1,'L'); 
				$pdf->SetFont('Times','B',9);
			}
			$pdf->Ln(2);
			$pdf->Cell(10,6,'Sl.No.','1',0,'C');
			$pdf->Cell(20,6,$pdf->REGROLL,'1',0,'C');
			$pdf->Cell(70,6,'Name','1',0,'C');
			$pdf->Cell(20,6,'Test 1','1',0,'C');	
			$pdf->Cell(20,6,'Test 2','1',0,'C');	
			$pdf->Cell(20,6,'Test 3','1',1,'C');	
			$first=false;
		}
		
		$pdf->SetFont('Times','',9);	
		$pdf->Cell(10,6,$sl_no,'1',0,'C');
		$pdf->Cell(20,6,$value['FREGNO'],'1',0,'L');
		$pdf->Cell(70,6,$value['Name1'],'1',0,'L');			
		$pdf->Cell(20,6,$value['marks11'],'1',0,'C');					
		$pdf->Cell(20,6,$value['marks21'],'1',0,'C');
		$pdf->Cell(20,6,$value['marks31'],'1',1,'C');
	}

		$count++;
		$row_cnt++;
		++$sl_no;
		++$k2;
	}
	$pdf->Ln(4);
	if($FUNIVCODE == '018')
	{
		if($pdf->FFREEZE=="F")
		{
			$pdf->Cell(1500,3,'Marks Enterd By                           									Marks verified by          																								Marks Authorised by','0',1,'L');
			$pdf->Ln(2);
			$pdf->Cell(1500,3,'Signature                                 						     			Faculty Signature          																							Hod/Principal Signature','0',1,'L');
			$pdf->Ln(2);
			$pdf->Cell(1500,3,'Name                                      						     			 Faculty Name              		 																					 Hod/Principal Name','0',1,'L');
			$pdf->Ln(2);
			$pdf->Cell(1500,3,'Date                                      							     		   Date                       				      										 									Date  ','0',1,'L');
		}
		else
		{
			$pdf->SetFont('Arial','B',20);  
			$pdf->Cell(1500,3,'DRAFT COPY','0',1,'L');
			$pdf->SetFont('Times','',10);  
		}
		
	}
	else
	{
		$pdf->SetFont('Times','B',10);
		//$pdf->Cell(50,7,"Note : ** Marks not entered will be treated as Absent for results processing",'0',1,'L');
		$pdf->SetFont('Times','',10);
		$pdf->Cell(50,3,"Date : {$pdf->date_1}",'0',1,'L');
		$pdf->Ln(4);
		$pdf->Cell(50,3,'Entered by','0',0,'L');
		$pdf->Cell(110,3,'Signature of the Teaching Faculty','0',1,'R');
		$pdf->Ln(10);
		if($FUNIVCODE == '038')
			$pdf->Cell(50,3,'Signature of the Dean','0',0,'L');
		else
			$pdf->Cell(50,3,'Signature of the HOD','0',0,'L');
		if($FUNIVCODE == '038')
			$pdf->Cell(110,3,'Signature of the Chairman','0',1,'R');
		else if($FUNIVCODE == '050')
			$pdf->Cell(110,3,'Signature of the Dean','0',1,'R');
		else
			$pdf->Cell(110,3,'Signature of the Principal','0',1,'R');
	}
	$pdf->SetY(-20);    

	$pdf->SetFont('Arial','I',8);  
	
	$pdf->page_absent_count=0;			
	$pdf->Ln(5);
	$pdf->Cell(0,3,'Absent on this page : '.$pdf->page_absent_count.'       Total Absent : '.$tot_absent,'0',0,'L');	
	$pdf->Cell(0,3,'IP Address : '.$_SERVER['REMOTE_ADDR'].",  Date ".$pdf->date_1,'0',1,'R');

	$pdf->Output("report_Subject_wise.pdf","I");
	
}
?>