Header in layout

i have a table in alv grid and i wont to give her a header but bigger from the header that u can give in the latout becouse in the layout when i try to give it highet it is impossible. the defult is 1 and u cant change it ,i just succsed to give bright. thankes for your answer.

Hi,
LVC_S_LAYO-SMALLTITLE must be space
and it may not be set in user-layout
A.

Similar Messages

Cannot display page header from layout builder

Hi:
I am somewhat new to BI Publisher.
I am using BI Publisher 10.1.3.4.1.
I have changed the config file and set the parameter for the Online Template Builder to "true". The layout builder does display properly.
If I add a Page Header or a Text item, neith will appear in the Preview nor when I save the template and view the report. Data does appear in a data table.
Can someonw help me sort out why the page header will not display?
Regards,
Bruce

Thats a bug :)
Oracle missed to preserving the MSword format page numbers, which they should ...
log an SR :)

Header Fields Layout- Hierarchy of Fields is not proper in Order Proposal

I have used the BADI /FRE/IF_EX_UI_RWB_BADI_004~GET_OPTIONAL_HEADER_FIELDS to set the visibility and hierarchy of fields .
Currently the layout I am getting is as follows
1
2
3
4
The desired layout is as follows
1 2
3 4

You can get Top-of-page easily by using the following code.
DATA: it_list_top_of_page TYPE slis_t_listheader,
          it_events TYPE slis_t_event,
          gs_layout TYPE slis_layout_alv,
          lwa_line TYPE slis_listheader.
FORM list_header USING lt_top_of_page TYPE slis_t_listheader.
lwa_line-typ = 'S'.
lwa_line-key = text-105.
CONCATENATE sy-datum+6(2) '.'
              sy-datum+4(2) '.'
              sy-datum(4) INTO lwa_line-info.
APPEND lwa_line TO lt_top_of_page.
CLEAR lwa_line.
lwa_line-typ = 'S'.
lwa_line-key = text-107.
lwa_line-info = sy-uname.
APPEND lwa_line TO lt_top_of_page.
CLEAR lwa_line.
IF gt_merge_01 IS INITIAL.
    ld_linesc = 0.
ENDIF.
lwa_line-typ = 'S'.
lwa_line-key = text-108.
lwa_line-info = ld_linesc.
APPEND lwa_line TO lt_top_of_page.
ENDFORM.                    "list_header
*&      Form top_of_page
      text
FORM top_of_page.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = it_list_top_of_page
ENDFORM.                    "top_of_page
PLZ REWARD POINTS IF HELPFUL.....

How to add header and footer image in pdf

Hi,
I want to add image in header and footer for the pdf generation.
how I can add this? Following my xsl
?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
xmlns:fo="http://www.w3.org/1999/XSL/Format"
xmlns:fn="http://www.w3.org/2005/xpath-functions">
<xsl:output method="xml" indent="yes" encoding="utf-8" omit-xml-declaration = "yes" />
<xsl:template match="/">
<fo:root>
<fo:layout-master-set>
<fo:simple-page-master master-name="my-page">
<fo:region-body margin="1in"/>
</fo:simple-page-master>
</fo:layout-master-set>
<fo:page-sequence master-reference="my-page">
<fo:flow flow-name="xsl-region-body">
<fo:block >
<xsl:apply-templates mode="dump" select="/session/entity/instance/attribute"/>
</fo:block>
</fo:flow>
</fo:page-sequence>
</fo:root>
</xsl:template>
<xsl:template match="*" mode="dump" priority="100">
<fo:block >
               <fo:block margin-left="1cm">
                    <xsl:for-each select="@question-text">
                    <xsl:value-of select="."/>=
                    </xsl:for-each>
                    <xsl:if test="string-length(normalize-space(text())) > 0">
                    <xsl:value-of select="text()"/>
                    </xsl:if>
               </fo:block>
<xsl:apply-templates mode="dump" select="*"/>
</fo:block>
</xsl:template>
</xsl:stylesheet>
Edited by: 848231 on Apr 6, 2011 1:42 AM

Hi,
Here is one way of putting an image in the header:
<fo:layout-master-set>
    <fo:simple-page-master master-name="my-page">
      <fo:region-body margin="1in"/>
      <fo:region-before extent="1in" background-color="silver" />
    </fo:simple-page-master>
</fo:layout-master-set>
<fo:page-sequence master-reference="my-page">
     <fo:static-content flow-name="xsl-region-before">
         <fo:block height="150px" width="1024px" background-color="white" >
             <fo:external-graphic src="http://localhost:9000/web-determinations9000/images/Header.jpg">
             </fo:external-graphic>
        </fo:block>
    </fo:static-content>
    <fo:flow flow-name="xsl-region-body">
    </fo:flow>
</fo:page-sequence>One good XSL:FO refernce: http://www.learn-xsl-fo-tutorial.com
Hope this helps.
Thanks,
Aakarsh
Edited by: aakarsh on Apr 6, 2011 6:40 AM

How to get header in the ALV report

Hi
I want to print header in the ALV report.But i am not getting that.Plz see my program it is getting error and also not printing header.If there is any error means plz give me the solution.In this program there is an error.
REPORT ZREPORT_ALV .
TYPE-POOLS : slis.
tables:vbak,vbap.
DATA: report_id LIKE sy-repid.
DATA: I_LAYOUT TYPE SLIS_LAYOUT_ALV.
data: heading        TYPE slis_t_listheader,
      wa_header      TYPE slis_listheader,
     events         TYPE slis_t_event.
data: l_string type c.
data: ivariant(1) type c,
      itvariant like disvariant,
      w_variant like disvariant.
initialization.
REPORT_ID = SY-REPID.
PERFORM pgm. "F1000_LAYOUT_INIT. "using I_LAYOUT.
ivariant = 'A'.
*PERFORM init.
itvariant = w_variant.
select-options:so_vbeln for vbap-vbeln.
data:itab like vbak occurs 0 with header line.
data:itab1 like vbap occurs 0 with header line.
start-of-selection.
select * from vbak into table itab where vbeln in so_vbeln.
if not itab[] is initial.
select * from vbap into table itab1
for all entries in itab
where vbeln = itab-vbeln.
endif.
data:ls_fieldcat TYPE slis_fieldcat_alv,
lt_fieldcat1 TYPE slis_t_fieldcat_alv.
****For alv display
IF NOT itab1[] IS INITIAL.
   DEFINE ls_fieldcat.
   add 1 to ls_fieldcat-col_pos.
    ls_fieldcat-fieldname    = &1.
    ls_fieldcat-outputlen    = &2.
    ls_fieldcat-seltext_l    = &3.
     ls_fieldcat-emphasize = &4.
    append ls_fieldcat to lt_fieldcat1.
    clear ls_fieldcat.
