<?php

function dml_cooperationinfo( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$sql = "SELECT TITLE,CONTENT FROM COOPERATION ";
		if ( !$edb->executequery( $sql ) )
		{
			$term = false;
			$nd = false;
			$einfo = "查詢協作區設置錯誤";
		}
		$term = $edb->getrecordset( );
		break;
	}
	return $term;
}

function dml_addtopic( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$parr['mmuser'] = array_merge( $parr['userid'], $parr['manage'] );
		$mmuser = uniquearraynonull( $parr['mmuser'] );
		$isnew = implode( ",", $mmuser );
		$isnew = $isnew.",";
		if ( $parr['OP'] == 1 && trim( $parr['id'] ) == "" )
		{
			$sql = "INSERT INTO CO_TOPIC(ID,BOARD,TITLE,CONTENT,";
			$sql .= " CREATE_DATE,END_DATE,CREATOR,ISNEW,ABLE,ABLED,ABLER)";
			$sql .= " VALUES(0,".$parr['board'].",'".$parr['title']."','".$parr['content']."',";
			$sql .= " '".$parr['start_date']."','".$parr['end_date']."'";
			$sql .= " ,'".$parr['creator']."','".$isnew."',1,NOW(),'".$parr['creator']."')";
		}
		else if ( $parr['FW'] == 1 && trim( $parr['id'] ) == "" )
		{
			$sql = "INSERT INTO CO_TOPIC(ID,BOARD,TITLE,CONTENT,";
			$sql .= " CREATE_DATE,END_DATE,CREATOR,ISNEW,ABLE,ABLED,ABLER)";
			$sql .= " VALUES(0,".$parr['board'].",'".$parr['title']."','".$parr['content']."',";
			$sql .= " '".$parr['start_date']."','".$parr['end_date']."'";
			$sql .= " ,'".$parr['creator']."','".$isnew."',1,NOW(),'".$parr['creator']."')";
		}
		else if ( $parr['title'] != "" && trim( $parr['id'] ) != "" )
		{
			$sql = "UPDATE CO_TOPIC SET BOARD= ".$parr['board'].",TITLE = '".$parr['title']."',";
			$sql .= " CONTENT = '".$parr['content']."',CREATE_DATE = '".$parr['start_date']."',";
			$sql .= " END_DATE = '".$parr['end_date']."',";
			$sql .= " ISNEW = '".$isnew."' WHERE ID = ".$parr['id']."";
		}
		if ( !$edb->executequery( $sql ) )
		{
			$term = false;
			$nd = false;
			$einfo = "數據錯誤";
		}
		else
		{
			if ( 1 <= $parr['OP'] || $parr['FW'] == 1 )
			{
				$sql = "SELECT ID FROM CO_TOPIC WHERE ID = LAST_INSERT_ID()";
			}
			else
			{
				echo $parr['id'];
				$sql = "SELECT ID FROM CO_TOPIC WHERE ID = ".$parr['id']."";
			}
			if ( !$edb->executequery( $sql ) )
			{
				$term = false;
				$einfo = "錯誤數據";
			}
			else
			{
				$term = $edb->getrecordset( );
				if ( $parr['OP'] <= 1 && trim( $parr['id'] ) == "" )
				{
					$i = 0;
					for ( ;	$i < count( $parr['userid'] );	++$i	)
					{
						$sql = "INSERT INTO TOPIC_USER(ID,TOPIC,USER_ID,ABLE,ABLED,ABLER)";
						$sql .= " VALUES(0,".$term[0]['ID'].",'".$parr['userid'][$i]."',1,NOW(),'".$parr['creator']."')";
						if ( !$edb->executequery( $sql ) )
						{
							$term = false;
							$nd = false;
							$einfo = "人員錯誤";
							break;
						}
					}
					$i = 0;
					for ( ;	$i < count( $mmuser );	++$i	)
					{
						$sql = "INSERT INTO CO_LOG(ID,TOPIC,TYPE,MODIFY_DATE,MODIFIER,IP)";
						$sql .= " VALUES(0,".$term[0]['ID'].",'".$parr['type']."',NOW(),";
						$sql .= " '".$mmuser[$i]."','".$parr['ip']."')";
						if ( !$edb->executequery( $sql ) )
						{
							$term = false;
							$einfo = "增加數據錯誤";
							break;
						}
					}
				}
				if ( $term[0]['ID'] == "" )
				{
					$Linkid = $parr['id'];
				}
				else
				{
					$Linkid = $term[0]['ID'];
				}
				if ( !( $parr['fileid'] != "" ) )
				{
					break;
				}
				$sql = "INSERT INTO WARE(ID,LINK_TABLE,LINK,FILEID,FILE,CREATE_DATE, ";
				$sql .= " CREATOR,ABLE,ABLED,ABLER) VALUES(0,'".$parr['link_table']."',";
				$sql .= " ".$Linkid.",'".$parr['fileid']."','".$parr['file']."'";
				$sql .= " ,NOW(),'".$parr['creator']."','1',NOW(),'".$parr['creator']."')";
				if ( $edb->executequery( $sql ) )
				{
					break;
				}
				$term = false;
				$einfo = "插入附件錯誤";
				break;
			}
		}
	}
	return $term;
}

