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.140.195.142
<?php
function GenerateMarksEntrySubjectWisePendingReport($aobj_context)
{
session_start();
$aobj_context->mobj_db->SetFetchMode(ADODB_FETCH_ASSOC);
$college_code = $_SESSION['collcode'];
$FUNIVCODE = $_SESSION['FUNIVCODE'];
$degree = $aobj_context->mobj_data["degree"];
$subcode = $aobj_context->mobj_data["subcode"];
$examno = substr($subcode,0,1);
$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 from control";
$lobj_page_header_university = $aobj_context->mobj_db->GetRow($page_header_university);
$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}' and FEXAMNO='{$subcode}'";
$lobj_page_header_degree = $aobj_context->mobj_db->GetRow($page_header_degree);
$page_header_REGROLL = "select FREGROLL, fsnglent 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'];
$pdf->RFROM=strtoupper(substr($sublist_start,-4));
$pdf->RTO=strtoupper(substr($sublist_end,-4));
if($FUNIVCODE == '030')
{
$sectionrage = "and stu.fsection between '{$sectionfrom}' and '{$sectionto}'";
$order = "stu.fsection,";
}
else
{
$sectionrage = "and 1=1";
$order = " ";
}
$ltable = '';
if(strtoupper($_SESSION['usr']) =='ADMIN' || strtoupper($_SESSION['usr']) =='SUPER')
{
$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}'";
}
$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('000',m.FMARKS),3),if(ifnull(m.FMARKS,-1) = -2,'ABSENT','Marks Not Entered')) as Marks,
m.FSUBCODE, ifnull(s.FVALMAX,s.FSMAXMARKS) as FSMAXMARKS,stu.fsection
from marks m inner join student stu on m.fdegree = stu.fdegree and m.FREGNO=stu.FREGNO
inner join subject 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}'
and m.FSUBCODE between '{$subcode}' and '{$subcode}'
and m.fregno between '0' and 'z'
and m.FCOLLCODE = '{$college_code}' and c.FCOLLCODE = '{$college_code}'
and IFNULL(stu.FDELETED,'F') <> 'T' and m.FMARKS = '-1'
group by {$order}FCSUBCODE, m.FREGNO order by {$order}FCSUBCODE, m.FREGNO";
//var_dump('a');
$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)
$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
$pdf->Cell(110,3,'Signature of the Principal','0',1,'R');
}
}
}
$oldsub = $newsub;
$oldsection = $newsection;
if($first)
{
if($k2 != 1)
{
$pdf->Ln(4);
$pdf->SetY(-20);
$pdf->SetFont('Arial','',7);
$pdf->page_absent_count=0;
$pdf->Ln(5);
$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',10);
$pdf->Cell(0,6," Subjectwise I.A. Pending List",0,1,'C');
$pdf->Ln(1);
$pdf->SetFont('Times','',11);
$pdf->Cell(0,4,'Degree : '.$pdf->Degree_name,0,1,'C');
$pdf->Ln(1);
$pdf->Cell(0,4,$pdf->Exam,0,1,'C');
$pdf->Cell(0,6,' Subject : '.$value['FSUBCODE'].' - '.$value['sub_name'].', Max. Marks: '.$value['FSMAXMARKS'],0,1,'C');
$pdf->SetFont('Times','',11);
$pdf->SetFont('Times','B',9);
if($FUNIVCODE == '030')
$pdf->Cell(0,6,' Section : '.$value['fsection'] ,0,1,'L');
$pdf->Ln(2);
$pdf->Cell(10,6,'Sl.No.','1',0,'C');
$pdf->Cell(20,6,$pdf->REGROLL,'1',0,'C');
$pdf->Cell(90,6,'Name','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(20,6,$value['FREGNO'],'LBR',0,'L');
$pdf->Cell(90,6,$value['Name1'],'LBR',0,'L');
$pdf->Cell(40,6,' ','1',1,'C');
if($value['Name2'] != '')
{
$pdf->Cell(10,6,' ','LRB',0,'C');
$pdf->Cell(20,6,' ','LRB',0,'L');
$pdf->Cell(90,6,$value['Name2'],'LBR',0,'L');
$pdf->Cell(40,6,' ','LRB',1,'L');
}
$count++;
$row_cnt++;
++$sl_no;
++$k2;
}
$pdf->Ln(4);
$pdf->SetY(-20);
$pdf->SetFont('Arial','I',8);
$pdf->page_absent_count=0;
$pdf->Ln(5);
$pdf->Cell(0,3,'IP Address : '.$_SERVER['REMOTE_ADDR'].", Date ".$pdf->date_1,'0',1,'R');
$pdf->Output("report_Subject_wise_IA_Pending.pdf","D");
}
?>
|