<?php

error_reporting(1);
error_reporting(E_ALL);
include("php_fast_cache.php");
include("class.phpmailer.php");
//define('GUSER', 'admin@silk-sucofindo.biz');  //username email
define('GUSER', 'admin-silk@sucofindo.co.id');  //username email
define('GPWD', 'adm@SILK#2019'); // password email
//define('GPWD', 'adm@DB#silk19'); // password email

/*** Tahun Mulai ***/
$globalTahunMst=25;
$globalTahunTrx=5;
$globalSetBlanko=20;
$globalTglDokRekap=fGetTglDokRekap();
$vSysName="Sistem Informasi Legalitas Kayu - Sucofindo ICS";
//$vFileURL="http://silk-sucofindo.biz/";
$vFileURL="http://silk.sucofindo.co.id/";

/*** Fungsi Terbilang ***/
function kekata($x) {
	$x = abs($x);
	$angka = array("", "satu", "dua", "tiga", "empat", "lima", "enam", "tujuh", "delapan", "sembilan", "sepuluh", "sebelas");
	$temp = "";
	if ($x <12) { $temp = " ". $angka[$x]; }
	else if ($x <20) { $temp = kekata($x - 10). " belas"; }
	else if ($x <100) { $temp = kekata($x/10)." puluh". kekata($x % 10); }
	else if ($x <200) { $temp = " seratus" . kekata($x - 100); }
	else if ($x <1000) { $temp = kekata($x/100) . " ratus" . kekata($x % 100); }
	else if ($x <2000) { $temp = " seribu" . kekata($x - 1000); }
	else if ($x <1000000) { $temp = kekata($x/1000) . " ribu" . kekata($x % 1000); }
	else if ($x <1000000000) { $temp = kekata($x/1000000) . " juta" . kekata($x % 1000000); }
	else if ($x <1000000000000) { $temp = kekata($x/1000000000) . " milyar" . kekata(fmod($x,1000000000)); }
	else if ($x <1000000000000000) { $temp = kekata($x/1000000000000) . " trilyun" . kekata(fmod($x,1000000000000)); }
	return $temp;
	}
function terbilang($x) {
	if($x<0) { $hasil = "minus ". trim(kekata($x)); }
	else { $hasil = trim(kekata($x)); }
	return ucwords($hasil);
	}
/*** Fungsi Nama Bulan ***/
function fBulan($pNilai) {
	if ($pNilai == "01") { return "Jan"; }
	if ($pNilai == "02") { return "Feb"; }
	if ($pNilai == "03") { return "Mar"; }
	if ($pNilai == "04") { return "Apr"; }
	if ($pNilai == "05") { return "Mei"; }
	if ($pNilai == "06") { return "Jun"; }
	if ($pNilai == "07") { return "Jul"; }
	if ($pNilai == "08") { return "Agt"; }
	if ($pNilai == "09") { return "Sep"; }
	if ($pNilai == "10") { return "Okt"; }
	if ($pNilai == "11") { return "Nop"; }
	if ($pNilai == "12") { return "Des"; }
	}
/*** Fungsi Tulis Tanggal ***/
function fTanggal($pNilai) { return substr($pNilai, 8, 2)."-".fBulan(substr($pNilai, 5, 2))."-".substr($pNilai, 2, 2); }
/*** Fungsi Romawi Bulan ***/
function fRomawi($pNilai) {
	if ($pNilai == "01") { return "I"; }
	if ($pNilai == "02") { return "II"; }
	if ($pNilai == "03") { return "III"; }
	if ($pNilai == "04") { return "IV"; }
	if ($pNilai == "05") { return "V"; }
	if ($pNilai == "06") { return "VI"; }
	if ($pNilai == "07") { return "VII"; }
	if ($pNilai == "08") { return "VIII"; }
	if ($pNilai == "09") { return "IX"; }
	if ($pNilai == "10") { return "X"; }
	if ($pNilai == "11") { return "XI"; }
	if ($pNilai == "12") { return "XII"; }
	}
/*** Fungsi Barcode ***/
function fBarcode($pNilai) {
	if ($pNilai == "0") { return "barcode-0"; }
	if ($pNilai == "1") { return "barcode-1"; }
	if ($pNilai == "2") { return "barcode-2"; }
	if ($pNilai == "3") { return "barcode-3"; }
	if ($pNilai == "4") { return "barcode-4"; }
	if ($pNilai == "5") { return "barcode-5"; }
	if ($pNilai == "6") { return "barcode-6"; }
	if ($pNilai == "7") { return "barcode-7"; }
	if ($pNilai == "8") { return "barcode-8"; }
	if ($pNilai == "9") { return "barcode-9"; }
	if ($pNilai == ".") { return "barcode-dot"; }
	}
/** Fungsi utk memberi nilai default 0 jika data tidak diisi **/
function fNull($pNilai) { if ($pNilai == "") { return 0; } if ($pNilai != "") { return $pNilai; } }
/** Fungsi utk memberi nilai default "-" jika data tidak diisi **/
function fNullString($pNilai) { if (strlen($pNilai)==0) { return "-"; } if (strlen($pNilai)>0) { return $pNilai; } }
/*** Fungsi ambil area kerja sebagai tambahan WHERE CLAUSE di query ***/
function fGetAreaKerja($pLoginAreaKerja, $pLoginIndustri, $pTableName) {
	if ($pTableName=="mstareakerja") {
		if ($pLoginAreaKerja!="9" && $pLoginAreaKerja!="0") { $vResult=" AND a.kode = '".cleanQuery($pLoginAreaKerja)."' "; }
		}
	else {
		if ($pLoginAreaKerja!="9" && $pLoginAreaKerja!="0") { $vResult=" AND a.areakerja = '".cleanQuery($pLoginAreaKerja)."' "; }
		if ($pLoginIndustri!="" && $pLoginIndustri!="0") { $vResult.=" AND a.kode = ".cleanQuery($pLoginIndustri)." "; }
		}
	return $vResult;
	}
/*** Fungsi ambil flag_close ***/
function fFlagClose($pKodeIndustri, $pBulan, $pTahun) {
	$qFlagClose ="SELECT flag_close FROM admclosing
					WHERE kode_industri = ".cleanQuery($pKodeIndustri)."
					AND bulan = '".cleanQuery($pBulan)."'
					AND tahun = '".cleanQuery($pTahun)."'
					ORDER BY kode DESC LIMIT 1 ";
	$rsFlagClose=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qFlagClose);
	while($rowFlagClose=mysqli_fetch_array($rsFlagClose)) { $vResult=$rowFlagClose['flag_close']; }
	mysqli_free_result($rsFlagClose);
	return $vResult;
	}
/*** Fungsi ambil bulan sebelumnya ***/
function fPrevMonth($pBulan, $pTahun) {
	$vBulan="";
	$vTahun="";
	if ($pBulan=="01") { $vBulan="12"; $vTahun=$pTahun-1; } else { $vBulan=$pBulan-1; $vTahun=$pTahun; }
	if (strlen($vBulan)==1) $vBulan="0".$vBulan;
	return $vTahun."-".$vBulan;
	}
/*** Fungsi ambil bulan selanjutnya ***/
function fNextMonth($pBulan, $pTahun) {
	$vBulan="";
	$vTahun="";
	if ($pBulan=="12") { $vBulan="01"; $vTahun=$pTahun+1; } else { $vBulan=$pBulan+1; $vTahun=$pTahun; }
	if (strlen($vBulan)==1) $vBulan="0".$vBulan;
	return $vTahun."-".$vBulan;
	}
/*** Fungsi update stok akhir di table admclosing ***/
function fSimpanSAkhir($pWhat, $pKodeIndustri, $pBulan, $pTahun, $pValue) {
	/* cek sudah ada atau belum */
	// $qCek="SELECT COUNT(kode_industri) ada FROM admclosing WHERE kode_industri = ".cleanQuery($pKodeIndustri)." AND bulan = '".cleanQuery($pBulan)."' AND tahun = '".cleanQuery($pTahun)."' ";
	$qCek="SELECT COUNT(1) ada FROM admclosing WHERE kode_industri = ".cleanQuery($pKodeIndustri)." AND bulan = '".cleanQuery($pBulan)."' AND tahun = '".cleanQuery($pTahun)."' ";
	$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
	while($rowCek=mysqli_fetch_array($rsCek)) { $vCek=$rowCek['ada']; }
	mysqli_free_result($rsCek);

	if ($pWhat=="KB") {
		if ($vCek==0) {
			/* insert */
			$qSaveSAkhir="INSERT INTO admclosing (kode_industri, bulan, tahun, kb, flag_close, creaby, creadate) "
						."				  VALUES (".$pKodeIndustri.", "
						."						  '".$pBulan."', "
						."						  '".$pTahun."', "
						."						  ".$pValue.", "
						."						  'N', "
						."						  '".isset($_SESSION['sUsername']) and $_SESSION['sUsername']."', "
						."						  '".date('Y')."-".date('m')."-".date('d')."') ";
			}
		else {
			/* update */
			$qSaveSAkhir="UPDATE admclosing "
						."   SET kb = ".$pValue.", "
						."		 updby = '".isset($_SESSION['sUsername']) and $_SESSION['sUsername']."', "
						."		 upddate = '".date('Y')."-".date('m')."-".date('d')."' "
						." WHERE kode_industri = ".cleanQuery($pKodeIndustri)." "
						."   AND bulan = '".cleanQuery($pBulan)."' "
						."   AND tahun = '".cleanQuery($pTahun)."' ";
			}
		}
	if ($pWhat=="KG") {
		if ($vCek==0) {
			/* insert */
			$qSaveSAkhir="INSERT INTO admclosing (kode_industri, bulan, tahun, kg, flag_close, creaby, creadate) "
						."				  VALUES (".$pKodeIndustri.", "
						."						  '".$pBulan."', "
						."						  '".$pTahun."', "
						."						  ".$pValue.", "
						."						  'N', "
						."						  '".isset($_SESSION['sUsername']) and $_SESSION['sUsername']."', "
						."						  '".date('Y')."-".date('m')."-".date('d')."') ";
			}
		else {
			/* update */
			$qSaveSAkhir="UPDATE admclosing "
						."   SET kg = ".$pValue.", "
						."		 updby = '".isset($_SESSION['sUsername']) and $_SESSION['sUsername']."', "
						."		 upddate = '".date('Y')."-".date('m')."-".date('d')."' "
						." WHERE kode_industri = ".cleanQuery($pKodeIndustri)." "
						."   AND bulan = '".cleanQuery($pBulan)."' "
						."   AND tahun = '".cleanQuery($pTahun)."' ";
			}
		}
	if ($pWhat=="KO") {
		if ($vCek==0) {
			/* insert */
			$qSaveSAkhir="INSERT INTO admclosing (kode_industri, bulan, tahun, ko, flag_close, creaby, creadate) "
						."				  VALUES (".$pKodeIndustri.", "
						."						  '".$pBulan."', "
						."						  '".$pTahun."', "
						."						  ".$pValue.", "
						."						  'N', "
						."						  '".isset($_SESSION['sUsername']) and $_SESSION['sUsername']."', "
						."						  '".date('Y')."-".date('m')."-".date('d')."') ";
			}
		else {
			/* update */
			$qSaveSAkhir="UPDATE admclosing "
						."   SET ko = ".$pValue.", "
						."		 updby = '".isset($_SESSION['sUsername']) and $_SESSION['sUsername']."', "
						."		 upddate = '".date('Y')."-".date('m')."-".date('d')."' "
						." WHERE kode_industri = ".cleanQuery($pKodeIndustri)." "
						."   AND bulan = '".cleanQuery($pBulan)."' "
						."   AND tahun = '".cleanQuery($pTahun)."' ";
			}
		}
	mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qSaveSAkhir);
	return 0;
	}
/*** Fungsi ambil Stok Awal KB ***/
function fGetSAwalKB($pKodeIndustri, $pBulan, $pTahun) {
	$qSAwalKB="SELECT kb FROM admclosing
				WHERE kode_industri = ".cleanQuery($pKodeIndustri)."
				AND bulan = '".cleanQuery($pBulan)."'
				AND tahun = '".cleanQuery($pTahun)."' ";
	$rsSAwalKB=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qSAwalKB);
	while($rowSAwalKB=mysqli_fetch_array($rsSAwalKB)) { $vResult=$rowSAwalKB['kb']; }
	mysqli_free_result($rsSAwalKB);
	return round($vResult, 4);
	}
/*** Fungsi ambil Mutasi KB ***/
function fGetMutasiKB($pSAwal, $pKodeIndustri, $pBulan, $pTahun) {
	$vPrevMonth=fPrevMonth($pBulan, $pTahun);
	$vPrevBulan=substr($vPrevMonth, 5, 2);
	$vPrevTahun=substr($vPrevMonth, 0, 4);
	$qMutasiKB="SELECT ROUND(a.kb + b.mut_tambah - b.mut_kurang, 4) sakhir FROM
					(SELECT 'PREV',
							CASE
							WHEN (SELECT COUNT(1) FROM admclosing
								  WHERE kode_industri = ".cleanQuery($pKodeIndustri)."
									AND bulan = '".cleanQuery($vPrevBulan)."'
									AND tahun = '".cleanQuery($vPrevTahun)."') = 0 THEN 0
							ELSE (SELECT COALESCE(kb, 0) kb FROM admclosing
								  WHERE kode_industri = ".cleanQuery($pKodeIndustri)."
									AND bulan = '".cleanQuery($vPrevBulan)."'
									AND tahun = '".cleanQuery($vPrevTahun)."'
								ORDER BY kode DESC LIMIT 1)
							END kb ) a,
					(SELECT ROUND(COALESCE(SUM(jumlah_volume_penambahan), 0), 4) mut_tambah,
							ROUND(COALESCE(SUM(jumlah_volume_diolah)+SUM(jumlah_volume_dipakai)+SUM(jumlah_volume_pengurangan), 0), 4) mut_kurang
						FROM trxmutasi_kb
						WHERE kodeindustri = ".cleanQuery($pKodeIndustri)."
						AND verified_flag NOT IN ('NOT_OK', 'N')
						AND bulan = '".cleanQuery($pBulan)."'
						AND tahun = '".cleanQuery($pTahun)."' ) b ";
	$rsMutasiKB=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qMutasiKB);
	while($rowMutasiKB=mysqli_fetch_array($rsMutasiKB)) { $vResult=$rowMutasiKB['sakhir']; }
	mysqli_free_result($rsMutasiKB);
	return $vResult;
	}
/*** Fungsi ambil Stok Awal KG ***/
function fGetSAwalKG($pKodeIndustri, $pBulan, $pTahun) {
	$qSAwalKG="SELECT kg FROM admclosing "
			 ." WHERE kode_industri = ".cleanQuery($pKodeIndustri)." "
			 ."   AND bulan = '".cleanQuery($pBulan)."' "
			 ."   AND tahun = '".cleanQuery($pTahun)."' ";
	$rsSAwalKG=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qSAwalKG);
	while($rowSAwalKG=mysqli_fetch_array($rsSAwalKG)) { $vResult=$rowSAwalKG['kg']; }
	mysqli_free_result($rsSAwalKG);
	return round($vResult, 4);
	}
