Consolidated Asset value report

Hi,
I am prparing the report for asset which needs following values on quarterly basis for all asset class
Opening Balance
Direct additions
Trnasfer from CWIP
Deletions if any
Closing Balance
I can get asst wise valuse in ANLC . But i want to know whether there is any table which give values on asset class basis or in total instead of going for each asset.
Thanks & regards

Hi,
For getting values for report purpose use following programmes by using se38
RABEST01 op bal
RABEWG_ALV01 additions, deletions. You can give the asset transaction type to bifurcate the cwip, other purchase & deletions.
Warm Regards

Similar Messages

Fixed Asset Book Report

When running the Fixed Asset Book report, the system shows every instance of an asset number. By that I mean that when and asset has changed locations the asset shows in the report in both locations with a value of zero in one location. This makes using this report for NBV reconciliations to the GL very difficult as I need to find ways of tracking and eliminating the duplicates before I can even begin.
Is there a way to get the report to provide the data only in the current locations or is there a differant report I can use that provides a NBV at a period end broken out by cost and accumulated depreciation.
Any assistance would be appreciated.

Please see (FAQ: RXi Reports (JGRX/RXJG, FARX/RXFA, APRX/RXAP, ARRX/RXAR) [ID 430075.1]) -- How To Find The Source Code Of An RXi Report ?
Thanks,
Hussein

Error in Asset Transactions Report in ECC 6

Hi Friends,
We have upgraded from ECC 4.7 to ECC 6.0 in Nov 2007.
In Asset Transactions Report (S_ALR_87012048) the Depreciation column is displaying Zero Values for individual line items after November 2007 (ie for Assets posted after Nov, 07).
We posted the same to SAP and they are saying that since New Depreciation Calculation has been activated, Depreciation on Individual transactions will not be calculated.
SAP has quoted the following note:
As per note 965032 point 4d under the header 'No depreciations ontransactions' which states:-
.... if you use the new depreciation calculation, the system no longer saves depreciations on transactions in the line items. Exceptions to this rule are - proportional value adjustments in the case of retirements or retirement transfers, since these must continue to be calculated at single transaction level.
My questions are:
1.Even after this the report with depreciation values as Zero can be grossly misleading (other reports are showing correct values). Is it correct?
2.If what SAP is saying is correct, then How is this New Depreciation calculated? If anybody has an idea, please explain...
I hope i am clear in stating my requirements.
Thanks in advance.
SK

Hello,
Can you please look in the /put/log directory and copy the error from the appropriate log file. You should find a log file with a name similar the to upgrade phase that is causing the error.
Thanks
N.P.C

How to get loss from asset retirement..in asset acounting report

Hi in my asset acounting report i have to show Loss from asset retirement . in structure ANEPV the field is MINERL. in the standard report they are using logical dtaabse ADA and node ANEPV(report RAABGA_ALV01) . i don't want to include the node in my report.Is there any FM showing the loss value or any other way to show this value .
THANKS in advance...

Hi in my asset acounting report i have to show Loss from asset retirement . in structure ANEPV the field is MINERL. in the standard report they are using logical dtaabse ADA and node ANEPV(report RAABGA_ALV01) . i don't want to include the node in my report.Is there any FM showing the loss value or any other way to show this value .
THANKS in advance...

Asset Transaction report in Document Currency

Hi friends,
We are using Asset Transaction report s_alr_87012039 or s_alr_87012048 to view the Asset line items. The report displays the values in Local Currency, we want to view the asset transaction values in Document Currency? is there any report available in SAP?
Please advice.
Thanks
NTH
Edited by: NTH on Mar 25, 2010 11:41 AM

Hi,
All the AA reports will output the data based on the currencies that are used in the dep areas of asset master.
In generak 01 area will have LC.
If you want to see asset transactions in DOC curr, go to FBL3N for the asset related recon accounts and choose field like Amt in doc curr and Doc curr.
Hope you have set line item display for your asset related recon accounts in FS00.
Thanks,
Srinu

Creating Requisition for items, with no "Inventory Asset Value"

Is it possible to create the Internal Requisition for items for which inventory asset value flag is disabled.
the requirement is that the item should be stockable, inventory, transactable but no asset value has to be calculated.
If I disable the flag the cost manager is unable to update the cost price after receiving in store,
and if there is no cost value then how can i create internal requisition.
Thanks in advance.

Dear Arif and PS,
Thanks for the response.
You are correct that the costing manager will not calculate the cost price if the flag is disabled, now the requirement is we want to take in the items through PO at central org and distribute to other org's where they can consume this item, and we want to track the quantity and also it should effect the accounts, and item should not present in inventory value report.
Do we have any option for this scenario.
Regards,
Ahmed.

Asset Depriciation Report (as AR01)

I am Developing a Report for Asset Depriciation Details with fields -
Asset no, Asset sno, Asset desc, Dep key, Plant, Cost cntr, Asset class, ODep. start, START BOOK VALUE, Depriciation, end book value & TRANS. ACQ. VALUE.
In this, I am unable to find the two - START BOOK VALUE & TRANS. ACQ. VALUE
( I have Depriciation Percentage, to count End book value)
How can I get this two fileds?

Hi,
Check the below tables.
ANEP - Asset Line Items
ANLP - Asset Periodic Values
ANLC - Asset Value Fields
Check the below link also.
http://sapfin.blogspot.com/2009/04/issuesolution-incorrect-book-value-in.html
Re: Depreciation Reports format
Hope its useful.

