Creditors report site wise

hi ,
kindly tell me the t-code for seeing vendor report site wise where can see vendor, site, open credit, close credit.
in fbl1n it is coming but field site is blank.
kindly give the suggestion.
regards
santosh jaiswal
9911736444

Hi:
In T.code fbl1n, report can display citywise,countrywise.
If you unable to see that, check whether in master data the data is mentioned or not.Also check, a display document (T.code FB03) and see whether there is citywise or countrywise data or not.
Please let me know if you need more information.
Assign points if useful.
Regards
Sridhar M

Similar Messages

How to generate site wise report for multiple sites running on single MDEX

Hi all,
I have single instance of MDEX 6.2 and Exprience Manager.
I have created some pages in workbench and set the specific trigger for all pages.
These pages are called from 2 different sites I have differentiated these 2 site by user profile. All is working fine for me.
But, Now I want to show the reports, right now the reports are displaying with combination of both sites result.
Is there anyway which I can display reports with site wise.
Thanks in advance,
Sunil N.

Hi Sunil,
You need to customize the reporting. You can log site specific parameter [for example site=abc/xyz] and then update the reporting to read and display reports site-wise.
Thanks
MS

Stock Report Date Wise

Dear All
I am devlop new Stock Report Date wise
my output follows
Material Plant Storagelocaton Saleorder OPenning stock Closing Stock Total
Which Table stored that details?
how will calculated?
Thanks and Regards
Suresh

hey
i think the following tables
will be helpful for the report:-
1>MARA
2>MBEWH
3>MSEG
4>VBRP
hope this will help
good luck
harry.

STOCK REPORT FIFO wise

Hello to ALL
I want stock report FIFO WISE
my Item valuation method is FIFO & Purchase & sale by batch wise,i want report to show that which quantity is remaining & what is the cost for that item
Suppose i purchase I01 qty 2 Price 10 & after i purchase I01 Qty 2 price 15
ie i have stock of I01 is 4 but i want it show bifurcated with coming price ie
ItemCode   Qty   Price   STCK VALUE
I01              2       10         20
                   2       15         30
If i sale I01 1Qty then i have total stock qty is 3 then report must show that
ItemCode   Qty   Price   STCK VALUE
I01              1       10         10
                   2       15         30

hi Jaykumar,
use Inventory Audit Report instead. follow this path
Inventory -->> Inventory Report -->> Inventory Audit Report
regards,
Fidel

Requirement of General Ledger Trial Balance Detail Report Date wise

Thanks for your reply
We have to requirement of General Ledger Trial Balance Detail Report Date wise.
Please help for that.
Thanks.

Take sum(Accounted_dr) - Sum(Accounted_Cr) till the Accounting Date..... from GL_BALANCES
Edited by: 924750 on Sep 16, 2012 3:42 AM

Can we access report date wise?

hi all
can we access report date wise if yes then plz guide me?
i made two text items,one for start date and second one for end date in form.if i issue date in these two text items like this
start date: 01/08/2009 End date: 08/08/2009 and after pressing the when_button_pressed and it give me the report up to giving date,is it possible?
plz help me and guide me more
thanks in advance
sarah

hi sir
sir i got an error in the following code
SET_REPORT_OBJECT_PROPERTY(rep, REPORT_OTHER , 'P_START="' || TO_CHAR(:BLOCK.START_DATE, 'DD.MM.YYYY') || '" P_END="'|| TO_CHAR(:BLOCK.END_DATE, 'DD.MM.YYYY') || '"');
here is the error:" to many declaration of 'To_char' match this call"
my table name is date1
and table structure is
name
address
start_date
end_date
and i used this where query WHERE COLUMN BETWEEN TO_DATE(:P_START, 'DD.MM.YYYY') AND TO_DATE(:P_END, 'DD.MM.YYYY') in the form where caluse
i am using u r codes for displaying report which one you posted yesterday
sarah

Stock report warehouse wise for a particular batch

Hi all,
How do you find out a stock report warehouse wise for a particular batch along with the same batch items sold to whom and with what quantity?
Thanks
SV Reddy

