Develop a report program

How to get tcode users and its authorization,restrictions
Moderator message : Search for available information, thread locked.
Edited by: Vinod Kumar on Nov 10, 2011 11:06 AM

Hi,
are you asking for a Reporting Services Report? You can find this information in Reporting DB (2010) resp. schema dbo for reporting (2013).
Here a simple query:
SELECT PROJ.ProjectName
, ISSUE.Title AS Issue
, RISK.Title AS Risk
FROM dbo.MSP_EpmProject_UserView AS PROJ
LEFT OUTER JOIN dbo.MSP_WssIssue_OlapView AS ISSUE ON PROJ.ProjectUID = Issue.ProjectUID
LEFT OUTER JOIN dbo.MSP_WssRisk_OlapView AS RISK ON RISK.ProjectUID = PROJ.ProjectUID
Or are you looking for something different?
Regards
Barbara
To increase the value of this forum, please mark the replies that helped to solve your issue as answer. If you find answers to questions from other forum participants to be helpful, please mark them as helpful. Your participation will help others to find
an appropriate solution faster. Thanks for your support!

Similar Messages

Any FM to Delete Report Programs

I need to develop one report program which takes as input names of programs and deletes those programs. Is there some existing FM which provides this functionality.
Kindly help.
Thanks

Hi,
I remember that I had to do same thing and I spent some time finding FM for this purpose. did not find anything suitable for that. So I prepared batch input for SE38 which was really easy to develop. But I am not saying that there is function module which you can use for it. Maybe someone else knows about something. You can try to debug SE38 and check how is it done in SAP.
Cheers

SAP Query - Report program generation

Hello all,
Now I'm developing SAP queries through Tr-cd:SQ01.
As you know, every time (re)defining queries, we have to (re)generate the selection screen report programs, containing the input parameter for output format along with other input parameters.
The problems are:
1.
I CAN select other layout formats on the selection screen in one system(Dev System) when I define the output format as "SAP List Viewer" in Tr-cd:SQ01 and generate the report program (,while I CANNOT select other layout formats on another system, QA System.)
2.
When selecting other formats than "SAP List Viewer"
in Tr-cd:SQ01, so difference between these two systems, that is, I can select all formats options on the selection screen.
3.
After redefining the formats as "SAP List Viewer" on the QA System, We CANNOT select other layout formats again while I remain to be able to select all options on the DEV system.
I think the report program generation function in QA system operates normally, while there is somthing wrong with DEV system.
Do you have any idea about this phenomenon?

Hello Thomas, I appreciate your quick response and apologize for my late reply.
After recieving your sugestion I continued process of trial & error only to find that the setting to generate the report program had been changed to old one for some reason.
You can change the setting in the following way:
Tr-cd:SQ02
Settings -> Global Settings
Check (or Uncheck) the box of "Always use the old report structure."

Executing a report program in background from another program

Hi Experts,
I developed a report to display material change history based on change date range. Report is taking much time (around 15-20 mins) as I'm hitting CDPOS and CDHDR tables. User wants to execute the report in foreground because he/she can give selection criteria that is required everytime.
So, my requirment is now to create another program with same selection screen elements which will execute the original program in background. In the new program, we will be just capturing the selection elements and will pass them to original program to run in background and display a message to user without wait for the background job to complete. Original program should send an email to an fixed email id with the report output as attachment (for example excel file).
Please suggest.
Thanks in Advance,
Siva Sankar

Hi Siva,
Please see the link
http://help.sap.com/saphelp_nw04/helpdata/EN/2a/fa01dd493111d182b70000e829fbfe/content.htm
Regarding a Change Document Function Module ----- VERY VERY Urgent
When using function modules , I dont think you can directly get data based on material and plant . these function modules usualy works with object class and creation date .
Once you retrieve the data using the function modules you have to filter out the unncecessary data based on your selection screen conditions .
Regards,
Ratheesh BS
Edited by: Ratheesh Bhaskarapillai Suseeladev on Mar 8, 2012 5:19 AM
Regarding a Change Document Function Module ----- VERY VERY Urgent

How to Develope a report.

Hi,
How to develop a report on inventory and goods movements.

HI,
Use the table
1. MA07 for inventory details ; and
2. MAM_25_GOODSMOVEMENT_LIST for goods movement list
select the data as per your functional specs put into an internal table and display it in the output list.
How you display it and the selections you make in selection-screen is designed as per the tech specs.
please provide the tech specs,i will design the program for you.
regards,
pankaj

Need help in the Report Program!!!

Hi,
This is SAI KUMAR.
Selection Screen
Sales Org: VKORG
Distribution Channel: VTWEG
Division: SPART
Billing Type: FKART
Plant: WERKS
Payment Terms: ZTERM
Sold-to Party: KUNAG
Billing Date: FKDAT
Now Using the above Selection screen inputs, I want to generate the following fields in the output.
Output Screen
Invoice No: VBELN
Invoice Date: FKDAT
Customer Number: KUNNR
Customer Name: NAME1
Material Description: MAKTX
Payment Terms: ZTERM
Net Value: NETWR
Ship-to City: ORT01
Sold-to party: KUNAG
Ship-to party: KUNNR
Tables Used: 
Delivery: LIKP, LIPS
Invoice:VBRK, VBRP
Customer: KNA1
Material: MARA
Material Description: MAKT

Now the Problem what I got is....How to link between these tables...ie., what common fields can be used between these tables so that I can use FOR ALL ENTRIES and retrieve the above output fields.
Can anyone please help me out in giving a REPORT program or a pseudo code for the above data.
Thanks & Regards,
SAI KUMAR
ID: [email protected]

See the below code :
REPORT zjpvrom323 NO STANDARD PAGE HEADING LINE-SIZE 200 LINE-COUNT 35
MESSAGE-ID zjpv001 .
*& Development ID: OM_DD_323_LJP *
*& Report : ZJPVROM323 *
*& This application is used to Develop a new billing document that *
*& fulfills the NPKK Requirement That does not exist in JSP *
*& functionality.according to the delivery date it displays Monthly *
sales notes report *
*& Change Log: *
*& Init. Who Date Text *
*& MALIKDH1 Seshu Reddy 2003/07/20 Initial Development *
 Constants
CONSTANTS :c_vkorg(4) VALUE 'JP20', " Sale Organization
 c_vtweg(2) VALUE 'TR', " Distribution Channel
 c_rfbsk VALUE 'C', " Status for transfer to accounting
 c_spart(2) VALUE '01', " Division
 c_kvgr2(3) VALUE 'Z51', " Customer Group 2
 c_fkart(4) TYPE c VALUE 'ZJPW', " Billing Type
 c_waerk(5) TYPE c VALUE 'JPY', " SD document currency
 c_kschl(4) TYPE c VALUE 'ZJPC', " Condition type
 c_no_of_lines TYPE i VALUE '35',
 C_CONS_5(1) TYPE C VALUE '5',
 C_CONS_8(1) TYPE C VALUE '8',
 C_CONS_10(2) TYPE C VALUE '10',
 c_konwa(5) TYPE c VALUE 'JPY'. " Rate unit (currency or