FI-AA: table(-s) for the asset value

Dear forum members,
I need to find the table where I can get the asset value from!?
The background is that I`m writing a report where I have to get the value of an asset. If it is higher then 0,00 then it has to do this and if it lower than 0,00 it has to do that and so on.
It would be great if someone could help me with this matter, or at least give me an idea how to find that out.
Thank`s in advance

Hi,
definitely table ANLC. You have to calculate the asset value as ANLC contains acquisition cost, accumulated depreciation, depr. of the actual year,...
best regards, Christian

Help on asset value table

hi,
i am a abaper and need to come out a report for asset with acquisition value and depresation value. can any one please advice what table and how am i going to get the value as it is not a standard field( it is a calculate field).
thanks

Hi,
base your report on logical database ADA - like the majority of FI-AA standard repots - you get the asset value determination automatically by the logical database then.
Regards,
Markus

Asset value adjustments.

Hi Gurus,
i have a problem in asset accounting.
one of my user did GR wrongly so i need to transfer the asset vlaue to correct asset.
the Gr was done in 2008 Dec.
as the posting periods were already closed iam doing asset transfer in 2009.
first i writeup the depreciation posted in 2008, then iam doing trnasfer by ABUMN, but when iam doing it system doing soem amount back posting to the previous accoutn as Adjustment amount.
what exactly this amount is and i need to transfer the whole value wrongly posted to the first asset,but cant successful.
Gr posted to asset X which is already in use.
iam transfering the value to Y in 2009.
but i need to tranfer around 4000
and i did Writeup before doing the tranfer.
but when doing ABUMN system posting to X from Y amoutn 200 as value adjustment which user dont want.
Pls help me to resolve this issue.
thanks in advance

Raj understood the logic of value adjustment line. The values are posted in asset and acc dep GL's only in the new Cocd.
But now how do we scrap the asset using abavn wherein the result should make asset a/c and acc. dep a/c zero. When we tested in QA to retire this asset via abavn, then the resulting entry was asset a/c Cr and BV of FA sold a/c Dr and the asset report shows asset value as Nil but the Acc dep A/c still shows the dep amt. So, obviously instead of debiting the Acc dep a/c in abavn it has debited to BV of FA sold A/c. Now, my problem is how to nullify these using Asset accounting functionalities. Since its post automatically accounts and recon accounts , so we cant post a manual JE.
Looking forward for your advice.

Asset Acquisition Report(RAZUGA_ALV01)

In asset acquisition report(RAZUGA_ALV01), we can get the field - Ordinary Depreciation(O.dep.) after changing the report layout. While using this report, I found the value of O. dep.(NAFAB) is different from the planned ordinary depreciation (NAFAP) in asset explore. It seems the data in field NAFAB not updated even though changing acquisition date. In AW01N, depreciation area 10(US tax books), the planned ordinary depreciation is not same as the EOrd.dep value in the lower part - Transactions.
Who knows whether it is possible to keep field: NAFAB equal to NAFAP? and whether has the field O.dep of RAZUGA_ALV01 been abandoned after the activation of EA-FIN?
Thanks,
Dy

Hi
In this report RAZUGA_ALV01
NAFAP field is not used.
NAFAB is different & NAFAP is different.
VVR

Equipment Asset value?

Hi Bw Gurus,
I have a requirement to provide a report on De Installed Equipments from CRM and the asset value from ERP.
I can get information like sevice order no, contract no , age of the equipment from the due data etc from CRM. Where as the Asset value of equipment is stored in ERP. I am not sure how to get this information.
Thanks for your help.
Sudha

Hi Bw Gurus,
I have a requirement to provide a report on De Installed Equipments from CRM and the asset value from ERP.
I can get information like sevice order no, contract no , age of the equipment from the due data etc from CRM. Where as the Asset value of equipment is stored in ERP. I am not sure how to get this information.
Thanks for your help.
Sudha

Help for asset aqusition report

hi,
here i am sending my code for asset aqusition report but not getting right output ie i am not able to get all the line items for particular asset no.
bcoz an asset has different line items with different doc no.
REPORT XXXXXX .
TABLES : sflight.
TYPE-POOLS: slis.
DATA : w_repid LIKE sy-repid.
w_repid = sy-repid.
DATA : BEGIN OF it_sflight OCCURS 0,
 checkbox(1),
 carrid LIKE sflight-carrid,
 END OF it_sflight.
*layout
DATA: wa_layout TYPE slis_layout_alv.
*field catalog
DATA: it_fieldcatalog TYPE slis_t_fieldcat_alv,
 wa_fieldcatalog TYPE slis_fieldcat_alv.
START-OF-SELECTION.
SELECT carrid FROM sflight INTO CORRESPONDING FIELDS OF TABLE
it_sflight.
END-OF-SELECTION.
CLEAR it_fieldcatalog.
REFRESH it_fieldcatalog.
wa_fieldcatalog-fieldname = 'CHECKBOX'.
wa_fieldcatalog-outputlen = '3'.
wa_fieldcatalog-col_pos = '1'.
wa_fieldcatalog-seltext_m = 'Chk'.
wa_fieldcatalog-checkbox = 'X'.
wa_fieldcatalog-edit = 'X'.
APPEND wa_fieldcatalog TO it_fieldcatalog.
CLEAR wa_fieldcatalog.
wa_fieldcatalog-fieldname = 'CARRID'.
wa_fieldcatalog-outputlen = '10'.
wa_fieldcatalog-col_pos = '2'.
wa_fieldcatalog-seltext_m = 'Carrid'.
APPEND wa_fieldcatalog TO it_fieldcatalog.
CLEAR wa_fieldcatalog.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 i_callback_program = w_repid
 is_layout = wa_layout
 i_callback_user_command = 'USER_COMMAND'
 it_fieldcat = it_fieldcatalog
 TABLES
 t_outtab = it_sflight
 EXCEPTIONS
 program_error = 1
 OTHERS = 2.
