Creating a class in a report (URGENT)

Hi !!
Do we create Local/Global classes in real time? or we use standard classes !!
if so Please mail me a complete real time scenario of a class utilized in report... please
it should be for resume point of view.
points will be definitely given
Thanks a lot in advance
regards
babu

Hi Rambabu,
We create local / global classesdepending upon the situation. As you seem to be new to abap objects best thing to claim is OO ALV. we use some standard classes here.
Here is the simple program on oo alv.
*& Report ZGS_SIMPLE_ALV
REPORT zgs_simple_alv.
DATA : it_mara TYPE TABLE OF mara.
DATA : container TYPE REF TO cl_gui_custom_container,
 grid TYPE REF TO cl_gui_alv_grid.
SELECT * FROM mara INTO TABLE it_mara UP TO 10 ROWS.
CREATE OBJECT container
 EXPORTING
* PARENT =
 container_name = 'CONTAINER'
* STYLE =
* LIFETIME = lifetime_default
* REPID =
* DYNNR =
* NO_AUTODEF_PROGID_DYNNR =
* EXCEPTIONS
* CNTL_ERROR = 1
* CNTL_SYSTEM_ERROR = 2
* CREATE_ERROR = 3
* LIFETIME_ERROR = 4
* LIFETIME_DYNPRO_DYNPRO_LINK = 5
* others = 6
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CREATE OBJECT grid
EXPORTING
* I_SHELLSTYLE = 0
* I_LIFETIME =
 i_parent = container
* I_APPL_EVENTS = space
* 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.
CALL METHOD grid->set_table_for_first_display
EXPORTING
* I_BUFFER_ACTIVE =
* I_BYPASSING_BUFFER =
* I_CONSISTENCY_CHECK =
 i_structure_name = 'MARA'
* IS_VARIANT =
* I_SAVE =
* 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 = it_mara
* IT_FIELDCATALOG =
* 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.
CALL SCREEN 100.
Pleasse reward points and keep going .. all the best in your trials.
Thanks & Regards,
Aleem.

Similar Messages

How to Create the Custom print Quote Report ?

Hi All,
I want to create the custom Print Quote report . I know the below details and referred the below metalinks .
Note: 780722.1 - How to Create a Custom Print Quote Template in Oracle Quoting ?
https://metalink2.oracle.com/metalink/plsql/ml2_documents.showDocument?p_database_id=NOT&p_id=780722.1
Note: 392728.1 - How to Modify the data source for the XML version of the Print Quote report
https://metalink2.oracle.com/metalink/plsql/ml2_documents.showDocument?p_database_id=NOT&p_id=392728.1
Note: 468982.1 - How To Customize The Asoprint.Xsl
https://metalink2.oracle.com/metalink/plsql/ml2_documents.showDocument?p_database_id=NOT&p_id=468982.1.
Oracle Metalink:
Note: To add a column to the print quote report, following files need to be updated:
LinesVO.xml --- xml files containing the sql query and attribute definition
LinesVORowImpl.class - public class extending the framework class OAViewRowImpl.
This class contains the set and get for the attributes defined in xml file.
ASOPRINT.xsl - this is the xsl stylesheet file used to describe the report layout.
This file needs to be modified to include the new column being added to the report
QUESTION :
My question is,
1. wether my approach (below iare the details)of trying to extend the PromptVO is the right way or is there any other way to add the new columns.
I want to add new fields on to the report . When i looked into the it says the below
Here we find that to add a new column, oracle says to update the LINESVO.xml, do they really mean to update the base files.
This report uses following VO's
PROMPTVO
HEADERVO,
LINESVO.
To create new Headers & Prompts, i tried extending the PROMPTVO. Once the extended VO is substitued , i dont even get the data for standard oracle Prompts. is this the right way to add columns?
Thanks