/*** Fungsi ambil Mutasi KG ***/
function fGetMutasiKG($pSAwal, $pKodeIndustri, $pBulan, $pTahun) {
	$vPrevMonth=fPrevMonth($pBulan, $pTahun);
	$vPrevBulan=substr($vPrevMonth, 5, 2);
	$vPrevTahun=substr($vPrevMonth, 0, 4);
	$qMutasiKG="SELECT ROUND(a.kg + b.mut_tambah - b.mut_kurang, 4) sakhir FROM
					(SELECT 'PREV',
							CASE
							WHEN (SELECT COUNT(1) FROM admclosing
								  WHERE kode_industri = ".cleanQuery($pKodeIndustri)."
									AND bulan = '".cleanQuery($vPrevBulan)."'
									AND tahun = '".cleanQuery($vPrevTahun)."') = 0 THEN 0
							ELSE (SELECT COALESCE(kg, 0) kg FROM admclosing
								  WHERE kode_industri = ".cleanQuery($pKodeIndustri)."
									AND bulan = '".cleanQuery($vPrevBulan)."'
									AND tahun = '".cleanQuery($vPrevTahun)."'
								ORDER BY kode DESC LIMIT 1)
							END kg ) a,
					(SELECT ROUND(COALESCE(SUM(jumlah_volume_pembelian)+SUM(jumlah_volume_hasil_produksi)+COALESCE(SUM(jumlah_reproses),0), 0), 4) mut_tambah,
							ROUND(COALESCE(SUM(jumlah_volume_diolah)+SUM(jumlah_volume_dipakai)+SUM(jumlah_volume_penjualan_dn), 0), 4) mut_kurang
						FROM trxmutasi_kg
						WHERE kodeindustri = ".cleanQuery($pKodeIndustri)."
						AND verified_flag NOT IN ('NOT_OK', 'N')
						AND bulan = '".cleanQuery($pBulan)."'
						AND tahun = '".cleanQuery($pTahun)."' ) b ";
	$rsMutasiKG=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qMutasiKG);
	while($rowMutasiKG=mysqli_fetch_array($rsMutasiKG)) { $vResult=$rowMutasiKG['sakhir']; }
	mysqli_free_result($rsMutasiKG);
	return $vResult;
	}
/*** Fungsi ambil Stok Awal KO ***/
function fGetSAwalKO($pKodeIndustri, $pBulan, $pTahun) {
	$qSAwalKO="SELECT ko FROM admclosing "
			 ." WHERE kode_industri = ".cleanQuery($pKodeIndustri)." "
			 ."   AND bulan = '".cleanQuery($pBulan)."' "
			 ."   AND tahun = '".cleanQuery($pTahun)."' ";
	$rsSAwalKO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qSAwalKO);
	while($rowSAwalKO=mysqli_fetch_array($rsSAwalKO)) { $vResult=$rowSAwalKO['ko']; }
	mysqli_free_result($rsSAwalKO);
	return round($vResult, 4);
	}
/*** Fungsi ambil Mutasi KO ***/
function fGetMutasiKO($pSAwal, $pKodeIndustri, $pBulan, $pTahun) {
	$vPrevMonth=fPrevMonth($pBulan, $pTahun);
	$vPrevBulan=substr($vPrevMonth, 5, 2);
	$vPrevTahun=substr($vPrevMonth, 0, 4);
	$qMutasiKO="SELECT ROUND(a.ko + b.mut_tambah - b.mut_kurang, 4) sakhir FROM
					(SELECT 'PREV',
							CASE
							WHEN (SELECT COUNT(1) FROM admclosing
								  WHERE kode_industri = ".cleanQuery($pKodeIndustri)."
									AND bulan = '".cleanQuery($vPrevBulan)."'
									AND tahun = '".cleanQuery($vPrevTahun)."') = 0 THEN 0
							ELSE (SELECT COALESCE(ko, 0) ko FROM admclosing
								  WHERE kode_industri = ".cleanQuery($pKodeIndustri)."
									AND bulan = '".cleanQuery($vPrevBulan)."'
									AND tahun = '".cleanQuery($vPrevTahun)."'
								ORDER BY kode DESC LIMIT 1)
							END ko ) a,
					(SELECT ROUND(COALESCE(SUM(jumlah_volume_pembelian)+SUM(jumlah_volume_hasil_produksi)+COALESCE(SUM(jumlah_reproses),0)+SUM(jumlah_volume_koreksi), 0), 4) mut_tambah,
							ROUND(COALESCE(SUM(jumlah_volume_diolah)+SUM(jumlah_volume_dipakai)+SUM(jumlah_volume_penjualan_dn)+SUM(jumlah_volume_penjualan_ln), 0), 4) mut_kurang
						FROM trxmutasi_ko
						WHERE kodeindustri = ".cleanQuery($pKodeIndustri)."
						AND verified_flag NOT IN ('NOT_OK', 'N')
						AND bulan = '".cleanQuery($pBulan)."'
						AND tahun = '".cleanQuery($pTahun)."' ) b ";
	$rsMutasiKO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qMutasiKO);
	while($rowMutasiKO=mysqli_fetch_array($rsMutasiKO)) { $vResult=$rowMutasiKO['sakhir']; }
	mysqli_free_result($rsMutasiKO);
	return $vResult;
	}
/*** Fungsi ambil Total Mutasi ***/
function fGetTotalMutasi($pJenis, $pKolom, $pKodeIndustri, $pBulan, $pTahun) {
	if ($pJenis=="KB") { $vTable="trxmutasi_kb"; }
	if ($pJenis=="KG") { $vTable="trxmutasi_kg"; }
	if ($pJenis=="KO") { $vTable="trxmutasi_ko"; }

	$qTotalMutasi="SELECT ROUND(COALESCE(SUM(".$pKolom."), 0), 4) result FROM ".$vTable." "
				 ." WHERE kodeindustri = ".cleanQuery($pKodeIndustri)." "
				 ."   AND bulan = '".cleanQuery($pBulan)."' "
				 ."   AND tahun = '".cleanQuery($pTahun)."' ";
				 // echo $qTotalMutasi;
	$rsTotalMutasi=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTotalMutasi);
	while($rowTotalMutasi=mysqli_fetch_array($rsTotalMutasi)) { $vResult=$rowTotalMutasi['result']; }
	mysqli_free_result($rsTotalMutasi);
	return $vResult;
	}
/*** Fungsi ambil Rendemen Hasil Inspeksi/Verifikasi ***/
function fGetRendemenHasil_Ins_Ver($pJenisRendemen, $pKodeIndustri) {
	if ($pJenisRendemen=="KBKG") { $qResult="SELECT rendemen_kb_kg result FROM mstindustri WHERE kode = ".$pKodeIndustri; }
	if ($pJenisRendemen=="KGKO") { $qResult="SELECT rendemen_kg_ko result FROM mstindustri WHERE kode = ".$pKodeIndustri; }
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['result']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
/*** Fungsi ambil Rendemen Inventory ***/
function fGetRendemenInventory($pJenisRendemen, $pKodeIndustri, $pBulan, $pTahun) {
	// bulan current
	$vBulanCurr=date('Y').date('m');
	//$vBulanCurr=$pTahun.$pBulan;

	if ($pJenisRendemen=="KBKG") {
		// cek bulan terakhir data "volume hasil produksi" KG pernah di-input -> idx=2
		if ( date('d')>=1 AND date('d')<=10 ) { $qCek1="SELECT MAX(CONCAT(tahun, bulan)) result FROM trxmutasi_kg WHERE kodeindustri = ".$pKodeIndustri." AND idx = 2 AND CONCAT(tahun, bulan) <= '".$vBulanCurr."' "; }
		else { $qCek1="SELECT MAX(CONCAT(tahun, bulan)) result FROM trxmutasi_kg WHERE kodeindustri = ".$pKodeIndustri." AND idx = 2 AND CONCAT(tahun, bulan) <= '".$vBulanCurr."' "; }
		// echo $qCek1;
		$rsCek1=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek1);
		$countCek1=mysqli_num_rows($rsCek1);
		if ($countCek1==0) { $vBulan1=date('m'); $vTahun1=date('Y'); }
		else { while($rowCek1=mysqli_fetch_array($rsCek1)) { $vBulan1=substr($rowCek1['result'], 4, 2); $vTahun1=substr($rowCek1['result'], 0, 4); } mysqli_free_result($rsCek1); }
		// ambil nilai
		$q1="SELECT COALESCE(SUM(jumlah_volume_diolah), 0) KBc FROM trxmutasi_kb WHERE bulan = '".$vBulan1."' AND tahun = '".$vTahun1."' AND kodeindustri = ".$pKodeIndustri;
		$rs1=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $q1);
		while($row1=mysqli_fetch_array($rs1)) { $vKBc=$row1['KBc']; }
		mysqli_free_result($rs1);
		// ambil nilai
		$q2="SELECT COALESCE(SUM(jumlah_volume_hasil_produksi), 0) KGc FROM trxmutasi_kg WHERE bulan= '".$vBulan1."' AND tahun = '".$vTahun1."' AND kodeindustri = ".$pKodeIndustri;
		$rs2=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $q2);
		while($row2=mysqli_fetch_array($rs2)) { $vKGc=$row2['KGc']; }
		mysqli_free_result($rs2);
		if ($vKBc==0) { $vResult=$vKGc*100; }
		else { $vResult=$vKGc/$vKBc*100; }
		}
	if ($pJenisRendemen=="KGKO") {
		// cek bulan terakhir data "volume hasil produksi" KO pernah di-input -> idx=2
		if ( date('d')>=1 AND date('d')<=10 ) { $qCek1="SELECT MAX(CONCAT(tahun, bulan)) result
														FROM trxmutasi_ko
														WHERE kodeindustri = ".$pKodeIndustri."
														AND idx = 2
														AND CONCAT(tahun, bulan) <= '".$vBulanCurr."' "; }
		else { $qCek1="SELECT MAX(CONCAT(tahun, bulan)) result
					   FROM trxmutasi_ko
					   WHERE kodeindustri = ".$pKodeIndustri."
					   AND idx = 2
					   AND CONCAT(tahun, bulan) <= '".$vBulanCurr."' "; }
		$rsCek1=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek1);
		$countCek1=mysqli_num_rows($rsCek1);
		if ($countCek1==0) { $vBulan1=date('m'); $vTahun1=date('Y'); }
		else { while($rowCek1=mysqli_fetch_array($rsCek1)) { $vBulan1=substr($rowCek1['result'], 4, 2); $vTahun1=substr($rowCek1['result'], 0, 4); } mysqli_free_result($rsCek1); }
		// echo $rowCek1['result'];
		// ambil nilai
		$q1="SELECT COALESCE(SUM(jumlah_volume_diolah), 0) KGd
			 FROM trxmutasi_kg
			 WHERE bulan = '".$vBulan1."'
			 AND tahun = '".$vTahun1."'
			 AND kodeindustri = ".$pKodeIndustri;
		// echo $q1;	 
		$rs1=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $q1);
		while($row1=mysqli_fetch_array($rs1)) { $vKGd=$row1['KGd']; }
		mysqli_free_result($rs1);
		// ambil nilai
		$q2="SELECT COALESCE(SUM(jumlah_volume_hasil_produksi), 0) KOc, COALESCE(SUM(jumlah_volume_diolah), 0) KOe
			 FROM trxmutasi_ko
			 WHERE bulan= '".$vBulan1."'
			 AND tahun = '".$vTahun1."'
			 AND kodeindustri = ".$pKodeIndustri;
			 // echo $q2;
		$rs2=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $q2);
		while($row2=mysqli_fetch_array($rs2)) { $vKOc=$row2['KOc']; $vKOe=$row2['KOe']; }
		mysqli_free_result($rs2);
		if ( ($vKGd+$vKOe)==0 ) { $vResult=$vKOc*100; }
		else { $vResult=$vKOc/($vKGd+$vKOe)*100; }
		}

	if ($pBulan=="KBc") { $vResult="KB Diolah:".$vKBc; }
	elseif ($pBulan=="KGc") { $vResult="KG Produksi:".$vKGc; }
	elseif ($pBulan=="KGd") { $vResult="KG Diolah:".$vKGd; }
	elseif ($pBulan=="KOc") { $vResult="KO Produksi:".$vKOc; }
	elseif ($pBulan=="KGd") { $vResult="KG Diolah:".$vKGd; }
	elseif ($pBulan=="KOe") { $vResult="KO Diolah:".$vKOe; }
	elseif ($pBulan=="Bulan") { $vResult="Bulan Produksi:".$vTahun1."-".$vBulan1; }
	
	return $vResult;
	}
/*** Fungsi ambil Kuota Ekspor yg diijinkan ***/
function fGetKuotaEkspor($pKodeIndustri, $pJenisIndustri, $pBulan, $pTahun, $pData) {
	if ($pJenisIndustri==2 OR $pJenisIndustri==4 or $pJenisIndustri==15 OR $pJenisIndustri==17) {
		$vStokKG=fGetSAwalKG($pKodeIndustri, $pBulan, $pTahun);
		$vStokKO=fGetSAwalKO($pKodeIndustri, $pBulan, $pTahun);
		$vRendemenKGKO=fGetRendemenInventory("KGKO", $pKodeIndustri, $pBulan, $pTahun);

		if ($pData=="STKB") { $vResult=0; }
		if ($pData=="STKG") { $vResult=$vStokKG; }
		if ($pData=="STKO") { $vResult=$vStokKO; }
		if ($pData=="RKBKG") { $vResult=0; }
		if ($pData=="RKGKO") { $vResult=$vRendemenKGKO; }
		if ($pData=="KUOTA") { $vResult=$vStokKO+($vStokKG*$vRendemenKGKO/100); }
		}
	if ($pJenisIndustri==1 OR $pJenisIndustri==3 or $pJenisIndustri==14 OR $pJenisIndustri==16) {
		$vStokKB=fGetSAwalKB($pKodeIndustri, $pBulan, $pTahun); //a
		$vStokKG=fGetSAwalKG($pKodeIndustri, $pBulan, $pTahun); //b
		$vStokKO=fGetSAwalKO($pKodeIndustri, $pBulan, $pTahun); //c
		$vRendemenKBKG=fGetRendemenInventory("KBKG", $pKodeIndustri, $pBulan, $pTahun); //x
		$vRendemenKGKO=fGetRendemenInventory("KGKO", $pKodeIndustri, $pBulan, $pTahun); //y

		if ($pData=="STKB") { $vResult=$vStokKB; }
		if ($pData=="STKG") { $vResult=$vStokKG; }
		if ($pData=="STKO") { $vResult=$vStokKO; }
		if ($pData=="RKBKG") { $vResult=$vRendemenKBKG; }
		if ($pData=="RKGKO") { $vResult=$vRendemenKGKO; }
		if ($pData=="KUOTA") { $vResult=$vStokKO+($vStokKB*$vRendemenKBKG/100*$vRendemenKGKO/100)+($vStokKG*$vRendemenKGKO/100); }
		}
	return $vResult;
	}