*& Form USER_COMMAND
FORM user_command USING p_ucomm TYPE sy-ucomm
 p_selfld TYPE slis_selfield.
CASE p_ucomm.
 WHEN '&DATA_SAVE'.
 DATA ref1 TYPE REF TO cl_gui_alv_grid.
 CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
 IMPORTING
 e_grid = ref1.
 CALL METHOD ref1->check_changed_data.
 LOOP AT it_sflight WHERE checkbox = 'X'.
 DELETE it_sflight INDEX sy-tabix.
 ENDLOOP.
 p_selfld-refresh = 'X'.
ENDCASE.
ENDFORM. "user_command
Check the following code...
DATA: BEGIN OF itab OCCURS 0,
check,
value(20),
END OF itab.
SET PF-STATUS 'TEST1'.
itab-value = 'ETSAT'.
APPEND itab.
itab-value = 'ETSATADSF'.
APPEND itab.
itab-value = 'ETSAT'.
APPEND itab.
LOOP AT itab.
WRITE: / itab-check AS CHECKBOX,
itab-value.
ENDLOOP.
AT USER-COMMAND.
DATA: wa LIKE itab.
DATA: itab_download LIKE itab OCCURS 0 WITH HEADER LINE.
IF sy-ucomm = 'DOWNLOAD'.
DESCRIBE TABLE itab.
DO sy-tfill TIMES.
READ LINE sy-index FIELD VALUE itab-check.
IF sy-subrc <> 0.
EXIT.
ENDIF.
CHECK itab-check = 'X'.
itab_download-value = itab-value.
APPEND itab_download.
ENDDO.
DOWNLOAD
CALL FUNCTION 'WS_DOWNLOAD'
EXPORTING
filename = 'C:\TEST.XLS '
TABLES
data_tab = itab_download.
ENDIF.
Thanks
Shobi

Hi,
One the guy has same report as problem, ok, my friend Eswar as given the code for that, i will send you that, hope it is helpful
Please check with this code now:
TYPE-POOLS : SLIS.
TABLES : ANLA, "ASSET MASTER RECORD-SEGMENT
 ANLZ. "time dependent asset allocations
DATA : BEGIN OF T_ANLA OCCURS 0,
 BUKRS LIKE ANLA-BUKRS,
 ANLN1 LIKE ANLA-ANLN1,
 ANLN2 LIKE ANLA-ANLN2,
 AKTIV LIKE ANLA-AKTIV,
 TXT50 LIKE ANLA-TXT50,
 ZUGDT LIKE ANLA-ZUGDT,
 MENGE LIKE ANLA-MENGE,
 MEINS LIKE ANLA-MEINS,
 END OF T_ANLA.
DATA : BEGIN OF T_ANLZ OCCURS 0,
 BUKRS LIKE ANLZ-BUKRS,
 ANLN1 LIKE ANLZ-ANLN1,
 ANLN2 LIKE ANLZ-ANLN2,
 GSBER LIKE ANLZ-GSBER,
 KOSTL LIKE ANLZ-KOSTL,
 STORT LIKE ANLZ-STORT,
 RAUMN LIKE ANLZ-RAUMN,
 KFZKZ LIKE ANLZ-KFZKZ,
 END OF T_ANLZ.
DATA : BEGIN OF T_ANEK OCCURS 0,
 BUKRS LIKE ANEK-BUKRS,
 ANLN1 LIKE ANEK-ANLN1,
 ANLN2 LIKE ANEK-ANLN2,
 BELNR LIKE ANEK-BELNR,
 BUDAT LIKE ANEK-BUDAT,
 XBLNR LIKE ANEK-XBLNR,
 SGTXT LIKE ANEK-SGTXT,
 END OF T_ANEK.
DATA : BEGIN OF T_ANLC OCCURS 0,
 BUKRS LIKE ANLC-BUKRS,
 ANLN1 LIKE ANLC-ANLN1,
 ANLN2 LIKE ANLC-ANLN2,
 KANSW LIKE ANLC-KANSW,
 KNAFA LIKE ANLC-KNAFA,
 AAFAP LIKE ANLC-AAFAP,
 AFABE LIKE ANLC-AFABE,
 GJAHR LIKE ANLC-GJAHR,
 END OF T_ANLC.
