PHP Decode

<? 
/*code to MD5 code 
function u85($tt){return iconv("UTF-8","BIG5//TRANSLIT",$tt);}//big5 to utf8 
 
include("config_ad.php"); 
$sql=mysql_query("select code from pharm"); 
while(list($code)=mysql_fetch_row($sql)){ 
$hmd5=substr(u85(md5('cchp'.$code.'pharm')),5,12); 
mysql_query("update pharm set md5code='$hmd5' where code=$code"); 
}*/ 
 
//pharm.cch.org.tw db 
$didbhost = "localhost"; //MySQL Database Host/IP.DNS 
//$didbname = "admin";      //MySQL Database Name 
$didbuser = "root";    //MySQL User Name  
$didbpass = "pharmd69";  //MySQL PassWord 
mysql_connect($didbhost,$didbuser,$didbpass) or die(""); 
mysql_query("SET NAMES 'utf8'"); 
mysql_select_db($didbname); 
 
/* db(pharmacy) 
$didbhost = "localhost"; //MySQL Database Host/IP.DNS 
$didbname = "fill";      //MySQL Database Name 
$didbuser = "root";    //MySQL User Name  
$didbpass = "pharmd69";  //MySQL PassWord 
$cn2=mysql_connect($didbhost,$didbuser,$didbpass) or die(""); 
mysql_query("SET NAMES 'utf8'"); 
mysql_select_db($didbname,$cn2);*/ 
 
//QIDB 
$db3 = "(DESCRIPTION=(ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(HOST = 172.28.25.11)(PORT = 1521)))(CONNECT_DATA=(SID=SORA)))"; 
$conn3 = ocilogon("hot","hot",$db3);//QIDB 
//SDB 
$db2 = "(DESCRIPTION=(ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(HOST = 172.28.25.38)(PORT = 1521)))(CONNECT_DATA=(SID=IPD)))"; 
$conn2 = ocilogon("hot","hot",$db2);//IPD,SDB 
function u58($tt){return iconv("BIG5//TRANSLIT","UTF-8",$tt);}//big5 to utf8 
$offday=(date("Y")-1911).date("md");// 
 
// 
$psql=mysql_query("select code,name,location,md5code from admin.pharm"); 
while(list($code,$name,$location,$md5code)=mysql_fetch_row($psql)){ 
  //echo $code."--".$name."--".$location."<br>"; 
  //mysql_query("replace pharm set code=".u58($code).",name='".u58($name)."',location='".u58($location)."',md5code='".u58($md5code)."'",$cn2); 
  mysql_query("replace fill.pharm set code=$code,name='$name',location='$location',md5code='$md5code'"); 
} 
 
 
//AA 
//inuseN 
mysql_query("update fill.mbox set inuse='N'"); 
 
$sql="SELECT a.LOC,a.COD,a.STORAGE_NO,b.MINOR_NO FROM STOKDATA a left join STMINOR b on a.COD=b.COD and a.LOC=b.LOC WHERE a.OFF_DAT>$offday and a.STORAGE_NO like 'A%'";//A 
$res=ociparse($conn3,$sql); 
ocidefinebyname($res,"LOC",&$LOC);//LOCATION 
ocidefinebyname($res,"COD",&$COD);// 
ocidefinebyname($res,"STORAGE_NO",&$sno);// 
ocidefinebyname($res,"MINOR_NO",&$MINOR_NO);// 
ociexecute($res); 
while(ocifetch($res)){ 
	$COD=str_replace('*','M',$COD); 
    
   //  druginfo  
   $NAMP=''; 
   $sqldg2="SELECT b.NAM,a.CONTENT,a.HI_ALERT,a.CTL_LEVEL FROM PRDRGH a INNER JOIN PRDGNAM b ON a.ITEM_COD = b.COD WHERE ((b.NAME_KIND='P' and b.SEQ_NO=1) AND (a.CURR_FLAG='Y' and a.ITEM_COD='$COD'))";//,a.DOS_UNIT 
   $resdg2=ociparse($conn2,$sqldg2); 
   ocidefinebyname($resdg2,"NAM",&$NAMP);//() 
   //ocidefinebyname($resdg2,"DOS_UNIT",&$dosunit);// 
   ocidefinebyname($resdg2,"CONTENT",&$CONTENT);// 
   ocidefinebyname($resdg2,"HI_ALERT",&$hialert);// 
   ocidefinebyname($resdg2,"CTL_LEVEL",&$CTL_LEVEL);// 
   ociexecute($resdg2); ocifetch($resdg2); 
   if($NAMP==''){// 
   $resdgc=ociparse($conn2,"SELECT NAM FROM PRDGNAM WHERE NAME_KIND='C' and SEQ_NO=1 and COD='$COD'"); 
   ocidefinebyname($resdgc,"NAM",&$NAMP);//() 
   ociexecute($resdgc); ocifetch($resdgc); 
   }//end if $NAMP=='' 
    mysql_query("replace fill.druginfo set mcode='".u58($COD)."',dgnam='".u58($NAMP)."',CONTENT='".u58($CONTENT)."',hialert='".u58($hialert)."',CTL_LEVEL='$CTL_LEVEL'"); 
   
  // product 
  $sqlp="SELECT PRODUCT_COD FROM STPRODUCT WHERE ITEM_COD='$COD'"; 
  $resp=ociparse($conn3,$sqlp); 
  ocidefinebyname($resp,"PRODUCT_COD",&$pc);// 
  ociexecute($resp); 
  while(ocifetch($resp)){mysql_query("replace fill.product set mcode='".u58($COD)."',product_cod='".u58($pc)."'");} 
	 
   // mbox 
	$lc=mysql_query("select locpos from fill.locposition where location=$LOC"); 
	while(list($locpos)=mysql_fetch_row($lc)){//mysqllocation(position) 
	if(substr($sno,0,2)=='AA'){ 
	$ttc=substr($sno,2).(!empty($MINOR_NO)?','.$MINOR_NO:'');// 
	$head='AA';$slen=3; 
	}else{ 
	$ttc=substr($sno,3).(!empty($MINOR_NO)?','.$MINOR_NO:'');// 
	$head=substr($sno,0,3);$slen=2; 
	} 
	$xx=explode(",",$ttc);//mysql 
	  foreach($xx as $vv){ 
	  //echo $vv."--".$LOC."<br>"; 
	  $vv=$head.str_pad($vv,$slen,'0',STR_PAD_LEFT);//0 
	  mysql_query("replace fill.mbox set boxcode='".u58($vv)."',mcode='".u58($COD)."',locpos='".u58($locpos)."'"); 
	  //Y 
	  mysql_query("update fill.mbox set inuse='Y' where mcode='".u58($COD)."' and locpos='".u58($locpos)); 
	  }//end foreach 
	}//end while list($locpos 
}//end while(ocifetch($res)){ 
 
//inuseN 
mysql_query("update fill.druginfo set inuse='N'"); 
$sqlM=mysql_query("select mcode from fill.mbox where inuse='Y' group by mcode"); 
while(list($mcdUSE)=mysql_fetch_row($sqlM)){mysql_query("update fill.druginfo set inuse='Y' where mcode='$mcdUSE'");} 
echo 'DATA:'.date("m-d H:i"); 
?>