Hi SV Reddy
pls find the query for stock report
Select X.DocDate, X.ItemCode,
((Select isnull(sum(InQty-OutQty),'0')From OINM T0 Where T0.ItemCode=X.ItemCode And
(T0.DataSource='I' or T0.DataSource='N') And T0.DocDate < X.DocDate)) As [OpeningStock],
IsNull(sum(X.InQty),0)As[Received Qty],IsNull(sum(X.OutQty),0)As[Consumed Qty],
((Select isnull(sum(InQty-OutQty),'0')From OINM T0 Where T0.ItemCode=X.ItemCode And
(T0.DataSource='I' or T0.DataSource='N') And T0.DocDate < X.DocDate)+
(Select isNULL(sum(T0.InQty),'0')From OINM T0 Where T0.ItemCode=X.ItemCode And T0.DocDate<=X.DocDate And
(T0.DataSource='I' or T0.DataSource='N') And T0.DocDate = X.DocDate)-
(Select isNULL(sum(T0.OutQty),'0')From OINM T0 Where T0.ItemCode=X.ItemCode And T0.DocDate<=X.DocDate And
(T0.DataSource='I' or T0.DataSource='N') And T0.DocDate = X.DocDate))As [ClosingStock]
FROM OINM X Where ItemCode=X.ItemCode And
(X.DataSource='I' or X.DataSource='N')
Group by X.DocDate,X.ItemCode
Order by X.DocDate
regards
Jenny

Stock Report, Batch Wise

Hi Gurus,
I have to prepare "Stock Report Batch Wise" in BI for SD module. May be for the finished goods. For this in BI which data Cubes/ data sources I can use? Do Std MM BI content Cubes/data sources help?
My question do MM business contain information on finished stock, stock in transit, stock-yard inventory from Sales & distribution module point of view??
Regards,,,

Hi,
Please see this link
http://wiki.sdn.sap.com/wiki/display/BI/ReportsgeneratedusingdifferentDatasources
it ll help u
Regards,
Kavita C.
Edited by: kavita on Feb 8, 2012 8:34 AM
Edited by: kavita on Feb 8, 2012 8:34 AM

Pending tds report bills wise and date wise

Dear ALL,
In my client place they want Pending TDS Certificate Report Bill wise , it is there any standard tcode for that or else for this report preparation what are the tables we have to give to ababer for creating new report. Please guide to solve this issue.
girija

Dear,
You can use following tables to get detailed report on TDS...
1. WITH_ITEM
2. J_1IEWTCHLN
3. J_1IEWT_CERTIF_N
4. BSIK or BSIS.
Regards,
Chintan Joshi.

MB5B report divison-wise

Hi Friends,
I want to spool the MB5B report division-wise. At present, there is no option to print this report divison-wise.
Kindly guide me as to how to modify the existing MB5B report to get the report by division-wise.
TIA.
Regards,
Mark K

what exactly is a 'divsion' in your company? does it correspond to any sap organisational element?

Sales report period wise

Hi
Is there any report in SAP to know the customer wise Sales Organisation wise sales order peport.
we need to konw customer wise sales orders report period wise. how many salea orders we booked for the customer wise.
EX: Customer No | Customer Name| Sales document type |Total Sales order(Total of sales orders).
Plase let me know any report available for this kind of information.
Thanks
Rao

