Reports for MIR7 & MIRO..?urgent

Hi
Can anybody guide me ..i need a Transaction code to get a report for below details
1. list of docu to get Pending for Parking invoice - MIR7 (Goods Receipt done,pending for MIR7).
2.list of docuto get Pending for MIRO, Parking MIR7 done..
thanks
sap-mm

1. list of docu to get Pending for Parking invoice - MIR7 (Goods Receipt done,pending for MIR7).
Go MB5S
2.list of docuto get Pending for MIRO, Parking MIR7 done..
Go MIR6

Similar Messages

Report for Pending MIRO

Hi,
I am creating a Infoset Query for Pending MIRO report means PO + Vender whose GR has done but not MIRO.
i use EKKO and EKBE.....
Can any other table should me used.......Please suggest !
REgards,
Pardeep Malik

Hi,
1.Goto MB5S.Execute the report.
2.Then select current display variant, a screen will be dispalyed in this select position.It will show the column cotent
3.Select the input u require and transfer them to the left side byclicking the < .U fields will be transferred.
4.Then click on copy
5.Then go to settings at the top,then sElect layout then save.
6.Give the layuot name & save, & come out of the screen.
7.Now again goto MB5S ,in the bottom select ur lay out and execute u will get the report based on the layout created by use.
Date range not possible.
murugan

ALV report for individual fields (urgent...........)

Hi all,
using this ZUS_SDN_THREE_ALV_GRIDS program structure i have generated the all the fields from table.
could you please guide me how to generate the ALV report for splecific fileds from individual tables.
if i click in click on grid1 (that is sales header details) we need populate the item details in grid2 and paralally customer details in grid3.
please guide me how to resolve the issuee..
thanks in advance
Srinivas...

Hi,
I have done an example, like on 1st grid it displays header data (EKKO) and when you double click on any record, for that PO you will get item details (EKPO) on 2nd grid,
In the similar way, you can add one more grid and populate it with your own data simultaneously along with 2nd grid.
*& Report ZOOABAP1_SOW
report zabap2.
*                     TABLES
tables:ekko.
*                     DATA DECLARATIONS
data: grid1 type ref to cl_gui_alv_grid,
      grid2 type ref to cl_gui_alv_grid,
      container1 type ref to cl_gui_custom_container,
      container2 type ref to cl_gui_custom_container,
      flag.
*                     INTERNAL TABLES
data: it_ekko type table of ekko.
data: wa_ekko like line of it_ekko.
data: it_ekpo type table of ekpo.
data: it_fcat1 type lvc_t_fcat,
      wa_fcat1 type lvc_s_fcat,
      it_fcat2 type lvc_t_fcat,
      wa_fcat2 type lvc_s_fcat,
      wa_layout1 type lvc_s_layo,
      wa_layout2 type lvc_s_layo,
      wa_variant type disvariant.
*                     SELECTION-SCREEN
selection-screen begin of block b with frame title text-s01.
select-options: s_ebeln for ekko-ebeln.
selection-screen end of block b.
*       CLASS lcl1 DEFINITION
class lcl1 definition.
public section.
    methods:
      handler_dbl_clk for event double_click
                                  of cl_gui_alv_grid
                                     importing e_row.
endclass.                    "lcl1 DEFINITION
*       CLASS lcl1 IMPLEMENTATION
class lcl1 implementation.
method handler_dbl_clk.
    read table it_ekko into wa_ekko index e_row-index.
    if sy-subrc = 0.
      perform get_ekpo.
    endif.
endmethod.                    "handler_dbl_clk
endclass.                    "lcl1 IMPLEMENTATION
*                     START_OF_SELECTION
start-of-selection.
* Get PO header data
perform get_ekko.
* screen for container
call screen 100.
*&      Module STATUS_0100 OUTPUT
*       text
module status_0100 output.
set pf-status 'PFS'.
set titlebar 'TIT'.
data: obj type ref to lcl1.
if flag is initial.
    create object container1
      exporting
        container_name = 'CONT1'.
    create object container2
      exporting
        container_name = 'CONT2'.
    create object grid1
      exporting
        i_parent = container1.
    create object grid2
      exporting
        i_parent = container2.
    create object obj.
    set handler obj->handler_dbl_clk for grid1.
    perform build_fcat.
    perform build_layout.
    call method grid1->set_table_for_first_display
       exporting
*        i_buffer_active               =
*        i_bypassing_buffer            =
*        i_consistency_check           =
*          i_structure_name              = 'EKKO'
*        is_variant                    = wa_variant
        i_save                        = 'X'
*        i_default                     = 'X'
        is_layout                     = wa_layout1
*        is_print                      =
*        it_special_groups             =
*        it_toolbar_excluding          =
*        it_hyperlink                  =
*        it_alv_graphics               =
*        it_except_qinfo               =
*        ir_salv_adapter               =
          changing
            it_outtab                     = it_ekko
            it_fieldcatalog               = it_fcat1
*        it_sort                       =
*        it_filter                     =
*      EXCEPTIONS
*        invalid_parameter_combination = 1
*        program_error                 = 2
*        too_many_lines                = 3
*        others                        = 4
    if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    endif.
    flag = 'X'.
endif.
endmodule.                 " STATUS_0100 OUTPUT
*&      Form get_ekko
*       text
* --> p1        text
* <-- p2        text
form get_ekko .
select ebeln bsart lifnr
         from ekko
         into corresponding fields of table it_ekko
         where ebeln in s_ebeln.
endform.                    " get_ekko
*&      Form GET_EKPO
*       text
* --> p1        text
* <-- p2        text
form get_ekpo .
select ebeln ebelp menge meins peinh from ekpo
   into corresponding fields of table it_ekpo
   where ebeln = wa_ekko-ebeln.
