function grafik_pembayaran_form_Button2_OnClick(&$sender)
{
    $grafik_pembayaran_form_Button2_OnClick = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $grafik_pembayaran_form;
    //Compatibility
    //End grafik_pembayaran_form_Button2_OnClick
    //Custom Code @71-2A29BDB7
    // -------------------------
    // Write your own code here.
    $app_user_name = $grafik_pembayaran_form->app_user_name->GetValue();
    $mobile_no = $grafik_pembayaran_form->mobile_no->GetValue();
    $message = $grafik_pembayaran_form->message->GetValue();
    $dbConn = new clsDBConnSIKP();
    $query = "INSERT INTO t_sms_outbox(\r\n\t\t\t            npwpd, mobile_no, message, is_sent, date_added, message_type)\r\n\t\t\t    VALUES ('" . $app_user_name . "', '" . $mobile_no . "', '" . $message . "', 'N', sysdate, 'SMS_BLAST')";
    $dbConn->query($query);
    echo '<script>
				alert ("SMS akan segera dikirim.");
				location.href="t_send_sms_to_app_user.php";
			</script>
			
			';
    return;
    // -------------------------
    //End Custom Code
    //Close grafik_pembayaran_form_Button2_OnClick @20-8AF2D859
    return $grafik_pembayaran_form_Button2_OnClick;
}
function GetSurvey($param_arr)
{
    $output = '';
    $dbConn = new clsDBConnSIKP();
    $query = "select * from t_vat_registration where npwpd = '" . $param_arr['npwpd'] . "'";
    //echo $query;exit;
    $dbConn->query($query);
    if ($dbConn->next_record()) {
        $data = $dbConn->Record;
        $query2 = "select * from p_survey_question WHERE p_survey_type_id=1 and sequence_no =1";
        $dbConn2 = new clsDBConnSIKP();
        $dbConn2->query($query2);
        if ($dbConn2->next_record()) {
            $data2 = $dbConn2->Record;
            echo '<script language="javascript">';
            echo 'location.href="t_survey_kepuasan_pelanggan_pendaftaran_pertanyaan.php?t_vat_registration_id=' . $data["t_vat_registration_id"] . '&p_survey_question_id=' . $data2["p_survey_question_id"] . '"';
            echo '</script>';
        } else {
            echo '<script language="javascript">';
            echo 'alert("Pertanyaan tidak ditemukan.")';
            echo '</script>';
        }
    } else {
        $output = '<table class="Record" cellspacing="0" cellpadding="5" style="font-size:15px;padding-left:15px;" border="0">
		<tr>
			<td colspan="3">NPWPD : <b>' . $param_arr['npwpd'] . '</b> <b style="color:#FF0000;">TIDAK DITEMUKAN</b></td>
		</tr>
		</table>';
    }
    $dbConn->close();
    return $output;
}
function t_vat_reg_dtl_restaurantForm_BeforeSelect(&$sender)
{
    $t_vat_reg_dtl_restaurantForm_BeforeSelect = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_vat_reg_dtl_restaurantForm;
    //Compatibility
    //End t_vat_reg_dtl_restaurantForm_BeforeSelect
    //Custom Code @819-2A29BDB7
    // -------------------------
    // Write your own code here.
    $idVat = $t_vat_reg_dtl_restaurantForm->t_cust_account_id->GetValue();
    $dbConn = new clsDBConnSIKP();
    $sql = "select a.p_vat_type_dtl_id, b.vat_code as rest_service_type_code " . "from t_cust_account a, p_vat_type_dtl b " . "where a.p_vat_type_dtl_id=b.p_vat_type_dtl_id and a.t_cust_account_id = " . $idVat;
    $dbConn->query($sql);
    while ($dbConn->next_record()) {
        $restId = $dbConn->f("p_vat_type_dtl_id");
        $restCode = $dbConn->f("rest_service_type_code");
    }
    $t_vat_reg_dtl_restaurantForm->service_type_desc->SetValue($restCode);
    $t_vat_reg_dtl_restaurantForm->p_rest_service_type_id->SetValue($restId);
    // -------------------------
    //End Custom Code
    //Close t_vat_reg_dtl_restaurantForm_BeforeSelect @94-6EBC2391
    return $t_vat_reg_dtl_restaurantForm_BeforeSelect;
}
function GetSurvey($param_arr)
{
    $output = '';
    $dbConn = new clsDBConnSIKP();
    $query = "select * from p_survey_question WHERE p_survey_question_id=" . $param_arr['p_survey_question_id'];
    //echo $query;exit;
    $dbConn->query($query);
    if ($dbConn->next_record()) {
        $data = $dbConn->Record;
        $query2 = "select * from p_survey_question WHERE p_survey_type_id=" . $data["p_survey_type_id"] . " and sequence_no =" . ($data["sequence_no"] + 1);
        $dbConn2 = new clsDBConnSIKP();
        $dbConn2->query($query2);
        if ($dbConn2->next_record()) {
            $data2 = $dbConn2->Record;
            echo '<script language="javascript">';
            echo 'location.href="t_survey_kepuasan_pelanggan_pendaftaran_pertanyaan.php?t_vat_registration_id=' . $data["t_vat_registration_id"] . '&p_survey_question_id=' . $data2["p_survey_question_id"] . '"';
            echo '</script>';
        } else {
            echo '<script language="javascript">';
            echo 'location.href="t_survey_kepuasan_pelanggan_pendaftaran_terima_kasih.php?t_vat_registration_id=' . $data["t_vat_registration_id"] . '&p_survey_question_id=' . $data2["p_survey_question_id"] . '"';
            echo '</script>';
        }
    } else {
        echo '<script language="javascript">';
        echo 'alert("Pertanyaan tidak ditemukan.")';
        echo '</script>';
    }
    $dbConn->close();
    return $output;
}
function t_vat_registrationForm_Button4_OnClick(&$sender)
{
    $t_vat_registrationForm_Button4_OnClick = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_vat_registrationForm;
    //Compatibility
    //End t_vat_registrationForm_Button4_OnClick
    //Custom Code @909-2A29BDB7
    // -------------------------
    // Write your own code here.
    $CusId = CCGetFromGet("CURR_DOC_ID", "");
    $dbConn = new clsDBConnSIKP();
    $sql = "select f_gen_npwpd(" . $CusId . ")as npwpd from dual";
    $dbConn->query($sql);
    while ($dbConn->next_record()) {
        $val = $dbConn->f("npwpd");
    }
    $t_vat_registrationForm->npwpd->SetValue($val);
    return;
    // -------------------------
    //End Custom Code
    //Close t_vat_registrationForm_Button4_OnClick @908-D8012444
    return $t_vat_registrationForm_Button4_OnClick;
}
function LOV_Button1_OnClick(&$sender)
{
    $LOV_Button1_OnClick = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $LOV;
    //Compatibility
    //End LOV_Button1_OnClick
    //Custom Code @24-2A29BDB7
    // -------------------------
    // Write your own code here.
    $t_bphtb_registration_id = CCGetFromGet("t_bphtb_registration_id");
    $alasan = $LOV->alasan->GetValue();
    $user = CCGetUserLogin();
    $dbConn = new clsDBConnSIKP();
    if ($t_bphtb_registration_id != "" && $alasan != "" && $user != "") {
        $query = "select f_delete_bphtb from \r\n\t\t\tf_delete_bphtb(" . $t_bphtb_registration_id . ",'" . $alasan . "','" . $user . "')";
        //echo $query;exit;
        $dbConn->query($query);
        $dbConn->next_record();
        $result = $dbConn->f("f_delete_bphtb");
    } else {
        $result = "id bphtb, alasan atau user login tidak boleh kosong";
    }
    echo "<script> \r\n\t\talert('" . $result . "');\r\n\t\twindow.opener.location.reload();\r\n\t\twindow.close();\r\n\t</script>";
    exit;
    // -------------------------
    //End Custom Code
    //Close LOV_Button1_OnClick @16-408DE5C8
    return $LOV_Button1_OnClick;
}
function t_vat_setllementGrid_BeforeShowRow(&$sender)
{
    $t_vat_setllementGrid_BeforeShowRow = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_vat_setllementGrid;
    //Compatibility
    //End t_vat_setllementGrid_BeforeShowRow
    //Set Row Style @315-982C9472
    $styles = array("Row", "AltRow");
    if (count($styles)) {
        $Style = $styles[($Component->RowNumber - 1) % count($styles)];
        if (strlen($Style) && !strpos($Style, "=")) {
            $Style = (strpos($Style, ":") ? 'style="' : 'class="') . $Style . '"';
        }
        $Component->Attributes->SetValue("rowStyle", $Style);
    }
    //End Set Row Style
    // Start Bdr
    global $t_vat_setllementForm;
    global $selected_id;
    global $add_flag;
    global $is_show_form;
    if ($selected_id < 0 && $add_flag != "ADD") {
        $selected_id = $Component->DataSource->t_vat_setllement_id->GetValue();
        $t_vat_setllementForm->DataSource->Parameters["urlt_vat_setllement_id"] = $selected_id;
        $t_vat_setllementForm->DataSource->Prepare();
        $t_vat_setllementForm->EditMode = $t_vat_setllementForm->DataSource->AllParametersSet;
    }
    $flag_delete = CCGetFromGet("flag_delete", "");
    if ($flag_delete == "true") {
        $selected_id = CCGetFromGet("t_vat_setllement_id", $selected_id);
        $dbConn = new clsDBConnSIKP();
        $dbConn->query("select f_del_vat_setllement({$selected_id}, 0, 'x')");
        $dbConn->close();
        header("Location: t_vat_setllement_edit_ro.php");
    }
    // End Bdr
    $styles = array("Row", "AltRow");
    // Start Bdr
    $img_radio = "<img border=\"0\" src=\"../images/radio.gif\">";
    $Style = $styles[0];
    if ($Component->DataSource->t_vat_setllement_id->GetValue() == $selected_id) {
        $img_radio = "<img border=\"0\" src=\"../images/radio_s.gif\">";
        $Style = $styles[1];
        $is_show_form = 1;
    }
    // End Bdr
    if (count($styles)) {
        //$Style = $styles[($Component->RowNumber - 1) % count($styles)];
        if (strlen($Style) && !strpos($Style, "=")) {
            $Style = (strpos($Style, ":") ? 'style="' : 'class="') . $Style . '"';
        }
        $Component->Attributes->SetValue("rowStyle", $Style);
    }
    $Component->DLink->SetValue($img_radio);
    // Bdr
    //Close t_vat_setllementGrid_BeforeShowRow @2-CAEE8B40
    return $t_vat_setllementGrid_BeforeShowRow;
}
function LOV_BeforeShow(&$sender)
{
    $LOV_BeforeShow = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $LOV;
    //Compatibility
    //End LOV_BeforeShow
    //Custom Code @8-2A29BDB7
    // -------------------------
    // Write your own code here.
    $i_vat_setllement = CCGetFromGet('i_vat_setllement_id');
    $ubah = CCGetFromGet('ubah');
    $in_flag_numeric = CCGetFromGet('in_flag_numeric');
    $is_desc = CCGetFromGet('is_desc');
    if ($ubah == 'T') {
        $user = CCGetUserLogin();
        $data = array();
        $dbConn = new clsDBConnSIKP();
        $query = "select f_update_increasing_amt({$i_vat_setllement},{$in_flag_numeric},'{$is_desc}','{$user}') as msg";
        $dbConn->query($query);
        while ($dbConn->next_record()) {
            echo "<script> \r\n\t\t\talert('" . $dbConn->f('msg') . "');\r\n\t\t\twindow.close();\r\n\t\t</script>";
            exit;
        }
    }
    // -------------------------
    //End Custom Code
    //Close LOV_BeforeShow @3-91C2A156
    return $LOV_BeforeShow;
}
function deleteAll($t_vat_registration)
{
    $dbConn = new clsDBConnSIKP();
    $sql = "delete from t_license_letter where t_vat_registration_id=" . $t_vat_registration . ";" . "delete from t_vat_reg_employee where t_vat_registration_id=" . $t_vat_registration . ";" . "delete from t_vat_reg_dtl_restaurant where t_vat_registration_id=" . $t_vat_registration . ";" . "delete from t_vat_reg_dtl_entertaintment where t_vat_registration_id=" . $t_vat_registration . ";" . "delete from t_vat_reg_dtl_parking where t_vat_registration_id=" . $t_vat_registration . ";" . "delete from t_vat_reg_dtl_hotel where t_vat_registration_id=" . $t_vat_registration . ";" . "delete from t_vat_registration where t_vat_registration_id=" . $t_vat_registration . ";";
    if ($dbConn->query($sql)) {
    } else {
        //do something here
    }
}
function t_vat_setllementGrid_cetak_sptpd_BeforeShow(&$sender)
{
    $t_vat_setllementGrid_cetak_sptpd_BeforeShow = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_vat_setllementGrid;
    //Compatibility
    //End t_vat_setllementGrid_cetak_sptpd_BeforeShow
    //Custom Code @301-2A29BDB7
    // -------------------------
    // Write your own code here.
    // -------------------------
    //End Custom Code
    //DEL  // -------------------------
    //DEL      // Write your own code here.
    $nilai = $t_vat_setllementGrid->t_vat_setllement_id->GetValue();
    $dbConn = new clsDBConnSIKP();
    $sql = "select count(*)as ada from t_vat_penalty where t_vat_setllement_id = " . $nilai;
    $dbConn->query($sql);
    $dbConn->next_record();
    $ada = $dbConn->f("ada");
    $dbConn->close();
    if ($ada > 0) {
        //$nilai2 = $t_vat_setllementGrid->p_vat_type_id->GetValue();
        $t_vat_setllementGrid->cetak_sptpd->SetValue("<input type='button' value='CETAK' style='WIDTH: 57px; HEIGHT: 22px' class='Button' onclick=\"" . "cetakStpd(" . $nilai . ",'tgl_tap')\">");
        $t_vat_setllementGrid->cetak_sptpd2->SetValue("<input type='button' value='CETAK' style='WIDTH: 57px; HEIGHT: 22px' class='Button' onclick=\"" . "cetakStpd(" . $nilai . ",'tgl_bayar')\">");
    } else {
        $t_vat_setllementGrid->cetak_sptpd->SetValue("");
        $t_vat_setllementGrid->cetak_sptpd2->SetValue("");
    }
    /*
    $action_button = CCGetFromGet("action_button","");
    $action_button2 = CCGetFromGet("action_button2","");
    if($action_button=='flag_payment' && $action_button2!='cetak_register'){
    	$dbConn = new clsDBConnSIKP();
    	$sql="select sikp.f_payment_manual(".CCGetFromGet('t_customer_order_id').",'".CCGetSession('UserLogin')."')";
    	$dbConn->query($sql);
    	$dbConn->next_record();
    	echo "
    	<script>
    	alert('".$dbConn->f('f_payment_manual')."');
    	</script>
    	";
    	$dbConn->close();	
    }else if($action_button2=='cetak_register'){
    	$dbConn = new clsDBConnSIKP();
    	$sql="select sikp.f_print_register(".CCGetFromGet('t_customer_order_id').",'".CCGetSession('UserLogin')."')";
    	$dbConn->query($sql);
    	$dbConn->next_record();
    	print_laporan($dbConn->f('f_print_register'));
    	$dbConn->close();
    }
    */
    // -------------------------
    //Close t_vat_setllementGrid_cetak_sptpd_BeforeShow @300-BF0BB7F2
    return $t_vat_setllementGrid_cetak_sptpd_BeforeShow;
}
function GetCetakHTML($param_arr)
{
    $output = '';
    $DBConn = new clsDBConnSIKP();
    $SQL = "select replace(replace(f_monitor_tipro_daftar_v2(1," . $param_arr['nilai'] . "," . $param_arr['p_finance_period_id'] . "," . $param_arr['p_vat_type_id'] . "),'(\"',''),'\")','') from dual";
    //die($SQL);
    $DBConn->query($SQL);
    return create_table_grid($DBConn, "INFORMASI MONITORING", "", $qs, "Y", $arrJml, "2");
}
function GetCetakHTML($param_arr)
{
    $output = '';
    $dbConn = new clsDBConnSIKP();
    $query = "select * from t_payment_receipt where npwd = '" . $param_arr['npwpd'] . "'\r\n\t\tORDER BY payment_date desc limit 1";
    //echo $query;exit;
    $dbConn->query($query);
    if ($dbConn->next_record()) {
        $data = $dbConn->Record;
        $output = '';
        $output .= '<table class="grid-table" cellspacing="0" cellpadding="0" border="0"> 
	                  <tr>
	                    <td class="HeaderLeft"><img border="0" alt="" src="../Styles/sikp/Images/Spacer.gif"></td> 
	                    <td class="th"><strong>INFORMASI PEMBAYARAN</strong></td> 
	                    <td class="HeaderRight"><img border="0" alt="" src="../Styles/sikp/Images/Spacer.gif"></td>
	                  </tr>
	                </table>';
        $output .= '<table class="Record" cellspacing="0" cellpadding="5" style="font-size:15px;padding-left:15px;" border="0">
				<tr> 
					<td colspan="3">Pembayaran Terakhir untuk NPWPD : <b>' . $param_arr['npwpd'] . '</td>
				</tr>
				<tr>
					<td colspan="3">&nbsp;</td>
				</tr>
				<tr>
					<td colspan="3"><u><b>INFO DETAIL : </b></u></td>
				</tr>';
        $output .= '<tr>';
        $output .= '<td width="150"> NPWPD';
        $output .= '</td>';
        $output .= '<td> : ' . $data['npwd'];
        $output .= '</td>';
        $output .= '</tr>';
        $output .= '<tr>';
        $output .= '<td> Periode Pajak';
        $output .= '</td>';
        $output .= '<td> : ' . $data['finance_period_code'];
        $output .= '</td>';
        $output .= '</tr>';
        $output .= '<tr>';
        $output .= '<td> Total Pajak';
        $output .= '</td>';
        $output .= '<td> : Rp. ' . number_format($data['payment_vat_amount'], 2, ',', '.');
        $output .= '</td>';
        $output .= '</tr>';
        $output .= '</table>';
    } else {
        $output = '<table class="Record" cellspacing="0" cellpadding="5" style="font-size:15px;padding-left:15px;" border="0">
		<tr>
			<td colspan="3">NPWPD : <b>' . $param_arr['npwpd'] . '</b> <b style="color:#FF0000;">TIDAK DITEMUKAN</b></td>
		</tr>
		</table>';
    }
    $dbConn->close();
    return $output;
}
function t_ppatForm_Button_Insert_OnClick(&$sender)
{
    $t_ppatForm_Button_Insert_OnClick = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_ppatForm;
    //Compatibility
    //End t_ppatForm_Button_Insert_OnClick
    //Custom Code @374-2A29BDB7
    // -------------------------
    // Write your own code here.
    $dbConn = new clsDBConnSIKP();
    $company_brand = $t_ppatForm->company_brand->GetValue();
    $p_rqst_type_id = $t_ppatForm->p_rqst_type_id->GetValue();
    $p_vat_type_dtl_id = $t_ppatForm->p_vat_type_dtl_id->GetValue();
    $brand_address_name = $t_ppatForm->brand_address_name->GetValue();
    $brand_address_no = $t_ppatForm->brand_address_no->GetValue();
    $brand_address_rt = $t_ppatForm->brand_address_rt->GetValue();
    $brand_address_rw = $t_ppatForm->brand_address_rw->GetValue();
    $company_additional_addr = $t_ppatForm->company_additional_addr->GetValue();
    $brand_p_region_id = $t_ppatForm->brand_p_region_id->GetValue();
    $brand_p_region_id_kec = $t_ppatForm->brand_p_region_id_kec->GetValue();
    $brand_p_region_id_kel = $t_ppatForm->brand_p_region_id_kel->GetValue();
    $brand_phone_no = $t_ppatForm->brand_phone_no->GetValue();
    $brand_mobile_no = $t_ppatForm->brand_mobile_no->GetValue();
    $brand_fax_no = $t_ppatForm->brand_fax_no->GetValue();
    $brand_zip_code = $t_ppatForm->brand_zip_code->GetValue();
    $user = $t_ppatForm->created_by->GetValue();
    $sql = "select * from f_insert_vat_reg_npwpd_jabatan(\r\n\t\t\t'{$user}', \r\n\t\t\t'{$company_brand}',\r\n\t\t\t'{$company_additional_addr}',\r\n\t\t\t'{$brand_address_name}',\r\n\t\t\t'{$brand_address_no}',\r\n\t\t\t'{$brand_address_rt}',\r\n\t\t\t'{$brand_address_rw}',\r\n\t\t\t{$brand_p_region_id_kel},\r\n\t\t\t{$brand_p_region_id_kec},\r\n\t\t\t{$brand_p_region_id},\r\n\t\t\t'{$brand_phone_no}',\r\n\t\t\t'{$brand_mobile_no}',\r\n\t\t\t'{$brand_fax_no}',\r\n\t\t\t'{$brand_zip_code}',\r\n\t\t\t{$p_rqst_type_id},\r\n\t\t\t{$p_vat_type_dtl_id}\r\n\t\t\t)";
    //die($sql);
    $dbConn->query($sql);
    $dbConn->next_record();
    $cust_id = $dbConn->f("v_customer_order_id");
    $mess = $dbConn->f("o_result_msg");
    if ($cust_id != 0 && $cust_id != "") {
        echo '<script language="javascript">';
        echo "window.open('../report/cetak_surat_pengukuhan_npwpd_jabatan.php?CURR_DOC_ID={$cust_id}', \r\n\t\t\t\t'pengukuhan', 'height=,width=,left=0,top=0');";
        echo "window.open('../report/cetak_form_pemutakhiran_data_npwpd_jabatan.php?t_customer_order_id={$cust_id}', \r\n\t\t\t\t'pemutakhiran', 'height=,width=,left=0,top=0');";
        echo '</script>';
    } else {
        $mess = str_replace('"', '', $mess);
        echo '<script language="javascript">';
        echo 'alert("' . $mess . '");';
        echo '</script>';
    }
    echo '<script language="javascript">';
    echo "location.href='t_vat_registration_npwpd_jabatan.php';";
    echo '</script>';
    return;
    // -------------------------
    //End Custom Code
    //Close t_ppatForm_Button_Insert_OnClick @24-EE087F7F
    return $t_ppatForm_Button_Insert_OnClick;
}
function create_info_ama()
{
    $DBConn = new clsDBConnSIKP();
    $nilai = CCGetFromGet("nilai", "");
    if (empty($nilai)) {
    } else {
        $SQL = "select replace(replace(f_monitor_tipro_daftar(1," . $nilai . "),'(\"',''),'\")','') from dual";
        //die($SQL);
        $DBConn->query($SQL);
        return create_table_grid($DBConn, "INFORMASI MONITORING", "", $qs, "Y", $arrJml, "2");
    }
}
 function PageCetak($data)
 {
     $this->AddPage();
     // $this->Cell(0, $this->height, $data["f_bphtb_receipt_duplicate"], 0, 0, "L");
     $exp_data = explode("\n", $data["f_bphtb_receipt_duplicate"]);
     //get no kuitansi
     $exp_data1 = explode(":", $exp_data[0]);
     $encImageData = '';
     $dbConn = new clsDBConnSIKP();
     $query = "select f_encrypt_str('" . trim($exp_data1[1]) . "') AS enc_data";
     $dbConn->query($query);
     while ($dbConn->next_record()) {
         $encImageData = $dbConn->f("enc_data");
     }
     $dbConn->close();
     if (empty($encImageData)) {
         $encImageData = "EmptyData";
     }
     $this->Image('../images/logo_pemda.png', 37, 13, 25, 25);
     $this->Image('http://' . $_SERVER['HTTP_HOST'] . '/mpd/include/qrcode/generate-qr.php?param=' . $encImageData, 179, 13, 25, 25, 'PNG');
     //$this->Image('http://172.16.20.2:81/mpd/include/qrcode/generate-qr.php?param='.encImageData,179,13,25,25,'PNG');
     $this->SetFont('Arial', '', 11);
     $this->Cell(40, $this->height, "", "", 0, 'L');
     $this->Cell(101, $this->height, "PEMERINTAH KOTA BANDUNG", "", 0, 'C');
     $this->Cell(40, $this->height, "", "", 0, 'L');
     $this->Ln();
     $this->Cell(40, $this->height, "", "", 0, 'L');
     $this->Cell(101, $this->height, "DINAS PELAYANAN PAJAK", "", 0, 'C');
     $this->Cell(40, $this->height, "", "", 0, 'L');
     $this->Ln();
     $this->Cell(40, $this->height, "", "", 0, 'L');
     $this->Cell(101, $this->height, "Jalan Wastukancana No 2", "", 0, 'C');
     $this->Cell(40, $this->height, "", "", 0, 'L');
     $this->Ln();
     $this->Cell(40, $this->height, "", "", 0, 'L');
     $this->Cell(101, $this->height, "Telp. 022 4235052 - Bandung", "", 0, 'C');
     $this->Cell(40, $this->height, "", "", 0, 'L');
     $this->Ln();
     $this->SetFont('Arial', 'B', 14);
     $this->Cell(40, $this->height + 7, "", "B", 0, 'L');
     $this->Cell(101, $this->height + 7, "Bukti Pembayaran Pajak BPHTB", "B", 0, 'C');
     $this->Cell(40, $this->height + 7, "", "B", 0, 'L');
     $this->Ln(5);
     $this->Ln();
     $this->SetFont('Courier', '', 10);
     $data = explode("\n", $data["f_bphtb_receipt_duplicate"]);
     foreach ($data as $datum) {
         $this->Cell(241.3, $this->height, $datum, 0, 0, "L");
         $this->Ln();
     }
     $this->Cell(180, $this->height, "", "B", 0, "C");
 }