" percentage)
 DB-Tables *
*TABLES : vbrk, " Billing : Header Data
 vbrp, " Billing : Item Data
 kna1, " Customer master : General data
 knvv, " Customer master : sales data
 likp, " Delivery : Header data
 konv, " Condition : Transaction data
 konp, " Condition : items
 zjpv_torihiki, " Add on table:Business transaction category
 zjpv_rebate. " Add on table : rebate table
 Variables/Internal table *
DATA :g_date(2) TYPE n, " Date
 g_month(2) TYPE n, " Month
 g_year(4) TYPE n , " Year
 g_bill_low(10) TYPE n, " From date
 g_bill_high(10) TYPE n, " To date
 g_month1(2) TYPE n, " Month
 g_year1(4) TYPE n, " Year
 g_date1(2) TYPE n, " Date
 g_year2(4) TYPE n, " Year
 g_datum LIKE sy-datum, " System date
 g_skip(4) TYPE c , " Line break
 g_ctax(8) TYPE c, " Consumption tax
 g_ctax1(10) TYPE c, " Consumption tax
 g_ctax2(16) TYPE c, " Consumption tax
 g_vol(6) TYPE c, " Volume
 g_vol1(6) TYPE c, " Volume
 g_vol2(7) TYPE c, " Volume
 g_tamt(10) TYPE c, " Total amount
 g_tamt1(13) TYPE c, " Total amount
 g_tamt2(16) TYPE c, " Total amount
 g_gtotal(10) TYPE c, " Net total
 g_gtotal1(13) TYPE c, " Net total
 g_gtotal2(16) TYPE c, " Net total
 g_uprice(8) TYPE c, " Unit Price
 g_uprice1(10) TYPE c, " Unit Price
 g_uprice2(11) TYPE c, " Unit Price
 g_amount(10) TYPE c, " Amount
 g_amount1(13) TYPE c, " Amount
 g_amount2(14) TYPE c, " Amount
 g_fctax(16) TYPE c, " Consumption Tax (Total)
 g_ftamnt(16) TYPE c, " Total amount (Total)
 g_ftotal(16) TYPE c, " net total (Total)
 g_fctax1(8) TYPE c, " Totals with Comma (Consumption tax)
 g_fctax2(10) TYPE c, " Totals with Comma (Consumption tax)
 g_fctax3(11) TYPE c, " Totals with Comma (Consumption tax)
 g_ftamt1(10) TYPE c, " Totals with comma (Total amount)
 g_grand_total(16),
 g_grand_total1(14),
 g_net_total(16),
 g_net_total1(14),
 g_middle_val(16),
 g_middle_val1(11),
 g_ftamt2(13) TYPE c, " Totals with Comma(Total amount)
 g_ftamt3(14) TYPE c, " Totals with comma(Total amount)
 g_ftotal1(10) TYPE c, " Totals with comma(Net total)
 g_ftotal2(13) TYPE c, " Totals with comma(Net total)
 g_ftotal3(14) TYPE c. " Totals with comma(Net total)
*Internal table for billing document header
DATA : BEGIN OF t_vbrk OCCURS 0,
 vbeln LIKE vbrk-vbeln, " Billing Doc number
 vbtyp LIKE vbrk-vbtyp, " Document Category
 kunag LIKE vbrk-kunag, " sold-to-party
 vkorg LIKE vbrk-vkorg, " sales organization
 vtweg LIKE vbrk-vtweg, " Distribution Channel
 kunrg LIKE vbrk-kunrg, " Payer
 fkart_rl LIKE vbrk-fkart_rl," Billing Type
 fkdat LIKE vbrk-fkdat, " Billing date
 mwsbk LIKE vbrk-mwsbk, " Tax amount in document currency
 netwr LIKE vbrk-netwr, " Net value in document currency
 waerk LIKE vbrk-waerk, " SD document currency
 knumv LIKE vbrk-knumv, " Number of the document condition
 END OF t_vbrk.
internal table for Output formatting
DATA : BEGIN OF t_oput OCCURS 0,
 rbcode(4) TYPE c, " Regulating Branch Code
 tpcode(10) TYPE c, " trading partner code
 bdgrp(3) TYPE c, " Billing Document Group
 zjd_torihikikubn(3) TYPE c, " business transaction
 "category
 tpname1(35) TYPE c, " trading partner name 1
 tpname2(35) TYPE c, " trading partner name 2
 bdgnm(10) TYPE c, " Billing Doc Group Name
 dcode(10) TYPE c, " destination code
 dname(35), " destination name
 fkdat(10) TYPE c, " Date of Issue
 vbeln(10) TYPE c, " Billing Doc No
 zzjp_remarks(30) TYPE c, " Remarks
 ctax(16) TYPE c, " Consumption Tax
 tamnt(16) TYPE c, " Total Amount
 gtotal(16) TYPE c, " Grand total,
 pcode(9) TYPE n, " Product Code
 pname(40) TYPE c, " Product name
 volume(16) TYPE p decimals 3, " volume
 volume1 type i,
 volume2(16) type c,
 uprice(13) TYPE c, " Unit Price
 amount(16) TYPE c, " Amount
 posnr(6) TYPE n, " Billing Item
 END OF t_oput.
*Internal table for Customer Master Sales Data
DATA : BEGIN OF t_knvv OCCURS 0,
 kunnr LIKE knvv-kunnr, " Customer Number
 vkorg LIKE knvv-vkorg, " Sales Organization
 vtweg LIKE knvv-vtweg, " Distribution Channel
 spart LIKE knvv-spart, " Division
 kvgr2 LIKE knvv-kvgr2, " Customer Group 2
 vkbur LIKE knvv-vkbur, " sales office
 END OF t_knvv.
*Internal table for Customer Master Data
DATA : BEGIN OF t_kna1 OCCURS 0,
 kunnr LIKE kna1-kunnr, " Customer number
 name1 LIKE kna1-name1, " Customer Name 1
 name2 LIKE kna1-name2, " Customer Name 2
 END OF t_kna1.
Internal table used for billing document items
DATA : BEGIN OF t_vbrp OCCURS 0,
 vbeln LIKE vbrp-vbeln, " Billing Document
 posnr LIKE vbrp-posnr, " Billing item
 zjd_torihikikubn LIKE vbrp-zjd_torihikikubn, " Business
 " Transaction Category
 vgbel LIKE vbrp-vgbel, " Document number of the
 " reference document
 vgtyp LIKE vbrp-vgtyp, " Document category of
 " preceding SD document
 zzjp_remarks LIKE vbrp-zzjp_remarks, " Remarks
 zjd_kanamei LIKE vbrp-zjd_kanamei,
 fkimg LIKE vbrp-fkimg, " Actual billed quantity
 netwr LIKE vbrp-netwr, " Net value of the
 " billing item in document currency
 zjd_touitsumatnr LIKE vbrp-zjd_touitsumatnr,
 END OF t_vbrp.