END-OF-DEFINITION.
    ls_fieldcat 'VBELN'           '10'     'Sales Order Number'.
   ls_fieldcat 'POSNR'           '6'        'SO Item'.
    ls_fieldcat 'MATNR'           '13'      'Material No'.
m_fieldcat1 'NETWR'           '13'        'Amount'.
CALL FUNCTION 'REUSE_ALV_GRID_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_CALLBACK_TOP_OF_PAGE            = ' '
I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
I_CALLBACK_HTML_END_OF_LIST       = ' '
I_STRUCTURE_NAME                  =
I_BACKGROUND_ID                   = ' '
I_GRID_TITLE                      =
I_GRID_SETTINGS                   =
   IS_LAYOUT                         = I_LAYOUT
   IT_FIELDCAT                       = lt_fieldcat1
IT_EXCLUDING                      =
IT_SPECIAL_GROUPS                 =
IT_SORT                           =
IT_FILTER                         =
IS_SEL_HIDE                       =
I_DEFAULT                         = 'X'
I_SAVE                            = ' '
IS_VARIANT                        =   ITVARIANT
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
I_HTML_HEIGHT_TOP                 = 0
I_HTML_HEIGHT_END                 = 0
IT_ALV_GRAPHICS                   =
IT_HYPERLINK                      =
IT_ADD_FIELDCAT                   =
IT_EXCEPT_QINFO                   =
IR_SALV_FULLSCREEN_ADAPTER        =
IMPORTING
E_EXIT_CAUSED_BY_CALLER           =
ES_EXIT_CAUSED_BY_USER            =
TABLES
    T_OUTTAB                          = itab1
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.
endif.
CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET'
EXPORTING
   I_SAVE              = ivariant
CHANGING
   CS_VARIANT          = itvariant
EXCEPTIONS
WRONG_INPUT         = 1
NOT_FOUND           = 2
PROGRAM_ERROR       = 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.
FORM pgm. "F1000_LAYOUT_INIT. "USING I_LAYOUT TYPE SLIS_LAYOUT_ALV.
CLEAR I_LAYOUT.
i_layout-colwidth_optimize = 'X'.
I_LAYOUT-key_hotspot = u2018Xu2019.
I_LAYOUT-hotspot_fieldname = MATNR.
ENDFORM.
*regarding logo and header,,,,
*first store the logo in T-code OAOR, then call that in your report.....
*data: heading        TYPE slis_t_listheader,
     wa_header      TYPE slis_listheader,
    events         TYPE slis_t_event.
To display TOP_OF_PAGE.
FORM top_of_page.
DATA : text(40),txtdt(40).
CLEAR l_string.
l_string = 'JCB India Limited'(hd2).
wa_header-typ = 'H'.
wa_header-info = l_string.
APPEND wa_header TO heading.                              " index 1.
CLEAR l_string.
WRITE :'Number of records:' TO text,'dbcnt' TO text+20 LEFT-JUSTIFIED.
wa_header-typ = 'S'.
wa_header-info = text.
APPEND wa_header TO heading.
CLEAR l_string.
wa_header-typ = 'S'.
WRITE : 'Report Run Date :' TO txtdt,sy-datum TO txtdt+20 DD/MM/YY.
WRITE sy-datum TO dat DD/MM/YY.
wa_header-info = txtdt.
APPEND wa_header TO heading.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
     i_logo             = 'ENJOYSAP_LOGO'
      it_list_commentary = heading.
CLEAR heading.
ENDFORM.                    "top_of_page
*to execute top-of-page you have to create events.
*for ex......
FORM create_event USING p_events TYPE slis_t_event.
DATA: ls_event TYPE slis_alv_event.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type = 0
    IMPORTING
      et_events   = p_events.
READ TABLE p_events WITH KEY name = slis_ev_top_of_page
                         INTO ls_event.
IF sy-subrc = 0.
    MOVE formname_top_of_page TO ls_event-form.
    APPEND ls_event TO p_events.
ENDIF.
ENDFORM.                    " create_event

Hi,
   Find below code for your question, you may get some idea,,
*& Report ZACTIONGRIDPRACTICE
REPORT ZACTIONGRIDPRACTICE.
*data declarations.....
TYPE-POOLS SLIS.
TABLES : T529T ,PA0000.
data : gd_repid type sy-repid.
DATA : LD_COLOR(10) TYPE N.
DATA : GD_TAB_GROUP TYPE SLIS_T_SP_GROUP_ALV.
Data: is_fieldcat TYPE slis_fieldcat_alv.
DATA : GD_LAYOUT TYPE SLIS_LAYOUT_ALV.
DATA : GD_DATUM TYPE DATUM.
DATA : BEGIN OF WA_TABLE,
                MASSN TYPE T529T-MASSN,
                MNTXT TYPE T529T-MNTXT,
                userg type userg,
                TOTAL TYPE I ,
                begda type begda,
                endda type endda,
                april type i,
                SLNO TYPE I,
                  LINE_COLOR(4) TYPE C,
                END OF WA_TABLE,
                IT_TABLE LIKE TABLE OF WA_TABLE.
data : april type i.
DATA : TEMP TYPE C.
data :    LT_PA0000 TYPE TABLE OF PA0000,
          LT_PA0000_T typE TABLE OF PA0000 with header line.
DATA : IT_FCAT TYPE SLIS_T_FIELDCAT_ALV,
        WA_FCAT LIKE LINE OF IT_FCAT.
DATA : IT_EVENTS TYPE SLIS_T_EVENT,
        WA_EVENTS LIKE LINE OF IT_EVENTS.
        wa_events-form = 'HEADER'.
WA_EVENTS-NAME = 'TOP_OF_PAGE'.
APPEND WA_EVENTS TO IT_EVENTS.
PERFORM HEADER.
DATA : SLNO TYPE I.
DATA : lv_output      TYPE dats.
CALL FUNCTION 'ZHR_RE_BE_CALC_START_DATE'
EXPORTING
    id_daberi   = sy-datum
IMPORTING
    ed_date_cor = lv_output.