if not it_ekpo[] is initial.
    call method grid2->set_table_for_first_display
exporting
*    i_buffer_active               =
*    i_bypassing_buffer            =
*    i_consistency_check           =
*    i_structure_name              =
*    is_variant                    =
*    i_save                        =
*    i_default                     = 'X'
    is_layout                     = wa_layout2
*    is_print                      =
*    it_special_groups             =
*    it_toolbar_excluding          =
*    it_hyperlink                  =
*    it_alv_graphics               =
*    it_except_qinfo               =
*    ir_salv_adapter               =
      changing
        it_outtab                     = it_ekpo
        it_fieldcatalog               = it_fcat2
*    it_sort                       =
*    it_filter                     =
* EXCEPTIONS
*    invalid_parameter_combination = 1
*    program_error                 = 2
*    too_many_lines                = 3
*    others                        = 4
    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.
endform.                    " GET_EKPO
*&      Module USER_COMMAND_0100 INPUT
*       text
module user_command_0100 input.
case sy-ucomm.
    when 'BACK' or 'EXIT' or 'CANC'.
      call method container1->free.
      call method container2->free.
      leave to screen 0.
endcase.
endmodule.                 " USER_COMMAND_0100 INPUT
*&      Form build_fcat
*       text
* --> p1        text
* <-- p2        text
form build_fcat .
* fieldcatalog for EKKO table
wa_fcat1-col_pos = '1'.
wa_fcat1-fieldname = 'EBELN'.
wa_fcat1-tabname = 'EKKO'.
wa_fcat1-coltext = 'PO No.'.
append wa_fcat1 to it_fcat1.
clear wa_fcat1.
wa_fcat1-col_pos = '2'.
wa_fcat1-fieldname = 'BSART'.
wa_fcat1-tabname = 'EKKO'.
wa_fcat1-coltext = 'PO Type'.
append wa_fcat1 to it_fcat1.
clear wa_fcat1.
wa_fcat1-col_pos = '3'.
wa_fcat1-fieldname = 'LIFNR'.
wa_fcat1-tabname = 'EKKO'.
wa_fcat1-coltext = 'Vendor No.'.
append wa_fcat1 to it_fcat1.
clear wa_fcat1.
* fieldcatalog for EKPO table
wa_fcat2-col_pos = '1'.
wa_fcat2-fieldname = 'EBELN'.
wa_fcat2-tabname = 'EKPO'.
wa_fcat2-coltext = 'PO No.'.
append wa_fcat2 to it_fcat2.
clear wa_fcat2.
wa_fcat2-col_pos = '2'.
wa_fcat2-fieldname = 'EBELP'.
wa_fcat2-tabname = 'EKPO'.
wa_fcat2-coltext = 'PO Item'.
append wa_fcat2 to it_fcat2.
clear wa_fcat2.
wa_fcat2-col_pos = '3'.
wa_fcat2-fieldname = 'MENGE'.
wa_fcat2-tabname = 'EKPO'.
wa_fcat2-coltext = 'Quantity'.
append wa_fcat2 to it_fcat2.
clear wa_fcat2.
wa_fcat2-col_pos = '4'.
wa_fcat2-fieldname = 'MEINS'.
wa_fcat2-tabname = 'EKPO'.
wa_fcat2-coltext = 'UOM'.
append wa_fcat2 to it_fcat2.
clear wa_fcat2.
wa_fcat2-col_pos = '5'.
wa_fcat2-fieldname = 'PEINH'.
wa_fcat2-tabname = 'EKPO'.
wa_fcat2-coltext = 'Price Unit'.
append wa_fcat2 to it_fcat2.
clear wa_fcat2.
endform.                    " build_fcat
*&      Form build_layout
*       text
* --> p1        text
* <-- p2        text
form build_layout .
clear wa_layout1.
wa_layout1-grid_title = 'Header data'.
* wa_layout-sel_mode = 'A'.             "allow to select multiple lines
clear wa_layout2.
wa_layout2-grid_title = 'Item Data'.
endform.                    " build_layout
If you have any poblems while doing this, post it.
Do reward points for all helpful answers
Regards,
Sowjanya

Report for net purchases-Urgent

Hi,
Could u plz let me know report which gives me net purchases(after returns) for particular plant and duration.

HI
RM06EBWA Report for Analysis of Purchase Order Values
RM06EESF Analysis of Exported Purchase Orders
Check these it may help you.
Reward if useful
Thanks n Best Regards,
Kiran

Plan v/s actual materail consumption report for production order - urgent

Dear all Hi,
Is there any report or T code from which i can get the plan v/s actual material consumption for a production order or wbs element after completion of order, please suggest / help, the requirement is very urgent.
thanks in advance

Hi shaiz,
You can get that in COOIS tcode
Select components again List
then give the plant,Order details
execute
You can find 2 fields reqmn qty(nothing but planned) & qty Withdrawn(Actual consumption) in the report
Hope this hepls
Rgds,
SVP

Enhancement for MIR7 - MIRO

Dear Friends,
I want to call an enhancement when posting a parked invoice document in tcode MIRO. I want to do some processing after the document is saved in the database. This invoice document will be initially parked using tcode MIR7. I tried with various BADI's like INVOICE_UPDATE, FDCB_SUBBAS04 etc. I also tried user exits and BTE(Event -1050) but nothing seems to be working.
If I directly post the invoice from tcode MIRO all the exits and BADI's are called, but when the document originates from MIR7(Parked) and then posted from tcode MIRO, then nothing is called.Even I tried the implicit enhancement in program SAPLMR1M, but this is called only when the invoice is posted from MIRO. Please help me if you have any ides.
Rgds
Sapient

