function Page_BeforeShow(&$sender)
{
$Page_BeforeShow = true;
$Component =& $sender;
$Container =& CCGetParentContainer($sender);
global $t_rep_lap_bpps_piutang2;
//Compatibility
//End Page_BeforeShow
global $Label1;
// -------------------------
// Write your own code here.
$doAction = CCGetFromGet('doAction', '');
if ($doAction != '') {
$p_vat_type_id = CCGetFromGet("p_vat_type_id", "");
$p_year_period_id = CCGetFromGet("p_year_period_id", "");
$tgl_penerimaan = CCGetFromGet("tgl_penerimaan", "");
$tgl_penerimaan_last = CCGetFromGet("tgl_penerimaan_last", "");
$year_code = CCGetFromGet("year_code", "");
$kode_wilayah = CCGetFromGet("kode_wilayah", "");
$tgl_penerimaan = "'" . $tgl_penerimaan . "'";
$tgl_penerimaan_last = "'" . $tgl_penerimaan_last . "'";
$kode_wilayah = "'" . $kode_wilayah . "'";
$date_start = str_replace("'", "", $year_code);
$year_date = $year_code;
$user = CCGetUserLogin();
$data = array();
$dbConn = new clsDBConnSIKP();
$jenis_laporan = CCGetFromGet("jenis_laporan", "all");
$query = "select to_char(active_date,'dd-mm-yyyy') as active_date2,*,\r\n\t\t\tcase \r\n\t\t\t\twhen payment_date is not null then to_char(payment_date,'dd-mm-yyyy')\r\n\t\t\t\telse ''\r\n\t\t\tend as payment_date \r\n\t\tfrom f_rep_bpps_piutang2new_mod_2_per_wilayah({$p_vat_type_id}, {$p_year_period_id}, {$tgl_penerimaan}, {$tgl_penerimaan_last}, 1,{$kode_wilayah}) a\r\n\t\tleft join t_cust_account x on a.npwpd = x.npwd \r\n\t\torder by kode_ayat, npwpd, masa_pajak";
//echo $query; exit;
$dbConn->query($query);
$tgl_penerimaan = str_replace("'", "", $tgl_penerimaan);
$tgl_penerimaan_last = str_replace("'", "", $tgl_penerimaan_last);
$tahun = date("Y", strtotime($tgl_penerimaan));
while ($dbConn->next_record()) {
$data[] = array("address" => $dbConn->f("address"), "company_name" => $dbConn->f("company_name"), "kode_jns_trans" => $dbConn->f("kode_jns_trans"), "jns_trans" => $dbConn->f("jns_trans"), "kode_jns_pajak" => $dbConn->f("kode_jns_pajak"), "kode_ayat" => $dbConn->f("kode_ayat"), "jns_pajak" => $dbConn->f("jns_pajak"), "jns_ayat" => $dbConn->f("jns_ayat"), "nama_ayat" => $dbConn->f("nama_ayat"), "no_kohir" => $dbConn->f("no_kohir"), "wp_name" => $dbConn->f("company_brand"), "wp_address_name" => $dbConn->f("brand_address_name"), "wp_address_no" => $dbConn->f("brand_address_no"), "active_date2" => $dbConn->f("active_date2"), "npwpd" => $dbConn->f("npwpd"), "jumlah_terima" => $dbConn->f("jumlah_terima"), "masa_pajak" => $dbConn->f("masa_pajak"), "kd_tap" => $dbConn->f("kd_tap"), "keterangan" => $dbConn->f("keterangan"), "payment_date" => $dbConn->f("payment_date"), "jam" => $dbConn->f("jam"));
}
}
if ($doAction == 'view_html2') {
$Label1->SetText(GetCetakHTML2($data));
}
if ($doAction == 'view_excel') {
GetCetakHTML2($data);
}
// -------------------------
//Close Page_BeforeShow @1-4BC230CD
return $Page_BeforeShow;
}
function Page_BeforeShow(&$sender)
{
$Page_BeforeShow = true;
$Component =& $sender;
$Container =& CCGetParentContainer($sender);
global $t_rep_lap_bpps_piutang2;
//Compatibility
//End Page_BeforeShow
global $Label1;
// -------------------------
// Write your own code here.
$doAction = CCGetFromGet('doAction');
if ($doAction == 'view_html') {
$p_vat_type_id = CCGetFromGet("p_vat_type_id", "");
$p_year_period_id = CCGetFromGet("p_year_period_id", "");
$tgl_penerimaan = CCGetFromGet("tgl_penerimaan", "");
$i_flag_setoran = CCGetFromGet("i_flag_setoran", "");
$tgl_penerimaan_last = CCGetFromGet("tgl_penerimaan_last", "");
$year_code = CCGetFromGet("year_code", "");
$tgl_penerimaan = "'" . $tgl_penerimaan . "'";
$tgl_penerimaan_last = "'" . $tgl_penerimaan_last . "'";
// $p_vat_type_id = 1;
// $p_year_period_id = 4;
// $tgl_penerimaan = '15-12-2013';
$date_start = str_replace("'", "", $year_code);
//$year_date = DateTime::createFromFormat('d-m-Y', $date_start)->format('Y');
$year_date = $year_code;
$user = CCGetUserLogin();
$data = array();
$dbConn = new clsDBConnSIKP();
$jenis_laporan = CCGetFromGet("jenis_laporan", "all");
if ($jenis_laporan == 'all') {
$query = "select *,trunc(payment_date) \r\n\t\t\tfrom f_rep_bpps_piutang2new_mod_1({$p_vat_type_id}, {$p_year_period_id}, {$tgl_penerimaan}, {$tgl_penerimaan_last}, {$i_flag_setoran}) \r\n\t\t\torder by kode_ayat, npwpd, masa_pajak";
//echo $query;
//exit;
} else {
if ($jenis_laporan == 'piutang') {
$border = $year_date - 1;
$query = "select *,trunc(payment_date) \r\n\t\t\tfrom f_rep_bpps_piutang2new_mod_1({$p_vat_type_id}, {$p_year_period_id}, {$tgl_penerimaan}, {$tgl_penerimaan_last}, {$i_flag_setoran}) rep\r\n\t\tWHERE\r\n\t\t\t(\tSUBSTRING(rep.masa_pajak,22,4) < {$year_date}\r\n\t\t\t\tAND \r\n\t\t\t\t(NOT (SUBSTRING(rep.masa_pajak,22,4) = {$border}\r\n\t\t\t\tAND SUBSTRING(rep.masa_pajak,19,2) = 12))\r\n\t\t\t)\r\n\t\t\tOR\r\n\t\t\t(\r\n\t\t\t\t(SUBSTRING(rep.masa_pajak,22,4) = {$year_date}\r\n\t\t\t\tAND SUBSTRING(rep.masa_pajak,19,2) = 12)\r\n\t\t\t)\r\n\t\t\tOR\r\n\t\t\t(\r\n\t\t\t\tSUBSTRING(rep.masa_pajak,22,4) > {$year_date}\r\n\t\t\t)\r\n\t\t\torder by kode_ayat, npwpd, masa_pajak";
//echo $query;
//exit;
} else {
if ($jenis_laporan == 'murni') {
$query = "select *,trunc(payment_date) \r\n\t\t\tfrom f_rep_bpps_piutang3new_mod_1({$p_vat_type_id}, {$p_year_period_id}, {$tgl_penerimaan}, {$tgl_penerimaan_last}, {$i_flag_setoran}) rep\r\n\t\tWHERE\r\n\t\t\tEXTRACT (YEAR FROM rep.settlement_date) = {$year_date}\r\n\t\t\torder by kode_ayat, npwpd, masa_pajak";
}
}
}
//die($query);
//echo $query;
//exit;
$dbConn->query($query);
$tgl_penerimaan = str_replace("'", "", $tgl_penerimaan);
$tgl_penerimaan_last = str_replace("'", "", $tgl_penerimaan_last);
$tahun = date("Y", strtotime($tgl_penerimaan));
while ($dbConn->next_record()) {
$data[] = array("address" => $dbConn->f("address"), "company_name" => $dbConn->f("company_name"), "kode_jns_trans" => $dbConn->f("kode_jns_trans"), "jns_trans" => $dbConn->f("jns_trans"), "kode_jns_pajak" => $dbConn->f("kode_jns_pajak"), "kode_ayat" => $dbConn->f("kode_ayat"), "jns_pajak" => $dbConn->f("jns_pajak"), "jns_ayat" => $dbConn->f("jns_ayat"), "nama_ayat" => $dbConn->f("nama_ayat"), "no_kohir" => $dbConn->f("no_kohir"), "wp_name" => $dbConn->f("wp_name"), "wp_address_name" => $dbConn->f("wp_address_name"), "wp_address_no" => $dbConn->f("wp_address_no"), "npwpd" => $dbConn->f("npwpd"), "jumlah_terima" => $dbConn->f("jumlah_terima"), "masa_pajak" => $dbConn->f("masa_pajak"), "kd_tap" => $dbConn->f("kd_tap"), "keterangan" => $dbConn->f("keterangan"), "payment_date" => $dbConn->f("payment_date"), "jam" => $dbConn->f("jam"));
}
$dbConn->close();
$Label1->SetText(GetCetakHTML($data));
} else {
if ($doAction == 'view_html2' || $doAction == 'view_html3') {
$p_vat_type_id = CCGetFromGet("p_vat_type_id", "");
$p_year_period_id = CCGetFromGet("p_year_period_id", "");
$tgl_penerimaan = CCGetFromGet("tgl_penerimaan", "");
$i_flag_setoran = CCGetFromGet("i_flag_setoran", "");
$tgl_penerimaan_last = CCGetFromGet("tgl_penerimaan_last", "");
$year_code = CCGetFromGet("year_code", "");
$tgl_penerimaan = "'" . $tgl_penerimaan . "'";
$tgl_penerimaan_last = "'" . $tgl_penerimaan_last . "'";
// $p_vat_type_id = 1;
// $p_year_period_id = 4;
// $tgl_penerimaan = '15-12-2013';
$date_start = str_replace("'", "", $year_code);
//$year_date = DateTime::createFromFormat('d-m-Y', $date_start)->format('Y');
$year_date = $year_code;
$user = CCGetUserLogin();
$data = array();
$dbConn = new clsDBConnSIKP();
$jenis_laporan = CCGetFromGet("jenis_laporan", "all");
/*
if($jenis_laporan == 'all'){
$query = "select *
from f_rep_bpps_list_distinct_semua($p_vat_type_id, $p_year_period_id, $tgl_penerimaan, $tgl_penerimaan_last) order by npwpd";
//echo $query;
//exit;
}else if($jenis_laporan == 'piutang'){
$border= $year_date-1;
$query = "select *
from f_rep_bpps_list_distinct_non_murni($p_vat_type_id, $p_year_period_id, $tgl_penerimaan, $tgl_penerimaan_last, $i_year_date) rep order by npwpd";
//echo $query;
//exit;
}else if($jenis_laporan == 'murni'){
$query = "select *
from f_rep_bpps_list_distinct_non_murni($p_vat_type_id, $p_year_period_id, $tgl_penerimaan, $tgl_penerimaan_last, $i_year_date) rep order by npwpd";
}*/
if ($jenis_laporan == 'all') {
$query = "select to_char(active_date,'dd-mm-yyyy') as active_date2,*,trunc(payment_date) \r\n\t\t\t\tfrom f_rep_bpps_piutang2new_mod_1({$p_vat_type_id}, {$p_year_period_id}, {$tgl_penerimaan}, {$tgl_penerimaan_last}, {$i_flag_setoran}) a\r\n\t\t\t\tleft join t_cust_account x on a.npwpd = x.npwd \r\n\t\t\t\torder by kode_ayat, npwpd, masa_pajak";
//echo $query;
//exit;
} else {
if ($jenis_laporan == 'piutang') {
$border = $year_date - 1;
$query = "select to_char(active_date,'dd-mm-yyyy') as active_date2,*,trunc(payment_date) \r\n\t\t\t\tfrom f_rep_bpps_piutang2new_mod_1({$p_vat_type_id}, {$p_year_period_id}, {$tgl_penerimaan}, {$tgl_penerimaan_last}, {$i_flag_setoran}) rep\r\n\t\t\t\tleft join t_cust_account x on rep.npwpd = x.npwd \r\n\t\t\tWHERE\r\n\t\t\t\t(\tSUBSTRING(rep.masa_pajak,22,4) < {$year_date}\r\n\t\t\t\t\tAND \r\n\t\t\t\t\t(NOT (SUBSTRING(rep.masa_pajak,22,4) = {$border}\r\n\t\t\t\t\tAND SUBSTRING(rep.masa_pajak,19,2) = 12))\r\n\t\t\t\t)\r\n\t\t\t\tOR\r\n\t\t\t\t(\r\n\t\t\t\t\t(SUBSTRING(rep.masa_pajak,22,4) = {$year_date}\r\n\t\t\t\t\tAND SUBSTRING(rep.masa_pajak,19,2) = 12)\r\n\t\t\t\t)\r\n\t\t\t\tOR\r\n\t\t\t\t(\r\n\t\t\t\t\tSUBSTRING(rep.masa_pajak,22,4) > {$year_date}\r\n\t\t\t\t)\r\n\t\t\t\torder by kode_ayat, npwpd, masa_pajak";
//echo $query;
//exit;
} else {
if ($jenis_laporan == 'murni') {
$query = "select to_char(active_date,'dd-mm-yyyy') as active_date2,*,trunc(payment_date) \r\n\t\t\t\tfrom f_rep_bpps_piutang3new_mod_1({$p_vat_type_id}, {$p_year_period_id}, {$tgl_penerimaan}, {$tgl_penerimaan_last}, {$i_flag_setoran}) a\r\n\t\t\t\tleft join t_cust_account x on a.npwpd = x.npwd \r\n\t\t\tWHERE\r\n\t\t\t\tEXTRACT (YEAR FROM a.settlement_date) = {$year_date}\r\n\t\t\t\torder by kode_ayat, npwpd, masa_pajak";
}
}
}
//die($query);
//echo $query;
//exit;
$dbConn->query($query);
$tgl_penerimaan = str_replace("'", "", $tgl_penerimaan);
$tgl_penerimaan_last = str_replace("'", "", $tgl_penerimaan_last);
$tahun = date("Y", strtotime($tgl_penerimaan));
while ($dbConn->next_record()) {
$data[] = array("address" => $dbConn->f("address"), "company_name" => $dbConn->f("company_name"), "kode_jns_trans" => $dbConn->f("kode_jns_trans"), "jns_trans" => $dbConn->f("jns_trans"), "kode_jns_pajak" => $dbConn->f("kode_jns_pajak"), "kode_ayat" => $dbConn->f("kode_ayat"), "jns_pajak" => $dbConn->f("jns_pajak"), "jns_ayat" => $dbConn->f("jns_ayat"), "nama_ayat" => $dbConn->f("nama_ayat"), "no_kohir" => $dbConn->f("no_kohir"), "wp_name" => $dbConn->f("company_brand"), "wp_address_name" => $dbConn->f("brand_address_name"), "wp_address_no" => $dbConn->f("brand_address_no"), "active_date2" => $dbConn->f("active_date2"), "npwpd" => $dbConn->f("npwpd"), "jumlah_terima" => $dbConn->f("jumlah_terima"), "masa_pajak" => $dbConn->f("masa_pajak"), "kd_tap" => $dbConn->f("kd_tap"), "keterangan" => $dbConn->f("keterangan"), "payment_date" => $dbConn->f("payment_date"), "jam" => $dbConn->f("jam"));
}
/*
while ($dbConn->next_record()) {
$data[]= array(
"npwpd" => $dbConn->f("npwpd"));
}
*/
$dbConn->close();
if ($doAction == 'view_html2') {
$Label1->SetText(GetCetakHTML2($data));
} else {
$Label1->SetText(GetCetakHTML3($data));
}
} else {
//do nothing
}
}
// -------------------------
//Close Page_BeforeShow @1-4BC230CD
return $Page_BeforeShow;
}
