<?
function showComment($comment, $title){
	echo "<table cellpadding=1 cellspacing=1 bgcolor=#cccccc width=100%>";
	echo "<tr bgcolor=#eeeeee><td>$title</td></tr>";
	echo "<tr bgcolor=#ffffff><td>$comment</td></tr>";
	echo "</table>";
}

//////////////////////////////////////////////////////////////////////////////////////////////////
function ymd2dmy($yyyymmdd){
// 2005-10-13  ==> 13/10/2548
	if ($yyyymmdd=="")
		$dmy="";
	else{
		$ymd = substr($yyyymmdd,0,10);
		$dmy = substr($ymd,-2) . "/" .  substr($ymd,5,2) . "/" .(543 + substr($ymd,0,4));
	}
	return $dmy;		
}

function dmy2ymd($ddmmyyyy){
// 13/10/2548 ==> 2005/10/13
	if ($yyyymmdd=="")
		$ymd="";
	else{
		$dmy = substr($ddmmyyyy,0,10);
		$ymd = (substr($dmy,-4)- 543) . "/" . substr($dmy,3,2) . "/" . substr($dmy,0,2);
	}
	return $ymd;
}
///////////////////////////////////////////////////////////////////////////////////////////////////
function dmy2ymdO($ddmmyyyy){
// 13/10/2548 ==> 2005-10-13
	if ($ddmmyyyy=="")
		$ymd=="";
	else{
		$dmy = substr($ddmmyyyy,0,10);
		$ymd = (substr($dmy,-4)- 543) . "-" . substr($dmy,3,2) . "-" . substr($dmy,0,2);
	}
	return $ymd;
}
function dmyE2ymdO($ddmmyyyy){
// 13/10/2005 ==> 2005-10-13
	if ($ddmmyyyy=="")
		$ymd=="";
	else{
		$dmy = substr($ddmmyyyy,0,10);
		$ymd = (substr($dmy,-4)) . "-" . substr($dmy,3,2) . "-" . substr($dmy,0,2);
	}
	return $ymd;
}
function dmyE2ymdT($ddmmyyyy){
// 13/10/2005 ==> 2548-10-13
	if ($ddmmyyyy=="")
		$ymd=="";
	else{
		$dmy = substr($ddmmyyyy,0,10);
		$ymd = (substr($dmy,-4)+543) . "-" . substr($dmy,3,2) . "-" . substr($dmy,0,2);
	}
	return $ymd;
}
function ymdT2dmyE($ddmmyyyy){
// 2548-10-13 ==> 13/10/2005
	if ($ddmmyyyy=="")
		$ymd=="";
	else{
		$ymd = substr($ddmmyyyy,0,10);
		$dmy = substr($ymd,-2) . "/" . substr($ymd,5,2) . "/" . (substr($ymd,0,4)-543);
	}
	return $dmy;
}
//////////////////////////////////////////////////////////////////////////////////////////////////
function toOraDate($dmy){
// 13/10/2548 ==> todate('2005-10-13', 'YYYY-MM-DD')
	if ($dmy=="")
		$s="''";
	else{
		$dt = dmy2ymdO($dmy);
		$s = "to_date('$dt','YYYY-MM-DD')";	
	}
	return $s;
}
function toOraDateE($dmyE){
// 13/10/2005 ==> todate('2005-10-13', 'YYYY-MM-DD')
	if ($dmyE=="")
		$s="''";
	else{
		$dt = dmyE2ymdO($dmyE);
		$s = "to_date('$dt','YYYY-MM-DD')";	
	}
	return $s;
}