Hi,
i´ve done a test in my system and after parking the document with MIR7 if i try to post the document with MIRO the flow of the program goes through badi INVOICE_UPDATE (e.g. method CHANGE_AT_SAVE).
In badi INVOICE_UPDATE the value of sy-tcode is MIR4.
Best regards.
Edited by: Pablo Casamayor on Jun 29, 2011 12:05 PM

V V URGENT Report for Vendor Aging

Hi ABAP Gurus,
I have to develop a report for VENDOR AGING. My requirement is i have to post an invoice. From Payment terms i have to get Dependent on posting date. Let us assume if payment term is 100 by adding posting date + payment term (100) i have to get due date. I'am giving I/P terms as Company code & Period. If i enter company code i have to get O/P as vendor name(lfa1-name1),vendor no(bsik-lifnr),bill no(bsik-xblnr),bill date(bsik-bldat) i.e., baseline date,amount(bsik-dmbtr) and duedate (this i have to pick from payment terms). For period i have to get O/P as 1st week bucket,2nd week bucket,3rd week bucket,4th week bucket and beyond. For this you have to take the difference b/n due date and that buckets based on this result you have to put that amount of rupees whether it is going to pay in 1st week r 2nd r 3rd r 4th or beyond this. If that due date is less than or equal to 1st week it has to come and fall in 1st week. THIS IS MY REQUIREMENT.
For this i'am using tables BSIK,LFA1.
Can any body send me the code on this. For this my delivery date is on monday.
Please help me on this it's very Urgent...
I will REWARD you the points definitely for those who help me on this.
my mail id : [email protected]
waiting for your VALUABLE REPLIES. Please intimate me if you send it to my mail.
Thanks and Regards,
Sundeep.

Hi
See the report code and modify as per your requirements
REPORT zfi_vendor_ageing
        NO STANDARD PAGE HEADING
        LINE-COUNT 58
       line-size 168
        MESSAGE-ID zh_msg.
       D A T A B A S E T A B L E S   D E C L A R A T I O N
TABLES: lfa1,           " Vendor Master (General)
        t001,           " Company Codes
        rfpdo.
     I N T E R N A L T A B L E S D E C L A R A T I O N S           *
Internal Table for Vendor Open Items Data
DATA: BEGIN OF int_bsik OCCURS 0,
        lifnr   LIKE bsik-lifnr,         " Vendor Number
        name1   LIKE lfa1-name1,         " Vendor Name
        shkzg   LIKE bsik-shkzg,         " Dr/Cr Indicator
        belnr   LIKE bsik-belnr,         " Document Number
        xblnr   LIKE bsik-xblnr,         " Ref Doc No
        blart   LIKE bsik-blart,         " Document Type
        zfbdt   LIKE bsik-zfbdt,         " Base Line Date
        zbd1t   LIKE bsik-zbd1t,         " Due date1
        zbd2t   LIKE bsik-zbd2t,         " Due Date2
        zbd3t   LIKE bsik-zbd3t,         " Due Date3
        waers   LIKE bsik-waers,         " Currency
        dmbtr   LIKE bsik-dmbtr,         " Amount in Local Curr
      END OF int_bsik.
Internal Table for Amounts Sum Up Data
DATA: BEGIN OF int_final OCCURS 0,
        lifnr   LIKE bsik-lifnr,         " Vendor Number
        name1   LIKE lfa1-name1,         " Vendor Name
        total1 LIKE bsik-dmbtr,         " Amount in Local Curr
        total2 LIKE bsik-dmbtr,         " Amount in Local Curr
        total3 LIKE bsik-dmbtr,         " Amount in Local Curr
        total4 LIKE bsik-dmbtr,         " Amount in Local Curr
        total5 LIKE bsik-dmbtr,         " Amount in Local Curr
        total6 LIKE bsik-dmbtr,         " Amount in Local Curr
        total   LIKE bsik-dmbtr,         " Amount in Local Curr
      END OF int_final.
           D A T A D E C L A R A T I O N S
DATA : v_flag,                          " Flag
       v_gtotal1     LIKE bsik-dmbtr,   " Amount Totals
       v_gtotal2     LIKE bsik-dmbtr,   " Amount Totals
       v_gtotal3     LIKE bsik-dmbtr,   " Amount Totals
       v_gtotal4     LIKE bsik-dmbtr,   " Amount Totals
       v_gtotal5     LIKE bsik-dmbtr,   " Amount Totals
       v_gtotal6     LIKE bsik-dmbtr,   " Amount Totals
       v_gtotal      LIKE bsik-dmbtr,   " Amount Totals
       v_subtotal1   LIKE bsik-dmbtr,   " Amount Totals
       v_subtotal2   LIKE bsik-dmbtr,   " Amount Totals
       v_subtotal3   LIKE bsik-dmbtr,   " Amount Totals
       v_subtotal4   LIKE bsik-dmbtr,   " Amount Totals
       v_subtotal5   LIKE bsik-dmbtr,   " Amount Totals
       v_subtotal6   LIKE bsik-dmbtr,   " Amount Totals
       v_subtotal    LIKE bsik-dmbtr,   " Amount Totals
       v_date        LIKE bsik-zfbdt,   " Due Date
       v_tage1(4),                      " Age 30 days
       v_tage2(4),                      " Age 60 days
       v_tage3(4),                      " Age 90 days
       v_fir(15),                       " Column Text1
       v_sec(15),                       " Column Text2
       v_thir(15),                      " Column Text3
       v_four(17),                      " Column Text4
       v_fidd(4),                       " Days field1
       v_sedd(4),                       " Days field2
       v_thdd(4),                       " Days field3
       v_fodd(4),                       " Days field4
       v_str TYPE SY-LISEL,           " String
       v_str1(11),                      " String
       v_tage(3),                       " String
       v_date1(10).                     " Date field
     R A N G E   D E C L A R A T I O N S