/*** Fungsi pembanding lebih besar atau lebih kecil ***/
function fCompare($pPembilang, $pPembagi) {
	$qResult="SELECT IF (".$pPembilang." <= ".$pPembagi.", 'Y', 'N') result ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['result']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
/*** Fungsi ambil NIP Penanggungjawab ***/
function fGetNIP_PJ() {
	$qResult="SELECT SUBSTRING(nip_penanggungjawab,1,1) result FROM mstlvlk WHERE kode = 1";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['result']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
/*** Fungsi ambil kode ISO 3166-2 Negara Asal = INDONESIA ***/
function fGetKodeISONegaraAsal() {
	$qResult="SELECT inisial FROM mstnegara WHERE nama = 'INDONESIA' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['inisial']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
/*** Fungsi ambil kode ISO 3166-2 Negara Tujuan ***/
function fGetKodeISONegaraTujuan($pNegaraTujuan) {
	$qResult="SELECT inisial FROM mstnegara WHERE kode = ".cleanQuery($pNegaraTujuan);
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['inisial']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
/*** Fungsi ambil nomor urut dokumen ***/
function fGetNomorUrutDokumen($pTahunPenerbitan, $pTipeDokumen) {
	$qResult="SELECT LPAD(COALESCE(max(no_ppdvl_4), 0)+1, 5, '0') result "
			."  FROM trxmohon_hdr "
			." WHERE no_ppdvl_1 = '".cleanQuery($pTipeDokumen)."' "
			."   AND no_ppdvl_3 = '".cleanQuery($pTahunPenerbitan)."' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['result']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
/*** Fungsi untuk notifikasi permohonan ***/
function fCekNotifikasiPermohonan($pGroupID, $pLoginAreaKerja, $pLoginIndustri) {
	$vResult = '';
	if ($pGroupID=="G006") { /** operator industri **/
		$qCek="SELECT COUNT(1) cek FROM trxmohon_hdr a "
			 ." WHERE (a.status = 'PPDVL_ENTRY' AND a.status_message != '') "
			 ."   AND a.kodeindustri = ".cleanQuery($pLoginIndustri);
		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $vCek=$rowCek['cek']; }
		mysqli_free_result($rsCek);
		$vResult=$vCek;
		}
	if ($pGroupID=="G008") { /** data entry **/
		$qCek="SELECT COUNT(1) cek FROM trxmohon_hdr a "
			 ." WHERE a.status IN ('PPDVL_SEND', 'PPDVL_APPROVED', 'PPDVL_ISSUED') "
			 ."   AND a.kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja = ".cleanQuery($pLoginAreaKerja).") ";
		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $vCek=$rowCek['cek']; }
		mysqli_free_result($rsCek);
		$vResult=$vCek;
		}
	if ($pGroupID=="G009") { /** pj teknis **/
		$qCek="SELECT COUNT(1) cek FROM trxmohon_hdr a "
			 ." WHERE a.status = 'PPDVL_APPROVED_SEND' "
			 ."   AND a.kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja = ".cleanQuery($pLoginAreaKerja).") ";
		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $vCek=$rowCek['cek']; }
		mysqli_free_result($rsCek);
		$vResult=$vCek;
		}
	if ($pGroupID=="G003") { /** verifikator pusat **/
		if ( isset($_SESSION['sUsername']) and $_SESSION['sUsername']=="vrf-bagus-ferry-agrayanto" OR isset($_SESSION['sUsername']) and $_SESSION['sUsername']=="verifikator-pusat-neina" OR isset($_SESSION['sUsername']) and $_SESSION['sUsername']=="vrf-sans-eva-clara-shinta" ) {
			// surabaya
			$qCek="SELECT COUNT(1) cek FROM trxmohon_hdr a "
				 ." WHERE a.status = 'PPDVL_APPROVED_FOR_PUSAT' "
				 ."   AND a.kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja = 4) ";
			}
		elseif ( isset($_SESSION['sUsername']) and $_SESSION['sUsername']=="vrf-umar-atik" ) {
			// jakarta, samarinda, palu, makasar
			$qCek="SELECT COUNT(1) cek FROM trxmohon_hdr a "
				 ." WHERE a.status = 'PPDVL_APPROVED_FOR_PUSAT' "
				 ."   AND a.kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja IN (2, 7, 18, 8) ) ";
			}
		elseif ( isset($_SESSION['sUsername']) and $_SESSION['sUsername']=="verifikator-pusat-dinar" ) {
			// medan, pekanbaru, lampung, palembang
			$qCek="SELECT COUNT(1) cek FROM trxmohon_hdr a "
				 ." WHERE a.status = 'PPDVL_APPROVED_FOR_PUSAT' "
				 ."   AND a.kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja IN (1, 17, 12, 13) ) ";
			}
		elseif ( isset($_SESSION['sUsername']) and $_SESSION['sUsername']=="vrf-faozan-indresputra" OR isset($_SESSION['sUsername']) and $_SESSION['sUsername']=="verifikator-pusat-atik" ) {
			// cilegon, cirebon, bekasi, denpasar, semarang, banjarmasin, pontianak
			$qCek="SELECT COUNT(1) cek FROM trxmohon_hdr a "
				 ." WHERE a.status = 'PPDVL_APPROVED_FOR_PUSAT' "
				 ."   AND a.kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja IN (14, 11, 15, 10, 3, 6, 5) ) ";
			}
		else {
			// semua
			$qCek="SELECT COUNT(1) cek FROM trxmohon_hdr a WHERE a.status = 'PPDVL_APPROVED_FOR_PUSAT' ";
			}

		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $vCek=$rowCek['cek']; }
		mysqli_free_result($rsCek);
		$vResult=$vCek;
		}
	return $vResult;
	}
/** Fungsi untuk notifikasi penerbitan V-Legal **/
function fCekNotifikasiPenerbitan($pGroupID, $pLoginAreaKerja, $pLoginIndustri) {
	$vResult = '';
	if ($pGroupID=="G006") { /** operator industri **/
		$qCek="SELECT COUNT(1) cek FROM trxmohon_hdr a "
			 ." WHERE a.status = 'PPDVL_CLOSE' "
			 ."   AND a.cetak_sendiri = 'Y' "
			 ."	  AND DATEDIFF( CURDATE(), a.upddate ) <= 7 "
			 ."   AND a.kodeindustri = ".cleanQuery($pLoginIndustri);
		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $vCek=$rowCek['cek']; }
		mysqli_free_result($rsCek);
		$vResult=$vCek;
		}
	if ($pGroupID=="G005" OR $pGroupID=="G008") { /** verifikator cabang/data entry **/
		$qCek="SELECT COUNT(1) cek FROM trxmohon_hdr a "
			 ." WHERE a.status = 'PPDVL_CLOSE' "
			 ."   AND a.cetak_sendiri = 'N' "
			 ."   AND DATEDIFF( CURDATE(), a.upddate ) <= 7 "
			 ."   AND a.kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja = ".cleanQuery($pLoginAreaKerja).") ";
		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $vCek=$rowCek['cek']; }
		mysqli_free_result($rsCek);
		$vResult=$vCek;
		}
	return $vResult;
	}
/*** Fungsi untuk notifikasi permohonan peng-aktifan blanko ***/
function fCekNotifikasiPengaktifanBlanko($pGroupID) {
	if ($pGroupID=="G003") {
		// $qCek="SELECT COUNT(DISTINCT kode_file) cek FROM trxreactivate_blanko WHERE status = 'NOT_OK' ";
		$qCek="SELECT COUNT(1) cek FROM trxreactivate_blanko WHERE status = 'NOT_OK' ";
		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $vResult=$rowCek['cek']; }
		mysqli_free_result($rsCek);
		return $vResult;
		}
	}
/*** Fungsi untuk notifikasi permohonan me-non-aktifkan blanko ***/
function fCekNotifikasiNonAktifkanBlanko($pGroupID) {
	if ($pGroupID=="G003") {
		// $qCek="SELECT COUNT(DISTINCT kode_file) cek FROM trxdeactivate_blanko WHERE status = 'NOT_OK' ";
		$qCek="SELECT COUNT(1) cek FROM trxdeactivate_blanko WHERE status = 'NOT_OK' ";
		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $vResult=$rowCek['cek']; }
		mysqli_free_result($rsCek);
		return $vResult;
		}
	}
/*** Fungsi untuk notifikasi permohonan perubahan isi dokumen vlegal ***/
function fCekNotifikasiUbahBatalExtendVLegal($pGroupID, $pJenis, $pLoginAreaKerja) {
	if ($pGroupID=="G008") {
		if ($pJenis=="UBAH") { $qWhere=" AND flag_ubah='Y' "; }
		if ($pJenis=="BATAL") { $qWhere=" AND flag_batal='Y' "; }
		if ($pJenis=="EXTEND") { $qWhere=" AND flag_extend='Y' "; }
		// $qCek="SELECT COUNT(status) cek FROM ws_aktifitas_hdr WHERE status = 'OK' AND kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja = ".$pLoginAreaKerja.") ".$qWhere;
		$qCek="SELECT COUNT(1) cek FROM ws_aktifitas_hdr WHERE status = 'OK' AND kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja = ".$pLoginAreaKerja.") ".$qWhere;
		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $vResult=$rowCek['cek']; }
		mysqli_free_result($rsCek);
		}
	else { $vResult=0; }
	return $vResult;
	}
/*** Fungsi untuk notifikasi penambahan bb (mutasi) ***/
function fCekNotifikasiTambahBB($pGroupID, $pLoginAreaKerja) {
	$vResult = '';
	if ($pGroupID=="G005") {
		$qCek="SELECT (a.mut_kb+b.mut_kg+c.mut_ko) result FROM
				(SELECT COUNT(1) mut_kb FROM trxmutasi_kb WHERE verified_flag = 'N' AND kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja = ".$pLoginAreaKerja.")) a,
				(SELECT COUNT(1) mut_kg FROM trxmutasi_kg WHERE verified_flag = 'N' AND kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja = ".$pLoginAreaKerja.")) b,
				(SELECT COUNT(1) mut_ko FROM trxmutasi_ko WHERE verified_flag = 'N' AND kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja = ".$pLoginAreaKerja.")) c ";
		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $vCek=$rowCek['result']; }
		mysqli_free_result($rsCek);
		$vResult=$vCek;
		}
	return $vResult;
	}
function fSetFocus($pPage) {
	if ($pPage=="" || $pPage=="logout" || $pPage=="beranda") { return "<body>"; }
	if ($pPage=="login") { return "<body onLoad='document.forms.Form1.username.focus()'>"; }
	if ($pPage=="passwordForm") { return "<body onLoad='document.forms.Form1.pPasswordBaru1.focus()'>"; }
	if ($pPage=="home") { return "<body onload=\"setInterval('blinkIt()', 300)\">"; }
	if ($pPage=="userForm") { return "<body onLoad='document.forms.Form1.pUser.focus()'>"; }
	if ($pPage=="mProvinsiForm") { return "<body onLoad='document.forms.Form1.pKodeProv.focus()'>"; }
	if ($pPage=="mKelompokProdukForm") { return "<body onLoad='document.forms.Form1.pNama.focus()'>"; }
	if ($pPage=="mSpesiesKayuForm") { return "<body onLoad='document.forms.Form1.pNamaPerdagangan.focus()'>"; }
	if ($pPage=="mNegaraForm") { return "<body onLoad='document.forms.Form1.pNama.focus()'>"; }
	if ($pPage=="mPelabuhanMuatForm") { return "<body onLoad='document.forms.Form1.pInisial.focus()'>"; }
	if ($pPage=="mPelabuhanTujuanForm") { return "<body onLoad='document.forms.Form1.pInisial.focus()'>"; }
	if ($pPage=="cekStatus") { return "<body onLoad='document.forms.Form1.pNoVLegal.focus()'>"; }
	}
/** kebutuhan laporan atau penerbitan dokumen vlegal **/
function fPOSA($pNoInvoice) {
	$qResult="SELECT nama, keterangan FROM mstnegara WHERE kode IN (SELECT negara_tujuan FROM trxmohon_hdr WHERE no_invoice = '".cleanQuery($pNoInvoice)."')";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) {
		if ($rowResult['keterangan']=="") { $vResult=$rowResult['nama']; }
		if ($rowResult['keterangan']!="") { $vResult=$rowResult['keterangan']; }
		}
	mysqli_free_result($rsResult);
	return $vResult;
	}
function fPOSB($pNoInvoice) {
	$qResult="SELECT kode, nama FROM mstkerjasama WHERE kode IN (SELECT skemakerjasama FROM trxmohon_hdr WHERE no_invoice = '".cleanQuery($pNoInvoice)."')";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['kode']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
function fKotak1($pWhat) {
	$qResult="SELECT nama_lembaga, gedung, jalan, telepon, faks, email, nomor_akreditasi, nm_penanggungjawab, nip_penanggungjawab "
			."  FROM mstlvlk WHERE kode = 1";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) {
		if ($pWhat=="NAMA") { $vResult=$rowResult['nama_lembaga']; }
		if ($pWhat=="GEDUNG") { $vResult=$rowResult['gedung']; }
		if ($pWhat=="JALAN") { $vResult=$rowResult['jalan']; }
		if ($pWhat=="TELEPON") { $vResult=$rowResult['telepon']; }
		if ($pWhat=="FAKS") { $vResult=$rowResult['faks']; }
		if ($pWhat=="EMAIL") { $vResult=$rowResult['email']; }
		if ($pWhat=="AKREDITASI") { $vResult=$rowResult['nomor_akreditasi']; }
		if ($pWhat=="NM_PENANGGUNGJAWAB") { $vResult=$rowResult['nm_penanggungjawab']; }
		if ($pWhat=="NIP_PENANGGUNGJAWAB") { $vResult=$rowResult['nip_penanggungjawab']; }
		}
	mysqli_free_result($rsResult);
	return $vResult;
	}
function fKotak2($pNoInvoice, $pWhat) {
	$qResult="SELECT a.nama_importir, a.alamat1, a.alamat2, a.alamat3, a.pelabuhanbongkar, "
			."		(SELECT nama FROM mstnegara WHERE kode = a.negara_importir) nm_negara_importir, "
			."      (SELECT inisial FROM mstnegara WHERE kode = a.negara_importir) ISO_negara_importir, "
			."      (SELECT nama FROM mstnegara WHERE kode = a.negara_tujuan) nm_negara_tujuan, "
			."      (SELECT inisial FROM mstnegara WHERE kode = a.negara_tujuan) ISO_negara_tujuan, "
			."		(SELECT nama FROM mstpelabuhanmuat WHERE kode = a.pelabuhanmuat) nm_pelabuhan_muat, "
			."		(SELECT inisial FROM mstpelabuhanmuat WHERE kode = a.pelabuhanmuat) ISO_pelabuhan_muat, "
			."		(SELECT nama FROM mstpelabuhantujuan WHERE inisial = a.pelabuhanbongkar) nm_pelabuhan_bongkar, "
			."		(SELECT FORMAT(SUM(nilai),2) FROM trxmohon_dtl WHERE no_invoice = '".cleanQuery($pNoInvoice)."') total_nilai "
			."  FROM trxmohon_hdr a "
			." WHERE no_invoice = '".cleanQuery($pNoInvoice)."' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) {
		if ($pWhat=="NAMA") { $vResult=$rowResult['nama_importir']; }
		if ($pWhat=="ALAMAT1") { $vResult=$rowResult['alamat1']; }
		if ($pWhat=="ALAMAT2") { $vResult=$rowResult['alamat2']; }
		if ($pWhat=="ALAMAT3") { $vResult=$rowResult['alamat3']; }
		if ($pWhat=="NM_NEGARA_IMPORTIR") { $vResult=$rowResult['nm_negara_importir']; }
		if ($pWhat=="ISO_NEGARA_IMPORTIR") { $vResult=$rowResult['ISO_negara_importir']; }
		if ($pWhat=="NILAI") { $vResult=$rowResult['total_nilai']; }
		if ($pWhat=="NM_NEGARA_TUJUAN") { $vResult=$rowResult['nm_negara_tujuan']; }
		if ($pWhat=="ISO_NEGARA_TUJUAN") { $vResult=$rowResult['ISO_negara_tujuan']; }
		if ($pWhat=="NM_PELABUHAN_MUAT") { $vResult=$rowResult['nm_pelabuhan_muat']; }
		if ($pWhat=="ISO_PELABUHAN_MUAT") { $vResult=$rowResult['ISO_pelabuhan_muat']; }
		if ($pWhat=="NM_PELABUHAN_BONGKAR") { $vResult=$rowResult['nm_pelabuhan_bongkar']; }
		if ($pWhat=="ISO_PELABUHAN_BONGKAR") { $vResult=$rowResult['pelabuhanbongkar']; }
		}
	mysqli_free_result($rsResult);
	return $vResult;
	}