Internal table used for Rebate Table
DATA : BEGIN OF t_zjpv_rebate OCCURS 0,
 fkart LIKE zjpv_rebate-fkart, " Billing type
 rebate_code LIKE zjpv_rebate-rebate_code, " Rebate Code
 rebate_name LIKE zjpv_rebate-rebate_name, " Rebate Name
 END OF t_zjpv_rebate.
*Internal table used for Delivery Header
DATA : BEGIN OF t_likp OCCURS 0,
 vbeln LIKE likp-vbeln, " Delivery No
 kunnr LIKE likp-kunnr, " Ship-to party
 END OF t_likp.
*Internal table for conditions (Transaction Data)
DATA : BEGIN OF t_konv OCCURS 0,
 knumv LIKE konv-knumv, " Number of the document condition
 kposn LIKE konv-kposn, " Condition item number
 kschl LIKE konv-kschl, " Condition type
 knumh LIKE konv-knumh, " Condition type
 END OF t_konv.
Internal table for conditions (Item)
DATA : BEGIN OF t_konp OCCURS 0,
 knumh LIKE konp-knumh, " Number of the document condition
 kbetr LIKE konp-kbetr, " Rate (condition amount or
 " percentage) where no scale exists
 konwa LIKE konp-konwa, " Rate unit (currency or percentage)
 END OF t_konp.
Internal table for table Torihiki Kubun
DATA : BEGIN OF t_zjpv_torihiki OCCURS 0,
 kubun LIKE zjpv_torihiki-kubun, " Condition type
 rep_grp LIKE zjpv_torihiki-rep_grp, " Shikiri Report Group
 rep_grp_name LIKE zjpv_torihiki-rep_grp_name, " Shikiri Report
 " Group NAME
 END OF t_zjpv_torihiki.
DATA: l_tpname1(35) TYPE c, " trading partner name 1
 l_tpname2(35) TYPE c, " trading partner name 2
 l_bdgnm(10) TYPE c, " Billing Doc Group Name
 G_FLG(1) type c,
 G_FLG1(1) type c.
 Selection screen *
SELECTION-SCREEN : BEGIN OF BLOCK zjpv WITH FRAME TITLE text-001.
PARAMETER : p_date LIKE sy-datum OBLIGATORY. " Delivery date
SELECTION-SCREEN : END OF BLOCK zjpv.
RANGES : r_bdate FOR vbrk-fkdat. " Billing date
 Initialization *
INITIALIZATION.
p_date = sy-datum.
 MAIN PROCESSING *
START-OF-SELECTION.
This Perform is used for getting Billing date According to Delivery
Date(Output date)
PERFORM f_bill_date_move.
Selecting the data from tables VBRK,VBRP,KNVV,KNA1,KONV,KONP,LIKP,
ZJPV_TORIHIKI and ZJPV_REBATE
PERFORM f_get_data.
Passing the data from the internal tables (T_VBRK,T_VBRP,T_KNVV,
T_KNA1,T_KONV,T_KONP,T_LIKP, T_ZJPV_TORIHIKI and T_ZJPV_REBATE)
to out put Internal table(T_OPUT)
PERFORM f_process_data.
 END OF SELECTION *
END-OF-SELECTION.
Out put formatting
PERFORM f_output_data.
*& Form F_Bill_DATE_MOVE
This Perform is used for getting Billing date According to Delivery *
Date(Output date) *
FORM f_bill_date_move.
g_datum = p_date + 10.
g_month = g_datum+4(2).
g_year = g_datum+0(4).
IF g_month = 1.
 g_year = g_year - 1.
 g_month = 12.
 g_date = 1.
ELSE.
 g_month = g_month - 1.
 g_date = 1.
ENDIF.
Passing the date to billing date-low
CONCATENATE g_year g_month g_date INTO g_bill_low.
r_bdate-low = g_bill_low.
r_bdate-sign = 'I'.
r_bdate-option = 'BT'.
g_month1 = g_datum+4(2).
g_year1 = g_datum+0(4).
IF g_month1 = 1.
 g_year1 = g_year1 - 1.
 g_month1 = 12.
ELSE.
 g_month1 = g_month1 - 1.
ENDIF.
CASE g_month1.
 WHEN 1.g_date1 = '31'.
 WHEN 3.g_date1 = '31'.
 WHEN 4.g_date1 = '30'.
 WHEN 5.g_date1 = '31'.
 WHEN 6.g_date1 = '30'.
 WHEN 7.g_date1 = '31'.
 WHEN 8.g_date1 = '31'.
 WHEN 9.g_date1 = '30'.
 WHEN 10.g_date1 = '31'.
 WHEN 11.g_date1 = '30'.
 WHEN 12.g_date1 = '31'.
ENDCASE.
g_year2 = g_year1.
IF g_month1 = 2.
 g_year2 = g_year2 MOD 4 .
 IF g_year2 = 0.
 g_date1 = 29.
 ELSE.
 g_date1 = 28.
 ENDIF.
ENDIF.
Passing the date to billing date-high
CONCATENATE g_year1 g_month1 g_date1 INTO g_bill_high.
r_bdate-high = g_bill_high.
APPEND r_bdate.
ENDFORM. " F_Bill_DATE_MOVE
*& Form f_get_data
Selecting the data from tables VBRK,VBRP,KNVV,KNA1,KONV,KONP,LIKP, *
ZJPV_TORIHIKI and ZJPV_REBATE *
FORM f_get_data.
Selecting the data from VBRK into internal table T_VBRK.
SELECT vbeln
 vbtyp
 kunag
 vkorg
 vtweg
 kunrg
 fkart_rl
 fkdat
 mwsbk
 netwr
 waerk
 knumv
 FROM vbrk
 INTO TABLE t_vbrk
 WHERE fkdat BETWEEN r_bdate-low and r_bdate-high
 and RFBSK = C_RFBSK
 AND vbtyp IN ('N' , 'S' , 'M' , 'O' , 'P')
 AND vkorg = c_vkorg
 AND vtweg = c_vtweg
 AND netwr <> 0.
IF sy-subrc Eq 0.
 sort t_vbrk.
ENDIF.
Selecting the data from KNVV into internal table T_KNVV.
SELECT kunnr
 vkorg
 vtweg
 spart
 kvgr2
 vkbur
 FROM knvv
 INTO TABLE t_knvv
 FOR ALL ENTRIES IN t_vbrk WHERE ( kunnr = t_vbrk-kunag
 OR kunnr = t_vbrk-kunrg )
 AND vkorg = t_vbrk-vkorg
 AND vtweg = t_vbrk-vtweg
 AND spart = c_spart
 AND kvgr2 = c_kvgr2.
