Using Formulas in Reports
Is there any way to create your own formula in Reporting instead of using the mathematical functions in the function drop down bar?
What Tool are you using
Interactive Reporting
Financial Reporting
WebAnalysis
Wayne Van Sluys
TopDown Consulting
Similar Messages
-
How to get unique Id's along with using a formula in Report
Hi,
I have data in the following format:
PO no Subfield Created date Changed date
123 A 01/01/2011 20/01/2011
123 B 01/01/2011 20/01/2011
124 A 01/01/2011 25/01/2011
124 B 01/01/2011 25/01/2011
I want to get unique number of PO's which has difference(changed date - created date) greater thn 20days and less thn 20days.
So I want to get in report:
PO no >20 <20
123 ____ 1
124 1 _____
I know to get unique PO number and how to calculate two dates difference in days by using formula variable replacement path.
But how to incorporate these two functions.
Edited by: SAP Consultant on Aug 14, 2011 8:34 AM
Edited by: SAP Consultant on Aug 14, 2011 8:35 AMHi,
This link will help you:----
Calculate difference of days between two dates
Regards,
Suman -
Formulas - Finding where used in a report
Does anyone know of a way to find where a formula is used within a report?
Including other formulas.when your in the report designed you can export the report to report definition.
you can see everything in the report. -
Can we use formula column in lexical parameter in sql query ...
hi
can we use formula column in lexical parameter in sql query ...
as example
i want to give
select * from & c_table
forumula
function c_table
if :p_sort = 1 then
return 'dept'
else
return 'emp'
end;
c_table formula column
is this possible ...
i have such example in oracle apps reports
if i try in ordinary report usinf emp table it show error ..
how we can give formula column...
please help me in this regard...
Edited by: 797525 on Feb 20, 2012 9:31 PMthanks sir,
iam not exactly saying select * from &c_table but some thing that like columns in select stmt also will be populated in user_parameters ,there are lot of table select.......from mtl_demand md, mtl_system_items msi, mtl_txn_source_types mtst, mtl_item_locations loc &C_source_from &C_from_cat
&c_source_from and &c_from_cat formula column and there are defined at report level only ......
pl/sql code &c_source_from is
function C_source_fromFormula return VARCHAR2 is
begin
if :P_source_type_id = 2 then return(',MTL_SALES_ORDERS mkts');
else if :P_source_type_id = 3 then return(',GL_CODE_COMBINATIONS gl');
else if :P_source_type_id = 6 then return(',MTL_GENERIC_DISPOSITIONS mdsp');
else if :P_source_type_id = 5 then
if :C_source_where is null then
return NULL;
else
return(',WIP_ENTITIES wip');
end if;
else if :P_source_type_id = 8 then return(',MTL_SALES_ORDERS mkts');
else if :P_source_type_id is null then
return(',MTL_SALES_ORDERS mkts,
MTL_GENERIC_DISPOSITIONS mdsp,
GL_CODE_COMBINATIONS gl ');
else null;
end if; end if; end if; end if; end if; end if;
RETURN NULL; end;
this is forumula column i hope that you understand what iam saying
please help me in this regard....
thanking you... -
How to use FORMULA in ABAP for calculation
hi all,
i have to do some calculation in my report and because of this reason i want to use formula. Could any body tell me the best way to use of formula for calculation purpose in ABAP or any other way?
Thansk,
abapfk
Moderator Message: You don't need to open a thread to know the answer for this basic question. A simple search or using ABAP Help will help in getting the answer.
Edited by: kishan P on Oct 4, 2010 11:20 AMThere is another option to do the same thing.
What can be done is, create running total. You can create running total from field explorer by right clicking and then new. Create Running Total Field dialog box appears. In that, provide the following:
i) Field to summarize - provide the field to maximize (i.e. id)
ii) Type of summary u2013 Maximum
iii) Evaluate u2013 On change of field (provide the name)
iv) Reset u2013 Never
Keep this Running total field on the details section and suppress if you do not want to show it in the details section. Place this field wherever you want in the report.
Hope this helps you. Let me know your comments. -
RE: What's database field are used in crystal report file?
Hi all
Please help me a C# code that using Crystall Report API (Crystal Report XI- Develop license) to get the list of database fieldname that using in crystal Report file. (What's database field using in header section ,group section , detail section of report.....)
We looking forward to hearing from you
Thanks
SonHello Son,
please use this code below to get a list of used database fields in a report :
//File Name: CS_Get_report_data_out_inproc.sln
//Created: April 11, 2008
//Author ID: FLI
//Purpose: This C# .NET sample Windows application demonstrates
// how to retrieve report data and put the into a XML file
// using unmanaged RAS.
// Note this is available without a dedicated RAS with SP2 for XI R2
using System;
using System.IO;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using CrystalDecisions.CrystalReports.Engine;
using CrystalDecisions.ReportAppServer.ClientDoc;
using CrystalDecisions.ReportAppServer.Controllers;
using CrystalDecisions.ReportAppServer.DataDefModel;
namespace CS_Get_report_data_out_inproc
public partial class Form1 : Form
// CR Declarations
ReportDocument boReportDocument;
ISCDReportClientDocument boReportClientDocument;
public Form1()
InitializeComponent();
//Create a new ReportDocument
boReportDocument = new ReportDocument();
// load the RPT file
boReportDocument.Load("..
ReportData.rpt");
// show in reportviewer
crystalReportViewer1.ReportSource = boReportDocument;
private void button1_Click(object sender, EventArgs e)
//Access the ReportClientDocument in the ReportDocument (EROM bridge)
boReportClientDocument = boReportDocument.ReportClientDocument;
// Retrieve the Rowset Controller
RowsetController boRowsetController = boReportClientDocument.RowsetController;
// Retrieve the metadata (column headers) - this allows you to only retrieve the data that is on the report.
RowsetMetaData boRowsetMetaData = new RowsetMetaData();
Fields boFields = boReportClientDocument.DataDefinition.ResultFields;
boRowsetMetaData.DataFields = boFields;
// Now print out the data in XML file
//(Note: This will print out the results of formulas too)
StreamWriter sw = new StreamWriter("C:
ReportData.xml", false);
sw.WriteLine("<?xml version='1.0' encoding='utf-8'?>");
sw.WriteLine("<ReportData>");
sw.WriteLine("<Reportheader>");
// Print out the titles
for (int i = 0; i < boFields.Count; i++)
String boFieldName = boFields<i>.Name;
sw.WriteLine("<ReportheaderDetail>" + boFieldName + "</ReportheaderDetail>");
sw.WriteLine("</Reportheader>");
//Create the cursor which lets us loop through the data
RowsetCursor boRowsetCursor = boRowsetController.CreateCursor(null, boRowsetMetaData, 1);
Record boRecord;
while (boRowsetCursor.IsEOF == false)
sw.WriteLine("<Customer>");
boRecord = boRowsetCursor.CurrentRecord;
for (int j = 0; j < boFields.Count; j++)
try
sw.WriteLine("<Detail>" + (String)boRecord[j].ToString() + "</Detail>");
catch (Exception err)
sw.WriteLine("<Error>" + err.Message + "</Error>");
sw.WriteLine("</Customer>");
boRowsetCursor.MoveNext();
sw.WriteLine("</ReportData>");
// CLose the file
sw.Close();
MessageBox.Show("XML File 'ReportData.xml' successfully created on C:"); -
PROBLEM EXPLANATION
Pretend that the attached excel file is a crystal report file
Column A is the details to be compared. Column B is the details that i will have to use a formula in sap crystal report.
as you can see cell B3 is same with the value in cell A2, B4 with A3, B5 with A4, B6 with A5 and so on.
How can i get the previous data of column A and put it in column B using formula in crystal report? either basic or crystal syntax
My Column
Colmun with formula
7000
0
7689
7000
9457
7689
8472
9457
2364
8472
12395
2364
18273
12395
84723
18273
57483
84723
493837
57483
2823747234
493837
226374
2823747234
7646363
226374
85826263
7646363
75756236324
85826263
1239534
75756236324
Message was edited by: Ludek UherHi,
Use the 'previous()' function.
Example:
Previous({Column A})
-Abhilash -
New column with formula in Report Painter - GRR2
Hi gurus,
I want to insert a new element in my new report painter created by GRR2. I took a standard report and I copied the report. I know how to insert a new element.
The problem is I want to choose the value of a field in PROJ table for create a formula in my report. The users insert a value in user-define fields of CJ20n, and i would like to choose this value for create a formula in my report.
Can I create a formula to take this value from the table PROJ? If I need to create a characteristic for choose this field, as I can create?
Thanks.Hi,
My question is:
Can i pick a value of a table (proj) for use in formula of report painter??
Many thanks.
Regards. -
How to apply condtion formula inside Report Writer and Report Painter
Hi anybody,
I am doing report painter. but i don't know how to include condition formula inside report painter or report writer. ex if condition ..
Anybody please explain to me the steps of report writer how do this.
I will appreciate goods answers to me.
thanks
Regards,
S.Muthu
Edited by: Subramaniyan Marimuthu on Jun 3, 2009 7:50 AMwww.virtuosollc.com/PDF/Get_Reporter.pdf
This is most useful PDF written by industry expert. This is more informative.
http://help.sap.com/saphelp_47x200/helpdata/en/66/bc7dc143c211d182b30000e829fbfe/frameset.htm
Regards,
Ravi -
Not getting data using FORMULA for GAIN and LOSS
Hi all,
I have made a code for my report in which i have to display GAIN or LOSS using formula as told by me is:
ANLCKANSW-ANLCKNAFA-ANLCNAFAG-ANEAERLBT
and for this purpose i have create an ITAB,the structure is that:
BEGIN OF GI_DETAIL OCCURS 0,
BUKRS LIKE ANEA-BUKRS,
ANLN1 LIKE ANEA-ANLN1,
ANLN2 LIKE ANEA-ANLN2,
GJAHR LIKE ANEA-GJAHR,
AFABE LIKE ANEA-AFABE,
KANSW LIKE ANLC-KANSW,"Asset Acquisation Value
KNAFA LIKE ANLC-KNAFA,"Accumalated Depreciation
NAFAG LIKE ANLC-NAFAG,"Ordinary Depreciation Posted
ERLBT LIKE ANEA-ERLBT,"Retirement Revenue
END OF GI_DETAIL.
This is my SELECTION criteria for FORM GET_DATA
SELECT kansw knafa nafag anea~ERLBT
INTO CORRESPONDING FIELDS OF TABLE gi_detail
FROM
ANLC
INNER JOIN ANEA ON
ANLC~BUKRS = ANEA~BUKRS AND
ANLC~ANLN1 = ANEA~ANLN1 AND
ANLC~ANLN2 = ANEA~ANLN2
WHERE ANLC~AFABE eq '01'.
and this is FORM Organize_Data
READ TABLE GI_DETAIL WITH KEY bukrs = gi_detail-bukrs
anln1 = gi_detail-anln1
anln2 = gi_detail-anln2.
gi_main-gain_loss = ( gi_detail-kansw - gi_detail-knafa ) - ( gi_detail-nafag - gi_detail-ERLBT ).
MOVE-CORRESPONDING gi_detail to gi_main.
Problem when i execute with debugger value are coming in my ITAB i-e GI_DETAIL but not displaying in my formula.I can't understand what is the problem in the code.
Thanks,
abapfkHI
before reading the table first check, it is balnk or not.
gi_main-gain_loss = ( gi_detail-kansw - gi_detail-knafa ) - ( gi_detail-nafag - gi_detail-ERLBT ).
MOVE-CORRESPONDING gi_detail to gi_main.
here you have appended the values in gi_main-gain_loss and after that you are moving the gi_detail table to gi_main so as per my knowledge it will overwrite the values in gi_main-gain_loss.
so you have to append the values from gi_detail to gi_main individually.
like:
gi_main-field1 = gi_detail-field1.
gi_main-field2 = gi_detail-field2.
and the append gi_main.
check in debugging whther the values coming correctly or not.
I hope this will work for you.
Thanks
Lalit Gupta -
Difference between two dates, using Variables in reporting
how to calculate the days difference between Delivery date and Billing date in reporting, using variables (SAP BW 3.5v)?
Hi,
If you want to do the arethmatioc operations with the date then you will have to declare the date as key figure in the cube and add it there and then update it with the date from R/3.
You can use formula variable for this subtraction.
Create a formula in the bex analyzer and then in the down you will get option for the formula varibale.Just make a replacement path varibale on this time characteristic for which yuou want subtraction.
During creation use "key" in the display and "number" as the data type.
If number is not working them you can use "date" type.
Nothing alse needs to be done during the variable creation.
Once you have made the formula inlcude it in the columns of the report.
Thanks -
Advantage of Using Quick Paint Reports
Hello
Can anyone please let me know what is the advantage of using quick Paint report.
Thanks
Regards
Ramesh Kumar SThis is more a designing/reporting question than an ETL/ODI question ;).
The advantage of the dimension is that you can select or aggregate data per month, year, weekends, quarters, day of week, ...
If you only keep the date you will have to had all these complex formula's in logical columns or calculated items (assuming you use OBIEE). Performances will be impacted and code will be duplicated at many locations.
Hope it answers the question.
Jerome -
The STOP statement was used outside a report flow.
Hi Gurus,
when i am executing this program it is going to short dump.
pls help me out.
thanks in advance.
Runtime Errors STOP_NO_REPORT
Date and Time 06.10.2008 12:10:06
Short text
The STOP statement was used outside a report flow.
What happened?
Error in the ABAP Application Program
The current ABAP program "YMRP0003" had to be terminated because it has
come across a statement that unfortunately cannot be executed.
What can you do?
Note down which actions and inputs caused the error.
To process the problem further, contact you SAP system
administrator.
Using Transaction ST22 for ABAP Dump Analysis, you can look
at and manage termination messages, and you can also
keep them for a long time.
Error analysis
The STOP statement is only useful in specific events of the report
processing (that is, the execution of a type 1 program). In this case,
there was no report flow, so the statement could not be executed.
How to correct the error
If the error occurred in your own ABAP program or in an SAP
program you modified, try to remove the error.
System environment
SAP-Release 700
Application server... "ciRDE"
Network address...... "10.131.28.7"
Operating system..... "HP-UX"
Release.............. "B.11.23"
Hardware type........ "ia64"
Character length.... 16 Bits
Pointer length....... 64 Bits
Work process number.. 3
Shortdump setting.... "full"
Database server... "hpx190"
Database type..... "ORACLE"
Database name..... "RDE"
Database user ID.. "SAPDAT"
Char.set.... "C"
SAP kernel....... 700
created (date)... "Apr 21 2008 20:48:34"
create on........ "HP-UX B.11.23 U ia64"
Database version. "OCI_102 (10.2.0.1.0) "
Patch level. 157
Patch text.. " "
Database............. "ORACLE 9.2.0.., ORACLE 10.1.0.., ORACLE 10.2.0.."
SAP database version. 700
Operating system..... "HP-UX B.11"
Memory consumption
Roll.... 16192
EM...... 8379680
Heap.... 0
Page.... 65536
MM Used. 3492016
MM Free. 695200
User and Transaction
Client.............. 050
User................ "MBAGGALA"
Language key........ "E"
Transaction......... "CC31 "
Transactions ID..... "48E9EB60C2944602E10000000A831C07"
Program............. "YMRP0003"
Screen.............. "SAPMC29C 0020"
Screen line......... 22
Information on where terminated
Termination occurred in the ABAP program "YMRP0003" - in "SCM-MRP-FSE-12_02".
The main program was "SAPMC29C ".
In the source code you have the termination point in line 138
of the (Include) program "YMRP0003".
Source Code Extract
Line
SourceCde
108
109
110
*This function module read the status of an object
111
112
CALL FUNCTION 'STATUS_TEXT_EDIT'
113
EXPORTING
114
client = sy-mandt
115
flg_user_stat = lc_flagx
116
objnr = ls_ecm_data-objnr
117
only_active = lc_flagx
118
spras = sy-langu
119
IMPORTING
120
line = lf_sttxt
121
user_line = lf_asttx
122
EXCEPTIONS
123
object_not_found = 1
124
OTHERS = 2.
125
126
CHECK NOT sy-tcode EQ 'CC32'.
127
*-- Begin of Changes made by DGupta1 on 07/12/2006--
128
Changes are made to update the Change Number Dates While Calling CC32
129
from custom transaction YC06 only
130
CHECK NOT sw_yc06 EQ 'X'.
131
*-- End of Changes made by DGupta1 on 07/12/2006--
132
133
CHECK NOT lf_sttxt CS 'ECCM' AND NOT lf_sttxt CS 'ECOR'.
134
135
136
IF ls_ecm_data-datuv NE lc_maxdate.
137
MESSAGE s011.
>>>>>
STOP.
139
ENDIF.
140
141
142
IF lf_lastd < lf_artwd.
143
MESSAGE s012.
144
STOP.
145
ENDIF.
146
147
IF ls_ecm_data-lvorm = lc_flagx.
148
MESSAGE s013.
149
STOP.
150
ENDIF.
151
152
WRITE: lf_lastd TO lf_lastd_string.
153
WRITE: lf_artwd TO lf_artwd_string.
154
155
156
IF ls_ecm_data-ccart NE lc_fixd.
157
Contents of system fields
Name
Val.
SY-SUBRC
0
SY-INDEX
0
SY-TABIX
0
SY-DBCNT
1
SY-FDPOS
40
SY-LSIND
0
SY-PAGNO
0
SY-LINNO
1
SY-COLNO
1
SY-PFKEY
ARC0H
SY-UCOMM
FCBU
SY-TITLE
Create ECR: Object Types
SY-MSGTY
S
SY-MSGID
YMRP
SY-MSGNO
011
SY-MSGV1
SY-MSGV2
SY-MSGV3
SY-MSGV4
SY-MODNO
0
SY-DATUM
20081006
SY-UZEIT
121006
SY-XPROG
SAPCNVE
SY-XFORM
CONVERSION_EXIT
Active Calls/Events
No. Ty. Program Include Line
Name
7 FORM YMRP0003 YMRP0003 138
SCM-MRP-FSE-12_02
6 FUNCTION SAPLXCCA ZXCCAU05 39
EXIT_SAPMC29C_005
5 FORM SAPMC29C MC29CFS1_SAVE_USER_EXIT 36
SAVE_USER_EXIT
4 FORM SAPMC29C MC29CFF2_FCODE_FCBU_EXECUTE 88
FCODE_FCBU_EXECUTE
3 FORM SAPMC29C MC29CFO1_OKCODE_CHECK 252
OKCODE_CHECK
2 MODULE (PAI) SAPMC29C MC29CI10_OKCODE 12
OKCODE
1 MODULE (PAI) SAPMC29C MC29CI10_DYNPRO_CALL 11
DYNPRO_CALL
Chosen variables
Name
Val.
No. 7 Ty. FORM
Name SCM-MRP-FSE-12_02
SY-REPID
YMRP0003
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
5455333322222222222222222222222222222222
9D20000300000000000000000000000000000000
SY-TCODE
CC31
00000000000000000000
00000000000000000000
44332222222222222222
33310000000000000000
SW_YC06
0
0
2
0
LF_STTXT
CRTD
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
4554222222222222222222222222222222222222
3244000000000000000000000000000000000000
SYST-REPID
YMRP0003
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
5455333322222222222222222222222222222222
9D20000300000000000000000000000000000000
LS_ECM_DATA-DATUV
20081006
00000000
00000000
33333333
20081006
LC_MAXDATE
29991231
00000000
00000000
33333333
29991231
%_PRINT
000 0###
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
2222333222222222222222222222222222222222222222222222222222222222222222222222222222222222223000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
SY-MSGID
YMRP
00000000000000000000
00000000000000000000
54552222222222222222
9D200000000000000000
LC_FLAGX
X
0
0
5
8
SPACE
0
0
2
0
SY-MSGNO
011
000
000
333
011
LC_ITEM
EUR_SCM-PUR-FSE-12_02
000000000000000000000
000000000000000000000
455554425552454233533
552F33DD052D635D12F02
SY-MSGV1
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
22222222222222222222222222222222222222222222222222
00000000000000000000000000000000000000000000000000
SY-MSGV2
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
22222222222222222222222222222222222222222222222222
00000000000000000000000000000000000000000000000000
SY-MSGV3
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
22222222222222222222222222222222222222222222222222
00000000000000000000000000000000000000000000000000
SY-MSGV4
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
22222222222222222222222222222222222222222222222222
00000000000000000000000000000000000000000000000000
LF_LASTD
00000000
00000000
00000000
33333333
00000000
LF_ARTWD
00000000
00000000
00000000
33333333
00000000
SY-SUBRC
0
0000
0000
No. 6 Ty. FUNCTION
Name EXIT_SAPMC29C_005
ECM_ALT_DATE
Table IT_665[0x202]
\FUNCTION=EXIT_SAPMC29C_005\DATA=ECM_ALT_DATE
Table reference: 113
TABH+ 0(20) = 0000000000000000000000000000000000000000
TABH+ 20(20) = 000000710000029900000000000000CAFFFFFFFF
TABH+ 40(16) = 040000DB000006200010249401800000
store = 0x0000000000000000
ext1 = 0x0000000000000000
shmId = 0 (0x00000000)
id = 113 (0x00000071)
label = 665 (0x00000299)
fill = 0 (0x00000000)
leng = 202 (0x000000CA)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000018
occu = 16 (0x00000010)
access = 1 (ItAccessStandard)
idxKind = 0 (ItIndexNone)
uniKind = 2 (ItUniqueNon)
keyKind = 1 (default)
cmpMode = 2 (cmpSingleMcmpR)
occu0 = 1
groupCntl = 0
rfc = 0
unShareable = 0
mightBeShared = 0
sharedWithShmTab = 0
isShmLockId = 0
gcKind = 0
isUsed = 1
isCtfyAble = 1
>>>>> Shareable Table Header Data <<<<<
tabi = Not allocated
pghook = Not allocated
idxPtr = Not allocated
shmTabhSet = Not allocated
id = Not allocated
refCount = Not allocated
tstRefCount = Not allocated
lineAdmin = Not allocated
lineAlloc = Not allocated
shmVersId = Not allocated
shmRefCount = Not allocated
shmIsReadOnly = Not allocated
>>>>> 1st level extension part <<<<<
regHook = Not allocated
collHook = Not allocated
ext2 = Not allocated
>>>>> 2nd level extension part <<<<<
tabhBack = Not allocated
delta_head = Not allocated
pb_func = Not allocated
pb_handle = Not allocated
ECM_DATA
050 01001020081006 00000000 00000000 dsfasdddffSS
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
3332222222222223333333333333322222222222233333333222222222222333333332222222222226766766666552
0500000000000000100102008100600000000000000000000000000000000000000000000000000004361344466330
ECM_EFFECTIVITY
Table IT_666[0x464]
\FUNCTION=EXIT_SAPMC29C_005\DATA=ECM_EFFECTIVITY
Table reference: 126
TABH+ 0(20) = 0000000000000000000000000000000000000000
TABH+ 20(20) = 0000007E0000029A00000000000001D0FFFFFFFF
TABH+ 40(16) = 040000DB000006800010249401800000
store = 0x0000000000000000
ext1 = 0x0000000000000000
shmId = 0 (0x00000000)
id = 126 (0x0000007E)
label = 666 (0x0000029A)
fill = 0 (0x00000000)
leng = 464 (0x000001D0)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000020
occu = 16 (0x00000010)
access = 1 (ItAccessStandard)
idxKind = 0 (ItIndexNone)
uniKind = 2 (ItUniqueNon)
keyKind = 1 (default)
cmpMode = 2 (cmpSingleMcmpR)
occu0 = 1
groupCntl = 0
rfc = 0
unShareable = 0
mightBeShared = 0
sharedWithShmTab = 0
isShmLockId = 0
gcKind = 0
isUsed = 1
isCtfyAble = 1
>>>>> Shareable Table Header Data <<<<<
tabi = Not allocated
pghook = Not allocated
idxPtr = Not allocated
shmTabhSet = Not allocated
id = Not allocated
refCount = Not allocated
tstRefCount = Not allocated
lineAdmin = Not allocated
lineAlloc = Not allocated
shmVersId = Not allocated
shmRefCount = Not allocated
shmIsReadOnly = Not allocated
>>>>> 1st level extension part <<<<<
regHook = Not allocated
collHook = Not allocated
ext2 = Not allocated
>>>>> 2nd level extension part <<<<<
tabhBack = Not allocated
delta_head = Not allocated
pb_func = Not allocated
pb_handle = Not allocated
ECM_HIERARCHY
Table IT_667[0x120]
\FUNCTION=EXIT_SAPMC29C_005\DATA=ECM_HIERARCHY
Table reference: 110
TABH+ 0(20) = 0000000000000000000000000000000000000000
TABH+ 20(20) = 0000006E0000029B0000000000000078FFFFFFFF
TABH+ 40(16) = 040000DB000006B00010249401800000
store = 0x0000000000000000
ext1 = 0x0000000000000000
shmId = 0 (0x00000000)
id = 110 (0x0000006E)
label = 667 (0x0000029B)
fill = 0 (0x00000000)
leng = 120 (0x00000078)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000021
occu = 16 (0x00000010)
access = 1 (ItAccessStandard)
idxKind = 0 (ItIndexNone)
uniKind = 2 (ItUniqueNon)
keyKind = 1 (default)
cmpMode = 2 (cmpSingleMcmpR)
occu0 = 1
groupCntl = 0
rfc = 0
unShareable = 0
mightBeShared = 0
sharedWithShmTab = 0
isShmLockId = 0
gcKind = 0
isUsed = 1
isCtfyAble = 1
>>>>> Shareable Table Header Data <<<<<
tabi = Not allocated
pghook = Not allocated
idxPtr = Not allocated
shmTabhSet = Not allocated
id = Not allocated
refCount = Not allocated
tstRefCount = Not allocated
lineAdmin = Not allocated
lineAlloc = Not allocated
shmVersId = Not allocated
shmRefCount = Not allocated
shmIsReadOnly = Not allocated
>>>>> 1st level extension part <<<<<
regHook = Not allocated
collHook = Not allocated
ext2 = Not allocated
>>>>> 2nd level extension part <<<<<
tabhBack = Not allocated
delta_head = Not allocated
pb_func = Not allocated
pb_handle = Not allocated
ECM_MNT_VALUE
0000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
2222222222222223333333333333333222222222222222222222222222222222222222222222222222222222222222
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
ECM_OBJMNGREC
Table IT_668[0x600]
\FUNCTION=EXIT_SAPMC29C_005\DATA=ECM_OBJMNGREC
Table reference: 107
TABH+ 0(20) = 0000000000000000000000000000000000000000
TABH+ 20(20) = 0000006B0000029C0000000000000258FFFFFFFF
TABH+ 40(16) = 040000DB000005C0001024C401800000
store = 0x0000000000000000
ext1 = 0x0000000000000000
shmId = 0 (0x00000000)
id = 107 (0x0000006B)
label = 668 (0x0000029C)
fill = 0 (0x00000000)
leng = 600 (0x00000258)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000016
occu = 16 (0x00000010)
access = 1 (ItAccessStandard)
idxKind = 0 (ItIndexNone)
uniKind = 2 (ItUniqueNon)
keyKind = 1 (default)
cmpMode = 8 (cmpManyEq)
occu0 = 1
groupCntl = 0
rfc = 0
unShareable = 0
mightBeShared = 0
sharedWithShmTab = 0
isShmLockId = 0
gcKind = 0
isUsed = 1
isCtfyAble = 1
>>>>> Shareable Table Header Data <<<<<
tabi = Not allocated
pghook = Not allocated
idxPtr = Not allocated
shmTabhSet = Not allocated
id = Not allocated
refCount = Not allocated
tstRefCount = Not allocated
lineAdmin = Not allocated
lineAlloc = Not allocated
shmVersId = Not allocated
shmRefCount = Not allocated
shmIsReadOnly = Not allocated
>>>>> 1st level extension part <<<<<
regHook = Not allocated
collHook = Not allocated
ext2 = Not allocated
>>>>> 2nd level extension part <<<<<
tabhBack = Not allocated
delta_head = Not allocated
pb_func = Not allocated
pb_handle = Not allocated
ECM_OBJ_TYPE
Table IT_669[28x192]
\FUNCTION=EXIT_SAPMC29C_005\DATA=ECM_OBJ_TYPE
Table reference: 116
TABH+ 0(20) = C0000009448BF3E0000000000000000000000000
TABH+ 20(20) = 000000740000029D0000001C000000C0FFFFFFFF
TABH+ 40(16) = 040000DB000005600010249421800000
store = 0xC0000009448BF3E0
ext1 = 0x0000000000000000
shmId = 0 (0x00000000)
id = 116 (0x00000074)
label = 669 (0x0000029D)
fill = 28 (0x0000001C)
leng = 192 (0x000000C0)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000014
occu = 16 (0x00000010)
access = 1 (ItAccessStandard)
idxKind = 0 (ItIndexNone)
uniKind = 2 (ItUniqueNon)
keyKind = 1 (default)
cmpMode = 2 (cmpSingleMcmpR)
occu0 = 1
groupCntl = 0
rfc = 0
unShareable = 0
mightBeShared = 1
sharedWithShmTab = 0
isShmLockId = 0
gcKind = 0
isUsed = 1
isCtfyAble = 1
>>>>> Shareable Table Header Data <<<<<
tabi = 0xC0000009448B8270
pgHook = 0xC0000009448BF440
idxPtr = 0x0000000000000000
shmTabhSet = 0x0000000000000000
id = 195 (0x000000C3)
refCount = 1 (0x00000001)
tstRefCount = 0 (0x00000000)
lineAdmin = 48 (0x00000030)
lineAlloc = 48 (0x00000030)
shmVersId = 0 (0x00000000)
shmRefCount = 2 (0x00000002)
>>>>> 1st level extension part <<<<<
regHook = Not allocated
collHook = Not allocated
ext2 = Not allocated
>>>>> 2nd level extension part <<<<<
tabhBack = Not allocated
delta_head = Not allocated
pb_func = Not allocated
pb_handle = Not allocated
TRANS_TYP
H
0
0
4
8
D_ASTTX
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
2222222222222222222222222222222222222222
0000000000000000000000000000000000000000
SY-REPID
SAPLXCCA
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
5454544422222222222222222222222222222222
310C833100000000000000000000000000000000
L_ITEM
EUR_SCM-MRP-FSE-12_02
000000000000000000000000000000
000000000000000000000000000000
455554424552454233533222222222
552F33DDD20D635D12F02000000000
LI_YBS00001
050EUR_SCM-MRP-FSE-12_02 YMRP0003 SCM-MRP-FSE-12_02
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
3334555544245524542335332222222225455333322222222222222222222222222222222544245524542335332222
050552F33DDD20D635D12F020000000009D2000030000000000000000000000000000000033DDD20D635D12F020000
SY-SUBRC
0
0000
0000
SYST
#######################(###############Z################################################XC####
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E000100
0000000000000000000000020000000000000005000000000100000000000000000000000000010900000001540000
0000000100000A0000000108010001000000000A0000000000000000000000000000000000000B000008000083000C
LI_YBS00001-REPORT
YMRP0003
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
5455333322222222222222222222222222222222
9D20000300000000000000000000000000000000
LI_YBS00001-FORM
SCM-MRP-FSE-12_02
000000000000000000000000000000
000000000000000000000000000000
544245524542335332222222222222
33DDD20D635D12F020000000000000
LS_YBS00001
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
2222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
LS_YBS00001-ENABLED
0
0
2
0
LS_YBS00001-REPORT
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
2222222222222222222222222222222222222222
0000000000000000000000000000000000000000
LS_YBS00001-FORM
000000000000000000000000000000
000000000000000000000000000000
222222222222222222222222222222
000000000000000000000000000000
SYST-REPID
SAPLXCCA
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
5454544422222222222222222222222222222222
310C833100000000000000000000000000000000
No. 5 Ty. FORM
Name SAVE_USER_EXIT
RET_CODE
0
0000
0000
SY-SUBRC
0
0000
0000
SY-MSGID
YMRP
00000000000000000000
00000000000000000000
54552222222222222222
9D200000000000000000
DARSTAB[]
Table[initial]
AEDTB[]
Table IT_650[0x202]
\PROGRAM=SAPMC29C\DATA=AEDTB[]
Table reference: 129
TABH+ 0(20) = 0000000000000000C000000944A25D7000000000
TABH+ 20(20) = 000000810000028A00000000000000CAFFFFFFFF
TABH+ 40(16) = 0400000000000EF00010249401800000
store = 0x0000000000000000
ext1 = 0xC000000944A25D70
shmId = 0 (0x00000000)
id = 129 (0x00000081)
label = 650 (0x0000028A)
fill = 0 (0x00000000)
leng = 202 (0x000000CA)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000065
occu = 16 (0x00000010)
access = 1 (ItAccessStandard)
idxKind = 0 (ItIndexNone)
uniKind = 2 (ItUniqueNon)
keyKind = 1 (default)
cmpMode = 2 (cmpSingleMcmpR)
occu0 = 1
groupCntl = 0
rfc = 0
unShareable = 0
mightBeShared = 0
sharedWithShmTab = 0
isShmLockId = 0
gcKind = 0
isUsed = 1
isCtfyAble = 1
>>>>> Shareable Table Header Data <<<<<
tabi = Not allocated
pghook = Not allocated
idxPtr = Not allocated
shmTabhSet = Not allocated
id = Not allocated
refCount = Not allocated
tstRefCount = Not allocated
lineAdmin = Not allocated
lineAlloc = Not allocated
shmVersId = Not allocated
shmRefCount = Not allocated
shmIsReadOnly = Not allocated
>>>>> 1st level extension part <<<<<
regHook = 0x0000000000000000
collHook = 0x0000000000000000
ext2 = 0xC000000944AFAD80
>>>>> 2nd level extension part <<<<<
tabhBack = 0xC000000944A23AF0
delta_head = 0000000000000000000000000000000000000000000000000000000000000000000000000000000
pb_func = 0x0000000000000000
pb_handle = 0x0000000000000000
CC07
000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000000000
222222222222222222222222222222222222222222222222222222222222222
000000000000000000000000000000000000000000000000000000000000000
AENRB
050 01001020081006 00000000 00000000 dsfasdddffSS
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
3332222222222223333333333333322222222222233333333222222222222333333332222222222226766766666552
0500000000000000100102008100600000000000000000000000000000000000000000000000000004361344466330
DARSTAB
00000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000
22222222222222222222222222222222222222222200
00000000000000000000000000000000000000000000
AEEFB[]
Table IT_651[0x464]
\PROGRAM=SAPMC29C\DATA=AEEFB[]
Table reference: 105
TABH+ 0(20) = 0000000000000000C000000944AFADF000000000
TABH+ 20(20) = 000000690000028B00000000000001D0FFFFFFFF
TABH+ 40(16) = 0400000000000F500010249401800000
store = 0x0000000000000000
ext1 = 0xC000000944AFADF0
shmId = 0 (0x00000000)
id = 105 (0x00000069)
label = 651 (0x0000028B)
fill = 0 (0x00000000)
leng = 464 (0x000001D0)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000067
occu = 16 (0x00000010)
access = 1 (ItAccessStandard)
idxKind = 0 (ItIndexNone)
uniKind = 2 (ItUniqueNon)
keyKind = 1 (default)
cmpMode = 2 (cmpSingleMcmpR)
occu0 = 1
groupCntl = 0
rfc = 0
unShareable = 0
mightBeShared = 0
sharedWithShmTab = 0
isShmLockId = 0
gcKind = 0
isUsed = 1
isCtfyAble = 1
>>>>> Shareable Table Header Data <<<<<
tabi = Not allocated
pghook = Not allocated
idxPtr = Not allocated
shmTabhSet = Not allocated
id = Not allocated
refCount = Not allocated
tstRefCount = Not allocated
lineAdmin = Not allocated
lineAlloc = Not allocated
shmVersId = Not allocated
shmRefCount = Not allocated
shmIsReadOnly = Not allocated
>>>>> 1st level extension part <<<<<
regHook = 0x0000000000000000
collHook = 0x0000000000000000
ext2 = 0xC0000009448F3220
>>>>> 2nd level extension part <<<<<
tabhBack = 0xC00000094482B060
delta_head = 0000000000000000000000000000000000000000000000000000000000000000000000000000000
pb_func = 0x0000000000000000
pb_handle = 0x0000000000000000
DCTAB[]
Table IT_35[7x16]
\PROGRAM=SAPMC29C\DATA=DCTAB[]
Table reference: 25
TABH+ 0(20) = C000000944921280000000000000000000000000
TABH+ 20(20) = 00000019000000230000000700000010FFFFFFFF
TABH+ 40(16) = 0400000000001BB00010249401800000
store = 0xC000000944921280
ext1 = 0x0000000000000000
shmId = 0 (0x00000000)
id = 25 (0x00000019)
label = 35 (0x00000023)
fill = 7 (0x00000007)
leng = 16 (0x00000010)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000133
occu = 16 (0x00000010)
access = 1 (ItAccessStandard)
idxKind = 0 (ItIndexNone)
uniKind = 2 (ItUniqueNon)Dear Rajesh!
Please advise me, what have you done to resolve your problem!!??
I get next problem when i try to start some transaction:
Short text
Syntax error in program "SAPLPA_PACKAGE_SERVICES ".
What happened?
Error in the ABAP Application Program
The current ABAP program "SAPLSFW_COMMON" had to be terminated because it has
come across a statement that unfortunately cannot be executed.
The following syntax error occurred in program "SAPLPA_PACKAGE_SERVICES " in
include "LPA_PACKAGE_SERVICES$25 " in
line 13:
"The type "TPCHK_FROZEN_OBJECTS_H" is unknown."
The include has been created and last changed by:
Created by: "SAP "
Last changed by: "SAP "
Error in the ABAP Application Program
The current ABAP program "SAPLSFW_COMMON" had to be terminated because it has
come across a statement that unfortunately cannot be executed.
Error analysis
The following syntax error was found in the program SAPLPA_PACKAGE_SERVICES :
"The type "TPCHK_FROZEN_OBJECTS_H" is unknown."
Trigger Location of Runtime Error
Program SAPLSFW_COMMON
Include LSFW_COMMONU01
Row 117
Module type (FUNCTION)
Module Name SFW_GET_SWITCHPOS
Source Code Extract
Line
SourceCde
87
IF sy-subrc = 0.
88
<fs_switchpos>-switch_id = devc_resultline-switch_id .
89
<fs_switchpos>-state = devc_resultline-state .
90
<fs_switchpos>-text = devc_resultline-text .
91
92
INSERT <fs_switchpos> INTO TABLE resulttab. "Ergebnis merken
93
CONTINUE.
94
ENDIF.
95
96
97
READ TABLE gt_sfw_package INTO wa_sfw_package WITH TABLE KEY
98
devclass = lf_devclass
99
version = 'A' .
100
101
IF sy-subrc = 0. "Objekt ist in einem Paket mit Schalter
102
<fs_switchpos>-switch_id = wa_sfw_package-switch_id .
103
104
ELSE. "gucken, ob es sich um geschachtelte Pakete handelt
105
106
DO 20 TIMES.
107
108
CLEAR wa_superpackage .
109
110
READ TABLE gt_superpackage INTO wa_superpackage WITH TABLE KEY
111
devclass = lf_devclass.
112
113
IF sy-subrc = 0 .
114
lf_superpackage = wa_superpackage-parentcl.
115
ELSE.
116
>>>>>
CALL FUNCTION 'PA_GET_SUPER_PACKAGE_NAME'
118
EXPORTING
119
i_package_name = lf_devclass
120
i_direct_select = 'X'
121
IMPORTING
122
e_super_package_name = lf_superpackage.
123
124
125
wa_superpackage-devclass = lf_devclass .
126
wa_superpackage-parentcl = lf_superpackage .
127
INSERT wa_superpackage INTO TABLE gt_superpackage .
128
129
ENDIF.
130
131
IF lf_superpackage = space .
132
<fs_switchpos>-state = space .
133
<fs_switchpos>-switch_id = space .
134
EXIT. "Enstation !
135
ELSE .
136 -
Materialized view not being used in the report
I have had a materialized view (MV) for a particular report. Recently, the report definition has changed little bit, so the existing MV is not being used by the report anymore. I copied the code Discoverer's SQL Inspection and recreated the materialized view. But still it is not working. Obviously, I am missing something at the database level. Does anyone have any idea? The database is 9i and Discoverer is 9.0.2. Thank you!
The SQL that you see from the Inspect SQL option will provide you with the SQL that Discoverer sends to the database. The database then may do a query rewrite to point to an available materialized view if available. This rewrite won't be seen from the inspect sql option. You need to check at the database level to verify if a query rewrite did in fact take place.
You may want to check the section titled "Query Rewrite with Materialized Views" from Ch1 - "Introduction to the Optimizer" in the Oracle9i Database Performance Tuning Guide and Reference, Release 2 (9.2), Part Number A96533-02, available at http://download-uk.oracle.com/docs/cd/B10501_01/server.920/a96533/optimops.htm#37287
Regards
Abhinav Agarwal
Oracle Business Intelligence Product Management
http://www.oracle.com/bi
http://www.oracle.com/technology/documentation/bi_ee.html
http://www.oracle.com/technology/software/products/ias/htdocs/101320bi.html
http://oraclebi.blogspot.com/ -
What is vendor performance report what are the fields using in the report
What is vendor performance report what are the fields using in the report and i need some sample reports for that particular topic (clasical report)not using any alvs or any advance topics.
U R Satish Patnaikhi
good
*"Table declarations...................................................
TABLES:
EKKO, " Purchasing Document Header
CDHDR, " Change document header
SSCRFIELDS. " Fields on selection screens
*"Selection screen elements............................................
SELECT-OPTIONS:
S_EBELN FOR EKKO-EBELN, " Purchasing Document Number
S_LIFNR FOR EKKO-LIFNR, " Vendor's account number
S_EKGRP FOR EKKO-EKGRP, " Purchasing group
S_BEDAT FOR EKKO-BEDAT, " Purchasing Document Date
S_UDATE FOR CDHDR-UDATE. " Creation date of the change
" document
*" Data declarations...................................................
Field String to hold Purchase Document Number *
DATA:
BEGIN OF FS_EBELN,
EBELN(90) TYPE C, " Purchase Document Number
ERNAM TYPE EKKO-ERNAM, " Name of Person who Created
" the Object
LIFNR TYPE EKKO-LIFNR, " Vendor's account number
EKGRP TYPE EKKO-EKGRP, " Purchasing group
BEDAT TYPE EKKO-BEDAT, " Purchasing Document Date
END OF FS_EBELN,
Field String to hold Purchase Document Header *
BEGIN OF FS_EKKO,
EBELN TYPE EKKO-EBELN, " Purchasing Document Number
ERNAM TYPE EKKO-ERNAM, " Name of Person who Created the
" Object
LIFNR TYPE EKKO-LIFNR, " Vendor's account number
EKGRP TYPE EKKO-EKGRP, " Purchasing group
BEDAT TYPE EKKO-BEDAT, " Purchasing Document Date
END OF FS_EKKO,
Field String to hold Account Number and name of the Vendor *
BEGIN OF FS_LFA1,
LIFNR TYPE LFA1-LIFNR, " Account Number of Vendor
NAME1 TYPE LFA1-NAME1, " Name1
END OF FS_LFA1,
Field String to hold Change date and the name of the user *
BEGIN OF FS_CDHDR,
OBJECTCLAS TYPE CDHDR-OBJECTCLAS, " Object Class
OBJECTID TYPE CDHDR-OBJECTID, " Object value
CHANGENR TYPE CDHDR-CHANGENR, " Document change number
USERNAME TYPE CDHDR-USERNAME, " User name
UDATE TYPE CDHDR-UDATE, " Creation date of the change
" document
END OF FS_CDHDR,
Field String to hold Change document items *
BEGIN OF FS_CDPOS,
OBJECTCLAS TYPE CDPOS-OBJECTCLAS," Object class
OBJECTID(10) TYPE C, " Object Value
CHANGENR TYPE CDPOS-CHANGENR, " Document change number
TABNAME TYPE CDPOS-TABNAME, " Table Name
FNAME TYPE CDPOS-FNAME, " Field Name
VALUE_NEW TYPE CDPOS-VALUE_NEW, " New contents of changed field
VALUE_OLD TYPE CDPOS-VALUE_OLD, " Old contents of changed field
END OF FS_CDPOS,
Field String to hold Date Element Name *
BEGIN OF FS_DATAELE,
TABNAME TYPE DD03L-TABNAME, " Table Name
FIELDNAME TYPE DD03L-FIELDNAME, " Field Name
ROLLNAME TYPE DD03L-ROLLNAME, " Data element (semantic domain)
END OF FS_DATAELE,
Field String to hold Short Text of the Date Element *
BEGIN OF FS_TEXT,
ROLLNAME TYPE DD04T-ROLLNAME, " Data element (semantic domain)
DDTEXT TYPE DD04T-DDTEXT, " Short Text Describing R/3
" Repository Objects
END OF FS_TEXT,
Field String to hold data to be displayed on the ALV grid *
BEGIN OF FS_OUTTAB,
EBELN TYPE EKKO-EBELN, " Purchasing Document Number
ERNAM TYPE EKKO-ERNAM, " Name of Person who Created the
" Object
LIFNR TYPE EKKO-LIFNR, " Vendor's account number
EKGRP TYPE EKKO-EKGRP, " Purchasing group
BEDAT TYPE EKKO-BEDAT, " Purchasing Document Date
WERKS TYPE LFA1-WERKS, " Plant
NAME1 TYPE LFA1-NAME1, " Name1
USERNAME TYPE CDHDR-USERNAME, " User name
UDATE TYPE CDHDR-UDATE, " Creation date of the change
" document
DDTEXT TYPE DD04T-DDTEXT, " Short Text Describing R/3
" Repository Objects
VALUE_NEW TYPE CDPOS-VALUE_NEW, " New contents of changed field
VALUE_OLD TYPE CDPOS-VALUE_OLD, " Old contents of changed field
END OF FS_OUTTAB,
Internal table to hold Purchase Document Number *
T_EBELN LIKE STANDARD TABLE
OF FS_EBELN,
Internal table to hold Purchase Document Header *
T_EKKO LIKE STANDARD TABLE
OF FS_EKKO,
Temp Internal table to hold Purchase Document Header *
T_EKKO_TEMP LIKE STANDARD TABLE
OF FS_EKKO,
Internal table to hold Account number and Name of the Vendor *
T_LFA1 LIKE STANDARD TABLE
OF FS_LFA1,
Internal Table to hold Change date and the name of the user *
T_CDHDR LIKE STANDARD TABLE
OF FS_CDHDR,
Internal Table to hold Change document items *
T_CDPOS LIKE STANDARD TABLE
OF FS_CDPOS,
Temp. Internal Table to hold Change document items *
T_CDPOS_TEMP LIKE STANDARD TABLE
OF FS_CDPOS,
Internal Table to hold Data Element Name *
T_DATAELE LIKE STANDARD TABLE
OF FS_DATAELE,
Temp. Internal Table to hold Data Element Name *
T_DATAELE_TEMP LIKE STANDARD TABLE
OF FS_DATAELE,
Internal Table to hold Short Text of the Date Element *
T_TEXT LIKE STANDARD TABLE
OF FS_TEXT,
Internal Table to hold data to be displayed on the ALV grid *
T_OUTTAB LIKE STANDARD TABLE
OF FS_OUTTAB.
C L A S S D E F I N I T I O N *
CLASS LCL_EVENT_HANDLER DEFINITION DEFERRED.
*" Data declarations...................................................
Work variables *
DATA:
W_EBELN TYPE EKKO-EBELN, " Purchasing Document Number
W_LIFNR TYPE EKKO-LIFNR, " Vendor's account number
W_EKGRP TYPE EKKO-EKGRP, " Purchasing group
W_VALUE TYPE EKKO-EBELN, " Reflected Value
W_SPACE VALUE ' ', " Space
W_FLAG TYPE I, " Flag Variable
W_VARIANT TYPE DISVARIANT, " Variant
*--- ALV Grid
W_GRID TYPE REF TO CL_GUI_ALV_GRID,
*--- Event Handler
W_EVENT_CLICK TYPE REF TO LCL_EVENT_HANDLER,
*--- Field catalog table
T_FIELDCAT TYPE LVC_T_FCAT.
AT SELECTION-SCREEN EVENT *
AT SELECTION-SCREEN ON S_EBELN.
Subroutine to validate Purchase Document Number.
PERFORM VALIDATE_PD_NUM.
AT SELECTION-SCREEN ON S_LIFNR.
Subroutine to validate Vendor Number.
PERFORM VALIDATE_VEN_NUM.
AT SELECTION-SCREEN ON S_EKGRP.
Subroutine to validate Purchase Group.
PERFORM VALIDATE_PUR_GRP.
START-OF-SELECTION EVENT *
START-OF-SELECTION.
Subroutine to select all Purchase orders.
PERFORM SELECT_PO.
CHECK W_FLAG EQ 0.
Subroutine to select Object values.
PERFORM SELECT_OBJ_ID.
CHECK W_FLAG EQ 0.
Subroutine to select Changed values.
PERFORM SELECT_CHANGED_VALUE.
CHECK W_FLAG EQ 0.
Subroutine to Select Purchase Orders.
PERFORM SELECT_PUR_DOC.
Subroutine to select Vendor Details.
PERFORM SELECT_VENDOR.
Subroutine to select Text for the Changed values.
PERFORM DESCRIPTION.
END-OF-SELECTION EVENT *
END-OF-SELECTION.
IF NOT T_EKKO IS INITIAL.
Subroutine to populate the Output Table.
PERFORM FILL_OUTTAB.
Subroutine to build Field Catalog.
PERFORM PREPARE_FIELD_CATALOG CHANGING T_FIELDCAT.
CALL SCREEN 100.
ENDIF. " IF NOT T_EKKO...
CLASS LCL_EVENT_HANDLER DEFINITION
Defining Class which handles events
CLASS LCL_EVENT_HANDLER DEFINITION .
PUBLIC SECTION .
METHODS:
HANDLE_HOTSPOT_CLICK
FOR EVENT HOTSPOT_CLICK OF CL_GUI_ALV_GRID
IMPORTING E_ROW_ID E_COLUMN_ID.
ENDCLASS. " LCL_EVENT_HANDLER DEFINITION
CLASS LCL_EVENT_HANDLER IMPLEMENTATION
Implementing the Class which can handle events
CLASS LCL_EVENT_HANDLER IMPLEMENTATION .
*---Handle Double Click
METHOD HANDLE_HOTSPOT_CLICK .
Subroutine to get the HotSpot Cell information.
PERFORM GET_CELL_INFO.
SET PARAMETER ID 'BES' FIELD W_VALUE.
CALL TRANSACTION 'ME23N'.
ENDMETHOD. " HANDLE_HOTSPOT_CLICK
ENDCLASS. " LCL_EVENT_HANDLER
*& Module STATUS_0100 OUTPUT
PBO Event
MODULE STATUS_0100 OUTPUT.
SET PF-STATUS 'OOPS'.
SET TITLEBAR 'TIT'.
Subroutine to fill the Variant Structure
PERFORM FILL_VARIANT.
IF W_GRID IS INITIAL.
CREATE OBJECT W_GRID
EXPORTING
I_SHELLSTYLE = 0
I_LIFETIME =
I_PARENT = CL_GUI_CONTAINER=>SCREEN0
I_APPL_EVENTS =
I_PARENTDBG =
I_APPLOGPARENT =
I_GRAPHICSPARENT =
I_NAME =
I_FCAT_COMPLETE = SPACE
EXCEPTIONS
ERROR_CNTL_CREATE = 1
ERROR_CNTL_INIT = 2
ERROR_CNTL_LINK = 3
ERROR_DP_CREATE = 4
OTHERS = 5.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF. " IF SY-SUBRC <> 0
CALL METHOD W_GRID->SET_TABLE_FOR_FIRST_DISPLAY
EXPORTING
I_BUFFER_ACTIVE =
I_BYPASSING_BUFFER =
I_CONSISTENCY_CHECK =
I_STRUCTURE_NAME =
IS_VARIANT = W_VARIANT
I_SAVE = 'A'
I_DEFAULT = 'X'
IS_LAYOUT =
IS_PRINT =
IT_SPECIAL_GROUPS =
IT_TOOLBAR_EXCLUDING =
IT_HYPERLINK =
IT_ALV_GRAPHICS =
IT_EXCEPT_QINFO =
IR_SALV_ADAPTER =
CHANGING
IT_OUTTAB = T_OUTTAB
IT_FIELDCATALOG = T_FIELDCAT
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. " IF SY-SUBRC <> 0.
ENDIF. " IF W_GRID IS INITIAL
CREATE OBJECT W_EVENT_CLICK.
SET HANDLER W_EVENT_CLICK->HANDLE_HOTSPOT_CLICK FOR W_GRID.
ENDMODULE. " STATUS_0100 OUTPUT
*& Module USER_COMMAND_0100 INPUT
PAI Event
MODULE USER_COMMAND_0100 INPUT.
CASE SY-UCOMM.
WHEN 'BACK'.
LEAVE TO SCREEN 0.
WHEN 'EXIT'.
LEAVE PROGRAM.
WHEN 'CANCEL'.
LEAVE TO SCREEN 0.
ENDCASE.
ENDMODULE. " USER_COMMAND_0100 INPUT
*& Form PREPARE_FIELD_CATALOG
Subroutine to build the Field catalog
<--P_T_FIELDCAT Field Catalog Table
FORM PREPARE_FIELD_CATALOG CHANGING PT_FIELDCAT TYPE LVC_T_FCAT .
DATA LS_FCAT TYPE LVC_S_FCAT.
Purchasing group...
LS_FCAT-FIELDNAME = 'EKGRP'.
LS_FCAT-REF_TABLE = 'EKKO'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Purchasing Document Number...
LS_FCAT-FIELDNAME = 'EBELN'.
LS_FCAT-REF_TABLE = 'EKKO' .
LS_FCAT-EMPHASIZE = 'C411'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
LS_FCAT-HOTSPOT = 'X'.
APPEND LS_FCAT TO PT_FIELDCAT .
CLEAR LS_FCAT .
Name of Person who Created the Object...
LS_FCAT-FIELDNAME = 'ERNAM'.
LS_FCAT-REF_TABLE = 'EKKO'.
LS_FCAT-OUTPUTLEN = '15' .
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Purchasing Document Date...
LS_FCAT-FIELDNAME = 'BEDAT'.
LS_FCAT-REF_TABLE = 'EKKO'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Vendor's account number...
LS_FCAT-FIELDNAME = 'LIFNR'.
LS_FCAT-REF_TABLE = 'EKKO'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Account Number of Vendor or Creditor...
LS_FCAT-FIELDNAME = 'NAME1'.
LS_FCAT-REF_TABLE = 'LFA1'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
LS_FCAT-COLTEXT = 'Vendor Name'(001).
LS_FCAT-SELTEXT = 'Vendor Name'(001).
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Creation date of the change document...
LS_FCAT-FIELDNAME = 'UDATE'.
LS_FCAT-REF_TABLE = 'CDHDR'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
LS_FCAT-COLTEXT = 'Change Date'(002).
LS_FCAT-SELTEXT = 'Change Date'(002).
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
User name of the person responsible in change document...
LS_FCAT-FIELDNAME = 'USERNAME'.
LS_FCAT-REF_TABLE = 'CDHDR'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
LS_FCAT-COLTEXT = 'Modified by'(003).
LS_FCAT-SELTEXT = 'Modified by'(003).
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Short Text Describing R/3 Repository Objects...
LS_FCAT-FIELDNAME = 'DDTEXT'.
LS_FCAT-REF_TABLE = 'DD04T'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '15'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Old contents of changed field...
LS_FCAT-FIELDNAME = 'VALUE_OLD'.
LS_FCAT-REF_TABLE = 'CDPOS'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '12'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
New contents of changed field...
LS_FCAT-FIELDNAME = 'VALUE_NEW'.
LS_FCAT-REF_TABLE = 'CDPOS'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '12'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
ENDFORM. " PREPARE_FIELD_CATALOG
*& Form SELECT_PO
Subroutine to select all the Purchase Orders
There are no interface parameters to be passed to this subroutine.
FORM SELECT_PO .
SELECT EBELN " Purchasing Document Number
ERNAM " Name of Person who Created
" the Object
LIFNR " Vendor's account number
EKGRP " Purchasing group
BEDAT " Purchasing Document Date
FROM EKKO
PACKAGE SIZE 10000
APPENDING TABLE T_EBELN
WHERE EBELN IN S_EBELN
AND BEDAT IN S_BEDAT.
ENDSELECT.
IF SY-SUBRC NE 0.
W_FLAG = 1.
MESSAGE S401(M8).
ENDIF. " IF SY-SUBRC NE 0
ENDFORM. " SELECT_PO
*& Form SELECT_OBJ_ID
Subroutine to select Object ID
There are no interface parameters to be passed to this subroutine.
FORM SELECT_OBJ_ID .
IF NOT T_EBELN IS INITIAL.
SELECT OBJECTCLAS " Object Class
OBJECTID " Object value
CHANGENR " Document change number
USERNAME " User name
UDATE " Creation date
FROM CDHDR
INTO TABLE T_CDHDR
FOR ALL ENTRIES IN T_EBELN
WHERE OBJECTID EQ T_EBELN-EBELN
AND UDATE IN S_UDATE
AND TCODE IN ('ME21N','ME22N','ME23N').
ENDSELECT.
IF SY-SUBRC NE 0.
W_FLAG = 1.
MESSAGE S833(M8) WITH 'Header Not Found'(031).
ENDIF. " IF SY-SUBRC NE 0.
ENDIF. " IF NOT T_EBELN IS INITIAL
ENDFORM. " SELECT_OBJ_ID
*& Form SELECT_CHANGED_VALUE
Subroutine to select Changed Values
There are no interface parameters to be passed to this subroutine.
FORM SELECT_CHANGED_VALUE .
IF NOT T_CDHDR IS INITIAL.
SELECT OBJECTCLAS " Object class
OBJECTID " Object value
CHANGENR " Document change number
TABNAME " Table Name
FNAME " Field Name
VALUE_NEW " New contents of changed field
VALUE_OLD " Old contents of changed field
FROM CDPOS
PACKAGE SIZE 10000
APPENDING TABLE T_CDPOS
FOR ALL ENTRIES IN T_CDHDR
WHERE OBJECTCLAS EQ T_CDHDR-OBJECTCLAS
AND OBJECTID EQ T_CDHDR-OBJECTID
AND CHANGENR EQ T_CDHDR-CHANGENR.
ENDSELECT.
IF SY-SUBRC NE 0.
W_FLAG = 1.
MESSAGE S833(M8) WITH 'Item Not Found'(032).
ENDIF. " IF SY-SUBRC NE 0.
ENDIF. " IF NOT T_CDHDR IS INITIAL
T_CDPOS_TEMP[] = T_CDPOS[].
ENDFORM. " SELECT_CHANGED_VALUE
*& Form SELECT_PUR_DOC
Subroutine to select Purchase Order Details
There are no interface parameters to be passed to this subroutine.
FORM SELECT_PUR_DOC .
IF NOT T_CDPOS IS INITIAL.
SORT T_EBELN BY EBELN.
LOOP AT T_CDPOS INTO FS_CDPOS.
READ TABLE T_EBELN INTO FS_EBELN WITH KEY EBELN =
FS_CDPOS-OBJECTID BINARY SEARCH.
IF SY-SUBRC NE 0.
DELETE TABLE T_EBELN FROM FS_EBELN.
ENDIF. " IF SY-SUBRC NE 0.
ENDLOOP. " LOOP AT T_CDPOS...
LOOP AT T_EBELN INTO FS_EBELN.
MOVE FS_EBELN-EBELN TO FS_EKKO-EBELN.
MOVE FS_EBELN-ERNAM TO FS_EKKO-ERNAM.
MOVE FS_EBELN-LIFNR TO FS_EKKO-LIFNR.
MOVE FS_EBELN-EKGRP TO FS_EKKO-EKGRP.
MOVE FS_EBELN-BEDAT TO FS_EKKO-BEDAT.
APPEND FS_EKKO TO T_EKKO.
ENDLOOP. " LOOP AT T_EBELN...
T_EKKO_TEMP[] = T_EKKO[].
ENDIF. " IF NOT T_CDPOS IS INITIAL
ENDFORM. " SELECT_PUR_DOC
*& Form SELECT_VENDOR
Subroutine to select Vendor details
There are no interface parameters to be passed to this subroutine.
FORM SELECT_VENDOR .
IF NOT T_EKKO IS INITIAL.
SORT T_EKKO_TEMP BY LIFNR.
DELETE ADJACENT DUPLICATES FROM T_EKKO_TEMP COMPARING LIFNR.
SELECT LIFNR " Account Number of Vendor or
" Creditor
NAME1 " Name 1
FROM LFA1
INTO TABLE T_LFA1
FOR ALL ENTRIES IN T_EKKO_TEMP
WHERE LIFNR EQ T_EKKO_TEMP-LIFNR.
IF SY-SUBRC NE 0.
MESSAGE S002(M8) WITH 'Master Details'(033).
ENDIF. " IF SY-SUBRC NE 0.
ENDIF. " IF NOT T_EKKO IS INITIAL
ENDFORM. " SELECT_VENDOR
*& Form DESCRIPTION
Subroutine to get the description
There are no interface parameters to be passed to this subroutine.
FORM DESCRIPTION .
IF NOT T_CDPOS IS INITIAL.
SORT T_CDPOS_TEMP BY TABNAME FNAME.
DELETE ADJACENT DUPLICATES FROM T_CDPOS_TEMP COMPARING TABNAME FNAME
SELECT TABNAME " Table Name
FIELDNAME " Field Name
ROLLNAME " Data element
FROM DD03L
INTO TABLE T_DATAELE
FOR ALL ENTRIES IN T_CDPOS_TEMP
WHERE TABNAME EQ T_CDPOS_TEMP-TABNAME
AND FIELDNAME EQ T_CDPOS_TEMP-FNAME.
IF NOT T_DATAELE IS INITIAL.
T_DATAELE_TEMP[] = T_DATAELE[].
SORT T_DATAELE_TEMP BY ROLLNAME.
DELETE ADJACENT DUPLICATES FROM T_DATAELE_TEMP COMPARING ROLLNAME.
SELECT ROLLNAME " Data element
DDTEXT " Short Text Describing R/3
" Repository Objects
FROM DD04T
INTO TABLE T_TEXT
FOR ALL ENTRIES IN T_DATAELE_TEMP
WHERE ROLLNAME EQ T_DATAELE_TEMP-ROLLNAME
AND DDLANGUAGE EQ SY-LANGU.
IF SY-SUBRC NE 0.
EXIT.
ENDIF. " IF SY-SUBRC NE 0.
ENDIF. " IF NOT T_DATAELE IS INITIAL.
ENDIF. " IF NOT T_CDPOS IS INITIAL.
ENDFORM. " DESCRIPTION
*& Form FILL_OUTTAB
Subroutine to populate the Outtab
There are no interface parameters to be passed to this subroutine.
FORM FILL_OUTTAB .
SORT T_CDHDR BY OBJECTCLAS OBJECTID CHANGENR.
SORT T_EKKO BY EBELN.
SORT T_LFA1 BY LIFNR.
SORT T_DATAELE BY TABNAME FIELDNAME.
SORT T_TEXT BY ROLLNAME.
LOOP AT T_CDPOS INTO FS_CDPOS.
READ TABLE T_CDHDR INTO FS_CDHDR WITH KEY
OBJECTCLAS = FS_CDPOS-OBJECTCLAS
OBJECTID = FS_CDPOS-OBJECTID
CHANGENR = FS_CDPOS-CHANGENR
BINARY SEARCH.
IF SY-SUBRC EQ 0.
MOVE FS_CDHDR-USERNAME TO FS_OUTTAB-USERNAME.
MOVE FS_CDHDR-UDATE TO FS_OUTTAB-UDATE.
READ TABLE T_EKKO INTO FS_EKKO WITH KEY
EBELN = FS_CDHDR-OBJECTID
BINARY SEARCH.
IF SY-SUBRC EQ 0.
MOVE FS_EKKO-EBELN TO FS_OUTTAB-EBELN.
MOVE FS_EKKO-ERNAM TO FS_OUTTAB-ERNAM.
MOVE FS_EKKO-LIFNR TO FS_OUTTAB-LIFNR.
MOVE FS_EKKO-EKGRP TO FS_OUTTAB-EKGRP.
MOVE FS_EKKO-BEDAT TO FS_OUTTAB-BEDAT.
READ TABLE T_LFA1 INTO FS_LFA1 WITH KEY
LIFNR = FS_EKKO-LIFNR
BINARY SEARCH.
IF SY-SUBRC EQ 0.
MOVE FS_LFA1-NAME1 TO FS_OUTTAB-NAME1.
ENDIF. " IF SY-SUBRC EQ 0.
ENDIF. " IF SY-SUBRC EQ 0.
ENDIF. " IF SY-SUBRC EQ 0.
MOVE FS_CDPOS-VALUE_NEW TO FS_OUTTAB-VALUE_NEW.
MOVE FS_CDPOS-VALUE_OLD TO FS_OUTTAB-VALUE_OLD.
READ TABLE T_DATAELE INTO FS_DATAELE WITH KEY
TABNAME = FS_CDPOS-TABNAME
FIELDNAME = FS_CDPOS-FNAME
BINARY SEARCH.
IF SY-SUBRC EQ 0.
READ TABLE T_TEXT INTO FS_TEXT WITH KEY
ROLLNAME = FS_DATAELE-ROLLNAME
BINARY SEARCH.
IF SY-SUBRC EQ 0.
MOVE FS_TEXT-DDTEXT TO FS_OUTTAB-DDTEXT.
ENDIF. " IF SY-SUBRC EQ 0.
ENDIF. " IF SY-SUBRC EQ 0.
APPEND FS_OUTTAB TO T_OUTTAB.
CLEAR FS_OUTTAB.
ENDLOOP.
ENDFORM. " FILL_OUTTAB
*& Form GET_CELL_INFO
Subroutine to get the Cell Information
--> W_VALUE Holds the value of Hotspot clicked
FORM GET_CELL_INFO .
CALL METHOD W_GRID->GET_CURRENT_CELL
IMPORTING
E_ROW =
E_VALUE = W_VALUE
E_COL =
ES_ROW_ID =
ES_COL_ID =
ES_ROW_NO =
ENDFORM. " GET_CELL_INFO
*& Form VALIDATE_PD_NUM
Subroutine to validate Purchase Document Number
There are no interface parameters to be passed to this subroutine.
FORM VALIDATE_PD_NUM .
IF NOT S_EBELN[] IS INITIAL.
SELECT EBELN " Purchase Document Number
FROM EKKO
INTO W_EBELN
UP TO 1 ROWS
WHERE EBELN IN S_EBELN.
ENDSELECT.
IF SY-SUBRC NE 0.
CLEAR SSCRFIELDS-UCOMM.
MESSAGE E717(M8).
ENDIF. " IF SY-SUBRC NE 0
ENDIF. " IF NOT S_EBELN[]...
ENDFORM. " VALIDATE_PD_NUM
*& Form VALIDATE_VEN_NUM
Subroutine to validate Vendor Number
There are no interface parameters to be passed to this subroutine.
FORM VALIDATE_VEN_NUM .
IF NOT S_LIFNR[] IS INITIAL.
SELECT LIFNR " Vendor Number
FROM LFA1
INTO W_LIFNR
UP TO 1 ROWS
WHERE LIFNR IN S_LIFNR.
ENDSELECT.
IF SY-SUBRC NE 0.
CLEAR SSCRFIELDS-UCOMM.
MESSAGE E002(M8) WITH W_SPACE.
ENDIF. " IF SY-SUBRC NE 0
ENDIF. " IF NOT S_LIFNR[]...
ENDFORM. " VALIDATE_VEN_NUM
*& Form VALIDATE_PUR_GRP
Subroutine to validate the Purchase Group
There are no interface parameters to be passed to this subroutine.
FORM VALIDATE_PUR_GRP .
IF NOT S_EKGRP[] IS INITIAL.
SELECT EKGRP " Purchase Group
FROM T024
INTO W_EKGRP
UP TO 1 ROWS
WHERE EKGRP IN S_EKGRP.
ENDSELECT.
IF SY-SUBRC NE 0.
CLEAR SSCRFIELDS-UCOMM.
MESSAGE E622(M8) WITH W_SPACE.
ENDIF. " IF SY-SUBRC NE 0
ENDIF. " IF NOT S_EKFRP[]...
ENDFORM. " VALIDATE_PUR_GRP
*& Form FILL_VARIANT
Subroutine to fill the Variant Structure
There are no interface parameters to be passed to this subroutine
FORM FILL_VARIANT .
Filling the Variant structure
W_VARIANT-REPORT = SY-REPID.
W_VARIANT-USERNAME = SY-UNAME.
ENDFORM. " FILL_VARIANT
reward point if helpful.
thanks
mrutyun^
Maybe you are looking for
-
Logic Pro 9.0.2 Crashes
Logic crashes for me when i perform certain tasks such as changing the settings on the humanizer in the piano roll for midi, when i adjust some plug ins and also when i am recording midi and/or audio. It then prompts me there has been a crash and sav
-
Portege R30-A-137 - Removing Windows 8 and installing Windows 7
Hello, I have a Portege R30-A-137 notebook with Windows 8 installed and need to remove w8 and install Windows 7. According to documentation, computer has a preinstalled Windows 7 version, but i dont know howto install it. I only have windows 8 restor
-
Can the Find iPhone app find devices that aren't mine?
So my MacBook Pro was stolen a couple weeks ago out of my rental car while I was in Seattle, WA. I had iCloud on it synced with my iPhone, but never used it or saved anything to it. Someone told me that I could find my stolen computer though iCloud,
-
Listening to music (Itouch) from itunes when Itouch is plugged in
Before I upgraded to the Itouch I was able using my 5th Gen Ipod listen via itunes to the songs on the ipod itself. Unfortunately when I try to do this using the itouch plugged into itunes all the songs are greyed out. Can anyone tell me why. The com
-
Is there a version ov iDVD for OS 10.8
How can I get iDVD for OSX Version 10.8.2?