スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

固定資産取得BAPI

BAPI_ASSET_ACQUISITION_POST

概要

固定資産の取得をするBAPIです。固定資産の取得(ABZON)とほぼ同じ処理ができます。 実行することで会計伝票が作成され、取得した資産の勘定と固定資産の仮勘定の仕訳が転記されます。

パラメータ

取得する固定資産を指定するパラメータと取得資産の金額を設定するパラメータがあり、設定必須となっています。任意項目としてソートキーや参照伝票番号などの追加情報も設定可能です。
パラメータ一覧
種別パラメータ説明
インポートORIGINDOCREFERENCEオリジナル伝票参照
GENERALPOSTINGDATA転記詳細
ACQUISITIONDATA資産取得の詳細
ACCOUNTASSIGNMENTS利用可能な追加勘定設定
FURTHERPOSTINGDATA追加転記詳細
エクスポートDOCUMENTREFERENCEFI/CO 伝票登録の参照情報
RETURN結果

転記詳細のパラメータを設定する

転記詳細(GENERALPOSTINGDATA)にはユーザ名、伝票日付、転記日と取得する固定資産のキーである会社コード、資産番号を設定します。
設定例:GENERALPOSTINGDATA
項目項目名称設定値
USERNAMEユーザ名USER01
DOC_DATE伝票日付2014/11/01
PSTNG_DATE転記日付2014/11/01
COMP_CODE会社コード1000
ASSETMAINO資産番号010000000001
ASSETSUBNO資産補助番号0000

資産取得明細のパラメータを設定する

資産取得の詳細(ACQUISITIONDATA)には取得した金額や数量などの項目があります。 ここで設定した金額で会計転記が行われます。
設定例:ACQUISITIONDATA
項目項目名称設定値
AMOUNT記帳額200000
CURRENCY通貨コードJPY
QUANTITY数量1
BASE_UOM基本数量単位

追加転記詳細のパラメータを設定する

追加転記詳細(FURTHERPOSTINGDATA)には会計伝票へ引き継がれる項目のソートキーや参照伝票番号などの項目を設定することができます。
設定例:FURTHERPOSTINGDATA
項目項目名称設定値
ALLOC_NMBRソートキーFA20141101
HEADER_TEXT伝票ヘッダテキスト固定資産201411
REF_DOC_NO参照伝票番号20141101
ITEM_TEXT明細テキストPC2014-123401

サンプルコード

通常の汎用モジュールを実行するのと同様にCALL FUNCTIONで実行します。固定資産取得のBAPIの内部ではコミットされないため、正常終了時は明示的にコミットを実行する必要があります。

BAPIは例外を発生させない仕様なので、エラー判定はRETURNパラメータにメッセージタイプが「E」のレコードがあるかどうかで判定をします。
DATA: LS_GENERALPOSTINGDATA TYPE BAPIFAPO_GEN_INFO,
      LS_ACQUISITIONDATA    TYPE TABLE OF BAPIFAPO_ACQ,
      LS_FURTHERPOSTINGDATA TYPE BAPIFAPO_ADD_INFO,
      LS_DOCUMENTREFERENCE  TYPE BAPIFAPO_DOC_REF,
      LS_RETURN             TYPE BAPIRET2.

* パラメータに値を設定する
LS_GENERALPOSTINGDATA-USERNAME   = SY-UNAME.   " ユーザ名
LS_GENERALPOSTINGDATA-DOC_DATE   = '20141101'. " 伝票日付
LS_GENERALPOSTINGDATA-PSTNG_DATE = '20141101'. " 転記日付
*             :
*          (以下略)

CALL FUNCTION 'BAPI_ASSET_ACQUISITION_POST'
  EXPORTING
    GENERALPOSTINGDATA = LS_GENERALPOSTINGDATA
    ACQUISITIONDATA    = LS_ACQUISITIONDATA
    FURTHERPOSTINGDATA = LS_FURTHERPOSTINGDATA
  IMPORTING
    DOCUMENTREFERENCE  = LS_DOCUMENTREFERENCE
    RETURN             = LS_RETURN
  .

* エラーメッセージがない場合
IF LS_RETURN-TYPE <> 'E'.
  COMMIT WORK AND WAIT.
ELSE.
  ROLLBACK WORK.
ENDIF.

コメントの投稿

非公開コメント

プロフィール

Z*

Author:Z*

このブログではSAPの技術情報について解説をしていきます。

このブログを気に入って頂いた方は、リンクを張っていただけると嬉しいです。

カテゴリ
最新記事
最新コメント
月別アーカイブ
検索フォーム
リンク
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。