select-options...
selection-screen BEGIN OF BLOCK B WITH FRAME TITLE TEXT-003.
select-options : s_date for sy-datum OBLIGATORY.
SELECTION-SCREEN END OF BLOCK B.
lv_output = sy-datum - 27.
INITIALIZATION.
S_DATE-LOW = lv_output.
S_DATE-HIGH = SY-DATUM.
S_DATE-SIGN = 'I'.
S_DATE-OPTION = 'BT'.
APPEND s_date.
*AT SELECTION-SCREEN ON S_DATE.
*SELECT MASSN INTO TABLE IT_TABLE FROM PA0000 WHERE BEGDA IN S_DATE.
*SELECT STATEMENTS....
start-of-selection.
SELECT   t529t~MASSN t529t~MNTXT INTO TABLE IT_table FROM T529T where SPRSL EQ 'E' and t529t~massn in ('10','13','16','20','28','30','45','01','03') .
DATUM IN S_DATE.
PERFORM LAYOUT.
loop at it_table into wa_table.
LD_COLOR = 2.
LD_COLOR = LD_COLOR + 1.
if LD_COLOR = 8.
LD_COLOR = 1.
endif.
concatenate 'C' '1' '11' into wa_table-LINE_COLOR . "='C410'.
modify it_table from wa_table.
endloop.
LOOP AT IT_TABLE INTO WA_TABLE." = 'C410'.
select massn from pa0000 into table lt_pa0000 where begda in s_date and massn = wa_table-massn.
*write : / sy-dbcnt. gt s_date-low and endda lt s_date-high
*DESCRIBE TABLE LT_PA0000_t LINES LV_LINES.
move sy-dbcnt to wa_table-total.
READ TABLE lt_pa0000 INTO LT_PA0000_T WITH KEY MASSN = wa_TABLE-MASSN BINARY SEARCH.
DESCRIBE TABLE LT_PA0000_t LINES LV_LINES.
MOVE LV_LINES to wa_TABLE-TOTAL.
MODIFY IT_TABLE FROM WA_TABLE.
MOVE SY-TABIX TO WA_TABLE-SLNO.
MODIFY IT_TABLE FROM WA_TABLE.
REFRESH : LT_PA0000_t.
CLEAR : LV_LINES.
ENDLOOP.
loop at it_table into wa_table.
SELECT MASSN FROM PA0000 INTO TABLE lt_pa0000 where begda between '01.02.2008' and '20.02.2008'.
MOVE SY-DBCNT TO   WA_TABLE-APRIL.
MODIFY IT_TABLE FROM WA_TABLE.
*endloop.
*PERFORM STATEMENTS...
PERFORM FCAT USING '1' 'MASSN' 'ACTIONCODE'.
PERFORM FCAT USING '2' 'MNTXT' 'ACTION TYPE'.
PERFORM fcat USING '3' 'TOTAL' 'TOTAL'.
DEFINE m_fieldcat.
    is_fieldcat-fieldname = &1.
    is_fieldcat-hotspot = &2.
    is_fieldcat-seltext_m = &3.
    is_fieldcat-col_pos = &4.
    is_fieldcat-outputlen = &5.
    is_fieldcat-hotspot = &6.
    append is_fieldcat to it_fcat.
    clear is_fieldcat.
END-OF-DEFINITION.
   m_fieldcat 'SLNO' '' Text-012 '1' '17' ''.
m_fieldcat 'MASSN' '' Text-010 '2' '40' ''.
m_fieldcat 'MNTXT' '' Text-009 '3' '50' '' .
m_fieldcat 'TOTAL' '' Text-011 '4' '10' 'X'.
m_fieldcat 'april' '' Text-013 '5' '10' 'X'.
*FOR DISPLAYING THE RECORDS...
gd_repid = sy-repid.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
   I_CALLBACK_PROGRAM                = gd_repid
IS_LAYOUT = GD_LAYOUT
I_CALLBACK_USER_COMMAND           = ' '
   I_GRID_TITLE                      = 'REPORT'
   IS_LAYOUT                         = gd_LAYOUT
   IT_FIELDCAT                       = IT_FCAT
   I_SAVE                            = 'X'
   IT_EVENTS                         = IT_EVENTS
TABLES
    T_OUTTAB                          = IT_TABLE.
**&      Form FCAT
*FORM FCAT USING   FP_COL_POS
                 FP_FIELDNAME
                 FP_SELTEXT_M.
WA_FCAT-COL_POS = FP_COL_POS.
WA_FCAT-FIELDNAME = FP_FIELDNAME.
wa_fcat-seltext_m = fp_seltext_m.
APPEND WA_FCAT TO IT_FCAT.
ENDFORM.
*&      Form HEADER
      text
--> p1        text
<-- p2        text
form header .
DATA : IT_HEADER TYPE SLIS_T_LISTHEADER,
        WA_HEADER LIKE LINE OF it_header.
WA_HEADER-TYP = 'H'.
WA_HEADER-INFO = 'ACTION TYPE REPORT'.
APPEND WA_HEADER TO IT_HEADER.
wa_header-typ = 'S'.
wa_header-key = Text-022.
CONCATENATE s_date-low+6(2) '.'
               s_date-low+4(2) '.'
               s_date-low(4)
               temp
               '.     TO      .'
               s_date-high+6(2) '.'
               s_date-high+4(2) '.'
               s_date-high(4)
               INTO wa_header-info SEPARATED BY space.
APPEND wa_header TO it_header.
CLEAR wa_header.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      IT_LIST_COMMENTARY = IT_HEADER
      I_LOGO             = 'HRRU_51050061'.
*select single bstkd into CORRESPONDING FIELDS OF gt_vbkd
*from vbkd where vbeln = rt_outtab-vgbel
*and posnr = '000000'.
*rt_outtab-bstkd = gt_vbkd-bstkd.
ENDFORM.                    " HEADER
*&      Form LAYOUT
      text
--> p1        text
<-- p2        text
FORM LAYOUT .
GD_LAYOUT-NO_INPUT = ''.
gd_layout-colwidth_optimize = ''.
gd_layout-totals_text = 'TOTALS'(201).
gd_layout-info_fieldname =      'LINE_COLOR'.
ENDFORM.                    " LAYOUT

Header and Footer Questions