RANGES: r_date1 FOR bsik-zfbdt,      " Date Range 1
        r_date2 FOR bsik-zfbdt,      " Date Range 2
        r_date3 FOR bsik-zfbdt,      " Date Range 3
        r_date4 FOR bsik-zfbdt.      " Date Range 4
         S E L E C T I O N S C R E E N                      *
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: s_lifnr FOR lfa1-lifnr. "Vendor account
PARAMETERS:     p_bukrs LIKE t001-bukrs. "Co. Code
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
PARAMETERS:   p_allgst LIKE rfpdo-allgstid OBLIGATORY DEFAULT sy-datum.
"Open items at key date
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-003.
PARAMETERS: p_tage1 LIKE rfpdo1-allgfael DEFAULT '30',
            p_tage2 LIKE rfpdo1-allgfael DEFAULT '60',
            p_tage3 LIKE rfpdo1-allgfael DEFAULT '90',
            p_tage4 LIKE rfpdo1-allgfael DEFAULT '120'.
SELECTION-SCREEN END OF BLOCK b3.
              A T S E L E C T I O N S C R E E N                   *
AT SELECTION-SCREEN.
Validate the screen fields
PERFORM validate_flds.
               S T A R T O F S E L E C T I O N                    *
START-OF-SELECTION.
Fetch main data
PERFORM fetch_data.
                       T O P O F P A G E
Header
TOP-OF-PAGE.
PERFORM header.
                       E N D O F P A G E
Footer
END-OF-PAGE.
ULINE.
   T O P O F P A G E D U R I N G L I N E S E L E C T I O N     *
Top of Page in Secondary List
TOP-OF-PAGE DURING LINE-SELECTION.
PERFORM header1.
              A T L I N E S E L E C T I O N                    *
AT LINE-SELECTION.
Perform Line Selections
PERFORM line_selection.
                 E N D O F S E L E C T I O N
END-OF-SELECTION.
List generation
PERFORM basic_list.
*&      Form validate_flds
Validation of Selection Screen fields
FORM validate_flds .
Validate Vendor Code
CLEAR lfa1-lifnr.
SELECT lifnr UP TO 1 ROWS
      INTO lfa1-lifnr
      FROM lfa1
      WHERE lifnr IN s_lifnr AND
            spras = sy-langu.
ENDSELECT.
IF sy-subrc <> 0.
    MESSAGE e000 WITH 'Invalid Vendor Code range'(023).
ENDIF.
Validate Company Code
CLEAR t001-bukrs.
SELECT bukrs UP TO 1 ROWS
      INTO t001-bukrs
      FROM t001
      WHERE bukrs = p_bukrs AND
            spras = sy-langu.
ENDSELECT.
IF sy-subrc <> 0.
    MESSAGE e021.      " Invalid Company Code range
ENDIF.
IF ( p_tage1 > p_tage2 ) OR ( p_tage1 > p_tage3 ) OR
      ( p_tage1 > p_tage4 ).
    MESSAGE e999 WITH 'Column 1 greater'(004)
                'than Column# 2 or 3 or 4'(005).
ENDIF.
*column 2
IF ( p_tage2 > p_tage3 ) OR ( p_tage1 > p_tage4 ).
    MESSAGE e999 WITH 'Column 2 greater'(006)
                'than Column# 3 or 4'(007).
ENDIF.
*column3
IF ( p_tage3 > p_tage4 ).
    MESSAGE e999 WITH 'Column 3 greater'(008)
                'than Column#4'(009).
ENDIF.
ENDFORM.                    " validate_flds
*&      Form fetch_data
Fetching Data from Database Tables
FORM fetch_data .
Date Range Population
r_date1-sign   = 'I'.
r_date1-option = 'BT'.
r_date1-low    = p_allgst.
r_date1-high    = r_date1-low + p_tage1.
APPEND r_date1.
r_date2-sign   = 'I'.
r_date2-option = 'BT'.
r_date2-low    = r_date1-high + 1.
r_date2-high    = r_date1-low + p_tage2.
APPEND r_date2.
r_date3-sign   = 'I'.
r_date3-option = 'BT'.
r_date3-low    = r_date2-high + 1.
r_date3-high    = r_date1-low + p_tage3.
APPEND r_date3.
r_date4-sign   = 'I'.
r_date4-option = 'BT'.
r_date4-low    = r_date3-high + 1.
r_date4-high    = r_date1-low + p_tage4.
APPEND r_date4.
Select the Vendor Open Items data from BSIK
SELECT l~lifnr
         l1~name1
         b~waers
         b~dmbtr
         b~zfbdt
         b~zbd1t
         b~zbd2t
         b~zbd3t
         b~belnr
         b~xblnr
         b~shkzg
         b~blart
   INTO CORRESPONDING FIELDS OF TABLE int_bsik
   FROM lfb1 AS l INNER JOIN lfa1 AS l1
                ON llifnr = l1lifnr
       INNER JOIN   bsik AS b
         ON llifnr = blifnr AND
            lbukrs = bbukrs
         WHERE l~lifnr IN s_lifnr AND
               l~bukrs = p_bukrs and
               b~zfbdt le p_allgst.
IF SY-SUBRC <> 0.
    MESSAGE i000 WITH 'No Data found'(027).
