系統定義了一套會計科目,但是出總賬分類賬的時候要用到另外一套財務報表版本,如下:
這個可以通過標準程式rfgsbstr輸入版本號即可得到這個關係,但是程式如何做這樣的轉換了?有兩個函式非常好用fi_import_balance_sheet_text和fi_import_balance_sheet_pos乙個讀文字乙個儲存二者之間的關係。我寫了乙個僅限於獲取一級科目的函式,如下:
data: l_idcn_cdea type idcn_cdea,
l_idcn_cflea type idcn_cflea.
"獲取文字用
data: lt_rf011q type standard table of rf011q,
ls_rf011q type rf011q.
"獲取轉換科目用
data: lt_rf011z type standard table of rf011z,
ls_rf011z type rf011z.
"獲取文字資訊
call function 'fi_import_balance_sheet_text'
exporting
sprache = '1'
version = i_version
tables
x011q = lt_rf011q
* tstamp_tab =
* exceptions
* text_not_found = 1
* others = 2
. if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
select single idcn_cflea
from idcn_detail_ea
into l_idcn_cflea
where idcn_cdea in ( select idcn_cdea
from idcn_map_eas
where saknr = i_racct and fkber = i_***rea ).
"判斷是否有功能範圍
if sy-subrc = 0.
"科目編號
e_racct = l_idcn_cflea+0(4).
"獲取文字
read table lt_rf011q into ls_rf011q with key ergsl = l_idcn_cflea binary search.
e_txt = ls_rf011q-txt45.
* "沒有功能範圍轉換為對應的一級科目和文字
else.
call function 'fi_import_balance_sheet_pos'
exporting
version = i_version
tables
i011z = lt_rf011z
* x011p =
* x011s =
* x011v =
* x011f =
* exceptions
* new_balance_sheet = 1
* others = 2
. if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
endif.
"找到對應的科目
loop at lt_rf011z into ls_rf011z.
if ls_rf011z-bilkt >= i_racct and ls_rf011z-vonkt <= i_racct.
exit.
endif.
endloop.
read table lt_rf011q into ls_rf011q with key ergsl = ls_rf011z-ergso+0(4) binary search.
e_txt = ls_rf011q-txt45.
自己以前寫這類財務的東西,通常自建表,個人覺得達到了可配置的目的。但是畢竟還是沒有標準的好,以後都不需要去維護**了,只需要維護標準的東西即可。這個思路非常好。
C 財務報表日期
今天 datetime.now.date.toshortdatestring 昨天,就是今天的日期減一 datetime.now.adddays 1 toshortdatestring 明天,同理,加一 datetime.now.adddays 1 toshortdatestring 本週 要知道本...
財務報表OCR識別
一 財務報表有什麼作用 全面系統地揭示企業一定時期的財務狀況 經營成果和現金流量 有利於投資者 債權人和其他有關各方掌握企業的財務狀況 經營成果和現金流量情況,進而分析企業的盈利能力 償債能力 投資收益 發展前景等,為他們投資 貸款和 提供決策依據 滿足財政 稅務 工商 審計等部門監督企業經營管理。...
財務報表識別
財務報表識別 一 方案概述財務報表自動錄入解決方案,旨在通過ocr掃瞄識別技術結合集中作業模式,實現將客戶提供紙質的財務報表自動轉換成電子資料,匯入到信貸系統中。二 系統有如下特點 全面解放客戶經理,針對信貸業務中貸前 貸後檢查時大量的客戶財務報表無需手工錄入。提高財務報表資料錄入的比例,通過增加資...