Hello.
Can anyone explain what exactly the purpose of the header and footer sections are in iWeb?
I would understand if content placed in the header or footer showed up on all pages of a site. That would be very useful, but it doesn't seem to be the case.
Also, if I start a new page using the Black template then set the header to 0px, and then copy and paste in an item that was in the header of a different page, it will create a header on the new page and place the item in it. You can see the header in layout view, but the layout tab in the Inspector still says 0px.
I have an image and home-made nav at the top of my site, but I'm not sure if I should put this in a header for some reason, or just get rid of the header and put the image and nav at the top of the body. Same goes for the footer.
Any explanation or suggestions would be greatly appreciated.
Thanks,
Andy

The footer is where the iWeb "buttons" go.
I never use then of course and I set the footer height to 50 px to act as bottom padding so that my © notice sites up a bit from the bottom of the page.
I usually drop a text box onto the page with the © notice and drag it down to quickly lengthen the page.
Its useful to use the header section if you are having a uniform header throughout your site.
I think the page I did here might help. This site is still under construction and is aimed at musicians but this particular section is kind of general...
http://www.iwebformusicians.com/WebMusic/Layout.html

Header(S) and Item(S) in ALV Grid

Hi All,
Is it possible to have multiple headers and its corresponding item details in ALV Grid Display?
The requirement is to convert the display of MB51 in ALV Grid. Is it possible in ALV Grid to have this kind of display?
Best Regards,
Kumar.

Hi.
When i execute MB51,it displays in a hierarchical ALV format.
Just have a look on the following code to display the Item and
Header details.
TYPE-POOLS: SLIS.
DATA: BEGIN OF I_VBAK OCCURS 0,
      VBELN LIKE VBAK-VBELN,
      ERNAM LIKE VBAK-ERNAM,
      ERDAT LIKE VBAK-ERDAT,
      AUDAT LIKE VBAK-AUDAT,
      VAR1,
      END OF I_VBAK.
DATA: BEGIN OF I_VBAP OCCURS 0,
      VBELN LIKE VBAP-VBELN,
      POSNR LIKE VBAP-POSNR,
      MATNR LIKE VBAP-MATNR,
      CHARG LIKE VBAP-CHARG,
      END OF I_VBAP.
DATA: FLDCAT TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
      LAYOUT TYPE SLIS_LAYOUT_ALV,
      KEY TYPE SLIS_KEYINFO_ALV.
DATA: IT_HEADER1 TYPE SLIS_T_LISTHEADER.
DATA: WA_HEADER1 TYPE SLIS_LISTHEADER.
DATA: IT_EVE1 TYPE SLIS_T_EVENT,
      WA_EVE1 TYPE SLIS_ALV_EVENT.
SELECT VBELN ERNAM ERDAT AUDAT FROM VBAK
INTO CORRESPONDING FIELDS OF TABLE I_VBAK
UP TO 20 ROWS.
SELECT VBELN POSNR MATNR CHARG FROM VBAP
INTO CORRESPONDING FIELDS OF TABLE I_VBAP
UP TO 20 ROWS.
FLDCAT-FIELDNAME = 'VBELN'.
FLDCAT-TABNAME = 'I_VBAK'.
FLDCAT-REF_FIELDNAME = 'VBELN'.
FLDCAT-REF_TABNAME = 'VBAK'.
FLDCAT-SELTEXT_M = 'SALES DOC.'.
FLDCAT-COL_POS = 0.
FLDCAT-KEY = 'X'.
APPEND FLDCAT.
CLEAR FLDCAT.
FLDCAT-FIELDNAME = 'ERNAM'.
FLDCAT-TABNAME = 'I_VBAK'.
FLDCAT-REF_FIELDNAME = 'ERNAM'.
FLDCAT-REF_TABNAME = 'VBAK'.
FLDCAT-SELTEXT_M = 'NAME OF PERSON'.
FLDCAT-COL_POS = 1.
APPEND FLDCAT.
CLEAR FLDCAT.
FLDCAT-FIELDNAME = 'ERDAT'.
FLDCAT-TABNAME = 'I_VBAK'.
FLDCAT-REF_FIELDNAME = 'ERDAT'.
FLDCAT-REF_TABNAME = 'VBAK'.
FLDCAT-SELTEXT_M = 'RECORD DATE'.
FLDCAT-COL_POS = 2.
APPEND FLDCAT.
CLEAR FLDCAT.
FLDCAT-FIELDNAME = 'AUDAT'.
FLDCAT-TABNAME = 'I_VBAK'.
FLDCAT-REF_FIELDNAME = 'AUDAT'.
FLDCAT-REF_TABNAME = 'VBAK'.
FLDCAT-SELTEXT_M = 'DOCUMENT DATE'.
FLDCAT-COL_POS = 3.
APPEND FLDCAT.
CLEAR FLDCAT.
FLDCAT-FIELDNAME = 'POSNR'.
FLDCAT-TABNAME = 'I_VBAP'.
FLDCAT-REF_FIELDNAME = 'POSNR'.
FLDCAT-REF_TABNAME = 'VBAP'.
FLDCAT-SELTEXT_M = 'SALES DOC ITEM'.
FLDCAT-COL_POS = 4.
APPEND FLDCAT.
CLEAR FLDCAT.
FLDCAT-FIELDNAME = 'MATNR'.
FLDCAT-TABNAME = 'I_VBAP'.
FLDCAT-REF_FIELDNAME = 'MATNR'.
FLDCAT-REF_TABNAME = 'VBAP'.
FLDCAT-SELTEXT_M = 'MATERIAL NO'.
FLDCAT-COL_POS = 5.
APPEND FLDCAT.
CLEAR FLDCAT.
FLDCAT-FIELDNAME = 'CHARG'.
FLDCAT-TABNAME = 'I_VBAP'.
FLDCAT-REF_FIELDNAME = 'CHARG'.
FLDCAT-REF_TABNAME = 'VBAP'.
FLDCAT-SELTEXT_M = 'BATCH NUMBER'.
FLDCAT-COL_POS = 6.
APPEND FLDCAT.
CLEAR FLDCAT.
LAYOUT-EXPAND_FIELDNAME = 'VAR1'.
KEY-HEADER01 = 'VBELN'.
KEY-ITEM01 = 'VBELN'.
CLEAR WA_EVE1.
WA_EVE1-NAME = 'TOP_OF_PAGE'.
WA_EVE1-FORM = 'TOP-OF-PAGE1'.
APPEND WA_EVE1 TO IT_EVE1.
CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY'
EXPORTING
   I_CALLBACK_PROGRAM             = SY-REPID
   IS_LAYOUT                      = LAYOUT
   IT_FIELDCAT                    = FLDCAT[]
   IT_EVENTS                      = IT_EVE1[]
    I_TABNAME_HEADER               = 'I_VBAK'
    I_TABNAME_ITEM                 = 'I_VBAP'
    IS_KEYINFO                     = KEY
