Asset aquisition date ????

Hi All,
Previously at the time of asset acquisition, it was picking the document date as asset value date & capitalisation date and calculates the depreciation accordingly.
But now with the same process, it is picking the posting date as asset value date & capitalisation date. The depreciation start calculating accordingly ie., from posting date.
Now I want to change the asset value date from posting date to document date in the asset acqusition entries. Please guide me how to do rectify the asset value date field???
Thanks in Advance
Regards
NN

Hi Nikhil,
Doesnt the existing rules useful to u.
The following r the one that r defaults:
01   To be entered manually
02   Posting date
03   Document date
04   Earlier of either document or posting date (if different fiscal year: posting date)
05   First day of period
06   First day of fiscal year
07   User-specif. fixed date
08   Current date
09   Capitalization date
10   Date of last retirement
11   First day after last retirement
12   Posting date, goods receipt
14   Date of revaluation measure
Regards,
Kiran

Similar Messages

First Aquisition date on Asset Master record

Hi,
Please can anyone help with how to change the first aquisition date on the Asset master.
The user had wrongly entered 31.12.2010 as the Asset Value date on the original acquisition posting and so the asset has 31.12.2010 as the first acquisition date.
The original acquisition document was posted 30.06.2010 and the intention was to start depreciation on 01.11.2010.
However, we are unable to do this as the system is assuming that the asset is not live in Asset accounting till the first aquisition date of 31.12.2010 .
As a way out, I also tried to do an intracompany transfer (ABUMN) to a new asset using a value date of 01.11.2010 but the system issues an error message "Posting not possible (Value date earlier than capitalization date)"
Please help!!!
Edited by: Adekanmbi Omobola on Dec 20, 2010 4:45 PM

Hi,
ANLA-ZUGDT, ANLA-ZUJHR and ANLA-AKTIV you can not change in the standard and it is not supported by SAP.
You have to create a small ABAP.
Please test it first on a testsystem.
regards Bernhard

Asset Aquisition report date problem in indian fiscal year style (urgent)

hi all genius there,
i am developing asset aquisiton report in which i should get
the record of asset depending on indian fiscal year (1st april to 31st march).
so that means if i enter 31.03.2006 then i should get all the asset records
from 01.04.2005 to 31.03.2006.
how to do it. its very urgent. plz if aany one has done this scenario for
asset aquisition report then plz send me the code.
my id is- [removed by moderator]
or otherwise i am sending my code plz check it and do the modification to get the above requirement.
REPORT 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
         ANLC,
         ANEK.
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,
       ANLKL LIKE ANLA-ANLKL,
       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,
       WERKS LIKE ANLZ-WERKS,
       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,
       GJAHR LIKE ANEK-GJAHR,
      pdate LIKE anek-budat, " modified by sanjeev for date logic
       END OF T_ANEK.
DATA : BEGIN OF T_ANLC OCCURS 0,
       BUKRS LIKE ANLC-BUKRS,
       ANLN1 LIKE ANLC-ANLN1,
       ANLN2 LIKE ANLC-ANLN2,
       ANSWL LIKE ANLC-ANSWL,
       NAFAP LIKE ANLC-NAFAP,
       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,
      pdate LIKE anek-budat,
        XBLNR LIKE ANEK-XBLNR,
        SGTXT LIKE ANEK-SGTXT,
        ANSWL LIKE ANLC-ANSWL,
        NAFAP LIKE ANLC-NAFAP,
        AAFAP LIKE ANLC-AAFAP,
        GJAHR LIKE ANEK-GJAHR,
        ANLKL LIKE ANLA-ANLKL,
        END OF IT_FINAL.
DATA: PDATE LIKE ANEK-BUDAT.
PDATE = SY-DATUM.
DATA:V_LOW LIKE SY-DATUM,
    V_HIGH LIKE SY-DATUM,
    V_DATE(04) TYPE N,
    V_YEAR(04) TYPE N.
V_YEAR = V_DATE(04).
V_YEAR = V_YEAR - 1.
CONCATENATE V_YEAR '0401' INTO V_LOW.
CLEAR V_YEAR.
V_YEAR = V_DATE(04).
CONCATENATE V_YEAR '0331' INTO V_HIGH.
DATA : LINE_COLOR(4) TYPE C.
DATA : FIELDCATALOG TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
       GD_LAYOUT TYPE SLIS_LAYOUT_ALV.