function fKotak4($pNoInvoice, $pWhat, $pTipeDokumen) {
	$qResult="SELECT valid_until FROM trxhasil_akhir WHERE no_invoice = '".cleanQuery($pNoInvoice)."' AND tipe_dokumen = '".cleanQuery($pTipeDokumen)."' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) {
		if ($pWhat=="TGL") { $vResult=substr($rowResult['valid_until'], 8, 2); }
		if ($pWhat=="BLN") { $vResult=substr($rowResult['valid_until'], 5, 2); }
		if ($pWhat=="THN") { $vResult=substr($rowResult['valid_until'], 0, 4); }
		}
	mysqli_free_result($rsResult);
	return $vResult;
	}
function fKotak7($pNoInvoice) {
	$qResult="SELECT kode, nama FROM msttransportasi WHERE kode IN (SELECT saranatransportasi FROM trxmohon_hdr WHERE no_invoice = '".cleanQuery($pNoInvoice)."')";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['kode']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
function fKotak8($pNoInvoice, $pWhat) {
	$qResult="SELECT nama, no_etpik, npwp, alamat_pabrik, telepon, faks, email "
			."  FROM mstindustri "
			." WHERE kode IN (SELECT kodeindustri FROM trxmohon_hdr WHERE no_invoice = '".cleanQuery($pNoInvoice)."')";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) {
		if ($pWhat=="NAMA") { $vResult=$rowResult['nama']; }
		if ($pWhat=="NO_ETPIK") { $vResult=$rowResult['no_etpik']; }
		if ($pWhat=="NPWP") { $vResult=$rowResult['npwp']; }
		if ($pWhat=="ALAMAT") { $vResult=$rowResult['alamat_pabrik']; }
		if ($pWhat=="KONTAK") { $vResult="Phone:".$rowResult['telepon']." Fax:".$rowResult['faks']." ".$rowResult['email']; }
		}
	mysqli_free_result($rsResult);
	return $vResult;
	}
function fKotak9_10($pNoInvoice, $pWhat) {
	$qResult="SELECT a.kodeproduksi, "
			."	    (SELECT kode_hs FROM mstproduk WHERE kode = b.produk) kode_hs, "
			."	    (SELECT detil1 FROM mstproduk WHERE kode = b.produk) detil1, "
			."	    (SELECT detil2 FROM mstproduk WHERE kode = b.produk) detil2, "
			."		(SELECT nama FROM mstjenisproduk WHERE kode = b.jenisproduk AND kelompokproduk = b.kelompokproduk) nm_jenis_produk "
			."  FROM trxmohon_dtl a, trxproduksi b "
			." WHERE a.kodeproduksi = b.kode "
			."   AND a.no_invoice = '".cleanQuery($pNoInvoice)."' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	$countResult=mysqli_num_rows($rsResult);
	if ($countResult>1) {
		if ($pWhat=="HS") { $vResult="ENCLOSED"; }
		if ($pWhat=="DESKRIPSI") { $vResult="ENCLOSED"; }
		}
	if ($countResult==1) {
		while($rowResult=mysqli_fetch_array($rsResult)) {
			if ($pWhat=="HS") { $vResult=$rowResult['hs']; }
			if ($pWhat=="DESKRIPSI") { $vResult=$rowResult['nm_jenis_produk']." ".$rowResult['detil1']." ".$rowResult['detil2']; }
			}
		mysqli_free_result($rsResult);
		}
	if ($countResult==0) { $vResult=""; }
	return $vResult;
	}
function fKotak11($pNoInvoice) {
	$qResult="SELECT b.spesies, "
			."		(SELECT nama_perdagangan FROM mstspesieskayu WHERE kode = b.spesies) nm_perdagangan_spesies, "
			."		(SELECT nama_ilmiah FROM mstspesieskayu WHERE kode = b.spesies) nm_ilmiah_spesies "
			."  FROM trxmohon_dtl a, trxproduksi b "
			." WHERE a.kodeproduksi = b.kode "
			."   AND a.no_invoice = '".cleanQuery($pNoInvoice)."' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	$countResult=mysqli_num_rows($rsResult);
	if ($countResult>1) { $vResult="ENCLOSED"; }
	if ($countResult==1) { while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['nm_perdagangan_spesies']; } mysqli_free_result($rsResult); }
	if ($countResult==0) { $vResult=""; }
	return $vResult;
	}
function fKotak12($pNoInvoice, $pWhat) {
	$qResult="SELECT DISTINCT a.negara, "
			."		(SELECT nama FROM mstnegara WHERE kode = a.negara) nm_negara, "
			."		(SELECT inisial FROM mstnegara WHERE kode = a.negara) iso_negara "
			."  FROM trxmohon_negara_panen a "
			." WHERE a.no_invoice = '".cleanQuery($pNoInvoice)."' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	$countResult=mysqli_num_rows($rsResult);
	if ($countResult>1) {
		if ($pWhat=="NM_NEGARA") { $vResult="ENCLOSED"; }
		if ($pWhat=="ISO_NEGARA") { $vResult="ENCLOSED"; }
		}
	if ($countResult==1) {
		while($rowResult=mysqli_fetch_array($rsResult)) {
			if ($pWhat=="NM_NEGARA") { $vResult=$rowResult['nm_negara']; }
			if ($pWhat=="ISO_NEGARA") { $vResult=$rowResult['iso_negara']; }
			}
		mysqli_free_result($rsResult);
		}
	if ($countResult==0) { $vResult=""; }
	return $vResult;
	}
function fKotak14_15_16($pNoInvoice, $pWhat) {
	$qResult="SELECT FORMAT(SUM(volume),4) total_volume, "
			."		 FORMAT(SUM(berat),2) total_berat, "
			."		 FORMAT(SUM(unit),2) total_unit "
			."  FROM trxmohon_dtl "
			." WHERE no_invoice = '".cleanQuery($pNoInvoice)."' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) {
		if ($pWhat=="VOLUME") { $vResult=$rowResult['total_volume']; }
		if ($pWhat=="BERAT") { $vResult=$rowResult['total_berat']; }
		if ($pWhat=="UNIT") { $vResult=$rowResult['total_unit']; }
		}
	mysqli_free_result($rsResult);
	return $vResult;
	}
function fKotak17($pNoInvoice, $pWhat, $pTipeDokumen) {
	if ($pWhat=="INVOICE") { $vResult=$pNoInvoice; }
	if ($pWhat=="TANGGAL") {
		$qResult="SELECT tgl_invoice FROM trxmohon_hdr WHERE no_invoice='".cleanQuery($pNoInvoice)."' ";
		$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
		while($rowResult=mysqli_fetch_array($rsResult))
			{ $vResult=substr($rowResult['tgl_invoice'], 8, 2)." ".fBulan(substr($rowResult['tgl_invoice'], 5, 2))." ".substr($rowResult['tgl_invoice'], 0, 4); }
		mysqli_free_result($rsResult);
		}
	if ($pWhat=="SECURITY_CODE") {
		if ($pTipeDokumen=="VLEGAL-VERIFIKASI") { $vResult="100"; }
		if ($pTipeDokumen=="VLEGAL-INSPEKSI") { $vResult="200"; }

		$qResult="SELECT LPAD(COALESCE(a.kodeindustri, 0), 4, '0') kodeindustri, LPAD(COALESCE(b.areakerja, 0), 2, '0') areakerja, "
				."		(SELECT SUM(volume) FROM trxmohon_dtl WHERE no_invoice = a.no_invoice) volume, "
				."		(SELECT SUM(nilai) FROM trxmohon_dtl WHERE no_invoice = a.no_invoice) nilai, "
				."		 a.setuju_penanggungjawab_cabang1_tgl tgl_pembuatan "
				."	FROM trxmohon_hdr a, mstindustri b "
				." WHERE a.kodeindustri = b.kode "
				."   AND a.no_invoice = '".cleanQuery($pNoInvoice)."' ";
		$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
		while($rowResult=mysqli_fetch_array($rsResult)) {
			$vResult.=$rowResult['kodeindustri'];
			$vResult.=$rowResult['areakerja'];
			$vResult.=$rowResult['volume'];
			$vResult.=$rowResult['nilai'];
			$vResult.=substr($rowResult['tgl_pembuatan'], 8, 2);
			$vResult.=substr($rowResult['tgl_pembuatan'], 5, 2);
			$vResult.=substr($rowResult['tgl_pembuatan'], 0, 4);
			}
		mysqli_free_result($rsResult);
		}
	return $vResult;
	}
function fKotak18($pNoInvoice, $pWhat) {
	if ($pWhat=="NAME") {
		$qResult="SELECT userDescp FROM admuser "
				." WHERE userGroupID = 'G004' "
				."   AND area_kerja IN (SELECT areakerja FROM mstindustri "
                ."                       WHERE kode IN (SELECT kodeindustri FROM trxmohon_hdr WHERE no_invoice = '".cleanQuery($pNoInvoice)."'))";
		$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
		while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['userDescp']; }
		}
	if ($pWhat=="PLACE") {
		$qResult="SELECT nama FROM mstareakerja "
				." WHERE kode IN (SELECT areakerja FROM mstindustri "
				."                 WHERE kode IN (SELECT kodeindustri FROM trxmohon_hdr WHERE no_invoice = '".cleanQuery($pNoInvoice)."'))";
		$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
		while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['nama']; }
		}
	if ($pWhat=="TANGGAL") {
		$qResult="SELECT setuju_penanggungjawab_pusat_tgl FROM trxmohon_hdr WHERE no_invoice = '".cleanQuery($pNoInvoice)."' ";
		$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
		while($rowResult=mysqli_fetch_array($rsResult))
			{ $vResult=substr($rowResult['setuju_penanggungjawab_pusat_tgl'], 8, 2)." ".fBulan(substr($rowResult['setuju_penanggungjawab_pusat_tgl'], 5, 2))." ".substr($rowResult['setuju_penanggungjawab_pusat_tgl'], 0, 4); }
		mysqli_free_result($rsResult);
		}
	return $vResult;
	}
function fNomorLaporan($pNoInvoice, $pTipeDokumen) {
	$qResult="SELECT tahun_penerbitan, nomor_urut, LPAD(kode_slk,5,'0') kode_slk, kode_lvlk, kode_negara_asal, kode_negara_tujuan "
			."  FROM trxhasil_akhir "
			." WHERE no_invoice = '".cleanQuery($pNoInvoice)."' "
			."   AND tipe_dokumen = '".cleanQuery($pTipeDokumen)."' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) {
		if ($pTipeDokumen=="LAP-VERIFIKASI" || $pTipeDokumen=="LAP-INSPEKSI") {
			$vResult=substr($rowResult['tahun_penerbitan'], 2, 2).".".$rowResult['nomor_urut']."-".$rowResult['kode_slk'].".".$rowResult['kode_lvlk']."/LAP";
			}
		if ($pTipeDokumen=="LKS-VERIFIKASI" || $pTipeDokumen=="LKS-INSPEKSI") {
			$vTipe="LKS";
			$vResult=substr($rowResult['tahun_penerbitan'], 2, 2).".".$rowResult['nomor_urut']."-".$rowResult['kode_slk'].".".$rowResult['kode_lvlk']."/LKS";
			}
		if ($pTipeDokumen=="VLEGAL-VERIFIKASI" || $pTipeDokumen=="VLEGAL-INSPEKSI") {
			$vResult=substr($rowResult['tahun_penerbitan'], 2, 2).".".$rowResult['nomor_urut']."-".$rowResult['kode_slk'].".".$rowResult['kode_lvlk']."-".$rowResult['kode_negara_asal']."-".$rowResult['kode_negara_tujuan'];
			}
		}
	mysqli_free_result($rsResult);
	return $vResult;
	}
function fMohonHeader($pNoInvoice, $pWhat) {
	$qResult="SELECT a.kodeindustri,
					(SELECT nama FROM mstindustri WHERE kode = a.kodeindustri) nm_industri,
					(SELECT jenisindustri FROM mstindustri WHERE kode = a.kodeindustri) jenis_industri,
					(SELECT npwp FROM mstindustri WHERE kode = a.kodeindustri) npwp,
					(SELECT no_etpik FROM mstindustri WHERE kode = a.kodeindustri) no_etpik,
					(SELECT tgl_etpik FROM mstindustri WHERE kode = a.kodeindustri) tgl_etpik,
					(SELECT alamat_pabrik FROM mstindustri WHERE kode = a.kodeindustri) alamat_pabrik,
					(SELECT telepon FROM mstindustri WHERE kode = a.kodeindustri) telepon,
					(SELECT faks FROM mstindustri WHERE kode = a.kodeindustri) faks,
					(SELECT email FROM mstindustri WHERE kode = a.kodeindustri) email
				FROM trxmohon_hdr a
				WHERE a.no_invoice = '".cleanQuery($pNoInvoice)."' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	$countResult=mysqli_num_rows($rsResult);
	if ($countResult==0) { $vResult=""; }
	else {
		while($rowResult=mysqli_fetch_array($rsResult)) {
			if ($pWhat=="KODE_INDUSTRI") { $vResult=$rowResult['kodeindustri']; }
			if ($pWhat=="NM_INDUSTRI") { $vResult=$rowResult['nm_industri']; }
			if ($pWhat=="JENIS_INDUSTRI") { $vResult=$rowResult['jenis_industri']; }
			if ($pWhat=="NM_PJ_INDUSTRI") { $vResult=$rowResult['nm_penanggungjawab_industri']; }
			if ($pWhat=="JBT_PJ_INDUSTRI") { $vResult=$rowResult['jbt_penanggungjawab_industri']; }
			if ($pWhat=="LOKASI_INSPEKSI") { $vResult=$rowResult['lokasi_inspeksi']; }
			if ($pWhat=="TGL_MULAI") { $vResult=$rowResult['tanggal_mulai']; }
			if ($pWhat=="JAM_MULAI") { $vResult=$rowResult['jam_mulai']; }
			if ($pWhat=="TGL_SELESAI") { $vResult=$rowResult['tanggal_selesai']; }
			if ($pWhat=="JAM_SELESAI") { $vResult=$rowResult['jam_selesai']; }
			if ($pWhat=="NPWP") { $vResult=$rowResult['npwp']; }
			if ($pWhat=="NO_ETPIK") { $vResult=$rowResult['no_etpik']; }
			if ($pWhat=="TGL_ETPIK") { $vResult=$rowResult['tgl_etpik']; }
			if ($pWhat=="KAPASITAS_IZIN") { $vResult=$rowResult['kapasitas_izin']; }
			if ($pWhat=="ALAMAT_PABRIK") { $vResult=$rowResult['alamat_pabrik']; }
			if ($pWhat=="TELEPON") { $vResult=$rowResult['telepon']; }
			if ($pWhat=="FAKS") { $vResult=$rowResult['faks']; }
			if ($pWhat=="EMAIL") { $vResult=$rowResult['email']; }
			if ($pWhat=="SETUJU") {
				if ($rowResult['setuju_penanggungjawab_inspeksi']=="Y") { $vResult="YA"; }
				if ($rowResult['setuju_penanggungjawab_inspeksi']=="N") { $vResult="TIDAK"; }
				}
			if ($pWhat=="CATATAN") { $vResult=$rowResult['kesimpulan_rekomendasi']; }
			}
		mysqli_free_result($rsResult);
		}
	return $vResult;
	}