TABLES
    T_OUTTAB_HEADER                = I_VBAK
    T_OUTTAB_ITEM                  = I_VBAP
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 TOP-OF-PAGE1.                                          "#EC CALLED
WA_HEADER1-TYP = 'H'.
WA_HEADER1-INFO = 'Hierarchical Display'.
APPEND WA_HEADER1 TO IT_HEADER1.
CLEAR WA_HEADER1.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      IT_LIST_COMMENTARY       = IT_HEADER1[].
REFRESH IT_HEADER1.
ENDFORM.                    "TOP-OF-PAGE1
Regards,
Chandu.

How do I keep the Spry menu fixed to the bottom of the header div?

I have created a horizontal Spry menu bar using Dreamweaver CS4 but the problem is, I can't figure out how to make it be in the right position at the bottom of the header div. In Design View it is too far below the header background graphic, in Live View it cuts off the bottom of the header graphic, and it also looks higher or lower in Safari and Firefox.
I'm sure it's very simple, but how can I control them menu on the y-axis and keep the menu fixed to the bottom of the header div? Is there a way to float it to the bottom?
I really appreciate any help or advice anyone can give me on how to get a stationary menu bar.

Below is an example of a fixed-header & footer layout with jQuery smooth scrolling. I did not use a separate scrolling div because mobile users have lots of trouble with them.
View source to see the code.
http://alt-web.com/TEMPLATES/FixedLayout.shtml
You need 4 basic things:
jQuery latest core library,
jQuery easing.js,
jQuery anchor.js, inside the <head> of your document
jQuery function code, near the bottom of your document.
That's all there is to it.
Nancy O.

Layout problem in grid

Hi,
I created an ALV Report with one basic list and two secondary lists. Functional owner created 3 layout varients one for each list so that he can see only selected fields in the output and he kept layout varient of basic list as default.when i execute the program i am getting basic list with out any problem where as when i am clicking in basic list to navigate to secondary list , secondary list is coming with top of page header but layout is not displaying by default, but when i am going to view menu + layout + choose and choosing the layout varient created by functional for that secondary list only it is coming and same problem for second secondary list.
I am getting data into all 3 final internal tables and even fieldcat for 3 list is also populating.
Please help me regarding this asap as we hae go live on 2nd of Jan.
waiting for replies at earliest.
Regards,
Subhani.

Hi
The layout variant is linked to the report, not to the list level.
So you should force the right variant when you call the ALV again for the secondary list.
U should try to fill the field HANDLE of the variant structure to indicate which variant can be used in certain level.
Max

Layout display using oops concept

Hi All,
I have default layout in which i will display(alv grid) header level data of a table.when i changed the layout, then it should display the item level data using the same output table for both.
Thanks & Regards,
Padmasri.

hi,
change the layout means if i save another layout which display the item level data .when i choose item level display, the no. of rows will increase where as i choose the header level layout then the no.of rows will decrease.
thanks

Sticky Header not working

I'm trying to build a site based on "template design #1" which is from this page: http://www.adobe.com/devnet/dreamweaver/articles/dreamweaver_custom_templates.html#templat es
And Im trying to make a sticky header following the tutorial on this page: http://www.noobcube.com/tutorials/html-css/fixed-header-footer-layout-a-beginners-guide-/
In the stylesheet, before ".bannerArea .container" I put:
#header-wrap {
position: fixed;
_position: absolute;
top: 0;
left: 0;
width: 100%;
And in the source code:
<body>
<div id="header-wrap"></div>
<div class="bannerArea">
But it's not working. So, any suggestions as to how to make a sticky header for "template design #1" would be appreciated.

All modern browsers support fixed positioning.
Pre-IE7 browsers don't support fixed positioning on anything other than the <body>. So if you must support IE5.5 (obsolete) or IE6 (fewer than 10% users worldwide), use the workarounds described below:
http://alt-web.com/DEMOS/CSS2-Sticky-Footer.shtml
IMO browser compatibility warnings are a waste of time. I never pay attention to them.
Nancy O.
Alt-Web Design & Publishing
Web | Graphics | Print | Media Specialists
http://alt-web.com/
http://twitter.com/altweb

To include logo in layout

Hi everybody,
I want to know how to include a company's logo in a layout as a header.The layout that i have with me is in GIF format.The name of the logo is logo.gif
How it can be done?
Regards,
Varadharajan

Hi varadharajan,
1. RSTXLDMC
   This is the standard SAP Program
   to UPLOAD .TIF files.
   Please convert your gif file
   to .TIF file
   (may be using PHOTO EDITOR , KODAK Image Editor , etc)
2. Use this program,
   to upload this image.
   This program has OPTIONS
   like Colour logo,B&W logo,
   Positioning (absolute or relative)
These options are also important !
Because they will Specify where the logo
appears in your sapscript
(Top Left, Bottom, Middle Etc)
(However, using window in layout,
   and including logo in that window,
we can FURTHER CONTROL the POSITION of logo)
3. /: INCLUDE XXYYZZ OBJECT TEXT ID ST
   Use this above line
   in your sapscript layout
   to include the logo.
   (XXYYZZ is the name by which u uploaded
   thru the above program)
regards,
amit m.
Message was edited by: Amit Mittal
Message was edited by: Amit Mittal

How to find out the Transactions used per month & the USER who used that

Hi,
1)How to find out the Transactions used per month & the USER who used that?
2)and can i get the above same for minimum 20 month?
System : SAP- Enterprise Core Component.

You can use my program...
*& Report Z_ABAP_TCODE_MONITOR
*****& Program Type          : Report                                 *
*****& Title                 : Z_ABAP_TCODE_MONITOR                   *
*****& Transaction code      : ZTCODE_USAGE                           *
*****& Developer name        : Shailendra Kolakaluri                  *
*****& Deveopment start date : 26 th Dec 2011                         *
*****& Development Package   : ZDEV                                   *
*****& Transport No          : DEVK906086                                       *
*****& Program Description   : This program is to display
*List all tcodes executed during previous day.
*& Show the number of users executing tcodes
*& Modification history
REPORT Z_ABAP_TCODE_MONITOR.
*& List all tcodes executed during previous day.
*& Show the number of users executing tcodes
TYPE-POOLS : slis.
DATA: ind TYPE i,
      fcat TYPE slis_t_fieldcat_alv WITH HEADER LINE,
      layout TYPE slis_layout_alv,
      variant TYPE disvariant,
      events TYPE slis_t_event WITH HEADER LINE,
      heading TYPE slis_t_listheader WITH HEADER LINE.