DATA : BEGIN OF IT_FINAL OCCURS 0,
 ANLN1 LIKE ANLA-ANLN1,
 ANLN2 LIKE ANLA-ANLN2,
 AKTIV LIKE ANLA-AKTIV,
 TXT50 LIKE ANLA-TXT50,
 ZUGDT LIKE ANLA-ZUGDT,
 MENGE LIKE ANLA-MENGE,
 MEINS LIKE ANLA-MEINS,
 GSBER LIKE ANLZ-GSBER,
 KOSTL LIKE ANLZ-KOSTL,
 STORT LIKE ANLZ-STORT,
 RAUMN LIKE ANLZ-RAUMN,
 KFZKZ LIKE ANLZ-KFZKZ,
 BELNR LIKE ANEK-BELNR,
 BUDAT LIKE ANEK-BUDAT,
 XBLNR LIKE ANEK-XBLNR,
 SGTXT LIKE ANEK-SGTXT,
 KANSW LIKE ANLC-KANSW,
 KNAFA LIKE ANLC-KNAFA,
 AAFAP LIKE ANLC-AAFAP,
 GJAHR LIKE ANEK-GJAHR,
 END OF IT_FINAL.
DATA : LINE_COLOR(4) TYPE C.
DATA : FIELDCATALOG TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
 GD_LAYOUT TYPE SLIS_LAYOUT_ALV.
SELECTION-SCREEN : BEGIN OF BLOCK B_FA WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS : S_BUKRS FOR ANLA-BUKRS DEFAULT 'ML',
 S_ANLN1 FOR ANLA-ANLN1,
 S_ANLN2 FOR ANLA-ANLN2.
 s_gjahr FOR anlc-gjahr.
SELECTION-SCREEN : END OF BLOCK B_FA.
*SELECT-OPTIONS : s_belnr FOR anek-belnr.
SELECT BUKRS ANLN1 ANLN2 AKTIV TXT50 ZUGDT MENGE MEINS
 FROM ANLA
 INTO CORRESPONDING FIELDS OF TABLE T_ANLA
 WHERE ANLN1 IN S_ANLN1
 AND ANLN2 IN S_ANLN2
 AND BUKRS IN S_BUKRS.
CHECK: NOT T_ANLA[] IS INITIAL.
SELECT BUKRS ANLN1 ANLN2 GSBER KOSTL STORT RAUMN KFZKZ
 FROM ANLZ
 INTO CORRESPONDING FIELDS OF TABLE T_ANLZ
 FOR ALL ENTRIES IN T_ANLA
 WHERE ANLN1 = T_ANLA-ANLN1
 AND ANLN2 = T_ANLA-ANLN2
 AND BUKRS = T_ANLA-BUKRS.
*IF sy-subrc EQ 0.
SELECT BUKRS ANLN1 ANLN2 BELNR BUDAT XBLNR SGTXT GJAHR
 FROM ANEK
 INTO CORRESPONDING FIELDS OF TABLE T_ANEK
 FOR ALL ENTRIES IN T_ANLA
 WHERE ANLN1 = T_ANLA-ANLN1
 AND ANLN2 = T_ANLA-ANLN2
 AND BUKRS = T_ANLA-BUKRS.
 AND gjahr = t_anek-gjahr.
*ENDIF.
SELECT BUKRS ANLN1 ANLN2 KANSW KNAFA AAFAP AFABE GJAHR
 FROM ANLC
 INTO CORRESPONDING FIELDS OF TABLE T_ANLC
 FOR ALL ENTRIES IN T_ANLA
 WHERE ANLN1 = T_ANLA-ANLN1
 AND ANLN2 = T_ANLA-ANLN2
 AND BUKRS = T_ANLA-BUKRS
 AND GJAHR = T_ANLC-GJAHR.
 AND afabe = '01'.
LOOP AT T_ANLA.
MOVE : T_ANLA-ANLN1 TO IT_FINAL-ANLN1,
 T_ANLA-ANLN2 TO IT_FINAL-ANLN2,
 T_ANLA-AKTIV TO IT_FINAL-AKTIV,
 T_ANLA-TXT50 TO IT_FINAL-TXT50,
 T_ANLA-ZUGDT TO IT_FINAL-ZUGDT,
 T_ANLA-MENGE TO IT_FINAL-MENGE,
 T_ANLA-MEINS TO IT_FINAL-MEINS.
READ TABLE T_ANLZ WITH KEY BUKRS = T_ANLA-BUKRS
 ANLN1 = T_ANLA-ANLN1
 ANLN2 = T_ANLA-ANLN2 BINARY SEARCH.
IF SY-SUBRC EQ 0.
 MOVE : T_ANLZ-GSBER TO IT_FINAL-GSBER,
 T_ANLZ-KOSTL TO IT_FINAL-KOSTL,
 T_ANLZ-STORT TO IT_FINAL-STORT,
 T_ANLZ-RAUMN TO IT_FINAL-RAUMN,
 T_ANLZ-KFZKZ TO IT_FINAL-KFZKZ.
ENDIF.
READ TABLE T_ANLC WITH KEY BUKRS = T_ANLA-BUKRS
 ANLN1 = T_ANLA-ANLN1
 ANLN2 = T_ANLA-ANLN2 BINARY SEARCH.
IF SY-SUBRC EQ 0.
 MOVE : T_ANLC-KANSW TO IT_FINAL-KANSW,
 T_ANLC-KNAFA TO IT_FINAL-KNAFA,
 T_ANLC-AAFAP TO IT_FINAL-AAFAP.
ENDIF.
*SORT t_anla.
*READ TABLE T_ANEK WITH KEY BUKRS = T_ANLA-BUKRS
 ANLN1 = T_ANLA-ANLN1
 ANLN2 = T_ANLA-ANLN2 BINARY SEARCH.