function fMohonInspektor($pNoInvoice, $pWhat, $pPosisi) {
	if ($pPosisi=="PJ_INSPEKSI") { $vPosisi=3; }
	if ($pPosisi=="INSPEKTOR") { $vPosisi=1; }
	if ($pPosisi=="VERIFIKATOR") { $vPosisi=2; }

	$qResult="SELECT a.kode_petugas, "
			."		(SELECT nama FROM mstpetugas WHERE kode = a.kode_petugas) nm_petugas, "
			."		(SELECT npp FROM mstpetugas WHERE kode = a.kode_petugas) npp_petugas "
			."  FROM trxmohon_inspektor a "
			." WHERE a.no_invoice = '".cleanQuery($pNoInvoice)."' "
			."   AND a.posisi = ".cleanQuery($vPosisi);
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	$countResult=mysqli_num_rows($rsResult);
    $vResult = '';
	if ($countResult==0) { $vResult=""; }
	else {
		while($rowResult=mysqli_fetch_array($rsResult)) {
			if ($pWhat=="NAMA") {
				if ($pPosisi=="INSPEKTOR") { $vResult.=$rowResult['nm_petugas']."<br>"; }
				else { $vResult=$rowResult['nm_petugas']; }
				}
			if ($pWhat=="NIP") { if ($pPosisi!="INSPEKTOR") { $vResult=$rowResult['npp_petugas']; } }
			}
		mysqli_free_result($rsResult);
		}
	return $vResult;
	}
function fMohonVerifikator($pNoInvoice, $pWhat) {
	$qResult="SELECT a.verifikator_cabang, "
			."		(SELECT nama FROM mstpetugas WHERE kode = a.verifikator_cabang) nm_petugas, "
			."		(SELECT npp FROM mstpetugas WHERE kode = a.verifikator_cabang) npp_petugas "
			."  FROM mstindustri a "
			." WHERE a.kode IN (SELECT kodeindustri FROM trxmohon_hdr WHERE no_invoice = '".cleanQuery($pNoInvoice)."') ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	$countResult=mysqli_num_rows($rsResult);
	if ($countResult==0) { $vResult=""; }
	else {
		while($rowResult=mysqli_fetch_array($rsResult)) {
			if ($pWhat=="NAMA") { $vResult=$rowResult['nm_petugas']; }
			if ($pWhat=="NIP") { $vResult=$rowResult['npp_petugas']; }
			}
		mysqli_free_result($rsResult);
		}
	return $vResult;
	}

/** begin web service **/
function fLIU_WS($pCommand, $pXML) {
	require_once('nusoap/lib/nusoap.php');
	$client = new nusoap_client('http://liu.dephut.go.id/ws/server2.php?wsdl', 'wsdl');
	$err = $client->getError();
	if ($err) { $vResult='Constructor error:'.$err; }
	$pUser="SucofindoICS";
	$pPassword="sics2012";
	$result = $client->call($pCommand, array('string0' => $pUser, 'string1' => $pPassword, 'string2' => simplexml_load_string($pXML)));
	if ($client->fault) { $vResult='Fault:'.$result; }
	else {
		$err = $client->getError();
		if ($err) { $vResult='Error:'.$err; } else { $vResult=$result; }
		}
	return $vResult;
	}
/** end web service **/

function fHasilAkhir($pNoInvoice, $pWhat) {
	$qResult="SELECT LPAD(a.kode_slk,5,'0') kode_slk, b.tgl_invoice, a.creadate tgl_dokumen, d.userdescp nama_ttd, d.kode_ttd, e.nama tempat_ttd, f.inisial provinsi, g.inisial kabupaten, "
			."		 b.keterangan, b.pj_teknis_ttd, a.vlegal_number, b.lokasi_stuffing "
			."  FROM ws_aktifitas_hdr a, trxmohon_hdr b, mstindustri c, admuser d, mstareakerja e, mstprovinsi f, mstkabupaten g "
			." WHERE a.no_ppdvl_1 = b.no_ppdvl_1 "
			."	 AND a.no_ppdvl_2 = b.no_ppdvl_2 "
			."	 AND a.no_ppdvl_3 = b.no_ppdvl_3 "
			."	 AND a.no_ppdvl_4 = b.no_ppdvl_4 "
			."   AND a.kodeindustri = b.kodeindustri "
			."	 AND a.no_invoice = b.no_invoice "
			."   AND b.kodeindustri = c.kode "
			."	 AND c.areakerja = e.kode "
			."	 AND c.provinsi = f.kodeprov "
			."	 AND c.provinsi = g.kodeprov "
			."	 AND c.kabupaten = g.kodekab "
			."	 AND b.pj_teknis = d.userID "
			."   AND a.no_invoice = '".cleanQuery($pNoInvoice)."' "
			."ORDER BY a.kode DESC LIMIT 1 ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	$countResult=mysqli_num_rows($rsResult);
	if ($countResult==0) { $vResult=""; }
	else {
		while($rowResult=mysqli_fetch_array($rsResult)) {
			if ($pWhat=="NO_SLK") { $vResult=$rowResult['kode_slk']; }
			if ($pWhat=="TGL_INVOICE") { $vResult=substr($rowResult['tgl_invoice'],0,4).substr($rowResult['tgl_invoice'],5,2).substr($rowResult['tgl_invoice'],8,2); }
			if ($pWhat=="TGL_DOKUMEN") { $vResult=date('Y').date('m').date('d'); }
			if ($pWhat=="NAMA_TTD") { $vResult=$rowResult['nama_ttd']; }
			//if ($pWhat=="KODE_TTD") { $vResult=$rowResult['kode_ttd']; } // versi lama -> pj kegiatan
			if ($pWhat=="TEMPAT_TTD") { $vResult=$rowResult['tempat_ttd']; }
			if ($pWhat=="PROVINSI") { $vResult=$rowResult['provinsi']; }
			if ($pWhat=="KABUPATEN") { $vResult=$rowResult['kabupaten']; }
			if ($pWhat=="KETERANGAN") { $vResult=$rowResult['keterangan']; }
			if ($pWhat=="KODE_TTD") { $vResult=$rowResult['pj_teknis_ttd']; }
			if ($pWhat=="NO_VLEGAL") { $vResult=$rowResult['vlegal_number']; }
			if ($pWhat=="LOKASI_STUFFING") { $vResult=$rowResult['lokasi_stuffing']; }
			}
		mysqli_free_result($rsResult);
		}
	return $vResult;
	}
function fGetInfoIndustri($pJenis, $pKodeIndustri) {
	$qResult="SELECT a.nama, a.alamat_pabrik, a.jenisindustri, a.cetak_sendiri, a.jenis_SLK,
					(SELECT nama FROM mstareakerja WHERE kode = a.areakerja) nm_area_kerja
			  FROM mstindustri a
			  WHERE a.kode = ".cleanQuery($pKodeIndustri);
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) {
		if ($pJenis=="NAMA_INDUSTRI") { $vResult=$rowResult['nama']; }
		if ($pJenis=="ALAMAT") { $vResult=$rowResult['alamat_pabrik']; }
		if ($pJenis=="JENIS_INDUSTRI") { $vResult=$rowResult['jenisindustri']; }
		if ($pJenis=="AREA_KERJA") { $vResult=$rowResult['nm_area_kerja']; }
		if ($pJenis=="MODE_PRINT") { $vResult=$rowResult['cetak_sendiri']; }
		if ($pJenis=="JENIS_SLK") { $vResult=$rowResult['jenis_SLK']; }
		}
	mysqli_free_result($rsResult);
	return $vResult;
	}

/** handle special characters **/
function fSpecialChars($pChar) {
	// replace & character
	$search=array('�', '�', '�', '�', '�', '�', '�', '�', '�', '�', '�', '�');
	$replace=array('&plusmn;', '&Acirc;', '&uuml;', '&Uuml;', '&Aring;', '&aring;', '&lsquo;', '&rsquo;', '&aacute;', '&Aacute;', '&Eacute;', '&eacute;');
	$vResult=str_replace($search, $replace, $pChar);
	return $vResult;
	}