Selecting the data from VBRP into internal table T_VBRP.
SELECT vbeln
 posnr
 zjd_torihikikubn
 vgbel
 vgtyp
 zzjp_remarks
 zjd_kanamei
 fkimg
 netwr
 zjd_touitsumatnr
 FROM vbrp
 INTO TABLE t_vbrp
 FOR ALL ENTRIES IN t_vbrk
 WHERE vbeln = t_vbrk-vbeln.
Selecting the data from ZJPV_REBATE into internal table T_ZJPV_REBATE.
SELECT fkart
 rebate_code
 rebate_name
 FROM zjpv_rebate
 INTO TABLE t_zjpv_rebate
 FOR ALL ENTRIES IN t_vbrk
 WHERE fkart = t_vbrk-fkart_rl.
Selecting the data from KNA1 into internal table T_KNA1.
SELECT kunnr
 name1
 name2
 FROM kna1
 INTO TABLE t_kna1
 FOR ALL ENTRIES IN t_knvv
 WHERE kunnr = t_knvv-kunnr.
IF NOT t_vbrp[] IS INITIAL.
Selecting the data from LIKP into internal table T_LIKP.
 SELECT vbeln
 kunnr
 FROM likp
 INTO TABLE t_likp
 FOR ALL ENTRIES IN t_vbrp
 WHERE vbeln = t_vbrp-vgbel.
ENDIF.
Selecting the data from KONV into internal table T_KONV.
SELECT knumv
 kposn
 kschl
 knumh
 FROM konv
 INTO TABLE t_konv
 FOR ALL ENTRIES IN t_vbrk
 WHERE knumv = t_vbrk-knumv
 AND kschl = c_kschl.
Selecting the data from KONP into internal table T_KONP.
SELECT knumh
 kbetr
 konwa
 FROM konp
 INTO TABLE t_konp
 FOR ALL ENTRIES IN t_konv
 WHERE knumh = t_konv-knumh.
Selecting the data from ZJPV_TORIHIKI into internal table
T_ZJPV_TORIHIKI.
SELECT kubun
 rep_grp
 rep_grp_name
 FROM zjpv_torihiki
 INTO TABLE t_zjpv_torihiki
 FOR ALL ENTRIES IN t_vbrp
 WHERE kubun = t_vbrp-zjd_torihikikubn.
ENDFORM. " f_get_data
*& Form f_process_data
Reading The Data from Internal tables (T_VBRK,T_VBRP,T_KNVV,T_KNA1, *
T_LIKP,T_KONV,T_KONP,T_ZJPV_REBATE and T_ZJP_TORIHIKI) *
FORM f_process_data.
Sorting the internal table t_kna1, t_vbrk, t_vbrp ,t_knvv,t_kna1,
t_likp and t_zjpv_rebate
SORT: t_kna1 BY kunnr,
 t_vbrk BY vbeln,
 t_vbrp BY vbeln,
 t_knvv BY kunnr,
 t_zjpv_rebate BY fkart,
 t_knvv BY kunnr vkorg vtweg spart,
 t_likp BY vbeln.
LOOP AT t_vbrk.
Reading the data from internal table t_knvv
 READ TABLE t_knvv WITH KEY kunnr = t_vbrk-kunag
 vkorg = t_vbrk-vkorg
 vtweg = t_vbrk-vtweg
 spart = c_spart
 kvgr2 = c_kvgr2.
 IF sy-subrc NE 0.
 g_flg = 'X'.
 ENDIF.
Reading the data from internal table t_knvv
 READ TABLE t_knvv WITH KEY kunnr = t_vbrk-kunrg
 vkorg = t_vbrk-vkorg
 vtweg = t_vbrk-vtweg
 spart = c_spart
 kvgr2 = c_kvgr2.
 IF sy-subrc NE 0.
 G_FLG1 = 'X'.
 ENDIF.
 IF G_FLG = 'X' AND G_FLG1 = 'X'.
 DELETE T_VBRK.
 CLEAR: G_FLG, G_FLG1.
 CONTINUE.
 ENDIF.
ENDLOOP.
DATA : l_sign(1) TYPE c VALUE '-',
 l_ctax(15) TYPE n ,
 l_tamnt(15) TYPE n ,
 l_volume(16) TYPE c,
 l_gtotal(15) TYPE n,
 l_amnt(15) TYPE n.
SORT t_konv BY knumv kposn kschl.
SORT t_konp BY knumh.
LOOP AT t_vbrp.
 READ TABLE t_vbrk WITH KEY vbeln = t_vbrp-vbeln.
 IF sy-subrc <> 0.
 DELETE t_vbrp.
 CONTINUE.
 ENDIF.
Reading the data from Internal table T_zjpv_rebate(Rebate table)
 READ TABLE t_zjpv_rebate WITH KEY
 fkart = t_vbrk-fkart_rl
 BINARY SEARCH.
 IF sy-subrc NE 0 OR t_vbrk-fkart_rl EQ c_fkart.
 MOVE t_vbrk-kunag TO t_oput-tpcode.
 ELSE .
 IF t_vbrk-fkart_rl NE c_fkart.
 MOVE t_vbrk-kunrg TO t_oput-tpcode.
 ENDIF.
 ENDIF.
 READ TABLE t_zjpv_rebate WITH KEY
 fkart = t_vbrk-fkart_rl
 BINARY SEARCH.
 IF sy-subrc NE 0.
Passing the last 6 values of ZJD_TOUITSUMANTR into product code.
 MOVE t_vbrp-zjd_touitsumatnr+3(6) TO t_oput-pcode.
 MOVE t_vbrp-zjd_kanamei TO t_oput-pname.
 ELSE.
 MOVE t_zjpv_rebate-rebate_code+3(6) TO t_oput-pcode.
 MOVE t_zjpv_rebate-rebate_name TO t_oput-pname.
 ENDIF.
Reading the data from Internal table T_KNA1(Customer Master)
 READ TABLE t_kna1 WITH KEY
 kunnr = t_oput-tpcode BINARY SEARCH.
 IF sy-subrc = 0.
 MOVE t_kna1-name1 TO t_oput-tpname1.
 MOVE t_kna1-name2 TO t_oput-tpname2.
 ENDIF.
Reading the data from Internal table T_vbrp(Billing Documnet: Item)
 MOVE t_vbrp-zjd_torihikikubn TO t_oput-zjd_torihikikubn.