Hi All,
I want to create the custom Print Quote report . I know the below details and referred the below metalinks .
Note: 780722.1 - How to Create a Custom Print Quote Template in Oracle Quoting ?
https://metalink2.oracle.com/metalink/plsql/ml2_documents.showDocument?p_database_id=NOT&p_id=780722.1
Note: 392728.1 - How to Modify the data source for the XML version of the Print Quote report
https://metalink2.oracle.com/metalink/plsql/ml2_documents.showDocument?p_database_id=NOT&p_id=392728.1
Note: 468982.1 - How To Customize The Asoprint.Xsl
https://metalink2.oracle.com/metalink/plsql/ml2_documents.showDocument?p_database_id=NOT&p_id=468982.1.
Oracle Metalink:
Note: To add a column to the print quote report, following files need to be updated:
LinesVO.xml --- xml files containing the sql query and attribute definition
LinesVORowImpl.class - public class extending the framework class OAViewRowImpl.
This class contains the set and get for the attributes defined in xml file.
ASOPRINT.xsl - this is the xsl stylesheet file used to describe the report layout.
This file needs to be modified to include the new column being added to the report
QUESTION :
My question is,
1. wether my approach (below iare the details)of trying to extend the PromptVO is the right way or is there any other way to add the new columns.
I want to add new fields on to the report . When i looked into the it says the below
Here we find that to add a new column, oracle says to update the LINESVO.xml, do they really mean to update the base files.
This report uses following VO's
PROMPTVO
HEADERVO,
LINESVO.
To create new Headers & Prompts, i tried extending the PROMPTVO. Once the extended VO is substitued , i dont even get the data for standard oracle Prompts. is this the right way to add columns?
Thanks

How to create Development Class in SAP R/3 4.7c and Netweaver?

I follow some old notes on ABAP Development Class but I could not create a new Development Class. i.e. Stuck in creatinf a type group. Please give some details on how to create a development class. Thanks.
see the following stepa:
(A) Procedure for creating a type group:
/nse80
1. Object Navigator> select Development class>(Enter your development class
 yFTGxxDEV
2. Double click on development class object types.
3. Type Group: zPTAxx1.
4. Click on the Create button at the bottom (4th one from the left).
5. Enter short text: zPTAxx1 type group.
6. Save>Enter your development class> click on diskette button to save the type group
7. Select Source Code tab and enter the following:
"An example type-pool statement containing types and constants
type-pool zxx1. "zxx1 is a type pool. It is also known as a type group
types: zxx1_dollars(16) type p decimals 2,
 zxx1_lira(16) type p decimals 0.
constants:
 zxx1_warning_threshold type i value 5000,
 zxx1_amalgamation_date like sy-datum value '19970305'.
8. Select Type Group from menubar
 a) Check
 b) Save
 c) Activate
9. Click the back button or F3 to exit.
10, Show your type group to your teacher.
11. Go to ABAP editor and enter the following program:
"Calculations on date
report zxx_0914.
type-pools zxx1. "contains zxx1_amalgamation_date
data: d1 like sy-datum,
 d2 like d1,
 num_days type p.
d1 = d2 = sy-datum.
subtract 1 from d1.
write / d1. "yesterday's date
d2+06 = '01' " first day of current months
subtract 1 from d2.
write / d2. " last day of previous month
num_days = sy-datum - zxx1_amalgamation_date.
write / num_days. " number of days since amalgamation
11. Double click zxx1 from the type-pool statement to see the type group.
12. Follow lab1 procedure and run your program
(B) Run an ABAP program using field symbol ( i.e. pointer)
report zxx_lab6.
data f1(3) value 'ABC'. "Step 1 Define a variable
field-symbols <f>. "Step 2 Define a pointer variable ( it only stores address)
assign f1 to <f>. "Step3 Initialize the pointer variable with an address
write <f>. "Step4 Now you can use <f> in place of f1
write / f1. " (same as write f1 )
<f> = 'xyz'. " Assign a new value to f1
write <f>.
write / f1.

This is not the way to create a new development class.
Follow this steps to create a development class:
http://sap.mis.cmich.edu/abap4/knowbase/Create-Dev-Class.pdf
Regards,
Naimesh Patel

How to see views created on query in a report.

Hi
Could you please help me out urgently?
I have a question regarding how to see views created on query in a report.
Is there any table or query through which we can see views created on Query?
Thanks & Regards
Neha

Hi,
If you created a view on any query,
What is view ?
once you execute the query and save the output as view right ?
But we can not see the view in query output.
Insted of executing the query, directly we can execute the view which you have saved as query output.
Open the BEX and search for the view insted of query then it will give you the out put directly.
I hope it will help you.
Regards,
Yerrabelli.