ENDIF.
Removing the date limit to get the due items in the past
DELETE int_bsik WHERE
              ( blart NE 'RE' AND blart NE 'KR' ) OR
                shkzg NE 'H'.
SORT int_bsik BY lifnr.
ENDFORM.                    " fetch_data
*&      Form header
Display the Report Columns
FORM header .
v_tage1 = p_tage1 + 1.
v_tage2 = p_tage2 + 1.
v_tage3 = p_tage3 + 1.
v_fidd = p_tage1.
v_sedd = p_tage2.
v_thdd = p_tage3.
v_fodd = p_tage4.
MOVE v_fodd0(4) TO v_fodd1(3).
v_fodd+0(1) = space.
CONCATENATE '1 to'(010) v_fidd INTO v_fir.
CONCATENATE v_tage1 ' to '(011) v_sedd INTO v_sec.
CONCATENATE v_tage2 ' to '(011) v_thdd INTO v_thir.
CONCATENATE v_tage3 ' to '(011) space v_fodd INTO v_four.
Standard header
clear: v_date1, v_str, v_str1, v_tage.
write p_allgst to v_date1.
Move p_tage4 to v_tage.
concatenate '>' v_tage text-025 into v_str1.
concatenate
'Summary of Ageing Analysis for Vendor Open Invoices as on'(013)
   v_date1 into v_str separated by space.
CALL FUNCTION 'Z_STANDARD_HEADER'
    EXPORTING
     title1 = 'Saudi International Petrochemical Company'(012)
     title2 = v_str.
FORMAT COLOR OFF.
WRITE : /1(168) sy-uline.
FORMAT COLOR 1 INTENSIFIED.
WRITE :/1 sy-vline, 13 sy-vline, 49 sy-vline,
        50(101) 'Invoices Due For(In Days)'(014) CENTERED,
       151 sy-vline, 168 sy-vline .
WRITE :/1 sy-vline, 2(11) 'Vendor#'(015) CENTERED,
         13 sy-vline ,14(35) 'Vendor Name'(016) CENTERED,
         49 sy-vline,
         50(101) sy-uline,151 sy-vline,
        152(16) 'Total'(017) CENTERED,
        168 sy-vline.
WRITE : /1 sy-vline,13 sy-vline,      49 sy-vline,
          50(16) v_fir CENTERED,        66 sy-vline,
          67(16) v_sec CENTERED,        83 sy-vline,
          84(16) v_thir CENTERED,      100 sy-vline,
         101(16) v_four CENTERED,      117 sy-vline,
         118(16) v_str1 centered,      134 sy-vline,
         135(16) 'Already Overdue'(018) CENTERED,151 sy-vline,
         168 sy-vline.
FORMAT COLOR OFF.
WRITE : /1(168) sy-uline.
ENDFORM.                    " header
*&      Form basic_list
Display the Basic List
FORM basic_list .
NEW-PAGE LINE-SIZE 168.
LOOP AT int_bsik.
    CLEAR v_date.
    IF int_bsik-zbd3t <> ' '.
      v_date = int_bsik-zfbdt + int_bsik-zbd3t.
    ELSE.
      IF int_bsik-zbd2t <> ' '.
        v_date = int_bsik-zfbdt + int_bsik-zbd2t.
      ELSE.
        v_date = int_bsik-zfbdt + int_bsik-zbd1t.
      ENDIF.
    ENDIF.
    IF int_bsik-zbd1t = ' '.
      v_date = int_bsik-zfbdt.
    ENDIF.
    IF v_date IN r_date1.
      int_final-total1 =   int_final-total1 + int_bsik-dmbtr.
    ELSEIF v_date IN r_date2.
      int_final-total2 =   int_final-total2 + int_bsik-dmbtr.
    ELSEIF v_date IN r_date3.
      int_final-total3 =   int_final-total3 + int_bsik-dmbtr.
    ELSEIF v_date IN r_date4.
      int_final-total4 =   int_final-total4 + int_bsik-dmbtr.
    ELSEif v_date > r_date4-high.
      int_final-total5 =   int_final-total5 + int_bsik-dmbtr.
    ELSEif v_date < p_allgst.
      int_final-total6 =   int_final-total6 + int_bsik-dmbtr.
    ENDIF.
    AT END OF lifnr.
      v_flag = 1.
    ENDAT.
    IF v_flag = 1.
      int_final-lifnr = int_bsik-lifnr.
      int_final-name1 = int_bsik-name1.
      int_final-total =   int_final-total1 + int_final-total2 +
       int_final-total3 + int_final-total4 + int_final-total5 +
       int_final-total6.
      APPEND int_final.
      v_gtotal1 = v_gtotal1 + int_final-total1.
      v_gtotal2 = v_gtotal2 + int_final-total2.
      v_gtotal3 = v_gtotal3 + int_final-total3.
      v_gtotal4 = v_gtotal4 + int_final-total4.
      v_gtotal5 = v_gtotal5 + int_final-total5.
      v_gtotal6 = v_gtotal6 + int_final-total6.
      v_gtotal = v_gtotal + int_final-total.
      WRITE: /1 sy-vline,
              2 int_final-lifnr COLOR 4 INTENSIFIED ON,
             13 sy-vline,
             14 int_final-name1 COLOR 4 INTENSIFIED ON,
             49 sy-vline.
      DATA : v_rem.
      v_rem = sy-tabix MOD 2.
      IF v_rem NE 0.
        FORMAT COLOR 2 INTENSIFIED.
        WRITE :    50 int_final-total1 CURRENCY int_bsik-waers,
                   66 sy-vline,
                   67 int_final-total2 CURRENCY int_bsik-waers,
                   83 sy-vline,
                   84 int_final-total3 CURRENCY int_bsik-waers,
                  100 sy-vline,
                  101 int_final-total4 CURRENCY int_bsik-waers,
                  117 sy-vline,
                  118 int_final-total5 CURRENCY int_bsik-waers,
                  134 sy-vline,
                  135 int_final-total6 CURRENCY int_bsik-waers,
                  151 sy-vline,
                  152 int_final-total CURRENCY int_bsik-waers,
                  168 sy-vline.
      ELSE.
        WRITE :    50 int_final-total1 CURRENCY int_bsik-waers,
                   66 sy-vline,
                   67 int_final-total2 CURRENCY int_bsik-waers,
                   83 sy-vline,
                   84 int_final-total3 CURRENCY int_bsik-waers,
                  100 sy-vline,
                  101 int_final-total4 CURRENCY int_bsik-waers,
                  117 sy-vline,
                  118 int_final-total5 CURRENCY int_bsik-waers,
                  134 sy-vline,
                  135 int_final-total6 CURRENCY int_bsik-waers,
                  151 sy-vline,
                  152 int_final-total CURRENCY int_bsik-waers,
                  168 sy-vline.
      ENDIF.
      FORMAT COLOR OFF.
      HIDE int_final.
      CLEAR int_final.
      v_flag = 0.
    ENDIF.
    AT LAST.
      WRITE : /1(168) sy-uline.
      FORMAT COLOR 3 INTENSIFIED.
      WRITE : /1 sy-vline, 2(47) 'GRAND TOTAL'(022) CENTERED,
              49 sy-vline, 50 v_gtotal1 CURRENCY int_bsik-waers,
              66 sy-vline, 67 v_gtotal2 CURRENCY int_bsik-waers,
              83 sy-vline, 84 v_gtotal3 CURRENCY int_bsik-waers,
             100 sy-vline,101 v_gtotal4 CURRENCY int_bsik-waers,
             117 sy-vline,118 v_gtotal5 CURRENCY int_bsik-waers,
             134 sy-vline,135 v_gtotal6 CURRENCY int_bsik-waers,
             151 sy-vline,152 v_gtotal CURRENCY int_bsik-waers,
             168 sy-vline.
      HIDE : v_gtotal1,
              v_gtotal2,
              v_gtotal3,
              v_gtotal4,
              v_gtotal5,
              v_gtotal6,
              v_gtotal.
    ENDAT.
    FORMAT COLOR OFF.