Reading the data from Internal table T_KNVV
 READ TABLE t_knvv WITH KEY kunnr = t_vbrk-kunrg
 vkorg = c_vkorg
 vtweg = c_vtweg
 spart = c_spart
 BINARY SEARCH.
 IF sy-subrc EQ 0.
 MOVE t_knvv-vkbur TO t_oput-rbcode.
 ENDIF.
Reading the data from Internal table T_LIKP (Delivery : Header)
 IF t_vbrp-vgtyp = 'J' OR t_vbrp-vgtyp = 'T'.
 READ TABLE t_likp WITH KEY
 vbeln = t_vbrp-vgbel
 BINARY SEARCH.
 IF sy-subrc = 0.
 MOVE t_likp-kunnr TO t_oput-dcode.
 ENDIF.
 ENDIF.
Reading the data from Internal table T_KNA1.
 READ TABLE t_kna1 WITH KEY kunnr = t_likp-kunnr BINARY SEARCH.
 IF sy-subrc = 0 AND NOT t_oput-dcode IS INITIAL.
 MOVE t_kna1-name2 TO t_oput-dname.
 ENDIF.
*Passing the values from internal table t_vbrk and t_vbrp to
*out put internal table.
 MOVE t_vbrk-fkdat TO t_oput-fkdat.
 CONCATENATE t_oput-fkdat0(4) '.' t_oput-fkdat4(2) '.'
 t_oput-fkdat+6(2) INTO t_oput-fkdat.
 MOVE t_vbrk-vbeln TO t_oput-vbeln.
 MOVE t_vbrp-posnr TO t_oput-posnr.
 MOVE t_vbrp-zzjp_remarks TO t_oput-zzjp_remarks.
*Checking for billing document category.
 IF t_vbrk-vbtyp = 'M' OR t_vbrk-vbtyp = 'P' OR t_vbrk-vbtyp = 'S'.
 IF t_vbrk-waerk = c_waerk.
 t_oput-ctax = t_vbrk-mwsbk * 100.
 t_oput-tamnt = t_vbrk-netwr * 100.
 t_oput-gtotal = t_oput-ctax + t_oput-tamnt.
 ELSE.
 t_oput-ctax = t_vbrk-mwsbk .
 t_oput-tamnt = t_vbrk-netwr.
 t_oput-gtotal = t_oput-ctax + t_oput-tamnt.
 ENDIF.
 ENDIF.
 IF t_vbrk-vbtyp = 'O' OR t_vbrk-vbtyp = 'N' .
 IF t_vbrk-waerk = c_waerk.
 l_ctax = ( t_vbrk-mwsbk * 100 ) .
*The contents of the consumption tax are converted to display format.
 PERFORM F_ALPHA_CONV USING L_CTAX.
 CONCATENATE l_sign l_ctax INTO t_oput-ctax.
 CONDENSE t_oput-ctax.
 l_tamnt = ( t_vbrk-netwr * 100 ).
*The contents of the total amount are converted to display format.
 PERFORM F_ALPHA_CONV USING L_TAMNT.
 CONCATENATE l_sign l_tamnt INTO t_oput-tamnt.
 CONDENSE t_oput-tamnt.
 l_gtotal = t_oput-ctax + t_oput-tamnt.
*The contents of the grand total are converted to display format.
 PERFORM F_ALPHA_CONV USING L_GTOTAL.
 CONCATENATE l_sign l_gtotal INTO t_oput-gtotal.
 ELSE.
 l_ctax = t_vbrk-mwsbk.
*The contents of the consumption tax are converted to display format.
 PERFORM F_ALPHA_CONV USING L_CTAX.
 CONCATENATE l_sign l_ctax INTO t_oput-ctax.
 l_tamnt = ( t_vbrk-netwr ).
*The contents of the total amount are converted to display format.
 PERFORM F_ALPHA_CONV USING L_TAMNT.
 CONCATENATE l_sign l_tamnt INTO t_oput-tamnt.
 l_gtotal = ( t_oput-ctax + t_oput-tamnt ).
*The contents of the grand total are converted to display format.
 PERFORM F_ALPHA_CONV USING L_GTOTAL.
 CONCATENATE l_sign l_gtotal INTO t_oput-gtotal.
 ENDIF.
 ENDIF.
Comparing the volume with given conditions.
 IF t_vbrp-fkimg EQ 0.
 t_oput-volume = space.
 ELSEIF t_vbrp-fkimg NE 0.
 IF t_vbrk-vbtyp = 'M' OR t_vbrk-vbtyp = 'P' OR t_vbrk-vbtyp = 'S'.
 t_oput-volume = t_vbrp-fkimg.
 CALL FUNCTION 'ROUND'
 EXPORTING
 DECIMALS = 3
 input = t_oput-volume
 SIGN = ' '
 IMPORTING
 OUTPUT = t_oput-volume1
 EXCEPTIONS
 INPUT_INVALID = 1
 OVERFLOW = 2
 TYPE_INVALID = 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.
 move t_oput-volume1 to t_oput-volume2.
 condense t_oput-volume2 no-gaps.
 ELSEIF t_vbrk-vbtyp = 'O' OR t_vbrk-vbtyp = 'N'.
 t_oput-volume = t_vbrp-fkimg.
 CALL FUNCTION 'ROUND'
 EXPORTING
 DECIMALS = 3
 input = t_oput-volume
 SIGN = ' '
 IMPORTING
 OUTPUT = t_oput-volume1
 EXCEPTIONS
 INPUT_INVALID = 1
 OVERFLOW = 2
 TYPE_INVALID = 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.
 l_volume = t_oput-volume1.
*The contents of the volume are converted to display format.
 PERFORM F_ALPHA_CONV USING L_VOLUME.
 CONCATENATE l_sign l_volume INTO t_oput-volume2.
 condense t_oput-volume2 no-gaps.
 ENDIF.
 ENDIF.
*Unit price
 IF t_vbrp-fkimg EQ 0.
 t_oput-uprice = space.
 ELSE.
Reading The data from Internal Table T_KONV(Condition :Transactional)
 READ TABLE t_konv WITH KEY knumv = t_vbrk-knumv
 kposn = t_vbrp-posnr
 kschl = c_kschl
 BINARY SEARCH.
 IF sy-subrc = 0.
Reading The data from Internal Table T_KONP(Condition : Items)
 READ TABLE t_konp WITH KEY
 knumh = t_konv-knumh
 BINARY SEARCH.
 IF sy-subrc = 0.
 IF t_konp-konwa = c_konwa.
 t_oput-uprice = 100 * t_konp-kbetr.
 ELSE.
 t_oput-uprice = t_konp-kbetr.
 ENDIF.
 ENDIF.
 ENDIF.
 ENDIF.