Urgent --report urgent

Hallo
very urgent
i would like to have the master data "relationsship" included in the BW report.
It is important information for me when user plan production, as both preparation, processing and cleaning time as well as the "delay" between the start of each equipment adds up being our total production time.
At this stage user can only get the times for relationsships by clicking on each operation in SAP (for each material).
what should i do
regards
mangra

Hi mangra
Include the master data infoobject in your cube and use it in the query
For calculation like delay, you can creata a formula in the report
Cheers
N Ganesh

WIP Report - urgent

Hi,
Is there an Standard SAP report to get the WIP by cost component structure by order/plant wise? If not, what are the possibilites to create a custom report of WIP by cost components?
Urgent please
Thank you,
Nivi
Edited by: Nivi ram on Jan 8, 2008 2:36 PM

Hi mangra
Include the master data infoobject in your cube and use it in the query
For calculation like delay, you can creata a formula in the report
Cheers
N Ganesh

What is meant by Local Class and how we can create local classes in abap?

Hi Friends
what is meant by Local Class and how we can create local classes in abap?
Regards,
Sree

Hi
Local classes are the classes which we declare and use using the SE38 ABAP editor
Global classes are the classes which we find in SE24 and call the methods of them into our program.
see the sample code
REPORT zs_class.
SELECTION SCREEN
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME.
PARAMETERS:p_var TYPE i,
p_var1 TYPE i.
SELECTION-SCREEN END OF BLOCK b1.
CLASS d_class DEFINITION
CLASS d_class DEFINITION.
PUBLIC SECTION.
METHODS:
add,
sub.
PROTECTED SECTION.
DATA : var2 TYPE i.
ENDCLASS. "d_class DEFINITION
CLASS d_class IMPLEMENTATION
CLASS d_class IMPLEMENTATION.
METHOD add.
var2 = p_var + p_var1.
WRITE:/ var2.
ENDMETHOD. "add
METHOD sub.
var2 = p_var - p_var1.
WRITE:/ var2.
ENDMETHOD. "sub
ENDCLASS. "d_class IMPLEMENTATION
START-OF-SELECTION
START-OF-SELECTION.
DATA: obj TYPE REF TO d_class.
CREATE OBJECT: obj .
CALL METHOD: obj->add,
Regards
Anji

HOW TO CREATE "MESSAGE CLASS"?

HELLO EXPERTS,
 Hereby, I post my another very simple but very important query.
 I have to make "message class". But I do not know the tracsaction code, procedure and other require syntax.
 Kindly, explain me the ENTIRE PROCEDURE.
 Thanks!!

You create and edit Message Class using Transaction SE91. Once you have created a message, you can use it in the MESSAGE statement in a program.
All messages are stored in table T100.
Creating Message Classes
To create a new message class from the ABAP Editor:
 1. In the initial statement (for example, REPORT) or directly in the statement MESSAGE ID <id> enter a parameter value of up to 20 characters as a message ID, for example:
 REPORT <name> MESSAGE-ID <message class>.
 Messages are stored system-wide. The chosen message ID (message class) must not already exist in the system.
 2. Double-click the message ID.
 If you enter an ID that already exists in the system, the system calls up Message maintenance. In this case, enter a different ID. Once you have done this, the system asks you whether you want to create a new message class.
 3. Choose Yes.
 The system calls up Message maintenance.
 4. Enter a brief description of the class in Short text.
 5. Choose Save.

Creating transaction code for CJE0 reports

Hi,
Can anyone let me know a step by step precess for creating Transaction Code for CJE0 reports?
Thanks in Advance.

Hi,
There's just one proper solution:
Via trx SE43N. Steps:
1. I suggest you choose area menu PS01
2. Choose extend to create a new Z-folder (or select 'change' to add to an existing (standard SAP) folder)
3. Create extension , ehancement ID: f.e.: ZPS01
4. Select the new folder in the tree
5. Click 5th button: 'add entry as a subnode'
6. In pop-up 'Add new entries' click button 'Report'
7. Select radio button at 'Drilldown'
8. A pop up appears to select the application class
9. I guess you'll no what to do from here... it speaks for itself.
enjoy, Kind regards,
Gerjan

Create message class