DATA: EVENT TYPE SLIS_ALV_EVENT OCCURS 0 WITH HEADER LINE.
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_ANLKL FOR ANLA-ANLKL,
                 S_AKTIV FOR ANLA-AKTIV,
                 S_GSBER FOR ANLZ-GSBER,
                 S_KOSTL FOR ANLZ-KOSTL,
                 S_WERKS FOR ANLZ-WERKS,
                 S_STORT FOR ANLZ-STORT,
               S_BUDAT FOR ANEK-BUDAT,
                 S_GJAHR FOR ANEK-GJAHR.
SELECTION-SCREEN : END OF BLOCK B_FA.
*PARAMETERS : budat LIKE anek-budat.
SET PF-STATUS '100'.
SELECT BUKRS ANLN1 ANLN2 AKTIV TXT50 ZUGDT MENGE MEINS ANLKL
       FROM ANLA
       INTO CORRESPONDING FIELDS OF TABLE T_ANLA
       WHERE ANLN1 IN S_ANLN1
       AND   ANLN2 IN S_ANLN2
       AND   BUKRS IN S_BUKRS
       AND   ANLKL IN S_ANLKL
       AND   AKTIV IN S_AKTIV.
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
       AND   GSBER NOT IN S_GSBER
       AND   KOSTL IN S_KOSTL
       AND   WERKS IN S_WERKS.
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   BUDAT >= V_LOW
       AND   BUDAT <= V_HIGH.
      AND gjahr IN s_gjahr. " modified for date logic by Sanjeev
SELECT BUKRS ANLN1 ANLN2 ANSWL NAFAP 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   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-ANSWL TO IT_FINAL-ANSWL,
           T_ANLC-NAFAP TO IT_FINAL-NAFAP,
           T_ANLC-AAFAP TO IT_FINAL-AAFAP.
ENDIF.
LOOP AT T_ANEK WHERE BUKRS = T_ANLA-BUKRS AND ANLN1 = T_ANLA-ANLN1 AND
    ANLN2 = T_ANLA-ANLN2 AND   BUDAT >= V_LOW
                             AND   BUDAT <= V_HIGH AND BUDAT IN S_BUDAT.
    MOVE : T_ANEK-BELNR TO IT_FINAL-BELNR,
           T_ANEK-BUDAT TO IT_FINAL-BUDAT,
           T_ANEK-GJAHR TO IT_FINAL-GJAHR,
           T_ANEK-XBLNR TO IT_FINAL-XBLNR,
           T_ANEK-SGTXT TO IT_FINAL-SGTXT.
    APPEND IT_FINAL.
ENDLOOP.
ENDLOOP.
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.
FIELDCATALOG-FIELDNAME = 'ANSWL'.
FIELDCATALOG-SELTEXT_M = 'ACQ VAL'.
FIELDCATALOG-COL_POS   = 16.
FIELDCATALOG-OUTPUTLEN = 13.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'NAFAP'.
FIELDCATALOG-SELTEXT_M = 'ORD.DEP'.
FIELDCATALOG-COL_POS   = 17.
FIELDCATALOG-OUTPUTLEN = 13.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'AAFAP'.
FIELDCATALOG-SELTEXT_M = 'UNPLAN DEP'.
FIELDCATALOG-COL_POS   = 18.
FIELDCATALOG-OUTPUTLEN = 13.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
ENDFORM.
PERFORM ALVDISPLAY.
FORM ALVDISPLAY.
EVENT-FORM = 'USERCOMMAND'(002).
EVENT-NAME = 'USER_COMMAND'(001).
APPEND EVENT.
ENDFORM.
FORM DOWNLOADEXCEL.
DATA : B_FILE1 LIKE RLGRAP-FILENAME.
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       = SY-REPID
        i_callback_pf_status_set = 100
        i_callback_user_command = sy-ucomm
        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            = EVENT[]
        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.
Hi,
we encourage open discussion and no emails, as the answer to your question shall be posted in the forum to be read by other users, who might be interested in it as well.
Mario