*IF SY-SUBRC EQ 0.
LOOP AT T_ANEK WHERE BUKRS = T_ANLA-BUKRS AND ANLN1 = T_ANLA-ANLN1 AND
ANLN2 = T_ANLA-ANLN2.
 MOVE : T_ANEK-BELNR TO IT_FINAL-BELNR,
 T_ANEK-BUDAT TO IT_FINAL-BUDAT,
 T_ANEK-XBLNR TO IT_FINAL-XBLNR,
 T_ANEK-SGTXT TO IT_FINAL-SGTXT.
*ENDIF.
 APPEND IT_FINAL.
ENDLOOP.
ENDLOOP.
*ENDIF.
PERFORM BUILD_FIELDCATALOG.
PERFORM DISPLAY_ALV_REPORT.
PERFORM BUILD_LAYOUT.
 FORM BUILD_FIELDCATALOG *
FORM BUILD_FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'ANLN1'.
FIELDCATALOG-SELTEXT_M = 'ASSET MAIN NO'.
FIELDCATALOG-COL_POS = 0.
FIELDCATALOG-OUTPUTLEN = 14.
FIELDCATALOG-EMPHASIZE = 'X'.
FIELDCATALOG-KEY = 'X'.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'ANLN2'.
FIELDCATALOG-SELTEXT_M = 'SUB NO'.
FIELDCATALOG-COL_POS = 1.
FIELDCATALOG-OUTPUTLEN = 7.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'AKTIV'.
FIELDCATALOG-SELTEXT_M = 'CAP.DATE'.
FIELDCATALOG-COL_POS = 2.
FIELDCATALOG-OUTPUTLEN = 10.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'TXT50'.
FIELDCATALOG-SELTEXT_M = 'NAME'.
FIELDCATALOG-COL_POS = 3.
FIELDCATALOG-OUTPUTLEN = 50.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'ZUGDT'.
FIELDCATALOG-SELTEXT_M = 'POSTING DATE'.
FIELDCATALOG-COL_POS = 4.
FIELDCATALOG-OUTPUTLEN = 10.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'MENGE'.
FIELDCATALOG-SELTEXT_M = 'QTY'.
FIELDCATALOG-COL_POS = 5.
FIELDCATALOG-OUTPUTLEN = 13.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'MEINS'.
FIELDCATALOG-SELTEXT_M = 'UNITS'.
FIELDCATALOG-COL_POS = 6.
FIELDCATALOG-OUTPUTLEN = 3.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'GSBER'.
FIELDCATALOG-SELTEXT_M = 'BA'.
FIELDCATALOG-COL_POS = 7.
FIELDCATALOG-OUTPUTLEN = 4.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'KOSTL'.
FIELDCATALOG-SELTEXT_M = 'COST CENTER'.
FIELDCATALOG-COL_POS = 8.
FIELDCATALOG-OUTPUTLEN = 13.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'STORT'.
FIELDCATALOG-SELTEXT_M = 'LOCATION'.
FIELDCATALOG-COL_POS = 9.
FIELDCATALOG-OUTPUTLEN = 10.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'RAUMN'.
FIELDCATALOG-SELTEXT_M = 'ROOM'.
FIELDCATALOG-COL_POS = 10.
FIELDCATALOG-OUTPUTLEN = 10.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'KFZKZ'.
FIELDCATALOG-SELTEXT_M = 'LICENSE PLATE NO'.
FIELDCATALOG-COL_POS = 11.
FIELDCATALOG-OUTPUTLEN = 20.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'BELNR'.
FIELDCATALOG-SELTEXT_M = 'DOC NO'.
FIELDCATALOG-COL_POS = 12.
FIELDCATALOG-OUTPUTLEN = 13.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'BUDAT'.
FIELDCATALOG-SELTEXT_M = 'POSTING DATE'.
FIELDCATALOG-COL_POS = 13.
FIELDCATALOG-OUTPUTLEN = 15.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'XBLNR'.
FIELDCATALOG-SELTEXT_M = 'REF NO'.
FIELDCATALOG-COL_POS = 14.
FIELDCATALOG-OUTPUTLEN = 25.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'SGTXT'.
FIELDCATALOG-SELTEXT_M = 'TEXT'.
FIELDCATALOG-COL_POS = 15.
FIELDCATALOG-OUTPUTLEN = 50.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
ENDFORM. "BUILD_FIELDCATALOG
 FORM BUILD_LAYOUT *
FORM BUILD_LAYOUT.
GD_LAYOUT-ZEBRA = 'X'.
GD_LAYOUT-INFO_FIELDNAME = 'LINE_COLOR'.
ENDFORM. "BUILD_LAYOUT
 FORM DISPLAY_ALV_REPORT *
FORM DISPLAY_ALV_REPORT.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
 EXPORTING
 I_INTERFACE_CHECK = ' '
 I_CALLBACK_PROGRAM = ' '
 I_CALLBACK_PF_STATUS_SET = ' '
 I_CALLBACK_USER_COMMAND = ' '
 I_STRUCTURE_NAME =
 IS_LAYOUT = GD_LAYOUT
 IT_FIELDCAT = FIELDCATALOG[]
 IT_EXCLUDING =
 IT_SPECIAL_GROUPS =
 IT_SORT =
 IT_FILTER =
 IS_SEL_HIDE =
 I_DEFAULT = 'X'
 I_SAVE = ' '
 IS_VARIANT = ' '
 IT_EVENTS =
 IT_EVENT_EXIT =
 IS_PRINT =
 I_SCREEN_START_COLUMN = 0
 I_SCREEN_START_LINE = 0
 I_SCREEN_END_COLUMN = 0
 I_SCREEN_END_LINE = 0
 IMPORTING
 E_EXIT_CAUSED_BY_CALLER =
 ES_EXIT_CAUSED_BY_USER =
 TABLES
 T_OUTTAB = IT_FINAL
 EXCEPTIONS
 PROGRAM_ERROR = 1
 OTHERS = 2.