/** begin mail service **/
function fAutoEmail($pSubject, $pBody, $pJenis, $pLoginEmail, $pGroupID, $pKodeIndustri, $pAreaKerja) {
	global $error;
	$mail = new PHPMailer();
	$mail->IsSMTP(); // send via SMTP
	$mail->SMTPDebug=2;  // untuk memunculkan pesan error /debug di layar
	$mail->SMTPAuth=true;
	$mail->SMTPSecure="tls";
	$mail->Host="172.16.100.245";
	$mail->Port=587; //port secure ssl email
	$mail->Username="admin-silk"; // SMTP username gmail
	$mail->Password="adm@SILK#2019"; // SMTP password gmail
	$webmaster_email="admin-silk@sucofindo.co.id"; //Reply to this email ID gmail

	// jika menggunakan sucofindo
	//$mail->Host="mail5.sucofindo.co.id";
	//$mail->SMTPAuth=true;
	//$mail->Username="fernando";
	//$mail->Password="fernando";
	//$webmaster_email="fernando@sucofindo.co.id";

	// jika menggunakan rumahweb.com
	//$mail->Host="silk-sucofindo.biz";
	//$mail->SMTPAuth=true;
	//$mail->Username="admin";
	//$mail->Password="adm@silk#sucofindo";
	//$webmaster_email="admin@silk-sucofindo.biz";

	$mail->From=$webmaster_email;
	$mail->FromName="autoemail-SILK-Sucofindo";
	$mail->ClearAddresses();

	if ($pJenis=="MOHON_BLANKO_CABANG" OR $pJenis=="MOHON_KIRIM_PUSAT") {
		// ambil email pjk cabang, pjt cabang & vrf cabang
		$qEmail="SELECT DISTINCT userEmail FROM admuser WHERE aktif='Y' AND userGroupID IN ('G004','G009','G005') AND area_kerja=".$pAreaKerja;
		$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
		while($rowEmail=mysqli_fetch_array($rsEmail)) { $mail->AddAddress($rowEmail['userEmail']); }
		mysqli_free_result($rsEmail);
		// ambil email pj pusat & vrf pusat
		$qEmail="SELECT DISTINCT userEmail FROM admuser WHERE aktif='Y' AND userGroupID IN ('G002','G003')";
		$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
		while($rowEmail=mysqli_fetch_array($rsEmail)) { $mail->AddAddress($rowEmail['userEmail']); }
		mysqli_free_result($rsEmail);
		}
	if ($pJenis=="MOHON_BLANKO_INDUSTRI") {
		$mail->AddAddress($pLoginEmail);
		// ambil email pjk cabang, pjt cabang & vrf cabang
		$qEmail="SELECT DISTINCT userEmail FROM admuser WHERE aktif='Y' AND userGroupID IN ('G004','G009','G005') AND area_kerja=".$pAreaKerja;
		$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
		while($rowEmail=mysqli_fetch_array($rsEmail)) { $mail->AddAddress($rowEmail['userEmail']); }
		mysqli_free_result($rsEmail);
		}
	if ($pJenis=="MOHON_KIRIM_CABANG") {
		// ambil email pjk cabang, pjt cabang & vrf cabang
		$qEmail="SELECT DISTINCT userEmail FROM admuser WHERE aktif='Y' AND userGroupID IN ('G004','G009','G005') AND area_kerja=".$pAreaKerja;
		$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
		while($rowEmail=mysqli_fetch_array($rsEmail)) { $mail->AddAddress($rowEmail['userEmail']); }
		mysqli_free_result($rsEmail);
		// ambil email operator industri
		$qEmail="SELECT DISTINCT userEmail, userEmail2, userEmail3 FROM admuser WHERE aktif='Y' AND userGroupID='G006' AND kode_industri=".$pKodeIndustri;
		$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
		while($rowEmail=mysqli_fetch_array($rsEmail)) {
			$mail->AddAddress($rowEmail['userEmail']);
			if ( $rowEmail['userEmail2']!="" OR $rowEmail['userEmail2']!=$rowEmail['userEmail'] ) { $mail->AddAddress($rowEmail['userEmail2']); }
			if ( $rowEmail['userEmail3']!="" OR $rowEmail['userEmail3']!=$rowEmail['userEmail'] OR $rowEmail['userEmail3']!=$rowEmail['userEmail2'] ) { $mail->AddAddress($rowEmail['userEmail3']); }
			}
		mysqli_free_result($rsEmail);
		}
	if ($pJenis=="SEND_PPDVL") {
		if ($pGroupID=="G006") { // jika yg mengirim operator industri
			$mail->AddAddress($pLoginEmail);
			// ambil email data entry
			$qEmail="SELECT DISTINCT userEmail, userEmail2, userEmail3 FROM admuser WHERE aktif='Y' AND userGroupID = 'G008' AND area_kerja = ".$pAreaKerja;
			$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
			while($rowEmail=mysqli_fetch_array($rsEmail)) {
				$mail->AddAddress($rowEmail['userEmail']);
				if ( $rowEmail['userEmail2']!="" OR $rowEmail['userEmail2']!=$rowEmail['userEmail'] ) { $mail->AddAddress($rowEmail['userEmail2']); }
				if ( $rowEmail['userEmail3']!="" OR $rowEmail['userEmail3']!=$rowEmail['userEmail'] OR $rowEmail['userEmail3']!=$rowEmail['userEmail2'] ) { $mail->AddAddress($rowEmail['userEmail3']); }
				}
			mysqli_free_result($rsEmail);
			}
		if ($_SESSION['sGroupID']=="G008") { // jika yg mengirim data entry
			// ambil email operator industri
			$qEmail="SELECT DISTINCT userEmail FROM admuser WHERE aktif='Y' AND userGroupID = 'G006' AND kode_industri = ".$pKodeIndustri;
			$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
			while($rowEmail=mysqli_fetch_array($rsEmail)) { $mail->AddAddress($rowEmail['userEmail']); }
			mysqli_free_result($rsEmail);
			$mail->AddAddress($pLoginEmail);
			}
		// ambil email verifikator/data entry cabang
		$qEmail="SELECT DISTINCT userEmail FROM admuser WHERE aktif='Y' AND userGroupID IN ('G005', 'G008') AND area_kerja = ".$pAreaKerja;
		$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
		while($rowEmail=mysqli_fetch_array($rsEmail)) { $mail->AddAddress($rowEmail['userEmail']); }
		mysqli_free_result($rsEmail);
		// ambil email pj kegiatan
		$qEmail="SELECT DISTINCT userEmail FROM admuser WHERE aktif='Y' AND userGroupID = 'G004' AND area_kerja = ".$pAreaKerja;
		$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
		while($rowEmail=mysqli_fetch_array($rsEmail)) { $mail->AddAddress($rowEmail['userEmail']); }
		mysqli_free_result($rsEmail);
		}
	if ($pJenis=="NOT_APPROVED_DATA_ENTRY") {
		if ($_SESSION['sGroupID']=="G002") { $mail->AddAddress("ratu27.mizt16.vlegal@gmail.com"); }
		else {
			// ambil email operator industri
			$qEmail="SELECT DISTINCT userEmail, userEmail2, userEmail3 FROM admuser WHERE aktif='Y' AND userGroupID = 'G006' AND kode_industri = ".$pKodeIndustri;
			$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
			while($rowEmail=mysqli_fetch_array($rsEmail)) {
				$mail->AddAddress($rowEmail['userEmail']);
				if ( $rowEmail['userEmail2']!="" OR $rowEmail['userEmail2']!=$rowEmail['userEmail'] ) { $mail->AddAddress($rowEmail['userEmail2']); }
				if ( $rowEmail['userEmail3']!="" OR $rowEmail['userEmail3']!=$rowEmail['userEmail'] OR $rowEmail['userEmail3']!=$rowEmail['userEmail2'] ) { $mail->AddAddress($rowEmail['userEmail3']); }
				}
			mysqli_free_result($rsEmail);
			$mail->AddAddress($pLoginEmail);
			}
		}
	if ($pJenis=="LKS" OR $pJenis=="TERBIT") {
		// ambil email operator industri
		$qEmail="SELECT DISTINCT userEmail, userEmail2, userEmail3 FROM admuser WHERE aktif='Y' AND userGroupID = 'G006' AND kode_industri = ".$pKodeIndustri;
		$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
		while($rowEmail=mysqli_fetch_array($rsEmail)) {
			$mail->AddAddress($rowEmail['userEmail']);
			if ( $rowEmail['userEmail2']!="" OR $rowEmail['userEmail2']!=$rowEmail['userEmail'] ) { $mail->AddAddress($rowEmail['userEmail2']); }
			if ( $rowEmail['userEmail3']!="" OR $rowEmail['userEmail3']!=$rowEmail['userEmail'] OR $rowEmail['userEmail3']!=$rowEmail['userEmail2'] ) { $mail->AddAddress($rowEmail['userEmail3']); }
			}
		mysqli_free_result($rsEmail);
		if ($pJenis=="LKS") {
			// pj-teknis
			$mail->AddAddress($pLoginEmail);
			// verifikator/data entry cabang
			$qEmail="SELECT DISTINCT userEmail FROM admuser WHERE aktif='Y' AND userGroupID IN ('G005', 'G008') AND area_kerja = ".$pAreaKerja;
			$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
			while($rowEmail=mysqli_fetch_array($rsEmail)) { $mail->AddAddress($rowEmail['userEmail']); }
			mysqli_free_result($rsEmail);
			}
		if ($pJenis=="TERBIT") {
			// verifikator cabang
			$mail->AddAddress($pLoginEmail);
			}
		// ambil email pj kegiatan
		$qEmail="SELECT DISTINCT userEmail FROM admuser WHERE aktif='Y' AND userGroupID = 'G004' AND area_kerja = ".$pAreaKerja;
		$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
		while($rowEmail=mysqli_fetch_array($rsEmail)) { $mail->AddAddress($rowEmail['userEmail']); }
		mysqli_free_result($rsEmail);
		}
	if ($pJenis=="HAPUS_PPDVL") {
		$mail->AddAddress($pLoginEmail);
		// ambil email verifikator/data entry cabang
		$qEmail="SELECT DISTINCT userEmail FROM admuser WHERE aktif='Y' AND userGroupID IN ('G005', 'G008') AND area_kerja = ".$pAreaKerja;
		$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
		while($rowEmail=mysqli_fetch_array($rsEmail)) { $mail->AddAddress($rowEmail['userEmail']); }
		mysqli_free_result($rsEmail);
		}
	if ($pJenis=="PENGISIAN_KUESIONER") {
		//$mail->AddAddress("hendysaputra@live.com");
		$mail->AddAddress("neinafebrianti@gmail.com");
		$mail->AddAddress("nirwanaatik95@gmail.com");
		}
	if ($pJenis=="BROADCAST_EMAIL") {
		$qEmail="SELECT DISTINCT userEmail, userEmail2, userEmail3 FROM admuser WHERE aktif='Y' AND userGroupID = '".$pGroupID."' ";
		$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
		while($rowEmail=mysqli_fetch_array($rsEmail)) {
			$mail->AddAddress($rowEmail['userEmail']);
			if ( $rowEmail['userEmail2']!="" OR $rowEmail['userEmail2']!=$rowEmail['userEmail'] ) { $mail->AddAddress($rowEmail['userEmail2']); }
			if ( $rowEmail['userEmail3']!="" OR $rowEmail['userEmail3']!=$rowEmail['userEmail'] OR $rowEmail['userEmail3']!=$rowEmail['userEmail2'] ) { $mail->AddAddress($rowEmail['userEmail3']); }
			}
		mysqli_free_result($rsEmail);
		}
	if ($pJenis=="TAMBAH_BB") {
		if ($pGroupID=="G006") { // jika yg mengirim operator industri
			$qEmail="SELECT DISTINCT userEmail, userEmail2, userEmail3 FROM admuser WHERE aktif='Y' AND userGroupID = 'G006' AND kode_industri = ".$pKodeIndustri;
			$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
			while($rowEmail=mysqli_fetch_array($rsEmail)) {
				$mail->AddAddress($rowEmail['userEmail']);
				if ( $rowEmail['userEmail2']!="" OR $rowEmail['userEmail2']!=$rowEmail['userEmail'] ) { $mail->AddAddress($rowEmail['userEmail2']); }
				if ( $rowEmail['userEmail3']!="" OR $rowEmail['userEmail3']!=$rowEmail['userEmail'] OR $rowEmail['userEmail3']!=$rowEmail['userEmail2'] ) { $mail->AddAddress($rowEmail['userEmail3']); }
				}
			mysqli_free_result($rsEmail);
			// ambil email verifikator cabang
			$qEmail="SELECT DISTINCT userEmail FROM admuser WHERE aktif='Y' AND userGroupID = 'G005' AND area_kerja = ".$pAreaKerja;
			$rsEmail=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qEmail);
			while($rowEmail=mysqli_fetch_array($rsEmail)) { $mail->AddAddress($rowEmail['userEmail']); }
			mysqli_free_result($rsEmail);
			}
		}

	//$mail->AddAddress("autoemailsilksics@gmail.com");
	$mail->AddAddress("ratu27.mizt16.vlegal@gmail.com");
	$mail->AddReplyTo($webmaster_email, "autoemail-SILK-Sucofindo");
	$mail->WordWrap = 150; // set word wrap
	$mail->Subject=$pSubject;
	$mail->Body=$pBody;
	if(!$mail->Send()) { $vResult="Mailer Error: " . $mail->ErrorInfo; } else { $vResult="SUKSES"; }
	return $vResult;
	}

/** begin pesan-auto **/
function fPesanOtomatis($pSubject, $pBody, $pJenis, $pGroupID, $pKodeIndustri, $pAreaKerja) {
	$qIns="";
	if ($pJenis=="MOHON_BLANKO_CABANG" OR $pJenis=="MOHON_KIRIM_PUSAT") {
		// pjk cabang, pjt cabang & vrf cabang
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND area_kerja=".$pAreaKerja." AND usergroupid IN ('G004','G009','G005') ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) { $qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); "; }
		mysqli_free_result($rsTO);
		mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
		// pj pusat & vrf pusat
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND area_kerja=".$pAreaKerja." AND usergroupid IN ('G002','G003') ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) { $qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); "; }
		mysqli_free_result($rsTO);
		mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
		}
	if ($pJenis=="MOHON_BLANKO_INDUSTRI" OR $pJenis=="MOHON_KIRIM_CABANG") {
		// 1. opr industri
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND kode_industri=".$pKodeIndustri." AND usergroupid='G006' ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) { $qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); "; }
		mysqli_free_result($rsTO);
		mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
		// pjk cabang, pjt cabang & vrf cabang
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND area_kerja=".$pAreaKerja." AND usergroupid IN ('G004','G009','G005') ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) { $qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); "; }
		mysqli_free_result($rsTO);
		mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
		}
	if ($pJenis=="SEND_PPDVL") {
		// 1. opr industri
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND kode_industri = ".$pKodeIndustri." AND usergroupid = 'G006' ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) { $qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); "; }
		mysqli_free_result($rsTO);
		mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
		// 2. data entry
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND area_kerja = ".$pAreaKerja." AND usergroupid = 'G008' ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) { $qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); "; }
		mysqli_free_result($rsTO);
		mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
		// 3. verifikator cabang
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND area_kerja = ".$pAreaKerja." AND usergroupid = 'G005' ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) { $qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); "; }
		mysqli_free_result($rsTO);
		mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
		}
	if ($pJenis=="NOT_APPROVED_DATA_ENTRY") {
		// 1. opr industri
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND kode_industri = ".$pKodeIndustri." AND usergroupid = 'G006' ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) {
			$qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); ";
			mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
			}
		mysqli_free_result($rsTO);
		}
	if ($pJenis=="LKS" OR $pJenis=="TERBIT") {
		// 1. opr industri
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND kode_industri = ".$pKodeIndustri." AND usergroupid = 'G006' ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) {
			$qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); ";
			mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
			}
		mysqli_free_result($rsTO);

		if ($pJenis=="LKS") {
			// 2. pj-teknis
			$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND area_kerja = ".$pAreaKerja." AND usergroupid = 'G009' ";
			$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
			while($rowTO=mysqli_fetch_array($rsTO)) {
				$qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); ";
				mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
				}
			mysqli_free_result($rsTO);
			// 3. verifikator cabang
			$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND area_kerja = ".$pAreaKerja." AND usergroupid = 'G005' ";
			$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
			while($rowTO=mysqli_fetch_array($rsTO)) {
				$qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); ";
				mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
				}
			mysqli_free_result($rsTO);
			}
		if ($pJenis=="TERBIT") {
			// 2. verifikator cabang
			$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND area_kerja = ".$pAreaKerja." AND usergroupid = 'G005' ";
			$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
			while($rowTO=mysqli_fetch_array($rsTO)) {
				$qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); ";
				mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
				}
			mysqli_free_result($rsTO);
			}
		}
	if ($pJenis=="HAPUS_PPDVL") {
		// 1. opr industri
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND kode_industri = ".$pKodeIndustri." AND usergroupid = 'G006' ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) {
			$qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); ";
			mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
			}
		mysqli_free_result($rsTO);
		// 2. verifikator cabang
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND area_kerja = ".$pAreaKerja." AND usergroupid = 'G005' ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) {
			$qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); ";
			mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
			}
		mysqli_free_result($rsTO);
		}
	if ($pJenis=="TAMBAH_BB") {
		// 1. opr industri
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND kode_industri = ".$pKodeIndustri." AND usergroupid = 'G006' ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) { $qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); "; }
		mysqli_free_result($rsTO);
		mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
		// 2. verifikator cabang
		$qTO="SELECT userid FROM admuser WHERE aktif='Y' AND area_kerja = ".$pAreaKerja." AND usergroupid = 'G005' ";
		$rsTO=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qTO);
		while($rowTO=mysqli_fetch_array($rsTO)) { $qIns="INSERT INTO psnpesan (pengirim, areakerja, penerima, subyek, pesan, read_flag, creaby, creadate, creatime) VALUES ('administrator', ".$pAreaKerja.", '".$rowTO['userid']."', '".$pSubject."', '".$pBody."', 'N', 'SYSTEM', '".date('Y')."-".date('m')."-".date('d')."', SUBSTR(NOW(), 12, 8)); "; }
		mysqli_free_result($rsTO);
		mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIns);
		}

	return "SUKSES";
	}
/** end pesan-auto **/

function fGetVLegalNumber($pTahun, $pNoSLK) {
	$y = "LPAD(kode_slk,5,'0') = LPAD('".cleanQuery($pNoSLK)."',5,'0')";
	$count = substr_count($pNoSLK,"a");
	if($count<>"0"){  $y = "LPAD(kode_slk,4,'0') = LPAD('".cleanQuery($pNoSLK)."',4,'0')"; }
	
	$count = substr_count($pNoSLK,"b");
	if($count<>"0"){  $y = "LPAD(kode_slk,4,'0') = LPAD('".cleanQuery($pNoSLK)."',4,'0')"; }
	
	$count = substr_count($pNoSLK,"c");
	if($count<>"0"){  $y = "LPAD(kode_slk,4,'0') = LPAD('".cleanQuery($pNoSLK)."',4,'0')"; }
	
	$qResult="SELECT COALESCE(MAX(vlegal_number), 0)+1 result FROM ws_aktifitas_hdr
			  WHERE $y 
			  AND tahun_penerbitan = '".cleanQuery($pTahun)."' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['result']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}

function fCekSisaBlanko($pAreaKerja, $pKodeIndustri) {
	if ($pKodeIndustri=="") {
		$qResult="SELECT (a.stok - b.pemakaian) sisa FROM "
				."      (SELECT COUNT(1) * 20 stok FROM mstblanko WHERE areakerja = ".$pAreaKerja.") a, "
				."		(SELECT COUNT(1) pemakaian FROM ws_aktifitas_hdr WHERE kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja=".$pAreaKerja.")) b ";
		}
	else {
		$qResult="SELECT (a.stok - b.pemakaian) sisa FROM "
				."      (SELECT COUNT(1) * 20 stok FROM mstblanko WHERE areakerja = ".$pAreaKerja." AND kodeindustri = ".$pKodeIndustri.") a, "
				."		(SELECT COUNT(1) pemakaian FROM ws_aktifitas_hdr WHERE kodeindustri = ".$pKodeIndustri.") b ";
		}
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['sisa']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}

function fCekBlanko($pNoBlanko) {
	$qResult="SELECT x.ada1+y.ada2+z.ada3 AS result, xx.ada4 act
			  FROM (SELECT COUNT(1) ada1 FROM ws_aktifitas_hdr WHERE no_blanko = '".cleanQuery($pNoBlanko)."') x,
				   (SELECT COUNT(1) ada2 FROM trxdeactivate_blanko WHERE status = 'OK' AND no_blanko = '".cleanQuery($pNoBlanko)."') y,
				   (SELECT COUNT(1) ada3 FROM trxmohon_hdr WHERE no_blanko = '".cleanQuery($pNoBlanko)."') z,
				   (SELECT COUNT(1) ada4 FROM trxreactivate_blanko WHERE status = 'OK' AND no_blanko = '".cleanQuery($pNoBlanko)."') xx ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['result']; $vAct=$rowResult['act']; }
	mysqli_free_result($rsResult);
	if ($vResult==0) { return "Y"; } else { if ($vAct==0) { return "N"; } else { return "Y"; } }
	}

function fCekJenisSLK($pKodeIndustri) {
	$qResult="SELECT jenis_SLK FROM mstindustri WHERE kode = ".cleanQuery($pKodeIndustri);
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['jenis_SLK']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}