*REPORT z_report_usage.
TYPES: BEGIN OF zusertcode,
date   TYPE swncdatum,
user   TYPE swncuname,
mandt     TYPE swncmandt,
tcode     TYPE swnctcode,
report TYPE swncreportname,
count     TYPE swncshcnt,
END OF zusertcode.
*data   : date type n.
DATA: t_usertcode TYPE swnc_t_aggusertcode,
      wa_usertcode TYPE swncaggusertcode,
      wa           TYPE zusertcode,
      t_ut         TYPE STANDARD TABLE OF zusertcode,
      wa_result    TYPE zusertcode,
      t_result     TYPE STANDARD TABLE OF zusertcode.
PARAMETER: month TYPE dats DEFAULT sy-datum.
*PARAMETER: date TYPE dats.
*select-options : username for wa_usertcode-account.
START-OF-SELECTION.
PERFORM get_data.
PERFORM get_fieldcatalog.
PERFORM set_layout.
PERFORM get_event.
PERFORM get_comment.
PERFORM display_data.
FORM get_data .
*date = sy-datum - 2 .
After start-of-selection add this line (parameter Month required 01 as day).
concatenate month+0(6) '01' into month.
CALL FUNCTION 'SWNC_COLLECTOR_GET_AGGREGATES'
    EXPORTING
      component     = 'TOTAL'
      ASSIGNDSYS    = 'DEV'
      periodtype    = 'M'
      periodstrt    = month
    TABLES
      usertcode     = t_usertcode
    EXCEPTIONS
      no_data_found = 1
      OTHERS        = 2.
wa-date = month.
*wa-date = date.
wa-mandt = sy-mandt.
wa_usertcode-account = username.
LOOP AT t_usertcode INTO wa_usertcode.
    wa-user = wa_usertcode-account.
    IF wa_usertcode-entry_id+72 = 'T'.
      wa-tcode = wa_usertcode-entry_id.
      wa-report = space.
    ELSE.
      wa-tcode = space.
      wa-report = wa_usertcode-entry_id.
    ENDIF.
    COLLECT wa INTO t_ut.
ENDLOOP.
SORT t_ut BY report ASCENDING.
CLEAR: wa, wa_result.
endform.
FORM get_fieldcatalog .
fcat-tabname     = 't_ut'.
fcat-fieldname   = 'DATE'.
fcat-seltext_l   = 'Date'.
fcat-key         = 'X'.
APPEND fcat.
CLEAR fcat.
fcat-tabname     = 't_ut'.
fcat-fieldname   = 'MANDT'.
fcat-seltext_l   = 'Client'.
fcat-key         = 'X'.
APPEND fcat.
CLEAR fcat.
fcat-tabname     = 't_ut'.
fcat-fieldname   = 'USER'.
fcat-seltext_l   = 'User Name'.
fcat-key         = 'X'.
APPEND fcat.
CLEAR fcat.
fcat-tabname     = 't_ut'.
fcat-fieldname   = 'TCODE'.
fcat-seltext_l   = 'Transaction Code'.
fcat-key         = 'X'.
APPEND fcat.
ENDFORM.
*&      Form SET_LAYOUT
      text
--> p1        text
<-- p2        text
FORM set_layout .
layout-colwidth_optimize = 'X'.
ENDFORM.                    " SET_LAYOUT
*&      Form GET_EVENT
      text
--> p1        text
<-- p2        text
*FORM get_event .
events-name = slis_ev_top_of_page.
events-form = 'TOP_OF_PAGE'.
APPEND events.
*ENDFORM.                    " GET_EVENT
**&      Form GET_COMMENT
      text
--> p1        text
<-- p2        text
*FORM get_comment .
DATA: text(30).
text = 'Billing Report'.
heading-typ = 'H'.
heading-info = text.
APPEND heading.
*ENDFORM.                    " GET_COMMENT
**&      Form top_of_page
      text
--> p1        text
<-- p2        text
*FORM top_of_page .
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
   EXPORTING
     it_list_commentary       = heading[]
I_LOGO                   =
I_END_OF_LIST_GRID       =
*ENDFORM.                    " top_of_page
*&      Form DISPLAY_DATA
      text
--> p1        text
<-- p2        text
FORM display_data .
sort t_ut[].
DELETE ADJACENT DUPLICATES FROM t_ut[] COMPARING ALL FIELDS.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program = sy-cprog
      is_layout          = layout
      it_fieldcat        = fcat[]
      i_save             = 'A'
      is_variant         = variant
      it_events          = events[]
    TABLES
      t_outtab           = t_ut
    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.                    " DISPLAY_DATA

How to add link and image in oaf iprocurement stores page?

Hi Every1,
I have requirement to in iprocurement stores page. Already there are certain links ( a meaning full image+link ), by click on image or link it will take you to the
required page.
I need to add one more like that.
How can i do this ?
I know thru personalizations we can add links to the page, but how can i add image to that link. so that click of anyone will take to the req page.
Thanks,
Arun Peddi

Hi,
Here is one way of putting an image in the header:
<fo:layout-master-set>
    <fo:simple-page-master master-name="my-page">
      <fo:region-body margin="1in"/>
      <fo:region-before extent="1in" background-color="silver" />
    </fo:simple-page-master>
</fo:layout-master-set>
<fo:page-sequence master-reference="my-page">
     <fo:static-content flow-name="xsl-region-before">
         <fo:block height="150px" width="1024px" background-color="white" >
             <fo:external-graphic src="http://localhost:9000/web-determinations9000/images/Header.jpg">
             </fo:external-graphic>
        </fo:block>
    </fo:static-content>
    <fo:flow flow-name="xsl-region-body">
    </fo:flow>
</fo:page-sequence>One good XSL:FO refernce: http://www.learn-xsl-fo-tutorial.com
Hope this helps.
Thanks,
Aakarsh
Edited by: aakarsh on Apr 6, 2011 6:40 AM

All Records not showing in Report

