06-20-2007 5:06 AM
1.h to pass the parameters in the reuse_alv_list_display?
2.In selection screeen I have entered companycode i want related plants display?h t write that code?
3.In real time h to use the performance tunning?
4.In script h to delete the window?
5.Can u send me userexit material and realtime objects?
06-20-2007 5:09 AM
Hi,
1) Check this code
TYPE-POOLS: slis.
DATA: gt_fieldcat TYPE slis_t_fieldcat_alv.
DATA: BEGIN OF wa_ekko,
ebeln like ekko-ebeln,
ekorg like ekko-ekorg,
ekgrp like ekko-ekgrp,
END OF wa_ekko.
DATA: v_repid TYPE syrepid.
v_repid = sy-repid.
DATA it_ekko LIKE STANDARD TABLE OF wa_ekko WITH HEADER LINE.
SELECT * UP TO 100 ROWS
FROM ekko
INTO CORRESPONDING FIELDS OF TABLE it_ekko.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
EXPORTING
i_program_name = v_repid
i_internal_tabname = 'WA_EKKO'
i_inclname = v_repid
CHANGING
ct_fieldcat = gt_fieldcat.
* have hotspot for a PO.
DATA: s_fieldcat LIKE LINE OF gt_fieldcat.
s_fieldcat-hotspot = 'X'.
MODIFY gt_fieldcat FROM s_fieldcat TRANSPORTING hotspot
WHERE fieldname = 'EBELN'.
* Pass the program.
v_repid = sy-repid.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
i_callback_program = v_repid
it_fieldcat = gt_fieldcat
i_callback_user_command = 'USER_COMMAND'
TABLES
t_outtab = it_ekko.
*---------------------------------------------------------------------*
* FORM display_detail *
*---------------------------------------------------------------------*
* ........ *
*---------------------------------------------------------------------*
* --> UCOMM *
* --> SELFIELD *
*---------------------------------------------------------------------*
FORM user_command USING ucomm LIKE sy-ucomm
selfield TYPE slis_selfield.
IF ucomm = '&IC1' AND selfield-fieldname = 'EBELN'.
READ TABLE it_ekko INDEX selfield-tabindex.
IF sy-subrc = 0.
SET PARAMETER ID 'BES' FIELD it_ekko-ebeln.
CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
ENDIF.
ENDIF.
ENDFORM.
2) you can use the table T001K table to get the plants for the company code
Thanks
Naren
06-20-2007 5:12 AM
Hi,
Jus go thro my code..
u can c how to pass parameters in reuse_alv_grid_display.
also,i hav used selection screen declaration. c that.
u wil hav a idea as to how u shud do the coding.
Jus execute my report c try it out.
*&----
*
*& Report ZPYR_171_DLA_LISTING *
*& *
*----
*
Objective : Displays the DLA Amounts of the New joining and *
Leaving Employees in a ALV format. *
Program : Updates Tables ( ) Downloads data ( ) *
Outputs List ( X ) *
*
Technical Spec No: Ethos_JKH_PY171_TS_DLA_Join_Leave *
Transaction Code ZPY_DLA_JOINLEAVE *
Date Created 12-March-2007 *
Author Pavithra.J *
LDB PNPCE *
*----
*
External Dependencies *
*----
*
*
*----
*
Amendment History *
*----
*
Who Change ID Reason *
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯ *
Pavithra.J PJ12032007 Initial Creation *
*
....................................................... *
***********************************************************************
REPORT zpyr_171_dla_listing.
*----
*
TYPES-POOLS *
*----
*
TYPE-POOLS : slis.
*----
*
TABLES *
*----
*
TABLES: pernr.
*----
*
INFOTYPES *
*----
*
INFOTYPES : 0001, "HR Master Record: Infotype 0001 (Org. Assignment)
0000, "HR Master Record: Infotype 0000 (Actions)
9994. "HR Master Record: Infotype 9994
*----
*
NODES *
*----
*
NODES : peras.
*----
*
TYPES - TY_ *
*----
*
TYPES : BEGIN OF ty_disp,
sno TYPE i, "Serial Number
pernr TYPE p0000-pernr, "Personnel Number
ename TYPE p0001-ename, "Employee Name
bta TYPE p9994-bta01, "Wage Type Amount(DLA)
END OF ty_disp.
*----
*
Constants c_ *
*----
*
CONSTANTS : c_i TYPE c VALUE 'I',
c_permo TYPE i VALUE '67',
c_werks(28) TYPE c VALUE '%_PNPWERKS_%_APP_%-VALU_PUSH',
c_one TYPE i VALUE '1',
c_s TYPE c VALUE 'S',
c_h TYPE c VALUE 'H'.
*----
*
Internal table IT_ *
*----
*
****IT_DISP is the final internal table to which the Employee details
****are populated.
DATA : it_disp TYPE TABLE OF ty_disp,
it_fcat TYPE slis_t_fieldcat_alv,
it_event TYPE slis_t_event,
it_lhead TYPE slis_t_listheader.
****IT_FCAT is the Internal Table for field catalog in ALV display
*----
*
Work Fields W_ *
*----
*
****W_DATE1 takes in the entered month and year(START DATE) at
****selection screen.
****W_DATE2 is where the function module populates the end date.
DATA : w_date1 TYPE sy-datum,
w_date2 TYPE sy-datum,
for Serial no count in ALV.
w_cnt TYPE i VALUE 1,
for fetching the header fields in the output screen.
w_persa(50) TYPE c,
w_ktx(10) TYPE c,
w_werks(4) TYPE c,
w_r(30) TYPE c,
w_r1(30) TYPE c,
w_a1(70) TYPE c,
w_a2(70) TYPE c,
w_date(30) TYPE c,
w_page(15) TYPE c,
w_pgno(3) TYPE c,
w_sydate(10) TYPE c,
w_sytime(8) TYPE c.
*----
*
Workarea WA_ *
*----
*
****WA_DISP is the workarea of the final internal table IT_DISP.
****WA_DISP is the workarea of the firld catalog IT_FCAT.
DATA: wa_disp TYPE ty_disp,
wa_fcat TYPE slis_fieldcat_alv,
wa_event TYPE slis_alv_event ,
wa_lhead TYPE slis_listheader .
*----
*
PARAMETERS pr_* *
*----
*
SELECTION-SCREEN BEGIN OF BLOCK bcp WITH FRAME TITLE text-000.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(15) text-001.
SELECTION-SCREEN POSITION 33.
PARAMETERS : pr_month(2) OBLIGATORY.
SELECTION-SCREEN POSITION 44.
PARAMETERS : pr_year(4) OBLIGATORY.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK bcp.
SELECTION-SCREEN BEGIN OF BLOCK bcp1 WITH FRAME TITLE text-002.
PARAMETERS : r1 RADIOBUTTON GROUP g1,
r2 RADIOBUTTON GROUP g1.
SELECTION-SCREEN END OF BLOCK bcp1.
*----
*
At Selection-Screen output *
*----
*
AT SELECTION-SCREEN OUTPUT.
*****to make the Personnel area field mandatory.
and also to place the cursor at pers. area after the error msg.
Hiding multiple slection option for PNPWERKS
LOOP AT SCREEN.
IF screen-name = c_werks.
screen-invisible = c_one.
MODIFY SCREEN.
ENDIF. "IF screen-name = c_abkrs.
IF screen-name ='PNPWERKS-LOW'.
screen-required = c_one.
MODIFY SCREEN.
ENDIF. "IF screen-name = c_abkrs.
ENDLOOP.
*----
*
Start-of-Selection *
*----
*
START-OF-SELECTION.
CLEAR : wa_disp,
wa_fcat,
wa_event,
wa_lhead.
REFRESH : it_disp ,
it_fcat ,
it_event ,
it_lhead .
PERFORM f002_payrollperiod_conversion.
Fetches All Necessary information from infotypes
GET peras.
Clears the final work area
CLEAR wa_disp.
Gets the required fields from the infotypes.
rp_provide_from_last p0000 space w_date1 w_date2.
****Radio button choice for list selection.
IF pnp-sw-found = 1.
IF r1 = text-014 AND p0000-massn = text-015 .
w_r = text-019.
w_r1 = text-021.
PERFORM f001_fetch_dla.
ELSEIF r2 = text-014 AND p0000-massn = text-016.
w_r = text-022.
w_r1 = text-023.
PERFORM f001_fetch_dla.
ENDIF. " if r1= 'X'.
ENDIF.
*----
*
End-of-Selection *
*----
*
END-OF-SELECTION.
w_werks = pnpwerks+3(4).
SELECT SINGLE name1
FROM t500p
INTO w_persa
WHERE persa = w_werks.
SELECT SINGLE ktx
FROM t247
INTO w_ktx
WHERE spras = sy-langu
AND mnr = w_date1+4(2).
CONCATENATE w_ktx w_date1+0(4) INTO w_ktx SEPARATED BY space.
**..... Header detail for ALV
****Form F006_ALV_HEADER called indirectly though events.
wa_event-name = 'TOP_OF_PAGE'.
wa_event-form = 'F006_ALV_HEADER'.
APPEND wa_event TO it_event.
CLEAR wa_event.
PERFORM f003_top_of_page.
PERFORM f004_field_catalog.
PERFORM f005_alv_display .
*
*&----
*
*& Form F004_Field_catalog
*&----
*
FIELD CATALOG for ALV display
*----
*
FORM f004_field_catalog .
wa_fcat-fieldname = text-003. "Slno
wa_fcat-seltext_l = text-004.
wa_fcat-outputlen = 5.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
wa_fcat-fieldname = text-005. "Employee no
wa_fcat-seltext_l = text-006.
wa_fcat-outputlen = 12.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
wa_fcat-fieldname = text-007. "Employee name
wa_fcat-seltext_l = text-008.
wa_fcat-outputlen = 25.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
wa_fcat-fieldname = text-009. "DLA Amount
wa_fcat-seltext_l = text-010.
wa_fcat-outputlen = 25.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ENDFORM. "F004_Field_catalog
*&----
*
*& Form f005_alv_display
*&----
*
Calling Function Module REUSE_ALV_GRID_DISPLAY
for ALV display
*----
*
FORM f005_alv_display .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = sy-repid
it_fieldcat = it_fcat[]
it_events = it_event[]
TABLES
t_outtab = it_disp.
IF sy-subrc IS NOT INITIAL.
ENDIF.
ENDFORM. " f003_Alv_Display
*&----
*
*& Form F001_Fetch_DLA
*&----
*
Fetches the DLA Amount BTAXX corresponding to LGAXX=A001
*----
*
FORM f001_fetch_dla.
Clears the workarea
CLEAR : wa_disp-pernr ,
wa_disp-ename ,
wa_disp-bta.
Gets the employee details from the infotypes
rp_provide_from_last p0001 space w_date1 w_date2.
rp_provide_from_last p9994 space w_date1 w_date2.
IF pnp-sw-found = 1.
IF p0000-begda GE w_date1 AND p0000-begda LE w_date2 AND
p9994-begda GE w_date1 AND p9994-begda LE w_date2.
IF p9994-lga01 = text-020 .
wa_disp-bta = p9994-bta01.
ELSEIF p9994-lga02 = text-020 .
wa_disp-bta = p9994-bta02.
ELSEIF p9994-lga03 = text-020 .
wa_disp-bta = p9994-bta03.
ELSEIF p9994-lga04 = text-020 .
wa_disp-bta = p9994-bta04.
ELSEIF p9994-lga05 = text-020 .
wa_disp-bta = p9994-bta05.
ELSEIF p9994-lga06 = text-020 .
wa_disp-bta = p9994-bta06.
ELSEIF p9994-lga07 = text-020 .
wa_disp-bta = p9994-bta07.
ELSEIF p9994-lga08 = text-020 .
wa_disp-bta = p9994-bta08.
ELSEIF p9994-lga09 = text-020 .
wa_disp-bta = p9994-bta09.
ELSEIF p9994-lga10 = text-020 .
wa_disp-bta = p9994-bta10.
ELSEIF p9994-lga11 = text-020 .
wa_disp-bta = p9994-bta11.
ELSEIF p9994-lga12 = text-020 .
wa_disp-bta = p9994-bta12.
ELSEIF p9994-lga13 = text-020 .
wa_disp-bta = p9994-bta13.
ELSEIF p9994-lga14 = text-020 .
wa_disp-bta = p9994-bta14.
ELSEIF p9994-lga15 = text-020 .
wa_disp-bta = p9994-bta15.
ELSEIF p9994-lga16 = text-020 .
wa_disp-bta = p9994-bta16.
ELSEIF p9994-lga17 = text-020 .
wa_disp-bta = p9994-bta17.
ELSEIF p9994-lga18 = text-020 .
wa_disp-bta = p9994-bta18.
ELSEIF p9994-lga19 = text-020 .
wa_disp-bta = p9994-bta19.
ELSEIF p9994-lga20 = text-020 .
wa_disp-bta = p9994-bta20.
ENDIF.
wa_disp-sno = w_cnt.
wa_disp-pernr = p9994-pernr.
wa_disp-ename = p0001-ename.
Appends the work area contents to final internal table.
APPEND wa_disp TO it_disp.
clear wa_disp.
w_cnt = w_cnt + 1.
ENDIF.
ENDIF. " IF pnp-sw-found = 1.
ENDFORM. "F001_Fetch_DLA
*&----
*
*& Form F002_PayrollPeriod_Conversion
*&----
*
For converting the entered date at selection screen into
payroll period.
*----
*
FORM f002_payrollperiod_conversion.
IF pr_year IS NOT INITIAL AND pr_month IS NOT INITIAL.
SELECT SINGLE begda
FROM t549q INTO w_date1
WHERE permo = c_permo
AND pabrj = pr_year
AND pabrp = pr_month.
IF sy-subrc IS NOT INITIAL.
MESSAGE text-018 TYPE c_i.
EXIT.
ENDIF. " IF sy-subrc IS NOT INITIAL
ENDIF. " IF pr_year IS NOT INITIAL
Calling the function module for calculating the last day of
the month accord to the one enetered at selection screen.
CALL FUNCTION 'SG_PS_GET_LAST_DAY_OF_MONTH'
EXPORTING
day_in = w_date1
IMPORTING
last_day_of_month = w_date2.
ENDFORM. "F002_PayrollPeriod_Conversion
*&----
*
*& Form f003_top_of_page
*&----
*
To fetch the details in the ALV header
*----
*
FORM f003_top_of_page .
WRITE : sy-datum TO w_sydate USING EDIT MASK '__/__/____'.
WRITE : sy-uzeit TO w_sytime USING EDIT MASK '__:__:__'.
IF r1 = text-014 .
wa_lhead-typ = c_h.
wa_lhead-info = text-019.
APPEND wa_lhead TO it_lhead.
CLEAR wa_lhead.
wa_lhead-typ = c_s.
wa_lhead-info = w_persa.
APPEND wa_lhead TO it_lhead.
CLEAR wa_lhead.
wa_lhead-typ = c_s.
CONCATENATE text-024 w_ktx text-027 text-021 INTO w_a1 SEPARATED BY space.
wa_lhead-info = w_a1.
APPEND wa_lhead TO it_lhead.
CLEAR wa_lhead.
wa_lhead-typ = c_s.
CONCATENATE text-025 w_sydate w_sytime INTO w_date SEPARATED BY space.
wa_lhead-info = w_date.
APPEND wa_lhead TO it_lhead.
CLEAR wa_lhead.
wa_lhead-typ = c_s.
w_pgno = sy-pagno + 1.
CONCATENATE text-026 w_pgno INTO w_page SEPARATED BY space.
wa_lhead-info = w_page.
APPEND wa_lhead TO it_lhead.
CLEAR wa_lhead.
ELSEIF r2 = text-014.
wa_lhead-typ = c_h.
wa_lhead-info = text-022.
APPEND wa_lhead TO it_lhead.
CLEAR wa_lhead.
wa_lhead-typ = c_s.
wa_lhead-info = w_persa.
APPEND wa_lhead TO it_lhead.
CLEAR wa_lhead.
wa_lhead-typ = c_s.
CONCATENATE text-024 w_ktx text-027 text-023 INTO w_a2 SEPARATED BY space.
wa_lhead-info = w_a2.
APPEND wa_lhead TO it_lhead.
CLEAR wa_lhead.
wa_lhead-typ = c_s.
CONCATENATE text-025 w_sydate w_sytime INTO w_date SEPARATED BY space.
wa_lhead-info = w_date.
APPEND wa_lhead TO it_lhead.
CLEAR wa_lhead.
wa_lhead-typ = c_s.
w_pgno = sy-pagno + 1.
CONCATENATE text-026 w_pgno INTO w_page SEPARATED BY space.
wa_lhead-info = w_page.
APPEND wa_lhead TO it_lhead.
CLEAR wa_lhead.
ENDIF.
ENDFORM. " f005_Top_of_page
*&----
*
*& Form f006_alv_header
*&----
*
text: to call for the diaplay of ALV header
*----
*
FORM f006_alv_header.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
it_list_commentary = it_lhead[].
ENDFORM. "f006_ALV_header
Hope this is helpful.
****reward points if so.
06-20-2007 5:29 AM
hi,
1.h to pass the parameters in the reuse_alv_list_display?
check this demo.
REPORT ZSR_ALV_GRID.
TABLES : lfa1.
SELECT-OPTIONS : s_lifnr FOR lfa1-lifnr.
DATA : BEGIN OF itab OCCURS 0,
lifnr LIKE lfa1-lifnr,
land1 LIKE lfa1-land1,
name1 LIKE lfa1-name1,
END OF itab.
TYPE-POOLS : slis.
DATA : b_lfa1 TYPE slis_t_fieldcat_alv,
w_lfa1 TYPE slis_fieldcat_alv.
PERFORM GET_VAL.
START-OF-SELECTION.
SELECT lifnr
land1
name1
FROM lfa1
INTO TABLE itab
WHERE lifnr IN s_lifnr.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
I_BYPASSING_BUFFER =
I_BUFFER_ACTIVE = ' '
I_CALLBACK_PROGRAM = SY-REPID
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
I_STRUCTURE_NAME =
IS_LAYOUT =
IT_FIELDCAT = B_LFA1
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT =
IT_FILTER =
IS_SEL_HIDE =
I_DEFAULT = 'X'
I_SAVE = ' '
IS_VARIANT =
IT_EVENTS =
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
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
TABLES
t_outtab = ITAB
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.
&----
*& Form GET_VAL
&----
FORM get_val .
w_lfa1-fieldname = 'LIFNR'.
w_lfa1-ref_tabname = 'LFA1'.
w_lfa1-ref_fieldname = 'LIFNR' .
APPEND w_lfa1 TO b_lfa1.
w_lfa1-fieldname = 'LAND1'.
w_lfa1-ref_tabname = 'LFA1'.
w_lfa1-ref_fieldname = 'LAND1' .
APPEND w_lfa1 TO b_lfa1.
w_lfa1-fieldname = 'NAME1'.
w_lfa1-ref_tabname = 'LFA1'.
w_lfa1-ref_fieldname = 'NAME1' .
APPEND w_lfa1 TO b_lfa1.
ENDFORM. " GET_VAL
<b>3.In real time h to use the performance tunning?</b>
ABAP performance depends upon various factors and in devicded in three parts:
1. Database
2. ABAP
3. System
Run Any program using SE30 (performance analys) to improve performance refer to tips and trics section of SE30, Always remember that ABAP perfirmance is improved when there is least load on Database.
u can get an interactive grap in SE30 regarding this with a file.
also if u find runtime of parts of codes then use :
Switch on RTA Dynamically within ABAP Code
*To turn runtim analysis on within ABAP code insert the following code
SET RUN TIME ANALYZER ON.
*To turn runtim analysis off within ABAP code insert the following code
SET RUN TIME ANALYZER OFF.
Always check the driver internal tables is not empty, while using FOR ALL ENTRIES
Avoid for all entries in JOINS
Try to avoid joins and use FOR ALL ENTRIES.
Try to restrict the joins to 1 level only ie only for tables
Avoid using Select *.
Avoid having multiple Selects from the same table in the same object.
Try to minimize the number of variables to save memory.
The sequence of fields in 'where clause' must be as per primary/secondary index ( if any)
Avoid creation of index as far as possible
Avoid operators like <>, > , < & like % in where clause conditions
Avoid select/select single statements in loops.
Try to use 'binary search' in READ internal table. Ensure table is sorted before using BINARY SEARCH.
Avoid using aggregate functions (SUM, MAX etc) in selects ( GROUP BY , HAVING,)
Avoid using ORDER BY in selects
Avoid Nested Selects
Avoid Nested Loops of Internal Tables
Try to use FIELD SYMBOLS.
Try to avoid into Corresponding Fields of
Avoid using Select Distinct, Use DELETE ADJACENT
Go through the following Document
Check the following Links
http://www.sapgenie.com/abap/performance.htm
http://www.thespot4sap.com/Articles/SAPABAPPerformanceTuning_PerformanceAnalysisTools.asp
check the below link
http://www.sap-img.com/abap/performance-tuning-for-data-selection-statement.htm
See the following link if it's any help:
http://www.thespot4sap.com/Articles/SAPABAPPerformanceTuning_PerformanceAnalysisTools.asp
Check also http://service.sap.com/performance
books like
http://www.sap-press.com/product.cfm?account=&product=H951
http://www.sap-press.com/product.cfm?account=&product=H973
http://www.sap-img.com/abap/more-than-100-abap-interview-faqs.htm
http://www.thespot4sap.com/Articles/SAPABAPPerformanceTuning_PerformanceAnalysisTools.asp
Performance tuning for Data Selection Statement
http://www.sap-img.com/abap/performance-tuning-for-data-selection-statement.htm
Run Time Analyser
http://help.sap.com/saphelp_47x200/helpdata/en/c6/617cafe68c11d2b2ab080009b43351/content.htm
SQL trace
http://help.sap.com/saphelp_47x200/helpdata/en/d1/801f7c454211d189710000e8322d00/content.htm
CATT - Computer Aided Testing Too
http://help.sap.com/saphelp_47x200/helpdata/en/b3/410b37233f7c6fe10000009b38f936/frameset.htm
Test Workbench
http://help.sap.com/saphelp_47x200/helpdata/en/a8/157235d0fa8742e10000009b38f889/frameset.htm
Coverage Analyser
http://help.sap.com/saphelp_47x200/helpdata/en/c7/af9a79061a11d4b3d4080009b43351/content.htm
Runtime Monitor
http://help.sap.com/saphelp_47x200/helpdata/en/b5/fa121cc15911d5993d00508b6b8b11/content.htm
Memory Inspector
http://help.sap.com/saphelp_47x200/helpdata/en/a2/e5fc84cc87964cb2c29f584152d74e/content.htm
ECATT - Extended Computer Aided testing tool.
http://help.sap.com/saphelp_47x200/helpdata/en/20/e81c3b84e65e7be10000000a11402f/frameset.htm
Just refer to these links...
<b>4.In script h to delete the window?</b>
goto se71->give ur form name->change->select WINDOWs->select particluar window which u want to delete->right click->select DELETE ELEMENT
<b>5.Can u send me userexit material and realtime objects?</b>
check these sites:
http://www.sap-img.com/abap/a-short-tutorial-on-user-exits.htm
http://www.sap-img.com/ab038.htm
http://www.planetsap.com/userexit_main_page.htm
http://www.sap-basis-abap.com/sapab013.htm
http://sap.ittoolbox.com/documents/popular-q-and-a/user-exits-for-the-transaction-code-migo-3283
These links will help you to learn more on user exits.
http://www.sap-img.com/abap/a-short-tutorial-on-user-exits.htm
http://help.sap.com/saphelp_nw04/helpdata/en/c8/1975cc43b111d1896f0000e8322d00/frameset.htm
http://www.planetsap.com/userexit_main_page.htm
http://www.allsaplinks.com/user_exit.html
www.sap-img.com/abap/what-is-user-exits.htm
Also please check these threads for more details about user exits.
1. Document on UserExits in FI/CO
http://www.ficoexpertonline.com/downloads/User%20ExitsWPedit.doc
2. Finding User Exits...
http://sap.ionelburlacu.ro/abap/sap2/Other_Useful_Tips.html#Finding_User_Exits
3. List of all User Exits...