ENDFORM. "DISPLAY_ALV_REPORT
Thanks & Regards
Eswar. B
Tel: +65 6544 7449
mailto: [email protected]
From: [email protected] [mailto:[email protected]]
Sent: Tuesday, November 28, 2006 7:36 PM
To: Boddeti, Eswar Rao
Subject: Re: need ur help for asset aqusition report
Hai,
 Sorry sorry this is the right Code.
Z_FA_ACQ NO STANDARD PAGE HEADING
 LINE-SIZE 400
 LINE-COUNT 65(3).
TYPE-POOLS : SLIS.
TABLES : ANLA, "ASSET MASTER RECORD-SEGMENT
 ANLZ. "time dependent asset allocations
DATA : BEGIN OF T_ANLA OCCURS 0,
 BUKRS LIKE ANLA-BUKRS,
 ANLN1 LIKE ANLA-ANLN1,
 ANLN2 LIKE ANLA-ANLN2,
 AKTIV LIKE ANLA-AKTIV,
 TXT50 LIKE ANLA-TXT50,
 ZUGDT LIKE ANLA-ZUGDT,
 MENGE LIKE ANLA-MENGE,
 MEINS LIKE ANLA-MEINS,
 END OF T_ANLA.
DATA : BEGIN OF T_ANLZ OCCURS 0,
 BUKRS LIKE ANLZ-BUKRS,
 ANLN1 LIKE ANLZ-ANLN1,
 ANLN2 LIKE ANLZ-ANLN2,
 GSBER LIKE ANLZ-GSBER,
 KOSTL LIKE ANLZ-KOSTL,
 STORT LIKE ANLZ-STORT,
 RAUMN LIKE ANLZ-RAUMN,
 KFZKZ LIKE ANLZ-KFZKZ,
 END OF T_ANLZ.
DATA : BEGIN OF T_ANEK OCCURS 0,
 BUKRS LIKE ANEK-BUKRS,
 ANLN1 LIKE ANEK-ANLN1,
 ANLN2 LIKE ANEK-ANLN2,
 BELNR LIKE ANEK-BELNR,
 BUDAT LIKE ANEK-BUDAT,
 XBLNR LIKE ANEK-XBLNR,
 SGTXT LIKE ANEK-SGTXT,
 END OF T_ANEK.
DATA : BEGIN OF T_ANLC OCCURS 0,
 BUKRS LIKE ANLC-BUKRS,
 ANLN1 LIKE ANLC-ANLN1,
 ANLN2 LIKE ANLC-ANLN2,
 KANSW LIKE ANLC-KANSW,
 KNAFA LIKE ANLC-KNAFA,
 AAFAP LIKE ANLC-AAFAP,
 AFABE LIKE ANLC-AFABE,
 GJAHR LIKE ANLC-GJAHR,
 END OF T_ANLC.
DATA : BEGIN OF IT_FINAL OCCURS 0,
 ANLN1 LIKE ANLA-ANLN1,
 ANLN2 LIKE ANLA-ANLN2,
 AKTIV LIKE ANLA-AKTIV,
 TXT50 LIKE ANLA-TXT50,
 ZUGDT LIKE ANLA-ZUGDT,
 MENGE LIKE ANLA-MENGE,
 MEINS LIKE ANLA-MEINS,
 GSBER LIKE ANLZ-GSBER,
 KOSTL LIKE ANLZ-KOSTL,
 STORT LIKE ANLZ-STORT,
 RAUMN LIKE ANLZ-RAUMN,
 KFZKZ LIKE ANLZ-KFZKZ,
 BELNR LIKE ANEK-BELNR,
 BUDAT LIKE ANEK-BUDAT,
 XBLNR LIKE ANEK-XBLNR,
 SGTXT LIKE ANEK-SGTXT,
 KANSW LIKE ANLC-KANSW,
 KNAFA LIKE ANLC-KNAFA,
 AAFAP LIKE ANLC-AAFAP,
 GJAHR LIKE ANEK-GJAHR,
 END OF IT_FINAL.
DATA : LINE_COLOR(4) TYPE C.
DATA : FIELDCATALOG TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
 GD_LAYOUT TYPE SLIS_LAYOUT_ALV.
SELECTION-SCREEN : BEGIN OF BLOCK B_FA WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS : S_BUKRS FOR ANLA-BUKRS DEFAULT 'ML',
 S_ANLN1 FOR ANLA-ANLN1,
 S_ANLN2 FOR ANLA-ANLN2.
 s_gjahr FOR anlc-gjahr.
SELECTION-SCREEN : END OF BLOCK B_FA.
*SELECT-OPTIONS : s_belnr FOR anek-belnr.
SELECT BUKRS ANLN1 ANLN2 AKTIV TXT50 ZUGDT MENGE MEINS
 FROM ANLA
 INTO CORRESPONDING FIELDS OF TABLE T_ANLA
 WHERE ANLN1 IN S_ANLN1
 AND ANLN2 IN S_ANLN2
 AND BUKRS IN S_BUKRS.