Hi All,
U just solved my amount problem....
But now i gives my earlier problem again, means displaying only 1 rows, when i executing for 1 month in selection criteria...and amount showing right total of all records...
example---
Document No......Doc. date.......P.date........Vendor..........Name.........Tax Code.........Base Amt....... Tax Amt........Ven. Ref.........P. Doc...
5500000022 .......22.04.2008 ...28.04.2008....1011............XXXXXXX........NB..................500,000............25,000.............A-102.......4500034463
This Document No. is my 1st Document no. (5500000022)..
Here Base Amount (500,000) & Tax Amount (25,000) is the total of more than 100 records total but showing in Single Row...(This rows showing the only 1st record)...
Here what is the problem in my program...where i m wrong in clearing the itab or itab2...
please let me know...
I m again sending my corrected Program...
Code-----
REPORT zak_form_c4 NO STANDARD PAGE HEADING LINE-SIZE 125 .
TABLES : bsik,bkpf,bseg,j_1imovend,lfa1,t001,t005u,bsak,ekko,bsis, ekkn, anla, anlc.
TYPE-POOLS : slis.
DATA : BEGIN OF itab OCCURS 0,
       hkont LIKE bseg-hkont, "Gl account
       mwskz LIKE bseg-mwskz, "Tax Code
       dmbtr LIKE bseg-dmbtr, "Amount
       buzei LIKE bseg-buzei, "line item
       ebeln LIKE bseg-ebeln, "Purchasing Document
       ebelp LIKE bseg-ebelp, "line item nbr
       hwbas LIKE bseg-hwbas, "Base amount
       shkzg LIKE bseg-shkzg, "Debit/Credit code
       belnr LIKE bsik-belnr, "Document number
       gjahr LIKE bsik-gjahr, "Fiscal Year
       bldat LIKE bsik-bldat, "Document Date
       budat LIKE bsik-budat, "Posting Date
       lifnr LIKE bsik-lifnr, "Vendor number
       xblnr LIKE mkpf-xblnr, "Ven invoice nbr
       name1(25),                                           "name1
       ort01 LIKE lfa1-ort01,   "City
       j_1ilstno LIKE j_1imovend-j_1ilstno, " Vendor tin nbr
       regio LIKE lfa1-regio, "Region Code
       bezei LIKE t005u-bezei, "Region desc
       dmbtr1 LIKE bseg-dmbtr, "Amount
       hwbas1 LIKE bseg-hwbas, "Base amount
END OF itab.
DATA : BEGIN OF itab3 OCCURS 0.
        INCLUDE STRUCTURE itab.
DATA:END OF itab3.
DATA : wa LIKE LINE OF itab.
DATA : BEGIN OF itab1 OCCURS 0.
        INCLUDE STRUCTURE itab.
DATA:END OF itab1.
DATA : BEGIN OF itab2 OCCURS 0.
        INCLUDE STRUCTURE itab.
DATA:END OF itab2.
***********************************Purchase order history
DATA:   BEGIN OF bet OCCURS 50.
        INCLUDE STRUCTURE ekbe.
DATA:   END OF bet.
DATA:   BEGIN OF bzt OCCURS 50.
        INCLUDE STRUCTURE ekbz.
DATA:   END OF bzt.
DATA:   BEGIN OF betz OCCURS 50.
        INCLUDE STRUCTURE ekbez.
DATA:   END OF betz.
DATA:   BEGIN OF bets OCCURS 50.
        INCLUDE STRUCTURE ekbes.
DATA:   END OF bets.
DATA:   BEGIN OF xekbnk OCCURS 10.
        INCLUDE STRUCTURE ekbnk.
DATA:   END OF xekbnk.
DATA : w_container TYPE scrfname VALUE 'CL_GRID',
       w_cprog TYPE lvc_s_layo,
       g_repid LIKE sy-repid,
       w_save TYPE c,
       w_exit TYPE c,
       cl_grid TYPE REF TO cl_gui_alv_grid,
       cl_custom_container TYPE REF TO cl_gui_custom_container,
       it_fld_catalog TYPE slis_t_fieldcat_alv,
       wa_fld_catalog TYPE slis_t_fieldcat_alv WITH HEADER LINE ,
       layout TYPE slis_layout_alv,
       col_pos LIKE sy-cucol ,
       alvfc TYPE slis_t_fieldcat_alv.
SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS       : hkont LIKE bseg-hkont OBLIGATORY. "GL Code
*SELECT-OPTIONS   : hkont FOR bseg-hkont .
SELECT-OPTIONS   : belnr FOR bsik-belnr .
SELECT-OPTIONS   : gjahr FOR bsik-gjahr .
SELECT-OPTIONS   : bldat FOR bsik-bldat.
SELECT-OPTIONS   : budat FOR bsik-budat.
SELECTION-SCREEN : END OF BLOCK b1.
PERFORM fill_catalog1 USING:
'HKONT'    'ITAB2'    'G/L Code' ,
'BELNR'    'ITAB2'    'Document Number',
'GJAHR'    'ITAB2'    'Year',
'BLDAT'    'ITAB2'    'Doc. date' ,
'BUDAT'    'ITAB2'    'Posting Date',
'LIFNR'    'ITAB2'    'Vendor',
'NAME1'    'ITAB2'    'Name',
'EBELN'    'ITAB2'    'Purchasing Document',
'MWSKZ'    'ITAB2'    'Tax Code',
'HWBAS'    'ITAB2'    'Base Amount',
'DMBTR'    'ITAB2'    'Tax Amount',
'XBLNR'    'ITAB2'    'Vendor Inv. No.'.
SELECT DISTINCT hkont belnr gjahr bldat budat INTO CORRESPONDING FIELDS OF TABLE itab
                  FROM bsis
                  WHERE bukrs = '1000'
                  AND hkont = hkont
                  AND belnr IN belnr
                  AND gjahr IN gjahr
                  AND bldat IN bldat
                  AND budat IN budat.