function fCekSertifikatSLK($pUserLogin) {
	// cek groupid user login
	$qGroup="SELECT userGroupID, kode_industri FROM admuser WHERE userID = '".$pUserLogin."' ";
	$rsGroup=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qGroup);
	while($rowGroup=mysqli_fetch_array($rsGroup)) { $vGroup=$rowGroup['userGroupID']; $vKodeIndustri=$rowGroup['kode_industri']; }
	mysqli_free_result($rsGroup);
	if ($vGroup=="G006") {
		$qResult="SELECT jenis_SLK, tgl_SLK_akhir FROM mstindustri WHERE kode = ".$vKodeIndustri;
		$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
		while($rowResult=mysqli_fetch_array($rsResult)) {
			if ($rowResult['jenis_SLK']=="SLK") {
				$vDateLogin=date('Y')."-".date('m')."-".date('d');
				if ($rowResult['tgl_SLK_akhir']<$vDateLogin) { $vResult="N"; } else { $vResult="Y"; }
				}
			}
		mysqli_free_result($rsResult);
		}
	else { $vResult="Y"; }
	return $vResult;
	}

function fCekKontrakNonSLK($pUserLogin) {
	// cek groupid user login
	$qGroup="SELECT userGroupID, kode_industri FROM admuser WHERE userID = '".$pUserLogin."' ";
	$rsGroup=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qGroup);
	while($rowGroup=mysqli_fetch_array($rsGroup)) { $vGroup=$rowGroup['userGroupID']; $vKodeIndustri=$rowGroup['kode_industri']; }
	mysqli_free_result($rsGroup);
	if ($vGroup=="G006") {
		$qResult="SELECT jenis_SLK, tgl_kontrak_berakhir FROM mstindustri WHERE kode = ".$vKodeIndustri;
		$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
		while($rowResult=mysqli_fetch_array($rsResult)) {
			if ($rowResult['jenis_SLK']=="NonSLK") {
				$vDateLogin=date('Y')."-".date('m')."-".date('d');
				if ($rowResult['tgl_kontrak_berakhir']<$vDateLogin) { $vResult="N"; }
				else { $vResult="Y"; }
				}
			}
		mysqli_free_result($rsResult);
		}
	else { $vResult="Y"; }
	return $vResult;
	}

function fCekMasaBerlakuSertifikatSLK() {
	$vCounter=0; $vKodeIndustri="";
	$qIndustri="SELECT kode, areakerja, tgl_SLK_akhir, YEAR(tgl_SLK_akhir)-YEAR(tgl_SLK_awal) durasi
				FROM mstindustri
				WHERE jenis_SLK = 'SLK'
				AND tgl_slk_akhir >= CURDATE()";
	$rsIndustri=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qIndustri);
	while($rowIndustri=mysqli_fetch_array($rsIndustri)) {
		if ($rowIndustri['durasi']==3) {
			// 1 tahun sekali
			$qData="SELECT DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 2 YEAR) batas_surv_1,
							DATE(DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 2 year) - INTERVAL 30 DAY) start_alert_1,
							DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 1 YEAR) batas_surv_2,
							DATE(DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 1 YEAR) - INTERVAL 30 DAY) start_alert_2,
							DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 0 YEAR) batas_renewal,
							DATE(DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 0 YEAR) - INTERVAL 30 DAY) start_alert_renewal ";
			}
		elseif ($rowIndustri['durasi']==6) {
			// 2 tahun sekali
			$qData="SELECT DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 4 YEAR) batas_surv_1,
							DATE(DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 4 year) - INTERVAL 30 DAY) start_alert_1,
							DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 2 YEAR) batas_surv_2,
							DATE(DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 2 YEAR) - INTERVAL 30 DAY) start_alert_2,
							DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 0 YEAR) batas_renewal,
							DATE(DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 0 YEAR) - INTERVAL 30 DAY) start_alert_renewal ";
			}
		elseif ($rowIndustri['durasi']==10) {
			// 2 tahun sekali
			$qData="SELECT DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 8 YEAR) batas_surv_1,
							DATE(DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 8 year) - INTERVAL 30 DAY) start_alert_1,
							DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 6 YEAR) batas_surv_2,
							DATE(DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 6 YEAR) - INTERVAL 30 DAY) start_alert_2,
							DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 4 YEAR) batas_surv_3,
							DATE(DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 4 YEAR) - INTERVAL 30 DAY) start_alert_3,
							DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 2 YEAR) batas_surv_4,
							DATE(DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 2 YEAR) - INTERVAL 30 DAY) start_alert_4,
							DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 0 YEAR) batas_renewal,
							DATE(DATE('".$rowIndustri['tgl_SLK_akhir']."' - INTERVAL 0 YEAR) - INTERVAL 30 DAY) start_alert_renewal ";
			}

		$rsData=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qData);
		while($rowData=mysqli_fetch_array($rsData)) {
			$vCurrDate=date("Y-m-d");
			if ($rowIndustri['durasi']==3 OR $rowIndustri['durasi']==6) {
				if ($vCurrDate >= $rowData['start_alert_1'] AND $vCurrDate <= $rowData['batas_surv_1']) { $vCounter++; $vKodeIndustri.=$rowIndustri['kode'].","; }
				if ($vCurrDate >= $rowData['start_alert_2'] AND $vCurrDate <= $rowData['batas_surv_2']) { $vCounter++; $vKodeIndustri.=$rowIndustri['kode'].","; }
				if ($vCurrDate >= $rowData['start_alert_renewal'] AND $vCurrDate <= $rowData['batas_renewal']) { $vCounter++; $vKodeIndustri.=$rowIndustri['kode'].","; }
				}
			if ($rowIndustri['durasi']==10) {
				if ($vCurrDate >= $rowData['start_alert_1'] AND $vCurrDate <= $rowData['batas_surv_1']) { $vCounter++; $vKodeIndustri.=$rowIndustri['kode'].","; }
				if ($vCurrDate >= $rowData['start_alert_2'] AND $vCurrDate <= $rowData['batas_surv_2']) { $vCounter++; $vKodeIndustri.=$rowIndustri['kode'].","; }
				if ($vCurrDate >= $rowData['start_alert_3'] AND $vCurrDate <= $rowData['batas_surv_3']) { $vCounter++; $vKodeIndustri.=$rowIndustri['kode'].","; }
				if ($vCurrDate >= $rowData['start_alert_4'] AND $vCurrDate <= $rowData['batas_surv_4']) { $vCounter++; $vKodeIndustri.=$rowIndustri['kode'].","; }
				if ($vCurrDate >= $rowData['start_alert_renewal'] AND $vCurrDate <= $rowData['batas_renewal']) { $vCounter++; $vKodeIndustri.=$rowIndustri['kode'].","; }
				}
			}
		mysqli_free_result($rsData);
		}
	mysqli_free_result($rsIndustri);

	return $vCounter.";".$vKodeIndustri;
	}

function fCekMasaBerlakuKontrakNonSLK($pKodeIndustri) {
	$qResult="SELECT DATEDIFF(tgl_kontrak_berakhir, CURDATE()) masakontrak FROM mstindustri WHERE kode = ".cleanQuery($pKodeIndustri);
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['masakontrak']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}

function fGetLogInfo($pJenis, $pKodeIndustri) {
	if ($pJenis=="PPDVL") { $qResult="SELECT COUNT(1) result FROM trxmohon_hdr WHERE status NOT IN ('PPDVL_ENTRY', 'PPDVL_SEND') AND kodeindustri = ".$pKodeIndustri; }
	if ($pJenis=="LKS") {
		$qResult="SELECT COUNT(1) result FROM trxfiles_mutasi_ins_lks "
				." WHERE kode_ref IN (SELECT no_invoice FROM trxmohon_hdr WHERE status NOT IN ('PPDVL_ENTRY', 'PPDVL_SEND') AND kodeindustri = ".$pKodeIndustri.") "
				."   AND kodeindustri = ".$pKodeIndustri." "
				."   AND source = 'LKS' ";
		}
	if ($pJenis=="VLEGAL") { $qResult="SELECT COUNT(1) result FROM ws_aktifitas_hdr WHERE kodeindustri = ".$pKodeIndustri." AND status = 'OK' "; }
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['result']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}

function fCekDokumenRekapitulasi($pWhat, $pKodeIndustri) {
	/*** siapkan variabel bulan sebelumnya ***/
	$vPrevMonth=fPrevMonth( date('m'), date('Y') );
	$vPrevBulan=substr($vPrevMonth, 5, 2);
	$vPrevTahun=substr($vPrevMonth, 0, 4);
	/*** siapkan variabel bulan sebelumnya ***/

	// cek apakah dokumen rekapitulasi sudah diupload atau belum
	$qResult="SELECT SUM(x.ada_lmk) ada_lmk, SUM(x.ada_skshh) ada_skshh, SUM(x.ada_peb) ada_peb "
			."  FROM ( "
			."		SELECT COUNT(1) ada_lmk, 0 ada_skshh, 0 ada_peb FROM trxfiles_rekap WHERE source = 'REKAP_LMK' AND kodeindustri = ".$pKodeIndustri." AND bulan = '".$vPrevBulan."' and tahun = '".$vPrevTahun."' "
			."		UNION "
			."		SELECT 0 ada_lmk, COUNT(1) ada_skshh, 0 ada_peb FROM trxfiles_rekap WHERE source = 'REKAP_SKSHH' AND kodeindustri = ".$pKodeIndustri." AND bulan = '".$vPrevBulan."' and tahun = '".$vPrevTahun."' "
			."		UNION "
			."		SELECT 0 ada_lmk, 0 ada_skshh, COUNT(1) ada_peb FROM trxfiles_rekap WHERE source = 'REKAP_PEB' AND kodeindustri = ".$pKodeIndustri." AND bulan = '".$vPrevBulan."' AND tahun = '".$vPrevTahun."' ) x ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) {
		if ($pWhat=="REKAP_LMK") { $vResult=$rowResult['ada_lmk']; }
		if ($pWhat=="REKAP_SKSHH") { $vResult=$rowResult['ada_skshh']; }
		if ($pWhat=="REKAP_PEB") { $vResult=$rowResult['ada_peb']; }
		}
	mysqli_free_result($rsResult);
	return $vResult;
	}

function fGetAnnouncementAdmin() {
	$qResult="SELECT value FROM psnannouncement
			   WHERE creaby IN (SELECT userid FROM admuser WHERE usergroupid IN ('G001','G010'))
			ORDER BY upddate DESC, updtime DESC LIMIT 1 ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['value']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}