ENDLOOP.
WRITE : /1(168) sy-uline.
ENDFORM.                    " basic_list
*&      Form line_selection
When double clicked on the line display the seconday list
FORM line_selection .
NEW-PAGE LINE-SIZE 206.
Sy-lsind = 1.
DATA : v_rem,v_cnt LIKE sy-tabix.
v_cnt = 0.
SORT int_bsik BY belnr zfbdt.
LOOP AT int_bsik WHERE lifnr EQ int_final-lifnr.
    v_rem = v_cnt MOD 2.
    CLEAR v_date.
    IF int_bsik-zbd3t <> ' '.
      v_date = int_bsik-zfbdt + int_bsik-zbd3t.
    ELSE.
      IF int_bsik-zbd2t <> ' '.
        v_date = int_bsik-zfbdt + int_bsik-zbd2t.
      ELSE.
        v_date = int_bsik-zfbdt + int_bsik-zbd1t.
      ENDIF.
    ENDIF.
    IF int_bsik-zbd1t = ' '.
      v_date = int_bsik-zfbdt.
    ENDIF.
    IF v_rem NE 0.
      format color 2 intensified.
      WRITE :/1 sy-vline, 2 int_bsik-belnr,
             12 sy-vline,13 int_bsik-lifnr,
             23 sy-vline,24 int_bsik-name1,
             59 sy-vline,60 int_bsik-xblnr,
             76 sy-vline,77 int_bsik-zfbdt,
             87 sy-vline.
      WRITE : 104 sy-vline,121 sy-vline,
              138 sy-vline,155 sy-vline,
              172 sy-vline, 189 sy-vline,
              190 int_bsik-dmbtr CURRENCY int_bsik-waers,
              206 sy-vline.
      IF v_date IN r_date1.
        v_subtotal1 =   v_subtotal1 + int_bsik-dmbtr.
        WRITE : 88 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ELSEIF v_date IN r_date2.
        v_subtotal2 =   v_subtotal2 + int_bsik-dmbtr.
        WRITE : 105 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ELSEIF v_date IN r_date3.
        v_subtotal3 =   v_subtotal3 + int_bsik-dmbtr.
        WRITE : 122 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ELSEIF v_date IN r_date4.
        v_subtotal4 =   v_subtotal4 + int_bsik-dmbtr.
        WRITE : 139 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ELSEif v_date > r_date4-high.
        v_subtotal5 =   v_subtotal5 + int_bsik-dmbtr.
        WRITE : 156 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ELSEif v_date < p_allgst.
        v_subtotal6 =   v_subtotal6 + int_bsik-dmbtr.
        WRITE : 173 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ENDIF.
      format color off.
    ELSE.
      WRITE :/1 sy-vline, 2 int_bsik-belnr,
             12 sy-vline,13 int_bsik-lifnr,
             23 sy-vline,24 int_bsik-name1,
             59 sy-vline,60 int_bsik-xblnr,
             76 sy-vline,77 int_bsik-zfbdt,
             87 sy-vline.
      WRITE : 104 sy-vline,121 sy-vline,
              138 sy-vline,155 sy-vline,
              172 sy-vline,189 sy-vline,
              190 int_bsik-dmbtr CURRENCY int_bsik-waers,
              206 sy-vline.
      IF v_date IN r_date1.
        v_subtotal1 =   v_subtotal1 + int_bsik-dmbtr.
        WRITE : 88 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ELSEIF v_date IN r_date2.
        v_subtotal2 =   v_subtotal2 + int_bsik-dmbtr.
        WRITE : 105 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ELSEIF v_date IN r_date3.
        v_subtotal3 =   v_subtotal3 + int_bsik-dmbtr.
        WRITE : 122 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ELSEIF v_date IN r_date4.
        v_subtotal4 =   v_subtotal4 + int_bsik-dmbtr.
        WRITE : 139 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ELSEif v_date > r_date4-high.
        v_subtotal5 =   v_subtotal5 + int_bsik-dmbtr.
        WRITE : 156 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ELSEif v_date < p_allgst.
        v_subtotal6 =   v_subtotal6 + int_bsik-dmbtr.
        WRITE : 173 int_bsik-dmbtr CURRENCY int_bsik-waers.
      ENDIF.
    ENDIF.
    FORMAT COLOR OFF.
    v_cnt = v_cnt + 1.