hi,
i've tried to correct your code:
-> v_year, v_low and v_high was not filled
...SELECTION-SCREEN : END OF BLOCK b_fa.
PARAMETERS p_year LIKE anlc-gjahr DEFAULT sy-datum(4).
*PARAMETERS : budat LIKE anek-budat.
SET PF-STATUS '100'.
v_year = p_year.
v_year = v_year - 1.
CONCATENATE v_year '0401' INTO v_low.
CLEAR v_year.
v_year = p_year.
CONCATENATE v_year '0331' INTO v_high.
SELECT bukrs anln1 anln2 aktiv txt50 zugdt menge meins anlkl
FROM anla
pls reward useful answers
thx.
Andreas

Asset value date

Hi Guru's
I have uploaded asset with capitalization date is 02.07.2008 the i have uploade the data with the posting date 02.10.2008, the depreciation is calculated from the period 02.10.2008 and not fromt the capitalized date
can one let me know please?the depreciation calculate from teh date of acuisition or from teh date of posting date?
regards
Sunitha
Edited by: sunitha reddy on Mar 3, 2009 4:26 PM

hi thanks to all.
my situatui is littlebit different. normally capitalization date will take with end date of the asset. in my case asset value date, capitalization date and aquisition date and dep start date also same.but as per these date when we compared with end date the asset useful life should be 10.3 yeaes but i has calculated as 10.1 from the posting date of the document
now i want change teh asset useful life for 10.3 year in master data, how can i change it in mass? and what are the implications?
thanks
sunihta

Asset value date at the asset posting when using F-90

Hi,
I have an asset and the first acquisition date was 10.30.2009.
I'm using the transaction F-90 (external aquisition with vendor) with posting key 50 for credit entry, 70 for debit asset and the transaction type is 100.
Why the asset value date at the asset posting is equal first acquisition date (10.30.2009)? If I'm posting 12.17.2009 the asse value date woudn't be 12.17.2009?
Regards.

Hi
The first Acquisition Date will be the Asset Value date.
When ever you going to do more Acquisitions they will be added on to that Acquisition Amount but on the Particular Dates of Acquisitions and Asset Value Date will remain the same as First Acquisition date.
Whether you do Acquisitions using F-90 or through Settlements, the Asset Value Date will be the 1st Acquisition Date.
regards
Venkat

Asset aquisition report help req (urgent)

hi all,
in my following code there is a problem ie i am not getting all line items from
table ANLC & ANEK.
check the query whether there is any problem in the loop or query .
send me the modification for that or otherwise if u have devloped the code
for asset aquisition then send me that to my id- [email protected]
Report 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.

Hi Sanjeev,
I found out one small error in your code. While fetching from ANLC table
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.
<b>gjajr = t_anlc-gjahr</b>: here if you are fetching data into <b>t_anlc</b> for the first time, then how can you use it for selection also? this is my question. I commented and executed and i got the records fetched from ANLC table.

Asset aquisition report (urgent help needed from abap guys working on FI m)

hi all,
i have to develop Asset Aquisition report.so i have developed it.
but in this i am not getting logic for the following---
if i enter a date like -19.12.2006
then the output of this report should show all the asset aquisition of the
company from 01.04.2006 to 19.12.2006 only.
bcoz in indian scenario fiscal year starts from 1st of april only.
but in my output it is showing all the asset aquisition from the day comapny was
started having its asset aquisition.
so plz if anyone has logic for above sceanario then plz share with me.
or any one has previously worked on this report can send the code to me
satisfying the above scenario. its very very urgent guys.
my id - [email protected]
i am looking for the reply

hi srinivas thanks for ur reply but it is not clear to me .
so if u will send me the code the it will be better for me .
my id- [email protected]
i am waiting for ur reply. if u have code for this then plz send me.
thanks yaar in advance

Fixed asset Master Data import

Please can anyone help me resolve this error messages when importing Fixed asset master data
"Net book value of asset must be greater or equals to zero"
Am using SAP Business one version 9.0 pl9

Hi Bright,
Please check below link.
Error message during Import of Fixed Assets after Upgrade of SAP 9.0 to PL10
Hope this help
Regards::::
Atul Chakraborty

DI API to import fixed asset master data and acquisition.