SORT itab BY belnr.
LOOP AT itab.
SELECT * FROM bseg WHERE belnr = itab-belnr AND gjahr = itab-gjahr
                                               AND bukrs = '1000'
                                               AND ( ebeln <> ' ' OR hkont = hkont ).
    IF sy-subrc = 0.
      itab-buzei = bseg-buzei.
      itab-mwskz = bseg-mwskz.
      IF bseg-ebeln <> ' '.
        itab-ebeln = bseg-ebeln.
        itab-ebelp = bseg-ebelp.
        MODIFY itab.
      ENDIF.
      IF bseg-hkont = hkont.
        itab-shkzg = bseg-shkzg.
        itab-hwbas = bseg-hwbas.
        itab-dmbtr = bseg-dmbtr.
        IF itab-shkzg = 'H'.
          itab-dmbtr = itab-dmbtr * ( -1 ).
        ENDIF.
        MOVE-CORRESPONDING itab TO itab2.
        APPEND itab2.
      ENDIF.
    ENDIF.
ENDSELECT.
ENDLOOP.
LOOP AT itab2.
SELECT SINGLE * FROM ekko WHERE ebeln = itab2-ebeln.
IF sy-subrc = 0.
    itab2-lifnr = ekko-lifnr.
ENDIF.
CALL FUNCTION 'ME_READ_HISTORY'
    EXPORTING
      ebeln = itab2-ebeln
      ebelp = itab2-ebelp
      webre = 'X'
    TABLES
      xekbe = bet
      xekbz = bzt
      xekbes = bets
      xekbez = betz
      xekbnk = xekbnk.
itab2-xblnr = bet-xblnr.
SELECT SINGLE * FROM lfa1 WHERE lifnr = itab2-lifnr.
itab2-name1 = lfa1-name1.
itab2-ort01 = lfa1-ort01.
itab2-regio = lfa1-regio.
SELECT SINGLE * FROM t005u WHERE bland = itab2-regio
                              AND spras = 'EN'
                              AND land1 = 'IN'.
itab2-bezei = t005u-bezei.
SELECT SINGLE * FROM j_1imovend WHERE lifnr = itab2-lifnr.
IF sy-subrc = 0 .
    itab2-j_1ilstno = j_1imovend-j_1ilstno. " Vendor tin nbr
ENDIF.
MODIFY itab2.
ENDLOOP.
SORT itab2 BY belnr.
LOOP AT itab2.
DATA : cnt TYPE i,
         cnt1 TYPE i.
itab1-dmbtr1 = itab1-dmbtr1 + itab2-dmbtr.
itab1-hwbas1 = itab1-hwbas1 + itab2-hwbas.
AT END OF belnr.
    cnt = sy-tabix.
    cnt1 = cnt - 1.
    DO cnt1 TIMES.
      DELETE itab2.
    ENDDO.
    CLEAR itab2.
    itab2-dmbtr = itab1-dmbtr1.
    itab2-hwbas = itab1-hwbas1.
    MODIFY itab2 TRANSPORTING dmbtr hwbas .
ENDAT.
ENDLOOP.
layout-zebra = 'X' .
layout-colwidth_optimize(1) = 'X'.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
    i_callback_program = 'ZAK_FORM_C4'
    is_layout          = layout
    it_fieldcat        = it_fld_catalog
    i_default          = 'X'
    i_save             = 'A'
TABLES
    t_outtab           = itab2
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 FILL_CATALOG1
      text
     -->P_FIELDNAME text
     -->P_REF_TABLE text
     -->P_SCRTEXT    text
FORM fill_catalog1 USING   p_fieldname TYPE any
                            p_ref_table TYPE any
                            p_scrtext   TYPE any.
CLEAR : wa_fld_catalog.
wa_fld_catalog-fieldname = p_fieldname.
wa_fld_catalog-tabname    = p_ref_table.
wa_fld_catalog-seltext_s = p_scrtext.
wa_fld_catalog-seltext_m = p_scrtext.
wa_fld_catalog-seltext_l = p_scrtext.
wa_fld_catalog-datatype = 'CURR'.
wa_fld_catalog-outputlen = 20.
APPEND wa_fld_catalog TO it_fld_catalog.
ENDFORM.                    " fill_catalog1.
Plz let me know...
Thanks

Hello Prince,
I just want that my code will show single time records..and Sum of base Value and Tax amount...
You want to summarise Base Value and Tax amount per document, right
I am making a very very small modification to the declaration of ITAB:
DATA :
BEGIN OF itab OCCURS 0,
belnr LIKE bsik-belnr, "Document number "--> Add here
buzei LIKE bseg-buzei, "line item "--> Add here
hkont LIKE bseg-hkont, "Gl account
mwskz LIKE bseg-mwskz, "Tax Code
dmbtr LIKE bseg-dmbtr, "Amount
" buzei LIKE bseg-buzei, "line item "--> Delete Here
ebeln LIKE bseg-ebeln, "Purchasing Document
ebelp LIKE bseg-ebelp, "line item nbr
hwbas LIKE bseg-hwbas, "Base amount
shkzg LIKE bseg-shkzg, "Debit/Credit code
" belnr LIKE bsik-belnr, "Document number "--> Delete here
gjahr LIKE bsik-gjahr, "Fiscal Year
bldat LIKE bsik-bldat, "Document Date
budat LIKE bsik-budat, "Posting Date
lifnr LIKE bsik-lifnr, "Vendor number
xblnr LIKE mkpf-xblnr, "Ven invoice nbr
name1(25), "name1
ort01 LIKE lfa1-ort01, "City
j_1ilstno LIKE j_1imovend-j_1ilstno, " Vendor tin nbr
regio LIKE lfa1-regio, "Region Code
bezei LIKE t005u-bezei, "Region desc
dmbtr1 LIKE bseg-dmbtr, "Amount
hwbas1 LIKE bseg-hwbas, "Base amount
END OF itab.
And modified the code as below:
DATA:
V_DMBTR TYPE DMBTR,
V_HWBAS TYPE HWBAS.
LOOP AT ITAB2.
V_DMBTR = V_DMBTR + ITAB2-DMBTR.
V_HWBAS = V_HWBAS + ITAB2-HWBAS.
AT END OF BELNR.
    ITAB2-DMBTR = V_DMBTR.
    ITAB2-HWBAS = V_HWBAS.
    APPEND ITAB2 TO ITAB3.
    CLEAR: ITAB2, V_DMBTR, V_HWBAS.
ENDAT.
ENDLOOP.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = 'ZAK_FORM_C4'
is_layout = layout
it_fieldcat = it_fld_catalog
i_default = 'X'
i_save = 'A'
TABLES
t_outtab = itab3 "itab2 --> Use ITAB3 instead of ITAB2
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.
BR,
Suhas
Edited by: Suhas Saha on Jan 13, 2009 3:23 PM

Header in layout

Similar Messages

Maybe you are looking for