ENDLOOP.
WRITE : /1(206) sy-uline.
v_subtotal = v_subtotal1 + v_subtotal2 + v_subtotal3
              + v_subtotal4 + v_subtotal5 + v_subtotal6.
FORMAT COLOR 3 INTENSIFIED.
WRITE : /1 sy-vline,
             2(85) 'Total'(017) CENTERED CURRENCY int_bsik-waers ,
             87 sy-vline,
             88 v_subtotal1 CURRENCY int_bsik-waers,
            104 sy-vline,
            105 v_subtotal2 CURRENCY int_bsik-waers,
            121 sy-vline,
            122 v_subtotal3 CURRENCY int_bsik-waers,
            138 sy-vline,
            139 v_subtotal4 CURRENCY int_bsik-waers,
            155 sy-vline,
            156 v_subtotal5 CURRENCY int_bsik-waers,
            172 sy-vline,
            173 v_subtotal6 CURRENCY int_bsik-waers,
            189 sy-vline,
            190 v_subtotal CURRENCY int_bsik-waers,
            206 sy-vline.
FORMAT COLOR OFF.
WRITE : /1(206) sy-uline.
CLEAR : v_subtotal,v_subtotal1,v_subtotal2,v_subtotal3,
          v_subtotal4,v_subtotal5,v_gtotal1,v_gtotal2,v_gtotal3,
          v_gtotal4, v_gtotal5,v_gtotal,v_subtotal6,v_gtotal6.
ENDFORM.                    " line_selection
*&      Form header1
Secondary List Header
FORM header1 .
Standard header
clear: v_date1, v_str, v_str1, v_tage.
write p_allgst to v_date1.
Move p_tage4 to v_tage.
concatenate '>' v_tage text-025 into v_str1.
concatenate
   'Details of Ageing Analysis for Vendor Open Invoices as on'(024)
    v_date1 into v_str separated by space.
CALL FUNCTION 'Z_STANDARD_HEADER'
    EXPORTING
     title1 = 'Company'(012)
     title2 = v_str.
FORMAT COLOR 1 intensified.
WRITE :/1(206) sy-uline.
WRITE :/1 sy-vline,12 sy-vline ,
          23 sy-vline,59 sy-vline,76 sy-vline,87 sy-vline,
          88(101) 'Invoices Due For(In Days)'(014) CENTERED,
         189 sy-vline,206 sy-vline.
WRITE : /1 sy-vline, 2(10) 'Doc Number'(021) CENTERED,
           12 sy-vline, 13(10) 'Vendor#'(015) CENTERED,
           23 sy-vline, 24(35) 'Vendor Name'(016) CENTERED,
           59 sy-vline, 60(16) 'Ref invoice#'(019) CENTERED,
           76 sy-vline, 77(10) 'Inv dt'(020) CENTERED,
           87 sy-vline, 88(101) sy-uline,
          189 sy-vline,190(16) 'Total'(017) CENTERED,
          206 sy-vline.
WRITE : /1 sy-vline, 12 sy-vline,
           23 sy-vline,59 sy-vline,
           76 sy-vline,87 sy-vline,
           88(16) v_fir CENTERED, 104 sy-vline,
          105(16) v_sec CENTERED, 121 sy-vline,
          122(16) v_thir CENTERED, 138 sy-vline,
          139(16) v_four CENTERED, 155 sy-vline,
          156(16) v_str1 CENTERED,
          172    sy-vline,
          173(16) 'Already Overdue'(018) CENTERED,
          189 sy-vline,
          206 sy-vline.
          format color off.
WRITE : /1(206) sy-uline.
ENDFORM.                                                    " header1
Reward points if useful
Regards
Anji

Report for MIGO done MIRO pending

All SAP Gurus,
We require the list of MIGO vs MIRO numbers, so that we can list out the MIGO for which MIRO have not been posted.
Is there any report by which we can we can list the MIGO vs MIRO numbers.
I'm aware of the fact that multiple MIRO can exist against a MIRO and vice versa.
Regards,

Check table EKBE. PO History Category 'E' for GR and 'Q' for Invoice.
Hope this will also help you in future.
Thnx
Abhi

Is there any userexit for MIR7 and   MIRO transaction?

Hai friends,
       Is there any userexit for MIR7 and MIRO transaction at the time of pressing "save as completed" or "save" button. I want to check the sales certificate and invoice verification for the document number entered in MIR7 and MIRO.
Regards,
safiq
NOTE:useful points will be rewarded.

