固定资产的调整分配接口

原创 2013年12月01日 20:59:18
/*(注意点:1:只能在不同的行之间进行调整
2:调整之后的数量之和应和调整之前一样,否则报错)*/
DECLARE
  l_return_status  VARCHAR2(1);
  l_msg_count      NUMBER := 0;
  l_msg_data       VARCHAR2(4000);
  l_trans_rec      fa_api_types.trans_rec_type;
  l_asset_hdr_rec  fa_api_types.asset_hdr_rec_type;
  l_asset_dist_tbl fa_api_types.asset_dist_tbl_type;
  temp_str         VARCHAR2(512);
BEGIN
  --初始化
  fnd_profile.put('PRINT_DEBUG', 'Y');
  dbms_output.enable(1000000);
  fa_srvr_msg.init_server_message;
  fa_debug_pkg.initialize;
  -- fill in asset information
  --资产id
  l_asset_hdr_rec.asset_id := 418;
  --资产账簿
  l_asset_hdr_rec.book_type_code := 'FA_BOOK_01';

  -- transaction date must be filled in if performing
  -- prior period transfer
  --l_trans_rec.transaction_date_entered := to_date('01-JAN-1999 10:54:22', 'dd-mon-yyyy hh24:mi:ss');

  --清空资产分配记录中的数据
  l_asset_dist_tbl.delete;
  /*
  fill in distribution data for existing distribution lines
  affected by this transfer txn. Note: You need to fill in
  only affected distribution lines.
  For source distribution, you must fill in either existing
  distribution id or 2 columns(expense_ccid,location_ccid) or
  3-tuple columns(assigned_to,expense_ccid,and location_ccid)
  depending on the makeup of the particular distribution
  of the asset.
  */
  l_asset_dist_tbl(1).distribution_id := 22001; -----存在的调整之前的行ID
  l_asset_dist_tbl(1).transaction_units := -1; ----调整数量
  /*
    either above 2 lines or below 4 lines must be provided
    for source distribution:
  --调整的数量
    l_asset_dist_tbl(1).transaction_units := -2;
  --员工id
    l_asset_dist_tbl(1).assigned_to := 11;
  --费用账户id
    l_asset_dist_tbl(1).expense_ccid :=15338;
  --地点组合id
    l_asset_dist_tbl(1).location_ccid := 3; */
  -- fill in dist info for destination distribution
  l_asset_dist_tbl(2).transaction_units := 2; ----调整之后新建的行数量
  l_asset_dist_tbl(2).assigned_to := 61; ---调整给谁
  l_asset_dist_tbl(2).expense_ccid := 14001; --CODE_COMBINATION_ID;  ----费用账户
  l_asset_dist_tbl(2).location_ccid := 1; --LOCATION_ID;    -----地点

  l_trans_rec.who_info.last_updated_by   := 1330; --FND_GLOBAL.USER_ID;
  l_trans_rec.who_info.last_update_login := 14001; --FND_GLOBAL.LOGIN_ID;

  fa_transfer_pub.do_transfer(1.0,
                              fnd_api.g_false,
                              fnd_api.g_false,
                              fnd_api.g_valid_level_full,
                              NULL,
                              l_return_status,
                              l_msg_count,
                              l_msg_data,
                              l_trans_rec,
                              l_asset_hdr_rec,
                              l_asset_dist_tbl);
  IF (l_return_status != fnd_api.g_ret_sts_success) THEN
  
    dbms_output.put_line('TRANSFER failed!.');
    l_msg_count := fnd_msg_pub.count_msg;
  
    IF (l_msg_count > 0) THEN
      temp_str := substr(fnd_msg_pub.get(fnd_msg_pub.g_first,
                                         fnd_api.g_false),
                         1,
                         512);
      dbms_output.put_line('Error: ' || temp_str);
      FOR i IN 1 .. (l_msg_count - 1) LOOP
        temp_str := substr(fnd_msg_pub.get(fnd_msg_pub.g_next,
                                           fnd_api.g_false),
                           1,
                           512);
        dbms_output.put_line('Error: ' || temp_str);
      END LOOP;
    END IF;
  ELSE
    dbms_output.put_line('TRANSFER completed successfully!');
    dbms_output.put_line('THID = ' ||
                         to_char(l_trans_rec.transaction_header_id));
  END IF;
  fnd_msg_pub.delete_msg();