Hi,
Environment : SAP B1 8.8 PL18 & Fixed Assets Add-on 880.236.00.18
Have been used to add fixed assets, and would like to perform using the API to import fixed asset master data and acquisition.
The commands to access the table of fixed assets related to the API that is available?
Thanks.

I have the same problem...
Is there anyone who have tried these things?

Import fixed asset master data

When I try to import fixed asset master data from an excel file to the Sap Business, a problem that I cannot identify occurs, and as a result, data is not imported. The process runs normally, data is processed but at the end an informational message says that zero data was imported. I would like to have help on this to solve this issue.

Hi all
Message was edited by: JEAN PIERRE LANCEAU
Problem resolved : see the addon logfile in %temp%/sap business one logs/addonlog.txt to show errors

About settlement, asset master data's amount column value

Dear Experts,
I build an aseet master data : A (the amount column's value is 0 in asset master data)
Then, I build an asset purchase order assign to A , after I do GR, A's amount column's value change to 1.
But if as follows,
I build two asset master data : B and C ,
B's asset catalog is 167200(prepay for equipment) , c's asset catalog is 153100 (normal fixed asset)
Then , I build an asset purchase order assign to B, then do GR , B has amount 1, and then ,
I do t-code: AIAB , settlement B to C , I found B's amount column's value still show 1 , and C is still 0 ,
but the asset value certainly has transfer from B to C......
why B's amount column's value doesn't be changed?
I can't figured out.
Thanks a lot in advance.
Best Regards,
Yacoa
Edited by: Yacoa Chen on Mar 15, 2011 9:14 AM

Hi
If B is still showing value - It means values are not settled
After AIAB - You need to run AIBU to settle the values.. Did you run AIBU??
Br, Ajay M

Attaching document in the Asset master data

Hi All,
If want to attach the supporting document in asset master data, i.e in AS02, AS03 what are the steps that we need to follow to implement this in SAP?
Also while doing asset transfer, how can we transfer the attached documents?
Please provide inputs.
Regards,
Jayasudha

Hi ,
Below is the configuration steps
Have defined a content repository (IMG activity Maintain Content Repositories, transaction OAC0)
Â· Have maintained document types with the status "active" (IMG activity Maintain document types, transaction OAC2).
Â· Have defined Relationships for your object type with the status "active" (IMG activity Maintain relationships transaction OAC3)
Procedure
Then if you check the service object in AS02 it will be in active status.
Regards,
Jayasudha

What is setting for the depreciation calculate on the basis of assets value date

Hi ,
My client requirement to calculate the assets depreciation on the basis of assets value date,
every assets transaction will have take base assets value date
Acquision 1 Assets value date 1.4.2014
transfer Assets value date 15.3.2014
Wbs settlement Assets value date 20 .3.2014
second acquisition Assets value date 28.03.2014
if anybody know about the setting ,Please provide me important setting ,

Any setting related to assets posting variant ? to calculate if anybody know the setting please inform.

Creation of asset master data

hi sap gurus,
i have a problem regarding saving of asset master data.
while creating asset master data,-in time dependent tab the cost center it is comming correctly.but when i am saving it is giving ,the following error:
you cannot save the asset(correct depreciation error)
Diagnosis: you have choosen the function save.the system found an
internal problem when calculating depreciation for a check document.
sys responce:The asset cannot be created
procedure:1 check the error from depreciation calculation by
performing the function "Test doc.'again.
2 if you cannot correct the error ,contact your sys specialist.you
must then cancel your current processing.
please help me regarding the problem......

hi
check your depreciation area settings for the asset class

Modify fixed asset master data thru migo

Hi experts,
I make PO with account assigment 'fixed asset'. This asset is created during the PO creation. When materials arrive more fields of that fixed asset master data are known (ie serial number). I'd like to have a way to save those data in asset during the GR without using 2 different transactions.
In MIGO t/c i see the fixed asset number and double clicking on it i access to display asset: master data (as i was on AS03 tc).
Do you think a way to call AS02 (change asset master data) thru MIGO exists?
Best regards,
Ruben

Hi Ruben,
Did you find a solution to your problem? I have a similar requirement.
I was planning on using the user-exit MBCF0005 to call a pop-up screen where the user can input the serial number and from there calling the BAPI to update the asset.
Cheers
Wayne

Asset aquisition date ????

Similar Messages

Maybe you are looking for