Caluculating the amount with given conditions
 IF t_zjpv_rebate-fkart = t_vbrk-fkart_rl.
 t_oput-amount = t_vbrk-netwr.
 ELSE.
 t_oput-amount = t_vbrp-netwr.
 ENDIF.
 IF t_vbrk-waerk EQ c_waerk.
 t_oput-amount = 100 * t_oput-amount.
 ENDIF.
 IF t_vbrk-vbtyp ='M' OR t_vbrk-vbtyp = 'P' OR
 t_vbrk-vbtyp = 'S'.
 ELSE.
 IF t_vbrk-vbtyp = 'O' OR t_vbrk-vbtyp = 'N'.
 IF t_oput-amount+15(1) = l_sign.
 l_amnt = t_oput-amount+0(15).
 PERFORM F_ALPHA_CONV USING L_AMNT.
 CONCATENATE l_sign l_amnt INTO t_oput-amount.
 ELSE.
 l_amnt = t_oput-amount.
 PERFORM F_ALPHA_CONV USING L_AMNT.
 CONCATENATE l_sign l_amnt INTO t_oput-amount.
 ENDIF.
 ENDIF.
 ENDIF.
Reading the data from Internal Table T_ZPV_TORIHIKI
 READ TABLE t_zjpv_torihiki WITH KEY
 kubun = t_vbrp-zjd_torihikikubn
 BINARY SEARCH.
 IF sy-subrc = 0.
 t_oput-bdgrp = t_zjpv_torihiki-rep_grp.
 t_oput-bdgnm = t_zjpv_torihiki-rep_grp_name.
 ENDIF.
 APPEND t_oput.
Clearing the memory of the internal tables.
 CLEAR: t_oput,
 t_vbrp,
 t_vbrk,
 t_kna1,
 t_knvv,
 t_zjpv_rebate,
 t_zjpv_torihiki,
 t_likp,
 t_konv,
 t_konp.
ENDLOOP.
ENDFORM. " f_process_data
*& Form f_output_data
 Output formatting
FORM f_output_data.
SORT t_oput BY rbcode
 tpcode
 bdgrp
 fkdat
 zjd_torihikikubn
 vbeln
 posnr.
DATA : l_volume(5) TYPE c,
 l_ctax(8) TYPE c.
MOVE t_oput-volume TO l_volume.
MOVE t_oput-ctax TO l_ctax.
DATA : l_ctax1(16) ,
 l_ctax2(16),
 l_vol1(14) ,
 l_vol3(8),
 l_vol2(14),
 l_tamt1(16),
 l_tamt2(16),
 l_gtotal1(16),
 l_gtotal2(16),
 l_uprice1(16),
 l_uprice2(16),
 l_amount1(16) TYPE c,
 l_amount2(16) TYPE c,
 l_fctax1(16) TYPE c,
 l_fctax2(16) TYPE c,
 l_ftamt1(16) TYPE c,
 l_ftamt2(16) TYPE c,
 l_ftotal1(16) TYPE c,
 l_ftotal2(16) TYPE c,
 l_sign(1) TYPE c VALUE '-'.
CONSTANTS c_minus VALUE '-'.
SORT t_konv BY knumv kposn kschl.
SORT t_oput BY zjd_torihikikubn vbeln posnr.
Printing Final Values.
LOOP AT t_oput.
Perform F_FORMAT_SUBTOTAL is used to align the value with the commas
for display purpose.
 L_CTAX2 = T_OPUT-CTAX.
 G_CTAX2 = T_OPUT-CTAX.
 PERFORM F_FORMAT_SUBTOTAL USING G_CTAX2
 C_CONS_8.
 CONDENSE T_OPUT-CTAX.
Perform F_FORMAT_SUBTOTAL is used to align the value with the commas
for display purpose.
 L_TAMT2 = T_OPUT-TAMNT.
 G_TAMT2 = T_OPUT-TAMNT.
 PERFORM F_FORMAT_SUBTOTAL USING G_TAMT2
 C_CONS_10.
 CONDENSE T_OPUT-TAMNT.
Perform F_FORMAT_SUBTOTAL is used to align the value with the commas
for display purpose.
 L_GTOTAL2 = T_OPUT-GTOTAL.
 G_GTOTAL2 = T_OPUT-GTOTAL.
 PERFORM F_FORMAT_SUBTOTAL USING G_GTOTAL2
 C_CONS_10.
 CONDENSE T_OPUT-GTOTAL.
Perform F_FORMAT_SUBTOTAL is used to align the value with the commas
for display purpose.
*Volume
 IF t_oput-volume >= 99999 OR t_oput-volume <= -99999.
 t_oput-volume = space.
 ELSE.
 l_vol1 = t_oput-volume.
 l_vol2 = t_oput-volume.
 CONDENSE l_vol1.
 CONDENSE l_vol2.
 IF l_vol1+0(1) EQ '-'.
 REPLACE '-' WITH space INTO l_vol1.
 ENDIF.
 CONDENSE l_vol1.
 WRITE l_vol1 TO g_vol RIGHT-JUSTIFIED.
 REPLACE '.' WITH ',' INTO l_vol1.
write :85 l_vol1.
 IF NOT g_vol+0(2) IS INITIAL.
 g_vol10(2) = g_vol0(2).
 g_vol1+2(1) = ','.
 ENDIF.
 IF NOT g_vol+2(3) IS INITIAL.
 g_vol13(3) = g_vol2(3).
 ENDIF.
replace '.' with ',' into t_oput-volume.
 l_vol2 = t_oput-volume.
 IF l_vol2+0(1) EQ '-'.
 g_vol2 = g_vol1 .
 CONDENSE g_vol2.
 CONCATENATE c_minus g_vol2 INTO g_vol2.
 ELSE.
 g_vol2 = g_vol1 .
 CONDENSE g_vol2.
 ENDIF.
 ENDIF.
L_VOL1 = T_OPUT-VOLUME.
PERFORM F_FORMAT_SUBTOTAL USING L_VOL1
 C_CONS_5.
CONDENSE L_VOL1.
Unit Price
 IF t_oput-uprice >= 99999999 OR t_oput-uprice <= -99999999.
 t_oput-uprice = space.
 ELSE.
 l_uprice1 = t_oput-uprice .
 l_uprice2 = t_oput-uprice.
 CONDENSE l_uprice1.
 CONDENSE l_uprice2.
 IF l_uprice1+0(1) EQ '-'.
 REPLACE '-' WITH space INTO l_uprice1.
 ENDIF.
 CONDENSE l_uprice1.
 WRITE l_uprice1 TO g_uprice RIGHT-JUSTIFIED.
 IF NOT g_uprice+0(2) IS INITIAL.
 g_uprice10(2) = g_uprice0(2).
 g_uprice1+2(1) = ','.
 ENDIF.
 IF NOT g_uprice+2(3) IS INITIAL.
 g_uprice13(3) = g_uprice2(3).
 g_uprice1+6(1) = ','.
 ENDIF.
 IF NOT g_uprice+5(3) IS INITIAL.
 g_uprice17(3) = g_uprice5(3).
 ENDIF.
 IF l_uprice2+0(1) EQ '-'.
 g_uprice2 = g_uprice1 .
 CONDENSE g_uprice2.
 CONCATENATE c_minus g_uprice2 INTO g_uprice2.
 ELSE.
 g_uprice2 = g_uprice1 .
 CONDENSE g_uprice2.
 ENDIF.
 ENDIF.