function dml_stopicinfo( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$sql = "SELECT DISTINCT C.ID,C.BOARD,C.TITLE,C.CONTENT,C.CREATOR,";
		$sql .= " C.CREATE_DATE,C.END_DATE, C.CREATOR,C.ISNEW,T.USER_ID,C.ABLE ";
		$sql .= " FROM CO_TOPIC C,TOPIC_USER T ";
		$sql .= " WHERE C.ID = ".$parr['id']." AND C.ID = T.TOPIC ";
		if ( !$edb->executequery( $sql ) )
		{
			$term = false;
			$nd = false;
			$einfo = "查詢錯誤";
		}
		else
		{
			$term = $edb->getrecordset( );
			break;
		}
	}
	return $term;
}

function dml_stopicfile( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$sql = "SELECT W.ID,W.FILEID,W.FILE,W.CREATOR,U.USER_NAME FROM ";
		$sql .= " WARE W,USER U WHERE  W.CREATOR = U.USER_ID AND LINK = ".$parr['id']." ORDER BY ID";
		if ( !$edb->executequery( $sql ) )
		{
			$term = false;
			$nd = false;
			$einfo = "查詢錯誤";
		}
		else
		{
			$term = $edb->getrecordset( );
			break;
		}
	}
	return $term;
}

function dml_addretopic( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$sql = "INSERT INTO CO_RETOPIC(ID,TOPIC,USER_ID,CONTENT,CREATE_DATE,ABLE,ABLED,ABLER)";
		$sql .= " VALUES(0,'".$parr['topic']."','".$parr['user_id']."','".$parr['content']."',";
		$sql .= " NOW(),1,NOW(),'".$parr['user_id']."')";
		if ( !$edb->executequery( $sql ) )
		{
			$einfo = "數據錯誤";
			$nd = false;
			$term = false;
		}
		else
		{
			$sql = "DELETE FROM CO_LOG WHERE TOPIC = ".$parr['topic']."";
			if ( !$edb->executequery( $sql ) )
			{
				$term = false;
				$nd = false;
				$einfo = "人員錯誤";
			}
			else
			{
				$i = 0;
				for ( ;	$i < count( $parr['userid'] );	++$i	)
				{
					$sql = "INSERT INTO CO_LOG(ID,TOPIC,TYPE,MODIFY_DATE,MODIFIER,IP)";
					$sql .= " VALUES(0,".$parr['topic'].",'".$parr['type']."',NOW(),";
					$sql .= " '".$parr['userid'][$i]."','".$parr['ip']."')";
					if ( !$edb->executequery( $sql ) )
					{
						$term = false;
						$einfo = "增加數據錯誤";
						break;
					}
				}
				$parr['mmuser'] = array_merge( $parr['userid'], $parr['manage'] );
				$mmuser = uniquearraynonull( $parr['mmuser'] );
				$isnew = implode( ",", $mmuser );
				$isnew = $isnew.",";
				$sql = "UPDATE CO_TOPIC SET ISNEW = '".$isnew."' WHERE ID = ".$parr['topic']."";
				if ( $edb->executequery( $sql ) )
				{
					break;
				}
				$term = false;
				$einfo = "增加數據錯誤";
				break;
			}
		}
	}
	return $term;
}