END;

版权声明:本文为博主原创文章,未经博主允许不得转载。

FA 分配已有资产 API Demo

/*(注意点:1:只能在不同的行之间进行调整 2:调整之后的数量之和应和调整之前一样,否则报错)*/ DECLARE l_return_status VARCHAR2(1 ); l_msg_...
  • chosen1brain
  • chosen1brain
  • 2014年04月23日 17:33
  • 857

固定资产的调整分配接口

/*(注意点:1:只能在不同的行之间进行调整 2:调整之后的数量之和应和调整之前一样,否则报错)*/ DECLARE l_return_status VARCHAR2(1); l_msg_c...
  • gh320
  • gh320
  • 2013年12月01日 20:59
  • 1026

mysql事务处理用法与实例详解

mysql事物处理实例 MYSQL的事务处理主要有两种方法 1.用begin,rollback,commit来实现     begin开始一个事务     rollback事务回滚   ...
  • u014796999
  • u014796999
  • 2016年10月30日 05:01
  • 854

【U8】固定资产模块折旧分配表无法生成

问题描述:U8V11.1,第一个月时,计提本月折旧正常,折旧清单也正常,折旧分配表无法显示且报下面的错误,批量制单里也不显示折旧凭证解决办法:进入固定资产——选项——折旧信息,将“当(月初已计提月份=...
  • qq37724861
  • qq37724861
  • 2016年06月16日 15:49
  • 1091

固定资产新增接口

DECLARE l_trans_rec fa_api_types.trans_rec_type; l_dist_trans_rec fa_api_types.t...
  • gh320
  • gh320
  • 2013年12月01日 20:53
  • 1359

mysql事务处理用法与实例详解

MySQL的事务支持不是绑定在MySQL服务器本身,而是与存储引擎相关 1.MyISAM:不支持事务,用于只读程序提高性能 2.InnoDB:支持ACID事务、行级锁、并发 3.Berkeley D...
  • yxwb1253587469
  • yxwb1253587469
  • 2015年12月13日 13:47
  • 309

Linux使用Composer安装yii2的方法及bug处理

这里只讲linux下安装Yii2的方法,windows安装yii2 的方法 请参见我的另一篇博文 http://blog.csdn.net/zqtsx/article/details/39344913...
  • zqtsx
  • zqtsx
  • 2014年11月26日 16:57
  • 11650

现金流量表编制(经典总结)

现金流量表编制(经典总结) 一、现金流量表主表项目: (一)经营活动产生的现金流量 ※1、销售商品、提供劳务收到的现金=主营业务收入+其他业务收入+应交税金(应交增值税-销项税额)+...
  • zhongguomao
  • zhongguomao
  • 2012年07月09日 23:00
  • 2277

固定资产分类

固定资产分类是财务管理最为基础的技术工作,分类对固定资产进行规范化管理、使用、统计、分析和监督检查等方面有着重要作用。 固定资产分类方法 固定资产可以按其经济用途、使用情况、产权归属、实物形态和使用期...
  • tm6230610
  • tm6230610
  • 2013年10月11日 13:58
  • 1285

手动调整分片分布:

手动调整分片分布:curl -XPOST ip:9200/索引名/_closecurl -XPUT ip:9200/索引名/_settings -d ‘{“cluster.routing.alloca...
  • KuaiLeShiFu
  • KuaiLeShiFu
  • 2016年10月26日 18:27
  • 271
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:固定资产的调整分配接口
举报原因:
原因补充:

(最多只允许输入30个字)