Amount
 IF t_oput-amount >= 99999999 OR t_oput-amount <= -99999999 .
 t_oput-amount = space.
 ELSE.
 l_amount1 = t_oput-amount.
 l_amount2 = t_oput-amount.
 CONDENSE l_amount1.
 CONDENSE l_amount2.
 IF l_amount1+0(1) EQ '-'.
 REPLACE '-' WITH space INTO l_amount1.
 ENDIF.
 CONDENSE l_amount1.
 WRITE l_amount1 TO g_amount RIGHT-JUSTIFIED.
 IF NOT g_amount+0(1) IS INITIAL.
 g_amount0(1) = g_amount0(1).
 g_amount1+1(1) = ','.
 ENDIF.
 IF NOT g_amount+1(3) IS INITIAL.
 g_amount12(3) = g_amount1(3).
 g_amount1+5(1) = ','.
 ENDIF.
 IF NOT g_amount+4(3) IS INITIAL.
 g_amount16(3) = g_amount4(3).
 g_amount1+9(1) = ','.
 ENDIF.
 IF NOT g_amount+7(3) IS INITIAL.
 g_amount110(3) = g_amount7(3).
 ENDIF.
 IF l_amount2+0(1) EQ '-'.
 g_amount2 = g_amount1 .
 CONDENSE g_amount2.
 CONCATENATE c_minus g_amount2 INTO g_amount2.
 ELSE.
 g_amount2 = g_amount1 .
 CONDENSE g_amount2.
 ENDIF.
 ENDIF.
 NEW-PAGE.
 MOVE t_oput-tpname1 TO l_tpname1.
 MOVE t_oput-tpname2 TO l_tpname2.
 MOVE t_oput-bdgnm TO l_bdgnm.
 AT NEW bdgrp.
 IF t_oput-rbcode CO '*'.
 t_oput-rbcode = space.
 ENDIF.
 IF t_oput-tpcode CO '*'.
 t_oput-tpcode = space.
 ENDIF.
 IF t_oput-tpname1 CO '*'.
 t_oput-tpname1 = space.
 ENDIF.
 IF t_oput-tpname2 CO '*'.
 t_oput-tpname2 = space.
 ENDIF.
 IF t_oput-bdgnm CO '*'.
 t_oput-bdgnm = space.
 ENDIF.
 PERFORM f_write_heading.
 ENDAT.
 AT NEW vbeln.
 IF sy-linno = 35 OR sy-linno = 1.
 NEW-PAGE.
 PERFORM f_write_heading.
 WRITE:/6 t_oput-fkdat , 18 t_oput-dcode+3(7) ,
 28 t_oput-vbeln+2(8) ,
 37 t_oput-dname+0(20) .
 ELSE.
 WRITE:/6 t_oput-fkdat , 18 t_oput-dcode+3(7) ,
 28 t_oput-vbeln+2(8) ,
 37 t_oput-dname+0(20) .
 ENDIF.
 ENDAT.
 WRITE:/6 t_oput-fkdat, 18 t_oput-dcode+3(7),
 28 t_oput-vbeln+2(8),
 37 t_oput-dname+0(20).
 IF sy-linno = 35 OR sy-linno = 1.
 NEW-PAGE.
 PERFORM f_write_heading.
 CONDENSE L_VOL1 NO-GAPS.
 MOVE l_vol1 TO l_vol3.
 WRITE:/6 t_oput-fkdat , 18 t_oput-dcode+3(7) ,
 28 t_oput-vbeln+2(8) ,
 37 t_oput-dname+0(20) .
 WRITE:/39 t_oput-pcode+3(6) ,
 50 t_oput-pname+0(25) ,
 79 t_oput-zjd_torihikikubn ,
 85 t_oput-volu

How to register a report program ins EBS?

HI,
I made a new report program called APVOUCHER.rdf it is developed/tested/ and running on Reports 10g windows. Then I ftp it to my EBS R12 linux server. Then I put it under the base path of $AP_TOP/reports/us.
Then I register it in EBS using this
a) Define the concurrent program executable with the Oracle Application Object Library. This links the execution file and the method used to execute it with a defined concurrent program. Log into Applications as the System Administrator and navigate to Concurrent > Program > Executable
b) Define the concurrent program with the Oracle Application Object Library along with any program parameters or any incompatibilities. Log into Applications as the System Administrator and navigate to
Concurrent > Program > Define.
But in the 2nd define the program APVOUCHER ca not me found in LOVs provided under region
Excutable
Name>
Method>
If I click LOV for Name the report name is not in there :(
Anything I miss in here?
Thanks a lot

Hi,
Before you define the report, navigate to Concurrent > Program > Executable and fill out the form as follows:
Executable: <REPORT SHORT NAME> --> (Similar to the report name you have uploaded but without .rdf)
Short Name: <REPORT SHORT NAME> --> (Same as above)
Application: Payables
Description: <Description>
Execution Method: Oracle Reports
For more details, please refer to:
Note: 133991.1 - How to Register a Custom Report
https://metalink2.oracle.com/metalink/plsql/ml2_documents.showDocument?p_database_id=NOT&p_id=133991.1
Once you are done with the above, you need to add this concurrent program to the Request Group which is attached to your responsibility.
- Login to System Administrator responsibility
- Navigate to Security > Responsibility > Define
- Query the Responsibility Name
- Write down the Request Group
- Navigate to Security > Responsibility > Request
- Query the Request Group
- Add the concurrent program
You should be able to see the concurrent program from the responsibility then.
Regards,
Hussein

List of unused custom report programs

Hello,
I have to develop a report though which we can find the list of unused program based on the selection date given in the selection screen. So, Is there any way through which we can find when was the Z* programs executes last time???
I checked with the transaction STAD and ST03N.. but I didnt find it helpful.. because I want to see the list of programs for the past 1 year.
Any suggestion will be helpful..
Thanks,
Regards,
Jhings.
Edited by: Jhings on Dec 1, 2011 1:31 PM
Moderator message: FAQ, please search for previous discussions of this topic.
Edited by: Thomas Zloch on Dec 1, 2011 12:20 PM

Hi Sandeep,
Thanks for the reply... I checked that table and it is having last change date of the code.. But my requirement is to find out the last execution date of the program.. Means.. when was the Z* programs runs last time.
Hope u understand my problem..
Thanks,
Regards,
Jhings

How to reverse the changes made in a report program

Hi Friends,
I want to change a report program,but this report program is locked under one tp which is not yet released and it is in development only .I want to change the same report program but don't want to keep the changes done in the existing tp.I want to keep only changes which i will do.
Please help me to achieve this task.
Thanks in advance.
Regards,
Rajesh

hi
if u have done Version Management then u can retrieve the previous version of ur report
Version Management is done in utilities -> versions ->Version Management
otherwise its not possible.
regards
ravish
plz dont forget to reward points if helpful

About call a webdynpro program in R/3 report program.

hi,experts
i am searching a report program which was written by my colleague who have left my project.
there is one button displayed on the ALV tool bar of this report program.when i push this button,a message are sent to protal and displayed in tasks,then i log into portal,double click the message,a webdynpro program will be called and used to further process.
i really want to know how i can decide to use which webdynpro program to be call and used. for example,now the R/3 program use the webdynpro program named AAA, i copy BBB from AAA,and want to replace AAA by BBB in this program, how?
i don't know how to meet this simple requirement such as upwards and confused about it. hope anyone can show me some information.
thanks in advance.

It is not that simple :).
Actually there is a workflow involvedi n this. On clicking the alv button a workflow gets triggered and the task appears in the SAP Inbox which anyway displayed in the UWL of the Portal.
just try changing the SWFVISU transaction entry for that particular task and change the applicaiton name to your new application name and re-register the system in the UWL Admin Pagem, i hope it works.
If you did not find any entry in SWFVISU, the developer might have exported the XML in UWL Administration page in the portal down load it identify the old applicaiton name nad replace it with your new application name and upload the XML
[Helpful link|https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/d0731bbc-810b-2a10-7fb8-900f16fd3c7d]
Abhi