function dml_addtopicuser( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$sql = "DELETE FROM TOPIC_USER WHERE TOPIC = ".$parr['topic']."";
		if ( !$edb->executequery( $sql ) )
		{
			$term = false;
			$nd = false;
			$einfo = "錯誤";
		}
		else
		{
			$i = 0;
			do
			{
				do
				{
					if ( $i < count( $parr['userid'] ) )
					{
						break;
					}
					++$i;
				} while ( 1 );
				$sql = "INSERT INTO TOPIC_USER(ID,TOPIC,USER_ID,ABLE,ABLED,ABLER)";
				$sql .= " VALUES(0,".$parr['topic'].",'".$parr['userid'][$i]."',1,NOW(),'".$parr['creator']."')";
				if ( !$edb->executequery( $sql ) )
				{
					$term = false;
					$nd = false;
					$einfo = "人員錯誤";
					break;
				}
			} while ( 1 );
			break;
		}
	}
	return $term;
}

function dml_retopiclist( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$sql = "SELECT C.ID,C.TOPIC,C.USER_ID,C.CONTENT,C.CREATE_DATE,U.USER_NAME  ";
		$sql .= " FROM CO_RETOPIC C,USER U WHERE  C.USER_ID = U.USER_ID AND ";
		$sql .= " TOPIC = ".$parr['id']." ORDER BY ID DESC";
		if ( !$edb->executequery( $sql ) )
		{
			$term = false;
			$nd = false;
			$einfo = "查詢回復錯誤";
		}
		else
		{
			$term = $edb->getrecordset( );
			break;
		}
	}
	return $term;
}

function dml_addware( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$sql = "INSERT INTO WARE(ID,LINK_TABLE,LINK,FILEID,FILE,CREATE_DATE, ";
		$sql .= " CREATOR,ABLE,ABLED,ABLER) VALUES(0,'".$parr['link_table']."',";
		$sql .= "".$parr['link'].",'".$parr['fileid']."','".$parr['file']."'";
		$sql .= " ,NOW(),'".$parr['user_id']."','1',NOW(),'".$parr['user_id']."')";
		if ( !$edb->executequery( $sql ) )
		{
			$term = false;
			$einfo = "插入附件錯誤";
		}
		else
		{
			$sql = "UPDATE CO_LOG SET TYPE = 0 WHERE TOPIC = ".$parr['link']."";
			if ( $edb->executequery( $sql ) )
			{
				break;
			}
			$term = false;
			$einfo = "更新日志錯誤";
			break;
		}
	}
	return $term;
}

function dml_modifytopic( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	$parr['isnew'] = $parr['isnew'].",";
	while ( $term )
	{
		$sql = "UPDATE CO_TOPIC SET CONTENT = '".$parr['content']."',";
		$sql .= " END_DATE = '".$parr['end_date']."',ISNEW = '".$parr['isnew']."'";
		$sql .= " WHERE ID = ".$parr['id']."";
		if ( $edb->executequery( $sql ) )
		{
			break;
		}
		$term = false;
		$einfo = "修改錯誤";
		break;
	}
	return $term;
}

function dml_delware( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$sql = "DELETE FROM WARE WHERE FILEID = '".$parr['fileid']."'";
		if ( $edb->executequery( $sql ) )
		{
			break;
		}
		$term = false;
		$einfo = "刪除錯誤";
		break;
	}
	return $term;
}

function dml_finishtopic( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$sql = "UPDATE CO_TOPIC SET ABLE = 0 WHERE ID = ".$parr['id']."";
		if ( !$edb->executequery( $sql ) )
		{
			$term = false;
			$einfo = "更新錯誤";
		}
		else
		{
			if ( ( $rows = $edb->getaffectedrows( ) ) )
			{
				break;
			}
			$rows = 0;
			$term = false;
			$einfo = "沒有更新任何數據，。";
			break;
		}
	}
	return $term;
}

function dml_tboarduser( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$sql = " SELECT MANAGER FROM CO_BOARD B,CO_TOPIC T WHERE";
		$sql .= " B.ID = T.BOARD AND T.ID = ".$parr['topic']."";
		if ( !$edb->executequery( $sql ) )
		{
			$nd = false;
			$term = false;
			$einfo = "數據錯誤";
		}
		else
		{
			$term = $edb->getrecordset( );
			break;
		}
	}
	return $term;
}

function dml_startup( &$edb, &$nd, &$einfo, $parr )
{
	$term = true;
	while ( $term )
	{
		$sql = " UPDATE co_topic SET ABLE=1 WHERE ID=".$parr['id'];
		if ( !$edb->executequery( $sql ) )
		{
			$nd = false;
			$term = false;
			$einfo = "數據錯誤";
		}
		else
		{
			$term = $edb->getrecordset( );
			break;
		}
	}
	return $term;
}

?>