hi,
these r the exits related to mir7.
Transaction Code - MIR7                     Park Invoice
Enhancement/ Business Add-in            Description
Enhancement
LMR1M001                                User exits in Logistics Invoice Verification
LMR1M002                                Account grouping for GR/IR account maintenance
LMR1M003                                Number assignment in Logistics Invoice Verification
LMR1M004                                Logistics Invoice Verification: item text for follow-on docs
LMR1M005                                Logistics Inv. Verification: Release Parked Doc. for Posting
LMR1M006                                Logistics Invoice Verification: Process XML Invoice
MRMH0001                                Logistics Invoice Verification: ERS procedure
MRMH0002                                Logistics Invoice Verification: EDI inbound
MRMH0003                                Logistics Invoice Verification: Revaluation/RAP
MRMN0001                                Message output and creation: Logistics Invoice Verification
Business Add-in
INVOICE_UPDATE                          Business Add-In: Logistics Invoice Verification
put a break point in each exit,like break username and test the transaction .

HR-BW report for Travel Expense report(Urgent, max. points awarded)

Hi All,
Could anyone please tell how to write a spec to create a BW report for Travel Expense report. or how can we know from which tables can the data be extracted for Personal number, name of the EE, Trip number, Trip duration, Trip begin date, Trip end date, trip destination, reason for the trip, total cost, reimbursement amount, paid by company, additional amount, total miles/Km, cost center, CoAr, Status of the trip
Its very urgent. Please Help!!!!
Regards,
Latha

Hi Latha,
PR05 is the Tcode for Travel expense Manager where the data will be posted and The table is PTRV_HEAD where the data get stored .
Regards,
Narendra Kumar Katuri.

Report for GR done MIRO pending

All SAP Gurus,
Is there any standard Report for GR done MIRO pending?
Regards,

hi,
You can check in two ways:
1. From table EKBE(Purchasing doc history)
2. from report ME2N, ME2B, ME2C ....by using the selection parameter as "RECHNUNG"...
Hope it helps..
Regards
Priyanka.P

Urgent issue REPORT FOR ALL MATERIAL BASED ON STOC TYPE

Hi
I want report for based on stock type
i want to check the stock for all mterial with stock type "quality inspction"
i want that type of material documents
is it possible to see the report
regards sesidhar

I CREATE material A...with out seleting QM view
I create one more material B.... with select QM view
both r ROH material type..
when i caeate GR for material A. with stoc type 'QYALITY INSPECTION.. for this material system does not creat quality LOT....
when i create GR for material B with stock type 'QYALITY INSPECTION.... for this material system created lot..
but are GR done by 101 movement..
but i want report for materials which are stock type QI...but does not display Material which r lot created...?
is it possible..
regards
sesidhar

Really urgent: help in making report for status of vendor payement

Hi,
I am making a report in which i have to display the status of vendor whether it is paid or not?
Till now i am able to have knowledge that when we do MIGO there are the Financial Documents form there i get the account no.. whichit is stored in the BKPF table. From there we have the account no... and after that there are 4 tables into which i have to look after the tables i.e. BSAS,BSIK,BSIS, n BSAK.
Plzz tell me how should i make a report as the Acount no.. have to move among these tables to get the status of it pament.
plzz provide me some guidelines for making a report for it as help will be deifnately rewarded.
Edited by: abaper2008 on May 21, 2008 6:52 AM

Hi,
Hi,
I making a report in which i have to display the vendor payment is done or not?
Curently i am using the 4 tables of Financial :-
BSAK,BSIS,BSIK AND BSAS which gives the status of vendor whether it is paid or not . 1 thing i observed that data compared wit htew MKPF table among these tables(BSAS,BSIK N BSAK) is not coming right as i am taking common field XBLNR among them all .
One more thing i observed that BLART is getting changed in each table.
for instance,
if the BLART is WE for material document and i am taking XBLNR filed from this table MKPF and den looking XBLNR in BKPF where the entry consist of BLART - RE n WE and finally when i look up in the BSAK table the field consist of RE .
How can i see that it is being paid or not the BLART is keep on changing.
Plzz proivde me guidelines as how to rectify the problem?
Edited by: abaper2008 on May 21, 2008 9:03 AM

How can I activate drill down report for planned line items please urgent?

Hi Everyone,
Please suggest me how can i activate drill down report for planned line items in internal orders. S_ALR_87012993. Please suggest me, I'll award full points. I am unable to do it in client system, which has already line items. I tried in my sys with new config it is working.
Kind regards
Arvey.

Hi
It is based on the reports attached in the Report Group - TCODE: GR53
In the Report Group screen
Press CONFIGURE This is to attach any Drill Down reports.
Press the Insert Line icon
As is the screen may be used to insert a Report Writer report group. To add an ABAP, press other report type
Double click on ABAP Reports
Enter the name of the ABAP and ENTER
<b>RCOPCA08 Profit Center: Plan Line Items</b>
VVR

Urgent!! Deploy reports for Developer suite 10g (Newbie)

Hi All,
I've generated few jsp report using report builder from developer suite 10g. I know in the developer suite 9i. I just copy these jsp files under \reports\j2ee\web. Then start OC4J Instance, and type in from browser as http://localhost:8888/reports/testreport.jsp?userid=username/password@dbconnection. However, it doesn't work for 10g. Is there any different in deploy report for 10g? Please help....
Thanks,
Best Regards,

Andy,
It's impossible to help us if you doesn't specify what error messages you get?
If I should take a guess, you're using the wrong port number. Did you check if it's correct before posting your message? Most Developer Suite 10g installations comes with port number 8889.
Regards,
Martin Malmstrom

Reports for MIR7 & MIRO..?urgent

Similar Messages

Maybe you are looking for