function t_vat_setllementForm_Button1_OnClick(&$sender)
{
    $t_vat_setllementForm_Button1_OnClick = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_vat_setllementForm;
    //Compatibility
    //End t_vat_setllementForm_Button1_OnClick
    //Custom Code @165-2A29BDB7
    // -------------------------
    // Write your own code here.
    // -------------------------
    //End Custom Code
    // -------------------------
    // Write your own code here.
    $dbConn = new clsDBConnSIKP();
    $cusAccId = $t_vat_setllementForm->t_cust_account_id->GetValue();
    $User = CCGetUserLogin();
    $p_account_status_id = $t_vat_setllementForm->p_account_status_id->GetValue();
    $reason_status_id = $t_vat_setllementForm->reason_status_id->GetValue();
    $reason_description = $t_vat_setllementForm->reason_description->GetValue();
    $errorMsg = '';
    //new fix
    if (!isset($p_vat_type_dtl_cls_id) || $p_vat_type_dtl_cls_id == '') {
        $p_vat_type_dtl_cls_id = 'NULL';
    }
    if (empty($kamar)) {
        $kamar = 0;
    }
    //cek alasan lainnya
    if ($reason_status_id == 4 and !isset($reason_description) || $reason_description == '') {
        echo "<script> \r\n\t\t\talert('Keterangan harus diisi jika memilih alasan Lainnya');\r\n\t\t</script>";
    } else {
        $sql = "select * from f_entry_mutasi_status_wp(" . $cusAccId . ",15," . $p_account_status_id . "," . $reason_status_id . ",'" . $reason_description . "','" . $User . "')";
        //echo $sql;
        //die($sql);
        $dbConn->query($sql);
        $dbConn->next_record();
        $cust_id = $dbConn->f("o_cust_order_id");
        $mess = $dbConn->f("o_mess");
        //modified by wiliam
        echo "<script> \r\n\t\t\talert('" . $mess . "');\r\n\t\t\twindow.opener.location.reload();\r\n\t\t\twindow.close();\r\n\t\t</script>";
        exit;
    }
    // -------------------------
    //Close t_vat_setllementForm_Button1_OnClick @164-6DBB2532
    //return $t_vat_setllementForm_Button1_OnClick;
}
function Page_BeforeShow(&$sender)
{
    $Page_BeforeShow = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_bphtb_registration_list_update;
    //Compatibility
    //End Page_BeforeShow
    //Custom Code @703-2A29BDB7
    // -------------------------
    // Write your own code here.
    if (CCGetFromGet("submit_bphtb") == 1) {
        $dbConn = new clsDBConnSIKP();
        $sql = "select count(*) as jml from t_product_order_control where doc_id = " . CCGetFromGet('t_customer_order_id') . "and and p_w_doc_type_id = 505";
        $dbConn->query($sql);
        $jumlah_data;
        if ($dbConn->next_record()) {
            $jumlah_data = $dbConn->f('jml');
        }
        if ($jumlah_data == 0) {
            $sql = "select sikp.f_first_submit_engine(505," . CCGetFromGet('t_customer_order_id') . ",'" . CCGetSession('UserLogin') . "')";
            $dbConn->query($sql);
        } else {
            echo "\r\n\t\t\t\t<script>\r\n\t\t\t\t\talert('Data BPHTB Sudah Tersubmit');\r\n\t\t\t\t</script>\r\n\t\t\t";
            //exit;
        }
        $dbConn->close();
        header('Location:t_bphtb_registration_list.php');
        exit;
    }
    // -------------------------
    //End Custom Code
    //Close Page_BeforeShow @1-4BC230CD
    return $Page_BeforeShow;
}
function t_vat_setllementGrid_cetak_sptpd_BeforeShow(&$sender)
{
    $t_vat_setllementGrid_cetak_sptpd_BeforeShow = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_vat_setllementGrid;
    //Compatibility
    //End t_vat_setllementGrid_cetak_sptpd_BeforeShow
    // -------------------------
    // Write your own code here.
    $pajak = $t_vat_setllementGrid->total_vat_amount->GetValue();
    $denda = $t_vat_setllementGrid->total_penalty_amount->GetValue();
    $totaltotal = $pajak + $denda;
    $t_vat_setllementGrid->total_total->SetValue($totaltotal);
    $nilai = $t_vat_setllementGrid->t_vat_setllement_id->GetValue();
    $nilai2 = $t_vat_setllementGrid->p_vat_type_id->GetValue();
    $t_vat_setllementGrid->cetak_sptpd->SetValue("<input type='button' style='display:none;' value='CETAK' style='WIDTH: 57px; HEIGHT: 22px' class='Button' onclick=\"" . "cetakSptpd(" . $nilai . "," . $nilai2 . ")\">");
    $action_button = CCGetFromGet("action_button", "");
    $action_button2 = CCGetFromGet("action_button2", "");
    if ($action_button == 'flag_payment' && $action_button2 != 'cetak_register') {
        $dbConn = new clsDBConnSIKP();
        $sql = "select sikp.f_payment_manual(" . CCGetFromGet('t_customer_order_id') . ",'" . CCGetSession('UserLogin') . "')";
        $dbConn->query($sql);
        $dbConn->next_record();
        echo "\r\n  \t\t<script>\r\n  \t\talert('" . $dbConn->f('f_payment_manual') . "');\r\n  \t\t</script>\r\n  \t\t";
        $dbConn->close();
    } else {
        if ($action_button2 == 'cetak_register') {
            $dbConn = new clsDBConnSIKP();
            $sql = "select sikp.f_print_register(" . CCGetFromGet('t_customer_order_id') . ",'" . CCGetSession('UserLogin') . "')";
            $dbConn->query($sql);
            $dbConn->next_record();
            print_laporan($dbConn->f('f_print_register'));
            /*echo "
            			<script>
            				window.open('../services/print_string.php?input_number=".$dbConn->f('f_print_register')."', '_blank', 'location=yes,height=570,width=520,scrollbars=yes,status=yes');
            			</script>
            		";*/
            $dbConn->close();
            exit;
        }
    }
    // -------------------------
    //Close t_vat_setllementGrid_cetak_sptpd_BeforeShow @300-BF0BB7F2
    return $t_vat_setllementGrid_cetak_sptpd_BeforeShow;
}
function GetCetakHTML($param_arr)
{
    $output = '';
    $output .= '<table id="table-piutang" class="grid-table-container" border="0" cellspacing="0" cellpadding="0">
          		<tr>
            		<td valign="top">';
    $output .= '<table class="grid-table" border="0" cellspacing="0" cellpadding="0" width="900">
                	<tr>
                  		<td class="HeaderLeft"><img border="0" alt="" src="../Styles/sikp/Images/Spacer.gif"></td> 
                  		<td class="th"><strong>DAFTAR PENDAFTARAN WP</strong></td> 
                  		<td class="HeaderRight"><img border="0" alt="" src="../Styles/sikp/Images/Spacer.gif"></td>
                	</tr>
              		</table>';
    $output .= '<table id="table-piutang-detil" class="Grid" border="1" cellspacing="0" cellpadding="3px" width="100%">
                <tr >';
    $output .= '<th align="center" >NO</th>';
    $output .= '<th align="center" >NPWPD</th>';
    $output .= '<th align="center" >NAMA WP</th>';
    $output .= '<th align="center" >MERK DAGANG</th>';
    $output .= '<th align="center" >ALAMAT MERK DAGANG</th>';
    $output .= '<th align="center" >KARTU NPWPD</th>';
    $output .= '</tr>';
    $dbConn = new clsDBConnSIKP();
    $query = "select * from t_cust_account where \r\n\tnpwd ilike '%" . $param_arr['search'] . "%'\r\n\tor wp_name ilike '%" . $param_arr['search'] . "%'\r\n\tor company_brand ilike '%" . $param_arr['search'] . "%'\r\n\tORDER BY wp_name";
    //echo $query;exit;
    $data = array();
    $dbConn->query($query);
    while ($dbConn->next_record()) {
        $data[] = $dbConn->Record;
    }
    $dbConn->close();
    for ($i = 0; $i < count($data); $i++) {
        $output .= '<tr><td align="center" >' . ($i + 1) . '</td>';
        $output .= '<td align="left" >' . $data[$i]['npwd'] . '</td>';
        $output .= '<td align="left" >' . $data[$i]['wp_name'] . '</td>';
        $output .= '<td align="left" >' . $data[$i]['company_brand'] . '</td>';
        $output .= '<td align="left" >' . $data[$i]['brand_address_name'] . ' ' . $data[$i]['brand_address_no'] . '</td>';
        $output .= '<td align="center" ><input id="cetak_kartu_npwpd_v2" class="btn_tambah" onclick="cetak_kartu_npwpd_v2(' . $data[$i]['t_cust_account_id'] . '); return false;" value="cetak_kartu_npwpd_v2" type="button"></td>';
        $output .= '</tr>';
    }
    $output .= '</table>';
    return $output;
}
function t_vat_registrationForm_Button7_OnClick(&$sender)
{
    $t_vat_registrationForm_Button7_OnClick = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_vat_registrationForm;
    //Compatibility
    //End t_vat_registrationForm_Button7_OnClick
    $sql = "select f_update_acc_status(" . $t_vat_registrationForm->t_cust_account_id->Value . ",3,'TUTUP SEMENTARA POSISI PIUTANG',sysdate, '" . CCGetUserLogin() . "')";
    $dbConn = new clsDBConnSIKP();
    if ($dbConn->query($sql)) {
        $dbConn->next_record();
        if ($dbConn->Record['o_result_msg'] != 'OK') {
            $t_vat_registrationForm->Errors->addError($dbConn->Record['o_result_msg']);
        }
    } else {
        $t_vat_registrationForm->Errors->addError('Gagal update status');
    }
    //Close t_vat_registrationForm_Button7_OnClick @961-41E34245
    return $t_vat_registrationForm_Button7_OnClick;
}
function t_vat_reg_dtl_parkingForm_BeforeSelect(&$sender)
{
    $t_vat_reg_dtl_parkingForm_BeforeSelect = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_vat_reg_dtl_parkingForm;
    //Compatibility
    //End t_vat_reg_dtl_parkingForm_BeforeSelect
    //Custom Code @822-2A29BDB7
    // -------------------------
    // Write your own code here.
    $CustId = $t_vat_reg_dtl_parkingForm->t_cust_account_id->GetValue();
    $dbConn = new clsDBConnSIKP();
    $query = "select a.p_vat_type_dtl_id, b.vat_code as parking_classification_code " . "from t_cust_account a, p_vat_type_dtl b " . "where a.p_vat_type_dtl_id = b.p_vat_type_dtl_id " . "and t_cust_account_id = " . $CustId;
    $dbConn->query($query);
    while ($dbConn->next_record()) {
        $idd = $dbConn->f("p_vat_type_dtl_id");
        $code = $dbConn->f("parking_classification_code");
    }
    $dbConn->close();
    $t_vat_reg_dtl_parkingForm->p_parking_classification_id->SetValue($idd);
    $t_vat_reg_dtl_parkingForm->classification_desc->SetValue($code);
    // -------------------------
    //End Custom Code
    //Close t_vat_reg_dtl_parkingForm_BeforeSelect @94-79EB8A58
    return $t_vat_reg_dtl_parkingForm_BeforeSelect;
}
function GetCetakHTML($param_arr)
{
    $output = '';
    $output .= '<table id="table-piutang" class="grid-table-container" border="0" cellspacing="0" cellpadding="0">
          		<tr>
            		<td valign="top">';
    $output .= '<table class="grid-table" border="0" cellspacing="0" cellpadding="0" width="900">
                	<tr>
                  		<td class="HeaderLeft"><img border="0" alt="" src="../Styles/sikp/Images/Spacer.gif"></td> 
                  		<td class="th"><strong>LAPORAN PEMBAYARAN WP ONLINE</strong></td> 
                  		<td class="HeaderRight"><img border="0" alt="" src="../Styles/sikp/Images/Spacer.gif"></td>
                	</tr>
              		</table>';
    $tanggal = CCGetFromGet('date_end_laporan', '31-12-2014');
    $output .= '<table id="table-piutang-detil" class="Grid" border="1" cellspacing="0" cellpadding="3px" width="100%">
                <tr >';
    $output .= '<th align="center" >NO</th>';
    $output .= '<th align="center" >NPWPD</th>';
    $output .= '<th align="center" >NAMA</th>';
    $output .= '<th align="center" >ALAMAT</th>';
    $output .= '<th align="center" >JUMLAH PEMBAYARAN</th>';
    $output .= '<th align="center" >TANGGAL PEMBAYARAN</th>';
    $output .= '<th align="center" >MASA PAJAK</th>';
    $output .= '<th align="center" >NO. PEMBAYARAN</th>';
    $output .= '<th align="center" >KODE BANK</th>';
    $output .= '<th align="center" >KODE CABANG</th>';
    $output .= '</tr>';
    $dbConn = new clsDBConnSIKP();
    $query = "select a.npwd as npwpd , a.payment_key as no_bayar, * from t_vat_setllement a\r\n\t\tINNER join p_app_user b on a.created_by=b.app_user_name\r\n\t\tINNER join t_payment_receipt c on c.t_vat_setllement_id=a.t_vat_setllement_id\r\n\t\tleft join t_cust_account d on d.t_cust_account_id = a.t_cust_account_id\r\n\t\twhere is_employee = 'N'\r\n\t\tand p_vat_type_id = " . $param_arr['p_vat_type_id'] . "\r\n\t\tand (a.p_finance_period_id = " . $param_arr['p_finance_period_id'] . "\r\n\t\t\tOR\r\n\t\t\tto_char(trunc(payment_date),'dd-mm-yyyy')= '" . $param_arr['tgl_penerimaan'] . "')\r\n\t\tORDER BY wp_name, start_period desc";
    //echo $query;exit;
    $data = array();
    $dbConn->query($query);
    while ($dbConn->next_record()) {
        $data[] = $dbConn->Record;
    }
    $dbConn->close();
    for ($i = 0; $i < count($data); $i++) {
        $output .= '<tr><td align="center" >' . ($i + 1) . '</td>';
        $output .= '<td align="left" >' . $data[$i]['npwpd'] . '</td>';
        $output .= '<td align="left" >' . $data[$i]['wp_name'] . '</td>';
        $output .= '<td align="left" >' . $data[$i]['wp_address_name'] . '</td>';
        $output .= '<td align="right" >' . number_format($data[$i]['payment_vat_amount'], 2, ',', '.') . '</td>';
        $output .= '<td align="left" >' . $data[$i]['payment_date'] . '</td>';
        $output .= '<td align="left" >' . $data[$i]['finance_period_code'] . '</td>';
        $output .= '<td align="left" >' . $data[$i]['no_bayar'] . '</td>';
        $output .= '<td align="left" >' . $data[$i]['kode_bank'] . '</td>';
        $output .= '<td align="left" >' . $data[$i]['kode_cabang'] . '</td>';
        $output .= '</tr>';
    }
    $output .= '</table>';
    return $output;
}
示例#23
0
 function PageCetak($data, $user, $tahun, $tgl_penerimaan, $tgl_penerimaan_last, $npwpd)
 {
     $this->AliasNbPages();
     $this->AddPage("L");
     $this->SetFont('Arial', 'B', 12);
     $lheader = $this->lengthCell / 8;
     $lheader1 = $lheader * 1;
     $lheader2 = $lheader - 15;
     $lheader3 = $lheader * 3;
     $lheader4 = $lheader * 4;
     $dbConn = new clsDBConnSIKP();
     $query = "SELECT a.*,\r\n                    c.region_name AS nama_kota,\r\n                    d.region_name AS nama_kecamatan,\r\n                    e.region_name AS nama_kelurahan\r\n                    FROM t_cust_account a\r\n                    LEFT JOIN p_region c ON a.brand_p_region_id = c.p_region_id\r\n                    LEFT JOIN p_region d ON a.brand_p_region_id_kec = d.p_region_id\r\n                    LEFT JOIN p_region e ON a.brand_p_region_id_kel = e.p_region_id\r\n                    where a.npwd = '" . $npwpd . "'";
     $dbConn->query($query);
     $alamat = '';
     while ($dbConn->next_record()) {
         //$alamat = $dbConn->f("brand_address_name")." .No ". $dbConn->f("brand_address_no")." RT/RW: ".$dbConn->f("brand_address_rt")."/".$dbConn->f("brand_address_rw"). ". KEC.".$dbConn->f("nama_kecamatan")." KEL.".$dbConn->f("nama_kelurahan");
         $alamat = $dbConn->f("brand_address_name") . " .No " . $dbConn->f("brand_address_no");
     }
     $dbConn->close();
     $this->Cell($lheader2, $this->height, "NPWPD :");
     $this->Cell($lheader1, $this->height, $npwpd);
     $this->Ln();
     $this->Cell($lheader2, $this->height, "Alamat :");
     $this->Cell($lheader1, $this->height, $alamat);
     $this->SetFont('Arial', '', 10);
     $this->Ln();
     $this->Ln();
     $ltable = $this->lengthCell / 26;
     $ltable1 = $ltable * 1;
     $ltable2 = $ltable * 2;
     $ltable3 = $ltable * 3;
     $ltable4 = $ltable * 4;
     $ltable5 = $ltable * 5;
     $ltable6 = $ltable * 6;
     $ltable7 = $ltable * 7;
     $ltable8 = $ltable * 8;
     $this->Cell($ltable4, $this->height + 2, "NAMA BADAN", "TBLR", 0, 'C');
     $this->Cell($ltable3, $this->height + 2, "JENIS KETETAPAN", "TBLR", 0, 'C');
     $this->Cell($ltable6, $this->height + 2, "PERIODE TRANSAKSI", "TBLR", 0, 'C');
     $this->Cell($ltable3, $this->height + 2, "TGL PELAPORAN", "TBLR", 0, 'C');
     $this->Cell($ltable3, $this->height + 2, "TOTAL PAJAK", "TBLR", 0, 'C');
     $this->Cell($ltable5, $this->height + 2, "NO. KWITANSI", "TBLR", 0, 'C');
     $this->Ln();
     //isi kolom
     $this->SetWidths(array($ltable4, $ltable3, $ltable6, $ltable3, $ltable3, $ltable5));
     $this->SetAligns(array("L", "C", "C", "C", "R", "L"));
     $no = 1;
     $jumlahperayat = array();
     $jumlahperwaktu = array();
     $jumlahtemp = 0;
     $i = 0;
     $total = 0;
     foreach ($data as $item) {
         //print data
         $this->RowMultiBorderWithHeight(array($item["company_name"], $item["type_code"], $item["periode_awal_laporan"] . " s.d " . $item["periode_akhir_laporan"], $item["tgl_pelaporan"], number_format($item["total_pajak"], 0, ',', '.'), $item["kuitansi_pembayaran"]), array('TBLR', 'TBLR', 'TBLR', 'TBLR', 'TBLR', 'TBLR'), $this->height);
         $no++;
     }
 }