Hi,
how is create message class.
using in dialog program explain for procedure.
by,
Megahari.S

Hi,
T-Code SE93 is to create message classes.You can use it in pgm by specifying
REPORT NAME MESSAGE-ID [MESSAGE CLASS NAME].
To display error messge syntax:
MSG E(001)--> your message no..

How to create proxy class for a Siebel WS which has many Workflows in it?

Hi,
I am facing a strange problem. I have a Web Service for which there are many workflows associated with this. When I generate WSDL for this Web Service and later on generate proxy class in .NET, it creates mutilple classes for each workflow. From UI, I can invoke a perticular method for the class for which I am interested in. But when I am building the same in JDeveloper, using Web Service proxy, I get only one class and I am not interested in invoking method in this class but interested in some other class for which the proxy was not generated. Is there some way to generate multiple classes in JDeveloper proxy?
Thanks,
Sudha.

I have figured this out. Actually Generate proxy creates package and it includes all the class in it. Now i am able to invoke web service method call.

How to add/create additional page in Crystal Report Layout SAP B1

Hi,
I wanna ask about How to add/create additional page in Crystal Report Layout SAP B1 ?
I want when user print Purchase Order then on last page also print some page like Penalty Clause etc.
Pls help me to find the solution.
Br,
Thomas Marsetyo

Hi,
In your report footer, set it to create a new page before it is printed (In 'Section Expert', select the Report Footer -> 'Paging' tab -> Check 'New Page Before' checkbox). Throw your Terms & Conditions into the Report Footer section.
If you already have a Report Footer that you want to keep, just split the footer into two sections (Right-click the Report Footer section -> 'Insert Section Below') and follow the same procedure for the newly created section.
Check this Link
http://stackoverflow.com/questions/9232239/adding-an-additional-page-to-end-of-a-crystal-report
http://www.crystalreportsbook.com/forum/forum_posts.asp?TID=18960
Regards,
Manish

How to create a class using java script..

Hi all,
Iam new to java script and I tried out the following program but its not working..I basically created a class just like a java prog' but Iam not getting any output or error.Iam attaching the code below.
If I created one function inside the script and create one object its working fine but what should I do when I have a lot of function??so I created a class and put all the function and created an object but its not working..
Do let me know what changes should I do..Iam attaching the code which I had written. or give me an example of how to create a class with couple of functions using JAVASCRIPT
Thanks
Avis_su
<html>
<head><title>JSP Page</title></head>
<body>
<SCRIPT language = "JavaScript">

</script>
</body>
</html>