SELECT BUKRS ANLN1 ANLN2 GSBER KOSTL STORT RAUMN KFZKZ
 FROM ANLZ
 INTO CORRESPONDING FIELDS OF TABLE T_ANLZ
 FOR ALL ENTRIES IN T_ANLA
 WHERE ANLN1 = T_ANLA-ANLN1
 AND ANLN2 = T_ANLA-ANLN2
 AND BUKRS = T_ANLA-BUKRS.
*IF sy-subrc EQ 0.
SELECT BUKRS ANLN1 ANLN2 BELNR BUDAT XBLNR SGTXT GJAHR
 FROM ANEK
 INTO CORRESPONDING FIELDS OF TABLE T_ANEK
 FOR ALL ENTRIES IN T_ANLA
 WHERE ANLN1 = T_ANLA-ANLN1
 AND ANLN2 = T_ANLA-ANLN2
 AND BUKRS = T_ANLA-BUKRS.
 AND gjahr = t_anek-gjahr.
*ENDIF.
SELECT BUKRS ANLN1 ANLN2 KANSW KNAFA AAFAP AFABE GJAHR
 FROM ANLC
 INTO CORRESPONDING FIELDS OF TABLE T_ANLC
 FOR ALL ENTRIES IN T_ANLA
 WHERE ANLN1 = T_ANLA-ANLN1
 AND ANLN2 = T_ANLA-ANLN2
 AND BUKRS = T_ANLA-BUKRS
 AND GJAHR = T_ANLC-GJAHR.
 AND afabe = '01'.
LOOP AT T_ANLA.
MOVE : T_ANLA-ANLN1 TO IT_FINAL-ANLN1,
 T_ANLA-ANLN2 TO IT_FINAL-ANLN2,
 T_ANLA-AKTIV TO IT_FINAL-AKTIV,
 T_ANLA-TXT50 TO IT_FINAL-TXT50,
 T_ANLA-ZUGDT TO IT_FINAL-ZUGDT,
 T_ANLA-MENGE TO IT_FINAL-MENGE,
 T_ANLA-MEINS TO IT_FINAL-MEINS.
READ TABLE T_ANLZ WITH KEY BUKRS = T_ANLA-BUKRS
 ANLN1 = T_ANLA-ANLN1
 ANLN2 = T_ANLA-ANLN2 BINARY SEARCH.
IF SY-SUBRC EQ 0.
MOVE : T_ANLZ-GSBER TO IT_FINAL-GSBER,
 T_ANLZ-KOSTL TO IT_FINAL-KOSTL,
 T_ANLZ-STORT TO IT_FINAL-STORT,
 T_ANLZ-RAUMN TO IT_FINAL-RAUMN,
 T_ANLZ-KFZKZ TO IT_FINAL-KFZKZ.
ENDIF.
READ TABLE T_ANLC WITH KEY BUKRS = T_ANLA-BUKRS
 ANLN1 = T_ANLA-ANLN1
 ANLN2 = T_ANLA-ANLN2 BINARY SEARCH.
IF SY-SUBRC EQ 0.
MOVE : T_ANLC-KANSW TO IT_FINAL-KANSW,
 T_ANLC-KNAFA TO IT_FINAL-KNAFA,
 T_ANLC-AAFAP TO IT_FINAL-AAFAP.
ENDIF.
*SORT t_anla.
READ TABLE T_ANEK WITH KEY BUKRS = T_ANLA-BUKRS
 ANLN1 = T_ANLA-ANLN1
 ANLN2 = T_ANLA-ANLN2 BINARY SEARCH.
IF SY-SUBRC EQ 0.
MOVE : T_ANEK-BELNR TO IT_FINAL-BELNR,
 T_ANEK-BUDAT TO IT_FINAL-BUDAT,
 T_ANEK-XBLNR TO IT_FINAL-XBLNR,
 T_ANEK-SGTXT TO IT_FINAL-SGTXT.
ENDIF.
APPEND IT_FINAL.
*ENDLOOP.
ENDLOOP.
*ENDIF.
PERFORM BUILD_FIELDCATALOG.
PERFORM DISPLAY_ALV_REPORT.
PERFORM BUILD_LAYOUT.
 FORM BUILD_FIELDCATALOG *