function t_message_inboxGrid_BeforeSelect(&$sender)
{
    $t_message_inboxGrid_BeforeSelect = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_message_inboxGrid;
    //Compatibility
    //End t_message_inboxGrid_BeforeSelect
    //Custom Code @226-2A29BDB7
    // -------------------------
    // Write your own code here.
    // -------------------------
    //End Custom Code
    //Custom Code @289-2A29BDB7
    // -------------------------
    // Write your own code here.
    // -------------------------
    //End Custom Code
    $t_message_inbox_id = CCGetFromGet('t_message_inbox_bphtb_id');
    if (!empty($t_message_inbox_id)) {
        $dbConn1 = new clsDBConnSIKP();
        $cari = "select message_status from t_message_inbox_bphtb where t_message_inbox_bphtb_id = " . $t_message_inbox_id;
        $dbConn1->query($cari);
        while ($dbConn1->next_record()) {
            $message_status = $dbConn1->f("message_status");
        }
        if ($message_status == 'U') {
            $query = "update t_message_inbox_bphtb set message_status = 'V' where t_message_inbox_id = " . $t_message_inbox_id;
            $dbConn1->query($query);
        }
    }
    // -------------------------
    // Write your own code here.
    $Component->DataSource->Parameters["urls_keyword"] = strtoupper(CCGetFromGet("s_keyword", NULL));
    // -------------------------
    //Close t_message_inboxGrid_BeforeSelect @2-E3E1E9CD
    return $t_message_inboxGrid_BeforeSelect;
}
function SELECT_x_receipt_no_x_p_f_BeforeSelect(&$sender)
{
    $SELECT_x_receipt_no_x_p_f_BeforeSelect = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $SELECT_x_receipt_no_x_p_f;
    //Compatibility
    //End SELECT_x_receipt_no_x_p_f_BeforeSelect
    //Custom Code @187-2A29BDB7
    // -------------------------
    // Write your own code here.
    $dbConn = new clsDBConnSIKP();
    $cust_acc_id = CCGetFromGet('t_cust_account_id');
    $sql = "select to_char(active_date,'dd-mm-yyyy') as active_date from t_cust_account where t_cust_account_id=" . $cust_acc_id;
    $dbConn->query($sql);
    $dbConn->next_record();
    $cust_id = $dbConn->f("active_date");
    $SELECT_x_receipt_no_x_p_f->DataSource->Parameters["expr189"] = $cust_id;
    // -------------------------
    //End Custom Code
    //Close SELECT_x_receipt_no_x_p_f_BeforeSelect @2-7D0B9252
    return $SELECT_x_receipt_no_x_p_f_BeforeSelect;
}
function t_executive_summary_form_AfterInsert(&$sender)
{
    $t_executive_summary_form_AfterInsert = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_executive_summary_form;
    //Compatibility
    //End t_executive_summary_form_AfterInsert
    //Custom Code @132-2A29BDB7
    // -------------------------
    // Write your own code here.
    $t_executive_summary_form->DataSource->next_record();
    $records = $t_executive_summary_form->DataSource->Record;
    if ($t_executive_summary_form->DataSource->Errors->ErrorsCount == 0) {
        $dbConn = new clsDBConnSIKP();
        $sql = "select sikp.f_first_submit_engine(508," . $records['o_t_customer_order_id'] . ",'" . CCGetSession('UserLogin') . "')";
        $dbConn->query($sql);
    }
    // -------------------------
    //End Custom Code
    //Close t_executive_summary_form_AfterInsert @25-96DE34DB
    return $t_executive_summary_form_AfterInsert;
}
function t_vat_registrationForm_BeforeSelect(&$sender)
{
    $t_vat_registrationForm_BeforeSelect = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_vat_registrationForm;
    //Compatibility
    //End t_vat_registrationForm_BeforeSelect
    //Custom Code @686-2A29BDB7
    // -------------------------
    // Write your own code here.
    $CustId = CCGetFromGet("CURR_DOC_ID", "");
    $dbConn = new clsDBConnSIKP();
    $sql = "select p_settlement_type_id from t_vat_setllement where t_customer_order_id = " . $CustId;
    $dbConn->query($sql);
    $dbConn->next_record();
    $nilai = $dbConn->f("p_settlement_type_id");
    $dbConn->close();
    $t_vat_registrationForm->Hidden1->SetValue($nilai);
    // -------------------------
    //End Custom Code
    //Close t_vat_registrationForm_BeforeSelect @629-D64E68A4
    return $t_vat_registrationForm_BeforeSelect;
}
function p_pass_byadminForm_Button_Ubah_OnClick(&$sender)
{
    $p_pass_byadminForm_Button_Ubah_OnClick = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $p_pass_byadminForm;
    //Compatibility
    //End p_pass_byadminForm_Button_Ubah_OnClick
    //Custom Code @104-2A29BDB7
    // -------------------------
    // Write your own code here.
    global $FileName;
    global $PathToCurrentPage;
    $param = CCGetQueryString("QueryString", "");
    $dbConn = new clsDBConnSIKP();
    $old_pwd = $p_pass_byadminForm->o_user_pwd->GetValue();
    $new_pwd1 = $p_pass_byadminForm->n_user_pwd1->GetValue();
    $new_pwd2 = $p_pass_byadminForm->n_user_pwd2->GetValue();
    $idUser = $p_pass_byadminForm->p_app_user_id->GetValue();
    $sql = "select * from f_change_pass(" . $idUser . ",'" . $old_pwd . "','" . $new_pwd1 . "','" . $new_pwd2 . "')";
    $dbConn->query($sql);
    $dbConn->next_record();
    $mess = $dbConn->f("f_change_pass");
    $dbConn->close();
    echo '<script language="javascript">';
    echo 'alert("' . $mess . '");';
    echo '</script>';
    $p_pass_byadminForm->o_user_pwd->SetValue("");
    $p_pass_byadminForm->n_user_pwd1->SetValue("");
    $p_pass_byadminForm->n_user_pwd2->SetValue("");
    return;
    // -------------------------
    //End Custom Code
    //Close p_pass_byadminForm_Button_Ubah_OnClick @26-C74BD412
    return $p_pass_byadminForm_Button_Ubah_OnClick;
}
function t_vat_registrationForm_Button1_OnClick(&$sender)
{
    $t_vat_registrationForm_Button1_OnClick = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_vat_registrationForm;
    //Compatibility
    //End t_vat_registrationForm_Button1_OnClick
    //Custom Code @862-2A29BDB7
    // -------------------------
    // Write your own code here.
    // -------------------------
    //End Custom Code
    // -------------------------
    // Write your own code here.
    $dbConn1 = new clsDBConnSIKP();
    $order = $t_vat_registrationForm->order_no->GetValue();
    $mobile = $t_vat_registrationForm->mobile_no_owner->GetValue();
    $cari = "select t_customer_order_id from t_customer_order where order_no = '" . $order . "'";
    $dbConn1->query($cari);
    while ($dbConn1->next_record()) {
        $kode = $dbConn1->f("t_customer_order_id");
    }
    $sql_url = "select f_send_sms('" . $mobile . "','Kode Verifikasi Anda : " . $kode . "')from dual";
    $dbConn1->query($sql_url);
    /*
    $sql_url = "select value from p_global_param where code = 'SMSG_URL'";
    $dbConn1->query($sql_url);
    while($dbConn1->next_record()){
    	$val = $dbConn1->f("value");
    }
    	
    $ch = curl_init();
    $url = $val."recipient=".$mobile."&messagetype=SMS:TEXT&messagedata=Kode+Verifikasi+Anda:+".$kode."";	
      
    curl_setopt($ch, CURLOPT_URL,$url);
    curl_setopt($ch, CURLOPT_POST, 1);
    curl_setopt($ch, CURLOPT_POSTFIELDS, http_build_query(array('body' => json_encode($postdata))));
      
      
    curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
      
    $server_output = curl_exec ($ch);
      
    curl_close ($ch);
    */
    $sql = "INSERT INTO verifikasi(id_verifikasi,order_no,code) VALUES " . "(generate_id('sikp','verifikasi','id_verifikasi'),'" . $order . "','" . $kode . "')";
    $dbConn1->query($sql);
    $dbConn1->close;
    $t_vat_registrationForm->pesan->SetValue("Data Telah Terkirim");
    return;
    // -------------------------
    //Close t_vat_registrationForm_Button1_OnClick @851-A9568806
    return $t_vat_registrationForm_Button1_OnClick;
}
function t_vat_setllementForm_Button1_OnClick(&$sender)
{
    $t_vat_setllementForm_Button1_OnClick = true;
    $Component =& $sender;
    $Container =& CCGetParentContainer($sender);
    global $t_vat_setllementForm;
    //Compatibility
    //End t_vat_setllementForm_Button1_OnClick
    //Custom Code @165-2A29BDB7
    // -------------------------
    // Write your own code here.
    // -------------------------
    //End Custom Code
    // -------------------------
    // Write your own code here.
    $dbConn = new clsDBConnSIKP();
    $User = CCGetUserLogin();
    $t_bphtb_registration_id = $t_vat_setllementForm->t_bphtb_registration_id->GetValue();
    $alasan = $t_vat_setllementForm->alasan->GetValue();
    $njop_pbb = $t_vat_setllementForm->njop_pbb->GetValue();
    $bphtb_amt_final = $t_vat_setllementForm->bphtb_amt_final->GetValue();
    $bphtb_amt_final_keberatan = $t_vat_setllementForm->bphtb_amt_final_keberatan->GetValue();
    $errorMsg = '';
    $sql = "select * from f_insert_bphtb_keberatan(" . $t_bphtb_registration_id . ",19," . $bphtb_amt_final_keberatan . "," . $bphtb_amt_final . ",'" . $alasan . "','" . $User . "')";
    //echo $sql;
    //die($sql);
    $dbConn->query($sql);
    $dbConn->next_record();
    $t_bphtb_keberatan_id = $dbConn->f("o_t_bphtb_keberatan_id");
    $t_customer_order_id = $dbConn->f("o_t_customer_order_id");
    $mess = $dbConn->f("o_mess");
    $sql = "select sikp.f_first_submit_engine(511," . $t_customer_order_id . ",'" . CCGetSession('UserLogin') . "')";
    $dbConn->query($sql);
    //modified by wiliam
    echo "<script> \r\n\t\talert('" . $mess . "');\r\n\t\twindow.opener.location.reload();\r\n\t\twindow.close();\r\n\t</script>";
    // -------------------------
    //Close t_vat_setllementForm_Button1_OnClick @164-6DBB2532
    //return $t_vat_setllementForm_Button1_OnClick;
}