Run this program to get your answer:
public class AnswerToYourPost {
public static void main(String args[]) {
System.out.println("TRUE/FALSE: This question
ion belongs on a Java forum.\n"
+ "ANSWER: " + ("Javascript" == "Java"));
}Since when do we compare objects for equality using operator == ?

How to delete the automatically created receipt in the expense report

Hi experts,
I am getting an error "no expense type for estimated costs has been defined. cannot save" while creating a travel request for an employee.
Base on the reply from Raynard which posted on Re: FM for trip exp
It's because "The estimated cost in plan and request are now included into fund management. So if you have active funds management, the entered estimated cost are used to make availability check and commitment. Therefore you must create an expense type in view V_T706B1. Under 'amounts are' you have to choose 'estimated cost, no reimbursement to employee'."
How ever, because the linkage with funds management, I faced the problem and also ckecked out the reason from SAP Help that "After the trip takes place, the user needs to manually delete the automatically created receipt in the expense report."
Anybody can provide the solution how to automatically delete this receipt before user create the expense report??
Thanks
Daniel

Hi Francis,
Check the BADI "TRIP_WEB_CHECK" method "USER_CHECK_GENERAL_DATA".
Here based on the schema you can modify the "estimated cost" field.
Hope it helps.
Regards,
Jyothi

How to create check box in ALV Reports?

how to create check box in ALV Reports?

Hi
check the report BCALV_TEST_GRID_EDITABLE
or
check this report
REPORT ZRFC346_TST.
TABLES:SFLIGHT,RL034.
TYPE-POOLS:SLIS.
INCLUDE:<ICON>,<SYMBOL>.
DATA: G_REPID LIKE SY-REPID,
 G_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
 G_IT_SORT TYPE SLIS_T_SORTINFO_ALV,
 G_LAYOUT TYPE SLIS_LAYOUT_ALV,
 G_TABNAME_HEADER TYPE SLIS_TABNAME,
 G_TABNAME_ITEM TYPE SLIS_TABNAME,
 G_KEYINFO TYPE SLIS_KEYINFO_ALV,
 G_VARIANT LIKE DISVARIANT,
 G_EXTAB TYPE SLIS_T_EXTAB,
 I_SLIS_EXIT_BY_USER TYPE SLIS_EXIT_BY_USER.
DATA: XEVENT TYPE SLIS_T_EVENT,
 AEVENT TYPE SLIS_ALV_EVENT,
 VARIANT LIKE DISVARIANT,
 LAYOUT TYPE SLIS_LAYOUT_ALV,
 ASP_GROUP TYPE SLIS_SP_GROUP_ALV,
 GT_SP_GROUP TYPE SLIS_T_SP_GROUP_ALV,
 EXTAB TYPE SLIS_T_EXTAB WITH HEADER LINE,
 XFIELD TYPE SLIS_T_FIELDCAT_ALV,
 AFIELD TYPE SLIS_FIELDCAT_ALV,
 G_SUCOMM LIKE SY-UCOMM,
 G_SELFLD TYPE SLIS_SELFIELD.
DATA: SAV_SY_REPID LIKE SY-REPID.
CONSTANTS: CON_SFLIGHT TYPE LVC_FNAME VALUE 'SFLIGHT',
 CON_DISPLAY_FULL TYPE I VALUE 3.
Data to be displayed
DATA: BEGIN OF GT_SFLIGHT OCCURS 0.
 INCLUDE STRUCTURE SFLIGHT.
DATA:ACTIVATE(1).
DATA: END OF GT_SFLIGHT.
INITIALIZATION.
*........Initialisierung...............................................
PERFORM INITIALIZATION_RL034.
*........Field cata....................................................
PERFORM FIELD_CAT.
*........SPECIAL GROUP.................................................
PERFORM E07_SP_GROUP_BUILD USING GT_SP_GROUP[].
START-OF-SELECTION.
Selection
SELECT * FROM SFLIGHT INTO TABLE GT_SFLIGHT.
*........ALV CALL.......................................................
PERFORM ALV_CALL.
PERFORM USER_COMMAND_LOCAL USING G_SUCOMM G_SELFLD.
 FORM USER_COMMAND_LOCAL *
--> G_UCOMM *
--> G_SELFIELD *
FORM USER_COMMAND_LOCAL USING G_UCOMM LIKE SY-UCOMM
 G_SELFIELD TYPE SLIS_SELFIELD.
CASE G_UCOMM.
 WHEN 'ACT'.
ENDCASE.
ENDFORM.
 FORM ALV_CALL *
FORM ALV_CALL.
Call ABAP List Viewer (ALV)
G_LAYOUT-BOX_FIELDNAME = 'ACTIVATE'.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 I_BACKGROUND_ID = 'ALV_BACKGROUND'
 I_BYPASSING_BUFFER = SPACE
 I_BUFFER_ACTIVE = SPACE
 I_CALLBACK_PROGRAM = SAV_SY_REPID
 I_CALLBACK_PF_STATUS_SET = 'STATUS'
 I_CALLBACK_USER_COMMAND = 'USER_COMMAND_LOCAL'
 I_CALLBACK_TOP_OF_PAGE = ' '
 I_CALLBACK_HTML_TOP_OF_PAGE = ' '
 I_CALLBACK_HTML_END_OF_LIST = ' '
 I_STRUCTURE_NAME = 'SFLIGHT'
 I_BACKGROUND_ID = ' '
 I_GRID_TITLE =
 I_GRID_SETTINGS =
 IS_LAYOUT = G_LAYOUT
 IT_FIELDCAT = XFIELD[]
 IT_EXCLUDING =
 IT_SPECIAL_GROUPS = GT_SP_GROUP[]
 IT_SORT =
 IT_FILTER =
 IS_SEL_HIDE = 'X'
 I_DEFAULT = 'X'
 I_SAVE = 'A'
 IS_VARIANT =
 IT_EVENTS = XEVENT
 IT_EVENT_EXIT =
 IS_PRINT =
 IS_REPREP_ID =
 I_SCREEN_START_COLUMN = 0
 I_SCREEN_START_LINE = 0
 I_SCREEN_END_COLUMN = 0
 I_SCREEN_END_LINE = 0
 IT_ALV_GRAPHICS =
 IT_ADD_FIELDCAT =
 IT_HYPERLINK =
 I_HTML_HEIGHT_TOP =
 I_HTML_HEIGHT_END =
 IT_EXCEPT_QINFO =
 IMPORTING
 E_EXIT_CAUSED_BY_CALLER =
 ES_EXIT_CAUSED_BY_USER =
 TABLES
 T_OUTTAB = GT_SFLIGHT
 EXCEPTIONS
 PROGRAM_ERROR = 1
 OTHERS = 2
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM.
 FORM status *
--> EXTAB *
FORM STATUS USING EXTAB TYPE SLIS_T_EXTAB.
SET PF-STATUS 'STAT' EXCLUDING EXTAB.
ENDFORM. " STATUS
*& Form INITIALIZATION_RL034
 text
--> p1 text
<-- p2 text
FORM INITIALIZATION_RL034.
SAV_SY_REPID = SY-REPID.
ENDFORM. " INITIALIZATION_RL034
*& Form DEFINE_EVENTS_RL034
 text
--> p1 text
<-- p2 text
FORM DEFINE_EVENTS_RL034.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
 EXPORTING
 I_LIST_TYPE = 0
 IMPORTING
 ET_EVENTS = XEVENT.
 exceptions
 list_type_wrong = 1
 others = 2.
ENDFORM. " DEFINE_EVENTS_RL034
*& Form FIELD_CAT
 text
--> p1 text
<-- p2 text
FORM FIELD_CAT.
DATA: LS_FCAT TYPE SLIS_FIELDCAT_ALV,
 L_LIN TYPE I.
REFRESH XFIELD.
 1. per Default eingeblendete Felder *
*........Ikone/Symbol..................................................
CLEAR AFIELD.
DATA: LS1_FCAT TYPE SLIS_FIELDCAT_ALV,
 L_LIN1 TYPE I.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
 EXPORTING
 I_STRUCTURE_NAME = CON_SFLIGHT
 I_BYPASSING_BUFFER = SPACE
 I_BUFFER_ACTIVE = SPACE
 CHANGING
 CT_FIELDCAT = XFIELD
 EXCEPTIONS
 INCONSISTENT_INTERFACE = 1
 PROGRAM_ERROR = 2
 OTHERS = 3.
DESCRIBE TABLE XFIELD LINES L_LIN1.
ADD 1 TO L_LIN1.
CLEAR LS_FCAT.
LS1_FCAT-FIELDNAME = 'ACTIVATE'.
LS1_FCAT-CHECKBOX = 'X'.
LS1_FCAT-KEY = 'X'.
LS1_FCAT-INPUT = 'X'.
LS1_FCAT-EDIT = 'X'.
LS1_FCAT-INTTYPE = 'C'.
LS1_FCAT-DATATYPE = 'CHAR'.
LS1_FCAT-INTLEN = 1.
LS1_FCAT-COL_POS = L_LIN1.
LS1_FCAT-SELTEXT_S = LS1_FCAT-FIELDNAME.
LS1_FCAT-SELTEXT_M = LS1_FCAT-FIELDNAME.
LS1_FCAT-SELTEXT_L = LS1_FCAT-FIELDNAME.
LS1_FCAT-SP_GROUP = 'A'.
APPEND LS1_FCAT TO XFIELD.
ADD 1 TO L_LIN.
ENDFORM. " FIELD_CAT
FORM E07_SP_GROUP_BUILD USING E07_LT_SP_GROUP TYPE SLIS_T_SP_GROUP_ALV.
DATA: LS_SP_GROUP TYPE SLIS_SP_GROUP_ALV.
CLEAR LS_SP_GROUP.
LS_SP_GROUP-SP_GROUP = 'A'.
LS_SP_GROUP-TEXT = 'SPECIAL'.
APPEND LS_SP_GROUP TO E07_LT_SP_GROUP.
ENDFORM.
Regards
Shiva

Creating a class in a report (URGENT)

Similar Messages

Maybe you are looking for