How can i develope a report for getting purchase requisition details

how can i develope a report for getting purchase requisition details like mrp controller release date unit of measure

Hi,
Go to Tcode ME53(Purchase requisition display). Give any preq number and click the item overview button..
in the next page click select one item and press item details button(or F2 button)..In the next page all your requiresd fields will be there.. put cursor in reqd field and press f1.. in the pop up box press techical details(hammer button) to get the field name as well as the transparent table.. Use those fields and table in ur program..
hope it helps
Award points if it helps

Help regarding attaching smartform to a report program for QM module

Hii,
I have developed a certifiacate of analysis smartform for QM module and i attached it to a output type ...but i need to attach this smartform to a standard report RQCAAP01. can anyone help me what customizations i should do in report program in order to attach smartform.
Regards,
Venkat Akella.

I attached smartform in NACE to LQCB output type but i should also make changes in report program RQCAAP01..can u please let me know what customizations i should do in tht report program to attach the smartform..

How to use a parameter in a report program in a dialog program

how to use a parameter in a report program in a dialog program

Hi Shaikh,
Post it in http://scn.sap.com/community/abap
"ABAP Development".
sree

Develope a report with out using alv

REPORT OBJECT:
 The report to list the material quantities returned because of breakage or expiry date or for any other reason.for material the quantities are summed up
under expiry quantity ,breakage and other quantity for a particular month.
 above mentioned is the object of my report .
 please help me any one to develop the report with out using ALV'S.

Hello Pravardhan
Your requirements are definitely demanding for an ALV list because all the calculations can be done by the user himself without any programming. The only thing you need to do is to collect all necessary data. In addition, all criteria for calculating subtotals/totals (e.g. month) must be available as separate column on the ALV list.
This is reasonable programming, anything else not. If the users have an ALV list they can easily adjust the layout to their specific needs without calling for a developer.
We should always develop our programs with a strong focus on the user's perspective.
Regards
Uwe

Passing parameter from selection screen to corresponding report program.

Hi all,
I am developing a report in which there is a selection screen containing 2 list boxes having month 'from' and 'to' ;ie the month range for which the report is to be run and a parameter for year.below it i have 2 radio button options which will lead to the report that the user clicks on.
I have done the following in the code.
selection-screen begin of block b1 with frame title text-001.
parameters: month1(10) as listbox visible length 10 obligatory.
parameters: month2(10) as listbox visible length 10.
parameters: year(4) obligatory.
selection-screen : end of block b1.
selection-screen: begin of block b2 with frame title text-002.
parameters: rb1 radiobutton group g1,
                    rb2 radiobutton group g1.
selection-screen : end of block b2.
if rb1 = 'X'.
submit ZMIS1.
ENDIF.
if rb2 = 'X'.
submit ZMIS2.
endif.
Now i want the values selected in the listbox and the year to be passed in the report that will be selected in the radiobutton (ie ZMIS1 or ZMIS2) so that the corresponding report output will be displayed directly with the inputs given in the selection screen .
Please tell me how to do this.Thanks in advance.

You also have to pass Selection-screen data for called program the way it has been shown down.
REPORT ZVENKAT_ALV_LIST.
DATA:
      IT_RSPARAMS TYPE STANDARD TABLE OF RSPARAMS,
      WA_RSPARAMS LIKE LINE OF IT_RSPARAMS.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS: MONTH1(10) AS LISTBOX VISIBLE LENGTH 10 OBLIGATORY.
PARAMETERS: MONTH2(10) AS LISTBOX VISIBLE LENGTH 10.
PARAMETERS: YEAR(4) OBLIGATORY.
SELECTION-SCREEN : END OF BLOCK B1.
SELECTION-SCREEN: BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-002.
PARAMETERS: RB1 RADIOBUTTON GROUP G1 USER-COMMAND UC1,
            RB2 RADIOBUTTON GROUP G1.
SELECTION-SCREEN : END OF BLOCK B2.
IF RB1 = 'X'.
WA_RSPARAMS-SELNAME = 'P_MATNR'. "PARAMETER or SELECT-OPTION of the called program
WA_RSPARAMS-KIND    = 'P'.       "S=Select-options P=Parameters
WA_RSPARAMS-SIGN    = 'I'.
WA_RSPARAMS-OPTION = 'EQ'.
WA_RSPARAMS-LOW     = '11010'.
WA_RSPARAMS-HIGH    = SPACE.
SUBMIT ZMIS1 WITH SELECTION-TABLE RSPARAMS AND RETURN.
ENDIF.
IF RB2 = 'X'.
WA_RSPARAMS-SELNAME = 'P_MATNR'. "PARAMETER or SELECT-OPTION of the called program
WA_RSPARAMS-KIND    = 'P'.       "S=Select-options P=Parameters
WA_RSPARAMS-SIGN    = 'I'.
WA_RSPARAMS-OPTION = 'EQ'.
WA_RSPARAMS-LOW     = '11010'.
WA_RSPARAMS-HIGH    = SPACE.
SUBMIT ZMIS2 WITH SELECTION-TABLE RSPARAMS AND RETURN.
ENDIF.
Thanks
Venkat.O

Develop a report program

Similar Messages

Maybe you are looking for