FORM BUILD_FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'ANLN1'.
FIELDCATALOG-SELTEXT_M = 'ASSET MAIN NO'.
FIELDCATALOG-COL_POS = 0.
FIELDCATALOG-OUTPUTLEN = 14.
FIELDCATALOG-EMPHASIZE = 'X'.
FIELDCATALOG-KEY = 'X'.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'ANLN2'.
FIELDCATALOG-SELTEXT_M = 'SUB NO'.
FIELDCATALOG-COL_POS = 1.
FIELDCATALOG-OUTPUTLEN = 7.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'AKTIV'.
FIELDCATALOG-SELTEXT_M = 'CAP.DATE'.
FIELDCATALOG-COL_POS = 2.
FIELDCATALOG-OUTPUTLEN = 10.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'TXT50'.
FIELDCATALOG-SELTEXT_M = 'NAME'.
FIELDCATALOG-COL_POS = 3.
FIELDCATALOG-OUTPUTLEN = 50.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'ZUGDT'.
FIELDCATALOG-SELTEXT_M = 'POSTING DATE'.
FIELDCATALOG-COL_POS = 4.
FIELDCATALOG-OUTPUTLEN = 10.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'MENGE'.
FIELDCATALOG-SELTEXT_M = 'QTY'.
FIELDCATALOG-COL_POS = 5.
FIELDCATALOG-OUTPUTLEN = 13.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'MEINS'.
FIELDCATALOG-SELTEXT_M = 'UNITS'.
FIELDCATALOG-COL_POS = 6.
FIELDCATALOG-OUTPUTLEN = 3.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'GSBER'.
FIELDCATALOG-SELTEXT_M = 'BA'.
FIELDCATALOG-COL_POS = 7.
FIELDCATALOG-OUTPUTLEN = 4.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'KOSTL'.
FIELDCATALOG-SELTEXT_M = 'COST CENTER'.
FIELDCATALOG-COL_POS = 8.
FIELDCATALOG-OUTPUTLEN = 13.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'STORT'.
FIELDCATALOG-SELTEXT_M = 'LOCATION'.
FIELDCATALOG-COL_POS = 9.
FIELDCATALOG-OUTPUTLEN = 10.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'RAUMN'.
FIELDCATALOG-SELTEXT_M = 'ROOM'.
FIELDCATALOG-COL_POS = 10.
FIELDCATALOG-OUTPUTLEN = 10.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'KFZKZ'.
FIELDCATALOG-SELTEXT_M = 'LICENSE PLATE NO'.
FIELDCATALOG-COL_POS = 11.
FIELDCATALOG-OUTPUTLEN = 20.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'BELNR'.
FIELDCATALOG-SELTEXT_M = 'DOC NO'.
FIELDCATALOG-COL_POS = 12.
FIELDCATALOG-OUTPUTLEN = 13.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'BUDAT'.
FIELDCATALOG-SELTEXT_M = 'POSTING DATE'.
FIELDCATALOG-COL_POS = 13.
FIELDCATALOG-OUTPUTLEN = 15.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'XBLNR'.
FIELDCATALOG-SELTEXT_M = 'REF NO'.
FIELDCATALOG-COL_POS = 14.
FIELDCATALOG-OUTPUTLEN = 25.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'SGTXT'.
FIELDCATALOG-SELTEXT_M = 'TEXT'.
FIELDCATALOG-COL_POS = 15.
FIELDCATALOG-OUTPUTLEN = 50.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
ENDFORM.
 FORM BUILD_LAYOUT *
FORM BUILD_LAYOUT.
GD_LAYOUT-ZEBRA = 'X'.
GD_LAYOUT-INFO_FIELDNAME = 'LINE_COLOR'.
ENDFORM.
 FORM DISPLAY_ALV_REPORT *
FORM DISPLAY_ALV_REPORT.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
 EXPORTING
 I_INTERFACE_CHECK = ' '
 I_CALLBACK_PROGRAM = ' '
 I_CALLBACK_PF_STATUS_SET = ' '
 I_CALLBACK_USER_COMMAND = ' '
 I_STRUCTURE_NAME =
 IS_LAYOUT = GD_LAYOUT
 IT_FIELDCAT = FIELDCATALOG[]
 IT_EXCLUDING =
 IT_SPECIAL_GROUPS =
 IT_SORT =
 IT_FILTER =
 IS_SEL_HIDE =
 I_DEFAULT = 'X'
 I_SAVE = ' '
 IS_VARIANT = ' '
 IT_EVENTS =
 IT_EVENT_EXIT =
 IS_PRINT =
 I_SCREEN_START_COLUMN = 0
 I_SCREEN_START_LINE = 0
 I_SCREEN_END_COLUMN = 0
 I_SCREEN_END_LINE = 0
 IMPORTING
 E_EXIT_CAUSED_BY_CALLER =
 ES_EXIT_CAUSED_BY_USER =
 TABLES
 T_OUTTAB = IT_FINAL
 EXCEPTIONS
 PROGRAM_ERROR = 1
 OTHERS = 2.
ENDFORM.
Thanks
manju

For asset retirement report

hi all ,
i am developing an asset retirement report.
in that i want to get retirement revenue & ret. dep.
so from which table i should pick these values.
bcoz these values r in anlc, anea , anep tables.
while picking ret dep what should i consider
bcoz if i am considering dep area i am getting right values for some asset
and wrong for others.
plz guide me what should i do.
Thanks
Sanjeev

Hi Sanjeev,
The Following are all the tables i know for Asset Accounting.
ANLA - Asset Master Record Segment
ANLB - Depreciation terms
ANLC - Asset Value Fields
ANLT - Asset Texts
ANLV - Insurance data
ANLZ - Time-Dependent Asset Allocations
ANLK - Asset Origin by Cost Element
ANLP - Asset Periodic Values
ANEK - Document Header Asset Posting
ANEP - Asset Line Items
ANEA - Asset Line Items for Proportional Values
I don't know if they would be useful to you.
Do not forget to award the points please.
Regards,
Jacob

How to find WBS element total asset value

hello all,
i have a requirement like this..
i have displayed profit center wise PM orders with total actual cost.....
similarly i have another report where i need to display profit center wise WBS elements with total asset value....
from which table do i need to take this total asset value ,how do i link this table with PRPS table...
thanks in advance....

hello all,
i have a requirement like this..
i have displayed profit center wise PM orders with total actual cost.....
similarly i have another report where i need to display profit center wise WBS elements with total asset value....
from which table do i need to take this total asset value ,how do i link this table with PRPS table...
thanks in advance....

Consolidated Asset value report

Similar Messages

Maybe you are looking for