Hi..
If you have SIS Configured you can use below STD SD Reports
Standard SAP SD Reports
Reports in Sales and Distribution modules (LIS-SIS):
Sales summary - VC/2
Display Customer Hierarchy - VDH2
Display Condition record report - V/I6
Pricing Report - V/LD
Create Net Price List - V_NL
List customer material info - VD59
List of sales order - VA05
List of Billing documents - VF05
Inquiries list - VA15
Quotation List - VA25
Incomplete Sales orders - V.02
Backorders - V.15
Outbound Delivery Monitor - VL06o
Incomplete delivery - V_UC
Customer Returns-Analysis - MC+A
Customer Analysis- Sales - MC+E
Customer Analysis- Cr. Memo - MC+I
Deliveries-Due list - VL04
Billing due list - VF04
Incomplete Billing documents - MCV9
Customer Analysis-Basic List - MCTA
Material Analysis(SIS) - MCTC
Sales org analysis - MCTE
Sales org analysis-Invoiced sales - MC+2
Material Analysis-Incoming orders - MC(E
General- List of Outbound deliveries - VL06f
Material Returns-Analysis - MC+M
Material Analysis- Invoiced Sales - MC+Q
Variant configuration Analysis - MC(B
Sales org analysis-Incoming orders - MC(I
Sales org analysis-Returns - MC+Y
Sales office Analysis- Invoiced Sales - MC-E
Sales office Analysis- Returns - MC-A
Shipping point Analysis - MC(U
Shipping point Analysis-Returns - MC-O
Blocked orders - V.14
Order Within time period - SD01
Duplicate Sales orders in period - SDD1
Display Delivery Changes - VL22
Regds
MM

Aged Creditor Report - Due & No Due

Hi Experts,
I have an issue with Aged Creditor report. my user wants the report as below -
In the report he wants two more rows need to be added, the rows are "Due" & "No due" and these two rows need to be based on the Net due date.
Due-->amounts which are overdue i.e. > net due date calculated in SAP
Not due u2013 amounts where open items date < net due date
Do i need to create a selection in the report for these two feilds & have to restrict with the netduedate (both Less than & Greated Than). Please correct if i'm wrong.
Also what i'm unable to understand is-"Where does these Due & No-Due data will be picked from ?? " i have seen that the report is running on the 0FIAP_C03 Cube, and this cube do not have these due & No-due feilds.
Kindly suggest..
Thanks in advance.

hi,
In your case for Aged Creditor report you need not create two rows, you can do this at runtime only.
Add two CKF's in the report for and the report output will be as
customer total amount Due Not Due
XYZ 1000 200 800
The user must be running the report based on a date in input selection or is the report by default set to run on the system date.
In case it is run based on the variable then define the CKF as follows
CKF Not Due -- this will be the sum of two RKF's (Cleared item & Open item) i.e. if a item is cleared by a day it is not due or if it still open then it can't be due.
CKF Due -- This also consists of two RKF's (Cleared item & Open item) Cleared item which was cleared late then the date on which it was expected to clear and the Open items which are yet to be cleared and the due date has passed.
There will be three dates coming in your flow::
Posting date: this is the date on which the document was posted
Due date: this is the date on which the document was supposed to be cleared.
Clearing date: The date on which the document was actually cleared.
In case the user is running the report based on a variable date (V_date) then the RKF's should be defined as:
RKF's Not due ( Cleared item) --
all the amount with (posting date <= v_date and due date>= v_date and clearing date > v_date)
RKF's Not due ( open item) --
all the amount with (posting date <= v_date and due date>= v_date and clearing date = #) there is no clearing date in document , this means that the document is still open.
CKF Not due = RKF's Not due ( Cleared item) + RKF's Not due ( Open item)
RKF's due ( Cleared item) --
all the amount with (posting date <= v_date and due date < v_date and clearing date > v_date)
RKF's due ( open item) --
all the amount with (posting date <= v_date and due date < v_date and clearing date = #) there is no clearing date in document , this means that the document is still open.
CKF due = RKF's due ( Cleared item) + RKF's due ( Open item)
In case you are not using input variable for date but the system date then replace v_date in the above KF with the variable providing the system date.
hope this helps.
Arvind.
Edited by: Arvind Tekra on May 11, 2011 12:50 PM

The creditors report is not matching with the G/L account

Hi Gurus,
The creditors report is not matching with the G/L account ,where i can go and find out the differences ?
Please give me advice,
I will assign points
Thanks&Regards,
Kumar

Hi Kumar,
There could be three reasons.
1. You may have more than one recon accounts for different vendor groups. So, you need to select all the GL accounts when reconcile with Vendor balances.
2. You may have some special GL transactions, which may post to different reconciliation accounts. Please check Special GL transactions (Down payments so on)
3. Your vendor recon accounts may be changed after some postings. Please check. If changed, you need to select these GLs also for reconciliation with vendor balances.
Hope this will help you. If not clear please reply, I will explain you.
Pl. assign points if useful.
Thanks

Report - Day wise /Week wise

Hi Experts,
I have 2 reports for which the data is fetched from 1 DSO.
I have CREATED DATE and DESPATCHED DATE in that.
I want to view both the reports Day Wise / Week Wise.
In the DSO i have mapped the Created Date to the CalDay and CalWeek/Year. Which will be used in the report 1
And I want to do the same mapping for the Despatched Date too. In order see the Day/Week trend in the report 2.
Since there is only one CalDay and CalWeek/Year objects available in the DSO im not able to bring the trend for despatched date.
Can anyone give solution to fx this issue please.
Thanks
Edited by: MO AHMED on Jan 7, 2010 4:30 PM

There are different solutions to this topic. The easiest is described by Roy:
Create two InfoObjects DESP_DAY and DESP_WK, copy them from 0CALDAY and 0CALWEEK and populate them from DESPATCHED_DATE in the transformation. I think you might need a routine for DESP_WK, simply use the function module DATE_GET_WEEK there.
If this doesn't work for you, e.g. if the DSO is used in a Multi Provider you might add an additional InfoObject DATE_TYPE to the DSO key. This is CHAR 1 and filled with either C for created date or D for dispatched date. Then you use two different field groups in the transformation to create two lines, one where 0CALDAY and 0CALWEEK are filled from CREATED_DATE with DATE_TYPE C and one where they are filled from DESPATCHED_DATE with date type D.
Best regards
Dirk

Accounts Receivable Report: Customer Wise Ageing Analysis report -FI module

Hi Gurus,
             Can anyone help me in providing standard report(source code) or already done sample report(source code) for Accounts Receivable Report: Customer Wise Ageing AnalysisThis is in FI Module. Though it is FI Module we need to fetch details related to Sales Module, and the days should be <0     30     60     90     120     180     365     >365
It is urgent I need to deliver this report by this week end.
Please help me . Waiting for your reply.
Points Rewarded for help rendered and I would personally send a good gift if you can help me
Yours Truly,
Rajiv Christopher.
Edited by: Rajiv Christopher on Apr 2, 2008 11:33 AM

Hi,
i am attaching aging report.
see if this is useful to you.
REPORT ZFUS0102 MESSAGE-ID OA
                LINE-SIZE 270.
Title:      GR/IR AGING REPORT
Date:       January 2001
TABLES: DISVARIANT, EKPO.
TYPE-POOLS: SLIS.
Tables
TABLES:
BSIS,
EKKO.
working table
DATA: BEGIN OF RTAB OCCURS 0,
         HKONT   LIKE BSIS-HKONT,
         ZUONR   LIKE BSIS-ZUONR,
         BUDAT   LIKE BSIS-BUDAT,
         SHKZG   LIKE BSIS-SHKZG,
         DMBTR   LIKE BSIS-DMBTR,
         PRCTR   LIKE BSIS-PRCTR,
      END OF RTAB.
DATA: BEGIN OF WTAB OCCURS 0,
         ZUONR(2) TYPE N,
         PRCTR   LIKE BSIS-PRCTR,
         DAYS(4) TYPE P,
         DMBTR   LIKE BSIS-DMBTR,
      END OF WTAB.
DATA: BEGIN OF PTAB OCCURS 0,
         ZUONR(2),
         PRCTR   LIKE BSIS-PRCTR,
         AMT30   LIKE BSIS-WRBTR,
         AMT60   LIKE BSIS-WRBTR,
         AMTPL   LIKE BSIS-WRBTR,
         TOTAL   LIKE BSIS-WRBTR,
      END OF PTAB.
PARAMETERS: COMPANY LIKE BSIS-BUKRS OBLIGATORY,
             ACCT    LIKE BSIS-HKONT OBLIGATORY,
             DATE    LIKE SY-DATUM OBLIGATORY.
SELECT-OPTIONS: S_EKORG FOR EKKO-EKORG.
PARAMETERS: P_VARI LIKE DISVARIANT-REPORT.
DATA: WS-AMT30 LIKE BSIS-WRBTR.
DATA: WS-AMT60 LIKE BSIS-WRBTR.
DATA: WS-AMTPL LIKE BSIS-WRBTR.
DATA: TITLE(21) VALUE 'GR/IR Aging Report'.
DATA: LIN TYPE I.
DATA: GX_VARIANT LIKE DISVARIANT,
      G_VARIANT LIKE DISVARIANT.
DATA: LAYOUT   TYPE SLIS_LAYOUT_ALV,
       L_F      TYPE SLIS_T_FIELDCAT_ALV   WITH HEADER LINE,
       GROUP    TYPE SLIS_T_SP_GROUP_ALV   WITH HEADER LINE,
       COLOR    TYPE SLIS_T_SPECIALCOL_ALV WITH HEADER LINE.
DATA: LT_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER,
       LS_LINE TYPE SLIS_LISTHEADER,
       T_EVENTS   TYPE SLIS_T_EVENT.
CONSTANTS: FORMNAME_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE'.
INITIALIZATION.
PERFORM EVENTTAB_AUFBAUEN USING T_EVENTS[].
PERFORM VARIANT_INIT.
Get default variant
GX_VARIANT = G_VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET'
       EXPORTING
            I_SAVE     = 'A'
       CHANGING
            CS_VARIANT = GX_VARIANT
       EXCEPTIONS
            NOT_FOUND = 2.
IF SY-SUBRC = 0.
    P_VARI = GX_VARIANT-VARIANT.
ENDIF.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_VARI.
PERFORM VARIANT_INPUTHELP_F14.
START-OF-SELECTION.
LS_LINE-TYP = 'S'.
WRITE SY-DATUM TO LS_LINE-INFO DD/MM/YY.
WRITE SY-UZEIT TO LS_LINE-INFO+10.
WRITE SY-UNAME TO LS_LINE-INFO+20.
WRITE TITLE    TO LS_LINE-INFO+30.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
PERFORM FIELDS.
IF NOT P_VARI IS INITIAL.
    PERFORM PAI_OF_SELECTION_SCREEN.
ELSE.
    CALL FUNCTION 'REUSE_ALV_VARIANT_SELECT'
         EXPORTING
              I_DIALOG            = ' '
              I_USER_SPECIFIC     = 'A'
              I_DEFAULT           = ' '
        I_TABNAME_HEADER    =
        I_TABNAME_ITEM      =
              IT_DEFAULT_FIELDCAT = L_F[]
              I_LAYOUT            = LAYOUT
         IMPORTING
        E_EXIT              =
              ET_FIELDCAT         = L_F[]
        ET_SORT             =
        ET_FILTER           =
         CHANGING
              CS_VARIANT          = DISVARIANT
         EXCEPTIONS
              WRONG_INPUT         = 1
              FC_NOT_COMPLETE     = 2
              NOT_FOUND           = 3
              PROGRAM_ERROR       = 4
              OTHERS              = 5.
ENDIF.
Decide which tables to access.
PERFORM MAIN_SELECT.
MOVE TITLE TO LAYOUT-WINDOW_TITLEBAR.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
       EXPORTING
            I_CALLBACK_PROGRAM      = 'ZFUS0102'
            I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
            IS_LAYOUT               = LAYOUT
            IT_FIELDCAT             = L_F[]
            IT_SPECIAL_GROUPS       = GROUP[]
            I_SAVE                  = 'A'
            IS_VARIANT              = G_VARIANT
            IT_EVENTS               = T_EVENTS
       TABLES
            T_OUTTAB                = PTAB
       EXCEPTIONS
            PROGRAM_ERROR           = 1
            OTHERS                  = 2.
      FORM FIELDS                                                   *
FORM FIELDS.
L_F-FIELDNAME     = 'ZUONR'.
L_F-OUTPUTLEN     = 6.
L_F-SELTEXT_L     = 'SERIES'.
L_F-REPTEXT_DDIC = 'SERIES'.
L_F-REF_TABNAME   = 'PTAB'.
L_F-SP_GROUP      = 'A'.
APPEND L_F. CLEAR L_F.
L_F-FIELDNAME     = 'PRCTR'.
L_F-OUTPUTLEN     = 10.
L_F-SELTEXT_L     = 'PROFIT CTR.'.
L_F-REPTEXT_DDIC = 'PROFIT CTR.'.
L_F-REF_TABNAME   = 'PTAB'.
L_F-SP_GROUP      = 'A'.
APPEND L_F. CLEAR L_F.
L_F-FIELDNAME     = 'AMT30'.
L_F-SELTEXT_L     = '30 DAYS'.
L_F-REPTEXT_DDIC = '30 DAYS'.
L_F-REF_TABNAME   = 'PTAB'.
L_F-SP_GROUP      = 'A'.
L_F-REF_TABNAME   = 'BSIS'.
L_F-REF_FIELDNAME = 'WRBTR'.
L_F-DO_SUM        = 'X'.
APPEND L_F. CLEAR L_F.
L_F-FIELDNAME     = 'AMT60'.
L_F-SELTEXT_L     = '60 DAYS'.
L_F-REPTEXT_DDIC = '60 DAYS'.
L_F-REF_TABNAME   = 'PTAB'.
L_F-SP_GROUP      = 'A'.
L_F-REF_TABNAME   = 'BSIS'.
L_F-REF_FIELDNAME = 'WRBTR'.
L_F-DO_SUM        = 'X'.
APPEND L_F. CLEAR L_F.
L_F-FIELDNAME     = 'AMTPL'.
L_F-SELTEXT_L     = '60+ DAYS'.
L_F-REPTEXT_DDIC = '60+ DAYS'.
L_F-REF_TABNAME   = 'PTAB'.
L_F-SP_GROUP      = 'A'.
L_F-REF_TABNAME   = 'BSIS'.
L_F-REF_FIELDNAME = 'WRBTR'.
L_F-DO_SUM        = 'X'.
APPEND L_F. CLEAR L_F.
L_F-FIELDNAME     = 'TOTAL'.
L_F-SELTEXT_L     = 'TOTAL'.
L_F-REPTEXT_DDIC = 'TOTAL'.
L_F-REF_TABNAME   = 'PTAB'.
L_F-SP_GROUP      = 'A'.
L_F-REF_TABNAME   = 'BSIS'.
L_F-REF_FIELDNAME = 'WRBTR'.
L_F-DO_SUM        = 'X'.
APPEND L_F. CLEAR L_F.
ENDFORM.
      FORM MAIN_SELECT                                              *
FORM MAIN_SELECT.
SELECT HKONT ZUONR BUDAT SHKZG DMBTR PRCTR
       INTO TABLE RTAB
       FROM BSIS
       WHERE BUKRS = COMPANY
       AND   HKONT = ACCT.
IF SY-SUBRC = 0.
    SORT RTAB.
    PERFORM PROCESS_RTAB.
    PERFORM PROCESS_WTAB.
ENDIF.
ENDFORM.                    " MAIN SELECT
      FORM VARIANT_INPUTHELP_F14                                    *
FORM VARIANT_INPUTHELP_F14.
DATA: G_EXIT(1) TYPE C.
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
       EXPORTING
            IS_VARIANT          = G_VARIANT
            I_SAVE              = 'A' " g_save
          it_default_fieldcat =
       IMPORTING
            E_EXIT              = G_EXIT
            ES_VARIANT          = GX_VARIANT
       EXCEPTIONS
            NOT_FOUND = 2.
IF SY-SUBRC = 2.
    MESSAGE ID SY-MSGID TYPE 'S'      NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ELSE.
    IF G_EXIT = SPACE.
      P_VARI = GX_VARIANT-VARIANT.
    ENDIF.
ENDIF.
ENDFORM.
      FORM USER_COMMAND                                             *
--> UCOMM                                                         *
--> SELFIELD                                                      *
FORM USER_COMMAND USING UCOMM LIKE SY-UCOMM SELFIELD TYPE
SLIS_SELFIELD.
IF UCOMM EQ '&IC1'.
    IF SELFIELD-TABINDEX <= 0.
      MESSAGE S108.
      EXIT.
    ENDIF.
IF SELFIELD-SEL_TAB_FIELD CS 'LIFNR'.
    SET PARAMETER ID 'LIF' FIELD SELFIELD-VALUE.
    CALL TRANSACTION 'XK02'.
ELSE.
    IF SELFIELD-SEL_TAB_FIELD CS 'VEND'.
      SET PARAMETER ID 'LIF' FIELD SELFIELD-VALUE.
      CALL TRANSACTION 'FBL1'.
    ENDIF.
ENDIF.
    CLEAR SY-UCOMM. CLEAR UCOMM.
ENDIF.
ENDFORM.
      FORM TOP_OF_PAGE                                              *
FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
       EXPORTING
            IT_LIST_COMMENTARY = LT_TOP_OF_PAGE.
ENDFORM.
      FORM EVENTTAB_AUFBAUEN                                        *
--> P_T_EVENTS                                                    *
FORM EVENTTAB_AUFBAUEN USING P_T_EVENTS TYPE SLIS_T_EVENT.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
       EXPORTING
            I_LIST_TYPE = 0
       IMPORTING
            ET_EVENTS   = P_T_EVENTS.
READ TABLE P_T_EVENTS WITH KEY NAME = SLIS_EV_TOP_OF_PAGE
                                                 INTO LS_EVENT.
IF SY-SUBRC = 0.
    MOVE FORMNAME_TOP_OF_PAGE TO LS_EVENT-FORM.
    APPEND LS_EVENT TO P_T_EVENTS.
ENDIF.
ENDFORM.                               " EVENTTAB_AUFBAUEN
      FORM PAI_OF_SELECTION_SCREEN                                  *
FORM PAI_OF_SELECTION_SCREEN.
IF NOT P_VARI IS INITIAL.
    MOVE G_VARIANT TO GX_VARIANT.
    MOVE P_VARI TO GX_VARIANT-VARIANT.
    CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE'
         EXPORTING
              I_SAVE     = 'A' " g_save
         CHANGING
              CS_VARIANT = GX_VARIANT.
    G_VARIANT = GX_VARIANT.
ELSE.
    PERFORM VARIANT_INIT.
ENDIF.
ENDFORM.                               " PAI_OF_SELECTION_SCREEN
      FORM VARIANT_INIT                                             *
FORM VARIANT_INIT.
CLEAR G_VARIANT.
G_VARIANT-REPORT = 'ZFUS0102'.
ENDFORM.                               " VARIANT_INIT
*&      Form PROCESS_RTAB
      text
--> p1        text
<-- p2        text
FORM PROCESS_RTAB.
DATA TLNS TYPE I.
DESCRIBE TABLE S_EKORG LINES TLNS.
LOOP AT RTAB.
    IF TLNS GT 0.
      SELECT SINGLE EKORG FROM EKKO INTO EKKO-EKORG
        WHERE EBELN = RTAB-ZUONR(10).
      CHECK EKKO-EKORG IN S_EKORG.
    ENDIF.
    IF NOT RTAB-BUDAT > DATE.
      MOVE RTAB-ZUONR(2) TO WTAB-ZUONR.
      COMPUTE WTAB-DAYS = DATE - RTAB-BUDAT.
      IF RTAB-SHKZG = 'H'.
        WTAB-DMBTR = RTAB-DMBTR * -1.
      ELSE.
        WTAB-DMBTR = RTAB-DMBTR * 1.
      ENDIF.
      MOVE RTAB-PRCTR TO WTAB-PRCTR.
      APPEND WTAB.
    ENDIF.
ENDLOOP.
FREE RTAB.
ENDFORM.                    " PROCESS_RTAB
*&      Form PROCESS_WTAB
      text
--> p1        text
<-- p2        text
FORM PROCESS_WTAB.
SORT WTAB BY ZUONR PRCTR DAYS.
LOOP AT WTAB.
    PTAB-ZUONR = WTAB-ZUONR.
    PTAB-PRCTR = WTAB-PRCTR.
    AT END OF DAYS.
      SUM.
      IF WTAB-DAYS > 60.
        WS-AMTPL = WS-AMTPL + WTAB-DMBTR.
      ELSE.
        IF WTAB-DAYS > 30.
          WS-AMT60 = WS-AMT60 + WTAB-DMBTR.
        ELSE.
          WS-AMT30 = WS-AMT30 + WTAB-DMBTR.
        ENDIF.
      ENDIF.
    ENDAT.
    AT END OF PRCTR.
      PTAB-AMTPL = WS-AMTPL.
      PTAB-AMT30 = WS-AMT30.
      PTAB-AMT60 = WS-AMT60.
      COMPUTE PTAB-TOTAL = PTAB-AMTPL + PTAB-AMT30 + PTAB-AMT60.
      APPEND PTAB.
      WS-AMTPL = 0.
      WS-AMT30 = 0.
      WS-AMT60 = 0.
    ENDAT.
ENDLOOP.
SORT PTAB BY ZUONR PRCTR.
ENDFORM.                    " PROCESS_WTAB
regards,
Sindhu

Creditors report site wise

Similar Messages

Maybe you are looking for