update.php

来自「极限网络智能办公系统 Office Automation V3.0官方100％源」· PHP 代码 · 共 108 行

PHP

108 行

<?
include_once("inc/auth.php");
include_once("inc/check_type.php");
?>

<html>
<head>
<title>修改固定资产</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>

<body class="bodycolor" topmargin="5">

<?
$CUR_DATE=date("Y-m-d",time());
$connection=OpenConnection();
if($CPTL_NAME=="")
   $MSG_ST.="\"资产名称\",";
if($DEPT_ID=="")
   $MSG_ST.="\"所属部门\",";
if($CPTL_KIND=="")
   $MSG_ST.="\"资产性质\",";
if($PRCS_ID=="")
   $MSG_ST.="\"增加类型\",";
if($KEEPER=="")
   $MSG_ST.="\"保管人\",";
if($CPTL_KIND=="01")
{
   if($FINISH_FLAG=="")
      $MSG_ST.="\"折旧\",";
}

if($MSG_STR!="")
{
   $MSG_STR=substr($MSG_STR,0,-1)."不能为空";
   Message("",$MSG_STR);
}

$MSG_STR="";
if($CPTL_KIND=="01")
{
   if(!settype($CPTL_BAL,"float"))
      $MSG_STR.="\"折旧(率)\",";
   if(!settype($DPCT_YY,"float"))
      $MSG_STR.="\"折旧年限\",";
   if(!settype($SUM_DPCT,"float"))
      $MSG_STR.="\"累计折旧\",";
   if(!settype($MON_DPCT,"float"))
      $MSG_STR.="\"月折旧额\",";
}
else
{
   if($CPTL_BAL!=""&&!settype($CPTL_BAL,"float"))
      $MSG_STR.="\"折旧(率)\",";
   if($DPCT_YY!=""&&!settype($DPCT_YY,"float"))
      $MSG_STR.="\"折旧年限\",";
   if($SUM_DPCT!=""&&!settype($SUM_DPCT,"float"))
      $MSG_STR.="\"累计折旧\",";
   if($MON_DPCT!=""&&!settype($MON_DPCT,"float"))
      $MSG_STR.="\"月折旧额\",";
}
if($MSG_STR!="")
{
   $MSG_STR=substr($MSG_STR,0,-1)."必须为数字";
   Message("",$MSG_STR);
   Button_Back();
   exit;
}

if($FROM_YYMM!=""&&!is_date($FROM_YYMM))
{
    Message("","\"启用日期\"应为日期型");
    Button_Back();
    exit;
}

$UPDATE_STR="CPTL_NO='$CPTL_NO',CPTL_NAME='$CPTL_NAME',TYPE_ID=$TYPE_ID,DEPT_ID=$DEPT_ID,CPTL_VAL=$CPTL_VAL,CPTL_KIND='$CPTL_KIND',PRCS_ID=$PRCS_ID";
if($CPTL_BAL!="")
   $UPDATE_STR.=",CPTL_BAL=$CPTL_BAL";
else
   $UPDATE_STR.=",CPTL_BAL=0";
if($DPCT_YY!="")
   $UPDATE_STR.=",DPCT_YY=$DPCT_YY";
else
   $UPDATE_STR.=",DPCT_YY=0";
if($SUM_DPCT!="")
   $UPDATE_STR.=",SUM_DPCT=$SUM_DPCT";
else
   $UPDATE_STR.=",SUM_DPCT=0";
if($MON_DPCT!="")
   $UPDATE_STR.=",MON_DPCT=$MON_DPCT";
else
   $UPDATE_STR.=",MON_DPCT=0";
if($FINISH_FLAG!="")
   $UPDATE_STR.=",FINISH_FLAG='$FINISH_FLAG'";
   
$UPDATE_STR.=",CREATE_DATE='$CUR_DATE',FROM_YYMM='$FROM_YYMM',KEEPER='$KEEPER',REMARK='$REMARK'";

//------------------- 增加固定资产 -----------------------
$query="update CP_CPTL_INFO set $UPDATE_STR where CPTL_ID=$CPTL_ID";
exequery($connection,$query);

header("location: index.php");
?>

</body>
</html>

update.php - 源码说明

本页面展示了「极限网络智能办公系统 Office Automation V3.0官方100％源代码.」中的 update.php 源码文件，采用 PHP 编程语言编写，共 108 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Automation相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?