function fGetAnnouncementPJPusat() {
	$qResult="SELECT value FROM psnannouncement WHERE creaby IN (SELECT userid FROM admuser WHERE usergroupid = 'G002') ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['value']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}

function fGetAnnouncementPJCabang($pAreaKerja) {
	$qResult="SELECT value FROM psnannouncement
			   WHERE areakerja NOT IN (SELECT kode FROM mstareakerja WHERE nama = 'KANTOR PUSAT')
				 AND areakerja = ".$pAreaKerja;
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['value']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
// proses LMKB
function fGetLMKB($pKodeIndustri, $pBulan, $pTahun, $pJenis, $pKelompokJenis, $pCol) {
	if ($pJenis=="SAWAL") {
		$vPrevMonth=fPrevMonth($pBulan, $pTahun);
		$vPrevBulan=substr($vPrevMonth, 5, 2);
		$vPrevTahun=substr($vPrevMonth, 0, 4);
		$vResult=fGetSAwalKB($pKodeIndustri, $vPrevBulan, $vPrevTahun);
		}
	if ($pJenis=="SAKHIR") { $vResult=fGetMutasiKB(0, $pKodeIndustri, $pBulan, $pTahun); }
	if ($pJenis=="PENAMBAHAN") {
		$qResult="SELECT COALESCE(SUM(jumlah_unit_penambahan), 0) col_1, "
				."		 COALESCE(SUM(jumlah_volume_penambahan), 0) col_2 "
				."  FROM trxmutasi_kb "
				." WHERE kodeindustri = ".cleanQuery($pKodeIndustri)." "
				."   AND bulan = '".cleanQuery($pBulan)."' "
				."   AND tahun = '".cleanQuery($pTahun)."' "
				."   AND kelompok_jenis = ".cleanQuery($pKelompokJenis);
		$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
		while($rowResult=mysqli_fetch_array($rsResult)) {
			if ($pCol=="COL_1") { $vResult=$rowResult['col_1']; }
			if ($pCol=="COL_2") { $vResult=$rowResult['col_2']; }
			}
		mysqli_free_result($rsResult);
		}
	if ($pJenis=="PENGURANGAN") {
		$qResult="SELECT COALESCE(SUM(jumlah_unit_diolah), 0) + COALESCE(SUM(jumlah_unit_dipakai), 0) + COALESCE(SUM(jumlah_unit_pengurangan), 0) col_1, "
				."		 COALESCE(SUM(jumlah_volume_diolah), 0) + COALESCE(SUM(jumlah_volume_dipakai), 0) + COALESCE(SUM(jumlah_volume_pengurangan), 0) col_2 "
				."  FROM trxmutasi_kb "
				." WHERE kodeindustri = ".cleanQuery($pKodeIndustri)." "
				."   AND bulan = '".cleanQuery($pBulan)."' "
				."   AND tahun = '".cleanQuery($pTahun)."' "
				."   AND kelompok_jenis = ".cleanQuery($pKelompokJenis);
		$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
		while($rowResult=mysqli_fetch_array($rsResult)) {
			if ($pCol=="COL_1") { $vResult=$rowResult['col_1']; }
			if ($pCol=="COL_2") { $vResult=$rowResult['col_2']; }
			}
		mysqli_free_result($rsResult);
		}

	return $vResult;
	}
// lock record
function fCekLockRecord($pGroupID, $pPeriode, $pKodeIndustri) {
	$globalTglDokRekap=fGetTglDokRekap();
	// $qCek="SELECT COUNT(kodeindustri) ada FROM trxmohon_hdr WHERE kodeindustri = ".cleanQuery($pKodeIndustri)." AND no_ppdvl_4 > 0";
	$qCek="SELECT COUNT(1) ada FROM trxmohon_hdr WHERE kodeindustri = ".cleanQuery($pKodeIndustri)." AND no_ppdvl_4 > 0";
	$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
	while($rowCek=mysqli_fetch_array($rsCek)) { $vCek=$rowCek['ada']; }
	mysqli_free_result($rsCek);
	if ($vCek==0) { $vResult="Y"; }
	else {
		$vPeriodeNow=date('Y').date('m');
		$vPrevPeriode=substr(fPrevMonth(date('m'), date('Y')), 0, 4).substr(fPrevMonth(date('m'), date('Y')), 5, 2);
		if ($pPeriode<$vPeriodeNow) {
			if ($pGroupID=="G003" OR $pGroupID=="G005") { $vResult="Y"; }
			else {
				if ($vPrevPeriode==$pPeriode) {
					if ( date('d')<=$globalTglDokRekap ) { $vResult="Y"; }
					else { $vResult="N"; }
					}
				else { $vResult="N"; }
				}
			}
		else { $vResult="Y"; }
		}
	if ($pGroupID=="G009" OR $pGroupID=="G010") { $vResult="Y"; }
	return $vResult;
	}
/*** Fungsi ambil kode lvlk ***/
function fGetKodeLVLK() {
	$qResult="SELECT LPAD(nomor_akreditasi_3_digit, 3, '0') result FROM mstlvlk WHERE kode = 1";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['result']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
// get tgl dok rekap
function fGetTglDokRekap() {
	$qResult="SELECT tgl_dokrekap FROM mstlvlk WHERE kode = 1";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['tgl_dokrekap']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
/*** Fungsi ambil content di mstlvlk ***/
function fGetContentLVLK($pJenis) {
	$qResult="SELECT content_home, content_services, content_contactus FROM mstlvlk WHERE kode = 1";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) {
		if ($pJenis=="HOME") { $vResult=$rowResult['content_home']; }
		if ($pJenis=="SERVICES") { $vResult=$rowResult['content_services']; }
		if ($pJenis=="CONTACT_US") { $vResult=$rowResult['content_contactus']; }
		}
	mysqli_free_result($rsResult);
	return $vResult;
	}
/*** Fungsi ambil begin, end & himbauan ***/
function fGetHimbauan($pJenis) {
	$qResult="SELECT begin, end, value FROM psnhimbauan WHERE kode = 1";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) {
		if ($pJenis=="BEGIN") { $vResult=$rowResult['begin']; }
		if ($pJenis=="END") { $vResult=$rowResult['end']; }
		if ($pJenis=="VALUE") { $vResult=$rowResult['value']; }
		}
	mysqli_free_result($rsResult);
	return $vResult;
	}
// cek apakah ada pertanyaan yang belum dijawab //
function fCekAnswer($pGroupID, $pUserID, $pTable) {
	// $qResult="SELECT COUNT(groupid) ada FROM ".$pTable." WHERE groupid = '".$pGroupID."' AND creaby = '".$pUserID."' ";
	$qResult="SELECT COUNT(1) ada FROM ".$pTable." WHERE groupid = '".$pGroupID."' AND creaby = '".$pUserID."' ";
	$rsResult=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	while($rowResult=mysqli_fetch_array($rsResult)) { $vResult=$rowResult['ada']; }
	mysqli_free_result($rsResult);
	return $vResult;
	}
/*** Fungsi untuk notifikasi permohonan blanko ***/
function fCekNotifikasiPermohonanBlanko($pGroupID, $pLoginAreaKerja) {
	$vResult = '';
	if ($pGroupID=="G005") { /** verifikator cabang **/
		// $qCek="SELECT COUNT(a.approval_cabang) cek FROM trxmohon_blanko_industri a WHERE a.approval_cabang IN ('N', '') AND a.areakerja = ".cleanQuery($pLoginAreaKerja);
		$qCek="SELECT COUNT(1) cek FROM trxmohon_blanko_industri a WHERE a.approval_cabang IN ('N', '') AND a.areakerja = ".cleanQuery($pLoginAreaKerja);
		//echo $qCek;
        $rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $vCek=$rowCek['cek']; }
		mysqli_free_result($rsCek);
		$vResult=$vCek;
		}
	if ($pGroupID=="G003") { /** verifikator pusat **/
		$qCek="SELECT COUNT(1) cek FROM trxmohon_blanko_cabang a WHERE a.approval_pusat IN ('N', '') ";
		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		if($rsCek) // perubahan sugeng fitriyadi 07-06-2018
		{
			while($rowCek=mysqli_fetch_array($rsCek)) { $vCek=$rowCek['cek']; }
			mysqli_free_result($rsCek);
			$vResult=$vCek;
			}	
		}
		
	return $vResult;
	}
/** mencegah troublemaker - semoga saja bermanfaat!!! **/
function cleanQuery($string) {
	$string=stripslashes($string);
	$string=strip_tags($string);
	$string=mysqli_real_escape_string(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $string);
	return $string;
	}
/** update status stlh 5 menit di approve data entry **/
function fUpdateStatus5Minute() {
	/*
	$qResult="UPDATE trxmohon_hdr "
			."   SET status = 'PPDVL_APPROVED', "
			."       status_message = 'PPDVL telah disetujui oleh DATA ENTRY untuk kemudian ditindaklanjuti oleh VERIFIKATOR CABANG' "
			." WHERE status = 'PPDVL_APPROVED_FOR_PUSAT' "
			."   AND vp_end <= concat(substr(now(), 1, 4), substr(now(), 6, 2), substr(now(), 9, 2), substr(now(), 12, 2), substr(now(), 15, 2), substr(now(), 18, 2)) ";
	mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qResult);
	*/
	return 0;
	}
/** update table trxmohon_hdr.pelabuhan_bongkar >> inisial **/
function fUpdatePelBong($pAreaKerja) {
	/*
	$qHeader="SELECT no_invoice, "
			."		 SUBSTR(request_xml, INSTR(request_xml, '<discharge_port>')+16, 5) pelbong "
			."  FROM (SELECT b.no_invoice, a.request_xml, b.kodeindustri, MAX(kode_hdr) FROM ws_aktifitas_dtl a, ws_aktifitas_hdr b "
			."		   WHERE a.kode_hdr = b.kode "
			."			 AND a.request_command = 'sendDocument' "
			."			 AND a.response_code = 'R00' "
			."		GROUP BY b.no_invoice, a.request_xml, b.kodeindustri) tbl "
			." WHERE kodeindustri IN (SELECT kode FROM mstindustri WHERE areakerja = ".$pAreaKerja.") ";
	$rsHeader=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qHeader);
	$countHeader=mysqli_num_rows($rsHeader);
	if ($countHeader>0) {
		while($rowHeader=mysqli_fetch_array($rsHeader)) {
			$qDetail="UPDATE trxmohon_hdr "
					."   SET pelabuhanbongkar = '".$rowHeader['pelbong']."' "
					." WHERE no_invoice = '".$rowHeader['no_invoice']."' "
					."   AND LENGTH(pelabuhanbongkar) < 5 ";
			mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qDetail);
			}
		}
	*/
	return 0;
	}
/** Cek Koneksi Internet **/
function checkConnection() {
	//Initiates a socket connection to www.itechroom.com at port 80
	$conn = @fsockopen("silk-sucofindo.biz", 80, $errno, $errstr, 30);
    if ($conn) { $status = "OK"; fclose($conn); }
    else { $status = "NOT_OK"; }
    return $status;
	}
/** inspeksi sudah tidak bisa buat ppdvl dan terbit vlegal **/
function cekProses($pWhat, $pMekanisme) {
	$qCek="SELECT enable_mutasi_nonslk, enable_verifikasi_mutasi_nonslk, enable_ppdvl_nonslk, enable_ppdvl_slk, enable_vlegal_nonslk, enable_vlegal_slk FROM mstlvlk WHERE kode=1";
	$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
	while($rowCek=mysqli_fetch_array($rsCek)) {
		if ($pWhat=="MUTASI" AND $pMekanisme=="NonSLK") { $vResult=$rowCek['enable_mutasi_nonslk']; }
		if ($pWhat=="VERIFIKASI_MUTASI" AND $pMekanisme=="NonSLK") { $vResult=$rowCek['enable_verifikasi_mutasi_nonslk']; }
		if ($pWhat=="PPDVL" AND $pMekanisme=="NonSLK") { $vResult=$rowCek['enable_ppdvl_nonslk']; }
		if ($pWhat=="VLEGAL" AND $pMekanisme=="NonSLK") { $vResult=$rowCek['enable_vlegal_nonslk']; }
		if ($pWhat=="PPDVL" AND $pMekanisme=="SLK") { $vResult=$rowCek['enable_ppdvl_slk']; }
		if ($pWhat=="VLEGAL" AND $pMekanisme=="SLK") { $vResult=$rowCek['enable_vlegal_slk']; }
		}
	mysqli_free_result($rsCek);
	//if ($pWhat=="PPDVL") { if ( (date('Y').date('m').date('d').date('H').date('i'))*1 > 20140923231700 ) { $vResult="N"; } else { $vResult="Y"; } }
	//if ($pWhat=="VLEGAL") { if ( (date('Y').date('m').date('d').date('H').date('i'))*1 > 201409262359 ) { $vResult="N"; } else { $vResult="Y"; } }
    return $vResult;
	}
/** manage user log **/
function fManageUserLog($pCommand, $pJenis, $pSessionID, $pUsername) {
	$agent=$_SERVER['HTTP_USER_AGENT'];
	$ip=$_SERVER['REMOTE_ADDR'];
//$hostname = gethostbyaddr($_SERVER['REMOTE_ADDR']);
$hostname = "";
	$hostaddress="";
	$city="";
	$country="";
	$latitude="";
	$longitude="";

	$browserArray = array(
		'Windows Mobile' => 'IEMobile',
		'Android Mobile' => 'Android',
		'iPhone Mobile' => 'iPhone',
		'Firefox' => 'Firefox',
		'Google Chrome' => 'Chrome',
		'Internet Explorer' => 'MSIE',
		'Opera' => 'Opera',
		'Safari' => 'Safari'
	); 
	foreach ($browserArray as $k => $v) { if (preg_match("/$v/", $agent)) { break; } else { $k="Unknown Browser"; } }
	$browser=$k;

	$os="Unknown OS Platform";
	$osArray = array(
		'/windows nt 10/i'     =>  'Windows 10',
		'/windows nt 6.3/i'     =>  'Windows 8.1',
		'/windows nt 6.2/i'     =>  'Windows 8',
		'/windows nt 6.1/i'     =>  'Windows 7',
		'/windows nt 6.0/i'     =>  'Windows Vista',
		'/windows nt 5.2/i'     =>  'Windows Server 2003/XP x64',
		'/windows nt 5.1/i'     =>  'Windows XP',
		'/windows xp/i'         =>  'Windows XP',
		'/windows nt 5.0/i'     =>  'Windows 2000',
		'/windows me/i'         =>  'Windows ME',
		'/win98/i'              =>  'Windows 98',
		'/win95/i'              =>  'Windows 95',
		'/win16/i'              =>  'Windows 3.11',
		'/macintosh|mac os x/i' =>  'Mac OS X',
		'/mac_powerpc/i'        =>  'Mac OS 9',
		'/linux/i'              =>  'Linux',
		'/ubuntu/i'             =>  'Ubuntu',
		'/iphone/i'             =>  'iPhone',
		'/ipod/i'               =>  'iPod',
		'/ipad/i'               =>  'iPad',
		'/android/i'            =>  'Android',
		'/blackberry/i'         =>  'BlackBerry',
		'/webos/i'              =>  'Mobile'
		);
	foreach ($osArray as $regex => $value) { if (preg_match($regex, $agent)) { $os=$value; } }

	if ($pCommand=="GET") {
		if ($pJenis=="IP_ADDRESS") { $vResult=$ip; }
		if ($pJenis=="HOST_ADDRESS") { $vResult=$hostaddress; }
		if ($pJenis=="BROWSER") { $vResult=$browser; }
		if ($pJenis=="OS") { $vResult=$os; }
		if ($pJenis=="CITY") { $vResult=$city; }
		if ($pJenis=="COUNTRY") { $vResult=$country; }
		}
	if ($pCommand=="LOGIN") {
		// cek
		// $qCek="SELECT COUNT(session_id) ada FROM admuser_log WHERE session_id = '".cleanQuery($pSessionID)."' ";
		$qCek="SELECT COUNT(1) ada FROM admuser_log WHERE session_id = '".cleanQuery($pSessionID)."' ";
		$rsCek=mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $qCek);
		while($rowCek=mysqli_fetch_array($rsCek)) { $Ada = $rowCek['ada']; }
		mysqli_free_result($rsCek);

		if ($Ada==0) {
			$insSQL="INSERT INTO admuser_log (username, session_id, ip_address, host_address, browser, os, city, country, latitude, longitude, login_time, login_date, isp_name)
									VALUES ('".$pUsername."',
											'".$pSessionID."',
											'".$ip."',
											'".$hostaddress."',
											'".$browser."',
											'".$os."',
											'".$city."',
											'".$country."',
											'".$latitude."',
											'".$longitude."',
											SUBSTR(NOW(), 12, 8),
											'".date('Y')."-".date('m')."-".date('d')."',
'".$hostname."') ";
			mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $insSQL);
			$vResult="INSERT_OK";
			}
		else { $vResult="INSERT_FAILED"; }
		}
	if ($pCommand=="LOGOUT") {
		$updSQL="UPDATE admuser_log SET logout_time=SUBSTR(NOW(), 12, 8), logout_date='".date('Y')."-".date('m')."-".date('d')."', isp_name = '".$hostname."' WHERE session_id='".$pSessionID."' ";
		mysqli_query(mysqli_connect("mysql_app", "root", "adm@DB#silk25", "prod_dbvlegal"), $updSQL);
		$vResult="UPDATE_OK";
		}

	return $vResult;
	}
	
	function SendData($data_isi,$action){
		/*$xml = '<soapenv:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:urn="urn:'.$action.'">
		   <soapenv:Header/>
		   <soapenv:Body>
			  <urn:'.$action.' soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
				 <string0 xsi:type="xsd:string">SucofindoICS</string0>
				 <string1 xsi:type="xsd:string">sics2012</string1>
				 <string2 xsi:type="xsd:string">';
		 $xml .= '<![CDATA[<?xml version="1.0" encoding="UTF-8"?>
<vlegal_license><no_dokumen>20.00043-00479.002-ID-US</no_dokumen></vlegal_license>]]>';
		 $xml .= '</string2>
			  </urn:'.$action.'>
		   </soapenv:Body>
		</soapenv:Envelope>';

		$curl = curl_init();

		curl_setopt_array($curl, array(
		  CURLOPT_URL => 'https://silk.menlhk.go.id/ws/server2.php',
		  CURLOPT_RETURNTRANSFER => true,
		  CURLOPT_SSL_VERIFYPEER => false,
		  CURLOPT_ENCODING => '',
		  CURLOPT_MAXREDIRS => 10,
		  CURLOPT_TIMEOUT => 0,
		  CURLOPT_FOLLOWLOCATION => true,
		  CURLOPT_HTTP_VERSION => CURL_HTTP_VERSION_1_1,
		  CURLOPT_CUSTOMREQUEST => 'POST',
		  CURLOPT_POSTFIELDS =>$xml,
		  CURLOPT_HTTPHEADER => array(
		    'SOAPAction: '.$action,
		    'Content-Type: application/xml'
		  ),
		));

		$response = curl_exec($curl);
		curl_close($curl);
		echo $response;*/
		
		$xml = '<soapenv:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:urn="urn:'.$action.'">
		   <soapenv:Header/>
		   <soapenv:Body>
			  <urn:'.$action.' soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
				 <string0 xsi:type="xsd:string">SucofindoICS</string0>
				 <string1 xsi:type="xsd:string">sics2012</string1>
				 <string2 xsi:type="xsd:string">';
		 $xml .= $data_isi;
		 $xml .= '</string2>
			  </urn:'.$action.'>
		   </soapenv:Body>
		</soapenv:Envelope>';
		
           $headers = array(
                        "Content-type: text/xml;charset=\"utf-8\"",
                        "Accept: text/xml",
                        "Cache-Control: no-cache",
                        "Pragma: no-cache",
                        "SOAPAction:".$action, 
                        "Content-length: ".strlen($xml),
                    );
            $url =  'https://silk.menlhk.go.id/ws/server2.php';
            //$url =  'http://116.254.101.231/ws/server2.php';
            $ch = curl_init();
            //curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0);
	    curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
	    curl_setopt($ch, CURLOPT_URL, $url);
            curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
            curl_setopt($ch, CURLOPT_TIMEOUT, 10);
            curl_setopt($ch, CURLOPT_POST, true);
            curl_setopt($ch, CURLOPT_POSTFIELDS, $xml);
            curl_setopt($ch, CURLOPT_HTTPHEADER, $headers);
            $response = curl_exec($ch); 
            curl_close($ch);
			return $response;
	}
?>