Display result Group wise

Hello experts,
Update type is key in report.
It has two values. 1000 & 2000.
I want to display result after displaying all the values of 1000.
same for 2000 values.
Ex:
1000    ICICI     100
           HDFC   200
           SBI      300
Result             600
2000    ICICI     150
           HDFC   250
           SBI      350
Result             750
Thank You.
KV

Hi KV,
keep update type and necessary other fields in rows ...
and values in columns ....
as the update type is outer most field u need to keep display on the next field in the rows ....
if u keep display of result for outer most one then it will show after the last value...
u need to keep resuls row display off for update type and keep result row display for the next field in rows... then u can get the indivudal update type result displays...as u showed...
Regards
vamsi

Similar Messages

Display result Cloumn wise to Row wise

create table t(table_id number primary key, Grade_id number, Value number);
insert into t values(1,77,11);
insert into t values(2,77,12);
insert into t values(3,77,13);
insert into t values(4,88,14);
insert into t values(5,88,15);
insert into t values(6,88,16);
insert into t values(7,99,17);
insert into t values(8,99,18);
insert into t values(9,99,19);
commit;
select * from t;
TABLE_ID GRADE_ID VALUE
1 77 11
2 77 12
3 77 13
4 88 14
5 88 15
6 88 16
7 99 17
8 99 18
9 99 19
9 rows selected
Question : I want my output ROW WISE
for eg.
TABLE_ID 1 2 3 4 5 6 7 8 9
GRADE_ID 77 77 77 88 88 88 99 99 99
VALUE 11 12 13 14 15 16 17 18 19
Is this possible ?

hi
u can use this function to convert rows into cols
CREATE OR REPLACE
FUNCTION rowtocol( p_slct IN VARCHAR2,
p_dlmtr IN VARCHAR2 DEFAULT ',' ) RETURN VARCHAR2
IS
TYPE c_refcur IS REF CURSOR;
lc_str VARCHAR2(4000);
lc_colval VARCHAR2(4000);
c_dummy c_refcur;
l number;
BEGIN
OPEN c_dummy FOR p_slct;
LOOP
FETCH c_dummy INTO lc_colval;
EXIT WHEN c_dummy%NOTFOUND;
lc_str := lc_str || p_dlmtr || lc_colval;
END LOOP;
CLOSE c_dummy;
RETURN SUBSTR(lc_str,2);
END rowtocol;
rgds
Ashish

Displaying sums, in GL account group wise

Hi ,
I need to display the sums of actual and planed values, in GL accounts group wise. Ex : F.01 transaction
Suppose, several accounts for accruals.
E.g. Accruals bonus, Accruals charges, Accruals other.
In my report i need to display GL accounts values and their sums in group wise. Couuld any one tell us, where can i find this type information like From GL accout X to Y comes under this group and Grouping text?
Thank you,
ABK.

check FS00 u will get some idea.
Regards
Prabhu

Sales group wise credit report

Hello Experts
Right now,we are using S_ALR_87012178 report for the report on customer open item due analysis.
However there are a few limitations here.
Firstly, we need Customer # (KUNNR) to be displayed along with the customer name (NAME1). Presently, only customer name is displayed.Assuming, this can be solved to a certain extent by modifying the coding with the help of an Abaper, there is another limitation.
*We need 'Sales Group' wise split up. This 'Sales Group' NOT from CMR,but from SO. [Since, for a single customer there may be cases of multiple 'sales groups']*
Any help/Suggestion, will surely be appreciated.
Good day....
Rgds
Sumanth.Gururaj
Consultant- SAP SD

hi,
exactly my mate is right in this.
you are requested not to change the STD coding part of SAP.
please go for new report instead of old one.
regards,
balajia

Displaying a group of data in different colums

I have a problem with displaying a group of data in different colums. I want to display a group of data like this:
Column 1 --- Column2 ----- Column3
data1 data6 data11
data2 data7 data12
data3 data8 data13
data4 data9 data14
data5 data10 data15
That is, the coulm headers must be at the same height of the page and data must be in paralell columns.
My number of data is variable depending on a query result, and I want to start displaying my group on the first column and when it is full (the number of records per column is fixed), is must switch into the next one.
In case there were more than 15 records, the 16th and the followings, must be displayed on the next page, with the same format as i have explained before.
Thank you very much.

Send me all files along with expected output at [email protected]

Customer Group wise sales

hi
is there any standard report to check customer group wise sales.
Rajendra

Hi Rajedra Prasad,
Please find below the Some of the Standard Reports in SD:
Sales summary - VC/2
Display Customer Hierarchy - VDH2
Display Condition record report - V/I6
Pricing Report - V/LD
Create Net Price List - V_NL
List customer material info - VD59
List of sales order - VA05
List of Billing documents - VF05
Inquiries list - VA15
Quotation List - VA25
Incomplete Sales orders - V.02
Backorders - V.15
Outbound Delivery Monitor - VL06o
Incomplete delivery - V_UC
Customer Returns-Analysis - MC+A
Customer Analysis- Sales - MC+E
Customer Analysis- Cr. Memo - MC+I
Deliveries-Due list - VL04
Billing due list - VF04
Incomplete Billing documents - MCV9
Customer Analysis-Basic List - MCTA
Material Analysis(SIS) - MCTC
Sales org analysis - MCTE
Sales org analysis-Invoiced sales - MC+2
Material Analysis-Incoming orders - MC(E
General- List of Outbound deliveries - VL06f
Material Returns-Analysis - MC+M
Material Analysis- Invoiced Sales - MC+Q
Variant configuration Analysis - MC(B
Sales org analysis-Incoming orders - MC(I
Sales org analysis-Returns - MC+Y
Sales office Analysis- Invoiced Sales - MC-E
Sales office Analysis- Returns - MC-A
Shipping point Analysis - MC(U
Shipping point Analysis-Returns - MC-O
Blocked orders - V.14
Order Within time period - SD01
Duplicate Sales orders in period - SDD1
Display Delivery Changes - VL22
Shipment List Planning - VT11
List of Incomplete Shipments -Try VT04/VT11/VT32
Delivery without Shipments -Use VL06O
List of Rebate Agreements - VB(8
If not, if it is a small report using ABAP Query you can develop New Report as per your requirment or Using SIS you can Develop you own report.
Please Reward If Really Helpful,
Thanks and Regards,
Sateesh.Kandula

After displaying result of report, my report goes back to source code edito

Hello experts,
I am currently having a big problem with my report. Here is the problem, after displaying the
result(write), when I press BACK button it is not going back to my selection-screen which is the
usual for reports. Now, what happens is that it goes back to the source code or worse, to the main menu of SAP.
What I want to do is that when I press BACK button it should go to either selection-screen 500 or
selection-screen 1500.
Here's a rough flow of what is happening in my report:
start report -> fetch records based on user input -> display results(not in ALV) ->
after displaying report, click 'BACK' button -> it goes back to source code
Now, here's what I want to do:
start report -> fetch records based on user input -> display results(not in ALV) ->
after displaying report, click 'BACK' button -> go back to either selection-screen 500 or 1500
or call again the transaction of my report.
Help would be greatly appreciated here.

Hi guys,
Thanks again for the quick replies.Here is the source code:
REPORT zdealer_contacts NO STANDARD PAGE HEADING
                        LINE-COUNT 0
                        LINE-SIZE 255
                        MESSAGE-ID zz.
TYPE-POOLS: slis.
Data Dictionary Tables
TABLES: zts0001,
        zsoemailid,
        kna1,
        zts_stpgeoloc.
Includes
*INCLUDE zun_globe_header.       " Globe Telecom Report Header
Structures, internal tables and data declarations
TYPES: BEGIN OF t_upload,
        kunnr LIKE zts0001-kunnr,
        zaddress(100),
        zcperson(30),
        zcnumber(18),
       END OF t_upload.
TYPES: BEGIN OF t_error,
        kunnr LIKE zts0001-kunnr,
        zaddress(100),
        zcperson(30),
        zcnumber(18),
       END OF t_error.
TYPES: BEGIN OF t_kna1,
        name1 LIKE kna1-name1,
       END OF t_kna1.
TYPES: BEGIN OF t_zts0001,
        kunnr      LIKE zts0001-kunnr,
        cdseq      LIKE zts0001-cdseq,
        zaddress   LIKE zts0001-zaddress,
        zcperson   LIKE zts0001-zcperson,
        zcnumber   LIKE zts0001-zcnumber,
        zactivated LIKE zts0001-zactivated,
        name1      LIKE kna1-name1,
       END OF t_zts0001.
DATA: it_upload TYPE STANDARD TABLE OF t_upload WITH HEADER LINE,
      it_error   TYPE STANDARD TABLE OF t_error   WITH HEADER LINE,
      it_kna1    TYPE STANDARD TABLE OF t_kna1    WITH HEADER LINE,
      it_zts0001 TYPE STANDARD TABLE OF t_zts0001 WITH HEADER LINE.
DATA: it_ztstemp LIKE zts0001 OCCURS 100 WITH HEADER LINE,
      it_ztstemp_gloc LIKE zts_stpgeoloc OCCURS 100 WITH HEADER LINE.
*AVH - start of insertion - 04/18/06
FIELD-SYMBOLS: <fs_zts0001> LIKE LINE OF it_zts0001.
**ALV Declarations
DATA:   gt_fieldcat         TYPE slis_t_fieldcat_alv,
        g_repid             LIKE sy-repid,
        gs_layout           TYPE slis_layout_alv,
        gt_list_top_of_page TYPE slis_t_listheader,
        gt_events           TYPE slis_t_event WITH HEADER LINE,
        gt_print            TYPE slis_print_alv.
CONSTANTS: gc_top TYPE slis_formname VALUE 'TOP_OF_PAGE',
           gc_topsum TYPE slis_formname VALUE 'TOP_OF_LIST',
           gc_ucomm TYPE slis_formname VALUE 'USER_COMMAND'.
*AVH - end of insertion
Variables
DATA: v_kunnr LIKE zts0001-kunnr,
      v_title(100) TYPE c,
      gc_kunnr(06) TYPE c,
      v_compflag(1) TYPE c,
      v_flag(1).
Selection Screen
*AVH - start of modification - 06/27/06
*if user is controller, selection-screen 500 will be called else,
*selection-scren 1500 will be called.
*selection-screen for controllers
SELECTION-SCREEN BEGIN OF SCREEN 500.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pr_upld RADIOBUTTON GROUP grp2 USER-COMMAND ucomm1.
SELECTION-SCREEN COMMENT 2(20) text-007 FOR FIELD pr_upld.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 03(15) text-a11 FOR FIELD p_flnme.
PARAMETERS: p_flnme LIKE rlgrap-filename DEFAULT 'C:\'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pr_list1 RADIOBUTTON GROUP grp2.
SELECTION-SCREEN COMMENT 2(7) text-003 FOR FIELD pr_list1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN END OF SCREEN 500.
*selection-screen for non-controllers.
SELECTION-SCREEN BEGIN OF SCREEN 1500.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-001.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(22) text-002 FOR FIELD p_dcode.
PARAMETERS: p_dcode LIKE vbak-kunnr,
            p_name1 LIKE kna1-name1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pr_list2 RADIOBUTTON GROUP grp USER-COMMAND ucomm2.
SELECTION-SCREEN COMMENT 2(7) text-003 FOR FIELD pr_list2.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pr_add RADIOBUTTON GROUP grp.
SELECTION-SCREEN COMMENT 2(3) text-005 FOR FIELD pr_add.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pr_edit RADIOBUTTON GROUP grp.
SELECTION-SCREEN COMMENT 2(4) text-006 FOR FIELD pr_edit.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 03(20) text-a12 FOR FIELD p_code.
PARAMETERS: p_code LIKE zts0001-cdseq.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN END OF SCREEN 1500.
INITIALIZATION.
SELECT SINGLE kunnr comp_flag INTO (gc_kunnr,v_compflag)
    FROM zsoemailid
   WHERE bname = sy-uname.
IF sy-subrc <> 0.
    MESSAGE i000 WITH
         'You are not authorised to use this transaction'.
    LEAVE PROGRAM.
ENDIF.
IF v_compflag = 'X'.
    CALL SCREEN 500.
ELSE.
    CALL SCREEN 1500.
ENDIF.
*AVH - end of modification
AT SELECTION-SCREEN OUTPUT.
PERFORM authority_check.
added by derick 050125
**-changed by weng rulloda 06012005
*AVH - start of insertion - 05/22/06
*no need to get value of kunnr from global memory
*since gc_kunnr would be filled via the select statement below
GET PARAMETER ID 'KUN' FIELD gc_kunnr.
*AVH - end of insertion
p_dcode = gc_kunnr.
*AVH - start of insertion - 05/22/06
**fetch the respective description of dealer based from p_dcode
**and put in parameter p_name1
SELECT SINGLE name1 FROM kna1
INTO p_name1
WHERE kunnr = p_dcode.
*AVH - end of insertion
*AVH - start of insertion - 05/22/06
**selection-screen parameters is based if user is controller or not.
**created new selection-screen conditions based from orig. code
v_kunnr = gc_kunnr.
LOOP AT SCREEN.
    IF screen-name      = 'P_DCODE'.
      screen-input      = '0'.
      screen-output     = '1'.
      MODIFY SCREEN.
    ELSEIF screen-name = 'P_NAME1'.
      screen-input      = '0'.
      screen-output     = '1'.
      MODIFY SCREEN.
    ELSEIF screen-name = 'P_CODE'.
      screen-input      = '0'.
      MODIFY SCREEN.
    ENDIF.
ENDLOOP.
IF pr_list2 = 'X' OR pr_add = 'X'.
    LOOP AT SCREEN.
      IF screen-name   = 'P_CODE'.
        screen-input   = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ELSEIF pr_edit = 'X'.
    LOOP AT SCREEN.
      IF screen-name   = 'P_CODE'.
        screen-input = '1'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ENDIF.
IF pr_list1   = 'X'.
    LOOP AT SCREEN.
      IF screen-name   = 'P_FLNME'.
        screen-input = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ENDIF.
*AVH - end of modification
AT SELECTION-SCREEN.
CHECK sy-ucomm = 'UCOMM1' OR sy-ucomm = 'UCOMM2'.
*AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_flnme.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_flnme.
CALL FUNCTION 'WS_FILENAME_GET'
       EXPORTING
            mask             = ',.,..'
            mode             = 'O'
            title            = 'File Selection'
       IMPORTING
            filename         = p_flnme
       EXCEPTIONS
            inv_winsys       = 1
            no_batch         = 2
            selection_cancel = 3
            selection_error = 4
            OTHERS           = 5.
*AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_code.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_code.
DATA : BEGIN OF itab_list OCCURS 0,
          kunnr LIKE zts0001-kunnr,
          cdseq LIKE zts0001-cdseq,
          zaddress LIKE zts0001-zaddress,
          zcperson LIKE zts0001-zcperson,
          zcnumber LIKE zts0001-zcnumber,
         END OF itab_list.
DATA: tab_fields LIKE dfies      OCCURS 0 WITH HEADER LINE,
        tab_valuetab(100) TYPE c   OCCURS 0 WITH HEADER LINE.
DATA: tab_dynnr TYPE sy-dynnr.
DATA: BEGIN OF tab_return_tab OCCURS 0.
          INCLUDE STRUCTURE ddshretval.
DATA: END OF tab_return_tab.
DATA: progname LIKE sy-repid.
CLEAR: tab_valuetab[], tab_fields[].
SELECT kunnr cdseq zaddress zcperson zcnumber
    INTO CORRESPONDING FIELDS OF TABLE itab_list
    FROM zts0001
    WHERE kunnr = v_kunnr.
tab_dynnr = sy-dynnr.
tab_fields-tabname = 'ZTS0001'.
tab_fields-fieldname = 'KUNNR'.
APPEND tab_fields.
tab_dynnr = sy-dynnr.
tab_fields-tabname = 'ZTS0001'.
tab_fields-fieldname = 'CDSEQ'.
APPEND tab_fields.
tab_fields-tabname = 'ZTS0001'.
tab_fields-fieldname = 'ZADDRESS'.
APPEND tab_fields.
tab_fields-tabname = 'ZTS0001'.
tab_fields-fieldname = 'ZCPERSON'.
APPEND tab_fields.
tab_fields-tabname = 'ZTS0001'.
tab_fields-fieldname = 'ZCNUMBER'.
APPEND tab_fields.
LOOP AT itab_list.
    tab_valuetab = itab_list-kunnr.
    APPEND tab_valuetab.
    tab_valuetab = itab_list-cdseq.
    APPEND tab_valuetab.
    tab_valuetab = itab_list-zaddress.
    APPEND tab_valuetab.
    tab_valuetab = itab_list-zcperson.
    APPEND tab_valuetab.
    tab_valuetab = itab_list-zcnumber.
    APPEND tab_valuetab.
ENDLOOP.
progname = sy-repid.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
       EXPORTING
            retfield    = 'CDSEQ'
            dynpprog    = progname
            dynpnr      = '1000'
            dynprofield = 'P_CODE'
       TABLES
            value_tab   = tab_valuetab
            field_tab   = tab_fields
            return_tab = tab_return_tab
       EXCEPTIONS
            OTHERS      = 0.
START-OF-SELECTION.
IF pr_edit = 'X' AND p_code IS INITIAL.
    MESSAGE i008 WITH 'Please specify a ship-to code.'.
     LEAVE TO TRANSACTION 'ZDCONTACT'.
ENDIF.
PERFORM get_data.
IF pr_upld = 'X'.
    PERFORM upload_file.
ELSEIF pr_add = 'X'.
    PERFORM add_record.
ELSEIF pr_edit = 'X'.
    PERFORM edit_record.
ELSEIF pr_list1 = 'X' OR pr_list2 = 'X'.
    PERFORM display_alv.
ENDIF.
END-OF-SELECTION.
based from ALV PF-STATUS
IF sy-ucomm = '&F03'.                  "BACK
   LEAVE TO TRANSACTION 'ZDCONTACT'.
ELSEIF sy-ucomm = '&F15'.              "EXIT
   LEAVE TO TRANSACTION 'ZDCONTACT'.
ELSEIF sy-ucomm = '&F12'.              "CANCEL
   LEAVE TO TRANSACTION 'ZDCONTACT'.
ENDIF.
*&      Form authority_check
FORM authority_check.
CALL FUNCTION 'AUTHORITY_CHECK'
       EXPORTING
            field1              = 'TCD' "MDM
            object              = 'S_TCODE'
            user                = sy-uname
            value1              = 'ZMEN'
           VALUE3              = '01' MDM
       EXCEPTIONS
            user_dont_exist     = 1
            user_is_authorized = 2
            user_not_authorized = 3
            user_is_locked      = 4
            OTHERS              = 5.
IF sy-subrc NE 2.
**-added by weng 04/28/2006
**-if user is not authorized to use dealer portal check if he is
**- authorized to use the tcode ZDCONTACT
    CALL FUNCTION 'AUTHORITY_CHECK'
         EXPORTING
              field1              = 'TCD' "MDM
              object              = 'S_TCODE'
              user                = sy-uname
              value1              = 'ZDCONTACT'
           VALUE3              = '01' MDM
         EXCEPTIONS
              user_dont_exist     = 1
              user_is_authorized = 2
              user_not_authorized = 3
              user_is_locked      = 4
              OTHERS              = 5.
**-weng
    IF sy-subrc NE 2.
      MESSAGE i000 WITH
        'You are not authorised to use this transaction'.
      LEAVE PROGRAM.
    ENDIF.
ENDIF.
ENDFORM.                    " AUTHORITY_CHECK
*&      Form get_data
FORM get_data.
*AVH - start of insertion - 04/19/06
**records selected from table zts0001 that has been marked as
**activated will be fetched otherwise, ignore.
IF v_kunnr IS INITIAL.
    SELECT * INTO CORRESPONDING FIELDS OF TABLE it_zts0001
      FROM zts0001.
ELSEIF v_compflag = 'X'.
    SELECT * INTO CORRESPONDING FIELDS OF TABLE it_zts0001
       FROM zts0001.
ELSE.
    SELECT * INTO CORRESPONDING FIELDS OF TABLE it_zts0001
       FROM zts0001
       WHERE kunnr = v_kunnr.
ENDIF.
*AVH - start of insertion - 05/24/06
**fetch name based from kunnr and put in itab
LOOP AT it_zts0001 ASSIGNING <fs_zts0001>.
    SELECT SINGLE name1 FROM kna1
    INTO <fs_zts0001>-name1
    WHERE kunnr = <fs_zts0001>-kunnr.
ENDLOOP.
*AVH - end of insertion
ENDFORM.                    " get_data
*&      Form Upload_file
FORM upload_file.
DATA: lv_seq(5) TYPE n,
        lv_ctr(5) TYPE c,
        lv_kunnr LIKE it_upload-kunnr.
v_title = 'Upload from File'.
CALL FUNCTION 'WS_UPLOAD'
       EXPORTING
            filename = p_flnme
            filetype = 'DAT'
       TABLES
            data_tab = it_upload
       EXCEPTIONS
            OTHERS   = 1.
IF sy-subrc <> 0.
    MESSAGE i008 WITH 'File does not exist.'.
    IF v_compflag IS INITIAL.
      LEAVE TO TRANSACTION 'ZDCONTACT'.
    ELSE.
      LEAVE TO TRANSACTION 'ZDCONTACT'.
    ENDIF.
ENDIF.
CHECK sy-subrc EQ 0.
DELETE it_upload
    WHERE zaddress EQ space
      AND zcperson EQ space
      AND zcnumber EQ space.
SORT it_zts0001 BY kunnr ASCENDING cdseq DESCENDING.
SORT it_upload BY kunnr ASCENDING.
LOOP AT it_upload.
    lv_kunnr = it_upload-kunnr.
    AT NEW kunnr.
AVH - start of insertion - 06/30/06
      SELECT SINGLE kunnr FROM zsoemailid
      INTO lv_kunnr
      WHERE kunnr = it_upload-kunnr.
if it_upload-kunnr is not found in table ZSOEMAILID, it will
not be included in the upload.
      IF sy-subrc <> 0.
        DELETE it_upload.
        CLEAR it_upload.
        CONTINUE.
      ENDIF.
AVH - end of insertion
      READ TABLE it_zts0001 WITH KEY kunnr = lv_kunnr.
      IF sy-subrc EQ 0.
        lv_seq = it_zts0001-cdseq.
      ELSE.
        CLEAR lv_seq.
      ENDIF.
    ENDAT.
    IF it_upload-zaddress IS INITIAL.
      MOVE-CORRESPONDING it_upload TO it_error.
      APPEND it_error.
      CLEAR it_error.
    ELSE.
      REPLACE '"' WITH '' INTO it_upload-zaddress.
      REPLACE '"' WITH '' INTO it_upload-zaddress.
      REPLACE '"' WITH '' INTO it_upload-zcperson.
      REPLACE '"' WITH '' INTO it_upload-zcperson.
      CONDENSE it_upload-zaddress.
      CONDENSE it_upload-zcperson
      ADD 1 TO lv_seq.
      MOVE: it_upload-kunnr    TO it_ztstemp-kunnr,
            lv_seq             TO it_ztstemp-cdseq,
            it_upload-zaddress TO it_ztstemp-zaddress,
            it_upload-zcperson TO it_ztstemp-zcperson,
            it_upload-zcnumber TO it_ztstemp-zcnumber,
            'X'                TO it_ztstemp-zactivated,
            sy-uname           TO it_ztstemp-zcreated_by,
            sy-datum           TO it_ztstemp-zchanged_date.
      MOVE-CORRESPONDING it_ztstemp TO it_ztstemp_gloc.
      APPEND: it_ztstemp, it_ztstemp_gloc.
      CLEAR: it_ztstemp, it_ztstemp_gloc.
    ENDIF.
ENDLOOP.
IF NOT it_ztstemp[] IS INITIAL.
    INSERT zts0001 FROM TABLE it_ztstemp.
    INSERT zts_stpgeoloc FROM TABLE it_ztstemp_gloc.
    WRITE:/ 'List of Records Uploaded.' COLOR 1 INTENSIFIED ON.
    FORMAT COLOR 1 INTENSIFIED OFF.
    WRITE:/(020) 'Dealer Code' CENTERED,
           (007) 'Code'         CENTERED,
           (100) 'Address',
           (030) 'Contact Person' CENTERED,
           (018) 'Contact Number' CENTERED.
    FORMAT COLOR OFF.
    WRITE:/(179) sy-uline.
    DESCRIBE TABLE it_ztstemp LINES lv_ctr.
    SORT it_ztstemp BY kunnr cdseq.
    LOOP AT it_ztstemp.
      WRITE:/(020) it_ztstemp-kunnr,
             (007) it_ztstemp-cdseq,
             (100) it_ztstemp-zaddress,
             (030) it_ztstemp-zcperson,
             (018) it_ztstemp-zcnumber.
    ENDLOOP.
    SKIP 1.
    WRITE:/ 'TOTAL :', lv_ctr.
ENDIF.
IF NOT it_error[] IS INITIAL.
    SKIP 2.
    FORMAT COLOR 1 INTENSIFIED OFF.
    WRITE:/(020) 'Dealer Code' CENTERED,
           (030) 'Contact Person' CENTERED,
           (018) 'Contact Number' CENTERED.
    FORMAT COLOR OFF.
    WRITE:/(070) sy-uline.
    DESCRIBE TABLE it_error LINES lv_ctr.
    SORT it_error BY kunnr zcperson.
    LOOP AT it_error.
      WRITE:/ 'With No Address.' COLOR 6 INTENSIFIED ON.
      WRITE:/(020) it_error-kunnr,
             (030) it_error-zcperson,
             (018) it_error-zcnumber.
    ENDLOOP.
    SKIP 1.
    WRITE:/ 'TOTAL :', lv_ctr.
ENDIF.
ENDFORM.                    " Upload_file
*&      Form add_record
FORM add_record.
v_title = ''.
IF NOT v_kunnr IS INITIAL.
    SUBMIT zdealer_contacts_add_edit AND RETURN
                                     WITH p_kunnr = v_kunnr
                                     WITH p_name1 = p_name1 "AVH
                                     WITH p_cdseq = space
                                     WITH p_flag = 'A'
                                     WITH p_addr = it_zts0001-zaddress
                                     WITH p_pers = it_zts0001-zcperson
                                     WITH p_numb = it_zts0001-zcnumber
                                     VIA SELECTION-SCREEN.
ENDIF.
    LEAVE TO TRANSACTION 'ZDCONTACT'.
ENDFORM.                    " add_record
*&      Form edit_record
FORM edit_record.
v_title = ''.
READ TABLE it_zts0001 WITH KEY kunnr = v_kunnr
                                 cdseq = p_code.
IF sy-subrc EQ 0.
    SUBMIT zdealer_contacts_add_edit AND RETURN
                                     WITH p_kunnr = v_kunnr
                                     WITH p_name1 = p_name1 "AVH
                                     WITH p_cdseq = p_code
                                     WITH p_flag = 'E'
                                     WITH p_addr = it_zts0001-zaddress
                                     WITH p_pers = it_zts0001-zcperson
                                     WITH p_numb = it_zts0001-zcnumber
                                     WITH v_controller = v_compflag
                                     VIA SELECTION-SCREEN.
ELSE.
    MESSAGE i008 WITH 'No record found.'.
    CALL TRANSACTION 'ZDCONTACT'.
ENDIF.
    LEAVE TO TRANSACTION 'ZDCONTACT'.
ENDFORM.                    " edit_record
*&      Form display_records
*FORM display_records.
IF NOT it_zts0001[] IS INITIAL.
   v_title = 'List of Dealer Contacts'.
   FORMAT COLOR 1 INTENSIFIED OFF.
   WRITE:/(020) 'Customer Number' CENTERED,
          (007) 'Code' CENTERED,
          (100) 'Address',
          (030) 'Contact Person' CENTERED,
          (018) 'Contact Number' CENTERED.
   FORMAT COLOR OFF.
   WRITE:/(179) sy-uline.
   SORT it_zts0001 BY kunnr cdseq.
   LOOP AT it_zts0001.
     WRITE:/(020) it_zts0001-kunnr,
            (007) it_zts0001-cdseq,
            (100) it_zts0001-zaddress,
            (030) it_zts0001-zcperson,
            (018) it_zts0001-zcnumber.
   ENDLOOP.
ELSE.
   MESSAGE i008 WITH 'No records to display.'.
ENDIF.
*ENDFORM.                    " display_records
*&      Form display_alv
FORM display_alv.
SORT it_zts0001 BY kunnr cdseq.
PERFORM f_build_layout USING gs_layout.
PERFORM f_init_fieldcat USING gt_fieldcat[].
PERFORM f_init_events USING 'BACK' gt_events[].
g_repid = sy-repid.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
       EXPORTING
            i_callback_program      = g_repid
            i_callback_top_of_page = 'TOP_OF_PAGE'
            i_callback_user_command = 'USER_COMMAND'
            is_layout               = gs_layout
            it_fieldcat             = gt_fieldcat[]
            it_events               = gt_events[]
            i_save                  = 'X'
           it_sort                 = gt_sort
       TABLES
            t_outtab                = it_zts0001[]
       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_ALV
      FORM top_of_page                                          *
FORM top_of_page.
*ALV Header declarations
DATA: t_header TYPE slis_t_listheader,
        wa_header TYPE slis_listheader,
        t_line LIKE wa_header-info,
        lv_title(60),
        lv_user(60),
        lv_date(10),
        lv_time(10),
        lv_time_n_date(30),
        lv_dcode_n_name(150),
        lv_dlr_n_desc(100),
        ld_lines TYPE i,
        ld_linesc(10) TYPE c.
Title
CLEAR: lv_title, wa_header.
MOVE sy-title TO lv_title.
wa_header-typ = 'H'.
wa_header-info = lv_title.
APPEND wa_header TO t_header.
CLEAR wa_header.
User
CLEAR: lv_user, wa_header.
CONCATENATE: 'Generated by:' sy-uname
               INTO lv_user SEPARATED BY space.
wa_header-typ = 'A'.
wa_header-info = lv_user.
APPEND wa_header TO t_header.
CLEAR wa_header.
*Date and time
CLEAR: lv_date, lv_time.
WRITE: sy-datum TO lv_date MM/DD/YYYY,
         sy-uzeit TO lv_time USING EDIT MASK '__:__:__'.
CONCATENATE: 'Generated on:' lv_date lv_time
    INTO lv_time_n_date SEPARATED BY space.
wa_header-typ = 'A'.
wa_header-info = lv_time_n_date.
APPEND wa_header TO t_header.
CLEAR wa_header.
IF NOT v_kunnr IS INITIAL AND v_compflag IS INITIAL.
*Dealer code and name
    CONCATENATE: 'Dealer:' p_dcode p_name1
      INTO lv_dcode_n_name SEPARATED BY space.
    wa_header-typ = 'A'.
    wa_header-info = lv_dcode_n_name.
    APPEND wa_header TO t_header.
    CLEAR wa_header.
ENDIF.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
       EXPORTING
            it_list_commentary = t_header.
ENDFORM.                    " TOP_OF_PAGE
      FORM f_build_layout                                           *
--> %LAYOUT                                                       *
FORM f_build_layout USING %layout TYPE slis_layout_alv.
%layout-zebra             = 'X'.
%layout-colwidth_optimize = 'X'.
ENDFORM.                    " F_BUILD_LAYOUT
      FORM f_init_fieldcat                                          *
--> %FIELDCAT                                                     *
FORM f_init_fieldcat USING %fieldcat TYPE slis_t_fieldcat_alv.
DATA: lc_fieldcat TYPE slis_fieldcat_alv.
CLEAR lc_fieldcat.
DEFINE m_field.
    add 1 to lc_fieldcat-col_pos.
    lc_fieldcat-fieldname   = &1.
    lc_fieldcat-outputlen   = &2.
    lc_fieldcat-seltext_l   = &3.
    lc_fieldcat-do_sum      = &4.
    lc_fieldcat-inttype     = &5.
    lc_fieldcat-hotspot     = &6.
    lc_fieldcat-fix_column = &7.
    lc_fieldcat-ddictxt     = 'L'.
    lc_fieldcat-no_zero     = 'X'.
    append lc_fieldcat to %fieldcat.
END-OF-DEFINITION.
IF v_kunnr IS INITIAL.
    m_field 'KUNNR' '5' 'Dealer Code'            '' '' '' ''.
ENDIF.
IF v_compflag = 'X'.
    m_field 'KUNNR' '5' 'Dealer Code'        '' '' '' ''.
ENDIF.
IF v_compflag = 'X'.
    m_field 'NAME1'    '40' 'Dealer Name'        '' '' '' ''.
ENDIF.
m_field 'CDSEQ' '05' 'Ship-To Code'            '' '' '' ''.
m_field 'ZADDRESS' '100' 'Address'             '' '' '' ''.
m_field 'ZCPERSON' '30' 'Contact Person'       '' '' '' ''.
m_field 'ZCNUMBER' '18' 'Contact Number'       '' '' '' ''.
IF v_kunnr IS INITIAL.
    m_field 'NAME1'    '40' 'Dealer Name'        '' '' '' ''.
ENDIF.
m_field 'ZACTIVATED' '1' 'Activated'           '' '' '' ''.
ENDFORM.                    " f_init_fieldcat
      FORM f_init_events                                            *
--> P_TYPE                                                        *
--> %EVENTS                                                       *
FORM f_init_events USING p_type CHANGING %events TYPE slis_t_event.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
       EXPORTING
            i_list_type     = 0
       IMPORTING
            et_events       = %events
       EXCEPTIONS
            list_type_wrong = 1
            OTHERS          = 2.
IF sy-subrc = 0.
    PERFORM f_build_events USING: slis_ev_user_command.
   IF p_type = 'TOP'.
     PERFORM f_build_events USING: gc_top.
   ELSEIF p_type = 'SUM'.
     PERFORM f_build_events_sum USING: gc_topsum.
   ENDIF.
ELSE.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM.                    " F_INIT_EVENTS
      FORM user_command                                             *
--> P_UCOMM                                                       *
--> P_SELFIELD                                                    *
FORM user_command USING p_ucomm LIKE sy-ucomm
                        p_selfield TYPE slis_selfield.
CASE p_ucomm.
    WHEN 'E'.
      CALL SELECTION-SCREEN 500.
ENDCASE.
ENDFORM.
      FORM f_build_events                                           *
--> %EVENT                                                        *
FORM f_build_events USING %event.
READ TABLE gt_events WITH KEY name = %event.
IF sy-subrc = 0.
    MOVE: %event TO gt_events-form.
    MOVE 'USER_COMMAND' TO gt_events-form.
    MODIFY gt_events INDEX sy-tabix.
ENDIF.
ENDFORM.                    " F_BUILD_EVENTS

FMS to Display Item group UDF value

Hi,
I have created Title level udf named U_WP in the item group table. Each group wise i have entered diferent values in this field.
I have created one more title level UDF in item master by same name U_WP.
I want FMS to select the UDF value from U_WP in OITB to be displayed in U_WP in OITM when when ever user select the
respective item group in item master while adding new code.
swap

Hi Swap,
I've tested the query below and it should give you what you need:
SELECT T0.\[U_WP\] FROM OITB T0 WHERE T0.\[ItmsGrpCod\] = $\[$-39.0\]
A couple of things, make sure both the Item Group UDF and Item UDF are setup as the same structure (type and length).
Set the formatted search on the Item UDF so that it refreshes when the Item Group changes.
That should give you what you need.
Regards,
Adrian

How to view results page wise in the console

how does one view the result page wise. i m reading a huge file in the console but cant see it page wise.

Pipe it through a pager like "more".
cat myfile | moreor
more myfileor
java MyProgramThatCreatesALotOfOutput | moreUnless you're using a pretend operating system thrown together in Redmond WA, in which case the piping and more has some restrictions. Also I think that the text display command ("type", I think) takes an argument to page its output.

How To make group wise total in Bex report

Hi!!! Guru's
i m doing reporting on SD module, so client wann see the summerised report
on delivarys, senario is the one sale order having the multiple delivery, so the
i have to show the total result for all deliverys agianst the purticular sales order
in one row.i know we can do that at the excel level but hot to do it at the query
design level.highly appreciate u r help on this.
wil asign pts for sure,,,
thanks in adv
Mohan

Hi!!! Trippel K
thanks for reply...
my Q's is how to make the group wise total means, i m going to genaret the
report on delivery delays on cube 0SD_C04 (Delivery Service), in that the the date
is comming from the 2LIS_12_VCITM delivery item data, the schedule line data
from 2LIS_12_VCSCL, when i m getting according to date wise it showing all data from item level n schedule line, the senario is i have to use date from item level n
all delivery from schedule line, so any inputs regarding this, plz let me, wil appecite
u inputs
thanks in adv
Mohan

Account Group wise vendor aging report

Dear Gurus,
How can I see vedor account group wise ageing report in a company code?i.e Trade Vendors, Non Trade Vndors wise aging report
Thanks in adv.
N.M.B

Dear Raghavender
No need to create to variant and all.
You just go to S_ALR_87012085 then go to dynamic selections. There we can give account group whatever we want.
If u have any doubts reg. this pls ask me
Bye
Murali

Report for monthly sales(sales office wise,sales group wise,plant wise)

Please send the Report for monthly sales(sales office wise,sales group wise,plant wise) with T.CODE.,

Hi
As per my knowledge there is no Standard Report in SAP based on sales office, sales group. and plant.
You may create your own report using MC18,MC21 and MC24.... Otherwise ask your ABAPer's help...
Muthu

Grouping customers and view customer open items list - Group wise

Hi.
I have some requirement from my client.
He says that he want to view customer open items list group wise.
In FBL5N we can give the selection of multiple customers. But he wants to group the specific customers and then view the open items for this group.
For example: Client has 10 customers and out of these customers he wants to select and group 5 customers. And then he want to view open items list for this group.
Can anyone help me how to group these specific customers in the total customers list. Also request you to provide me the option to view open items for this group of customers.
Regards,
Padmavathi

Hi Padmavathi,
It is possible. use Worklist for Customers.
Go to OB55 and define a Worklist for Customers, and mention the list of Customers that you want to see under that Worklist.
After this, when you to to FBL5N, you will get an option to select Worklist to run the list of open items.. and it would show open items of all customers that you have defined in your worklist.
Also note that you will have to go to FB00, tab Line Items, and tick Worklists available. This is at User Level, so only that user will be able to see the worklist in his FBL5N transaction code.
Regards,
SAPFICO
Edited by: SAPFICO on Feb 10, 2011 11:43 AM

List of blocked invoices purchase group wise

Hi experts
Any standard reports available for blocked invoices purchase group wise ? Wht is the Tcode for that?

Hi,
Check the Table RBKP_BLOCKED

Displaying A Group of Photos

Is the best (only) way to display a group of photos by creating a photo album? If so, I read that it's best to create a one w/Adobe Bridge rather than the web photo gallery feature under Commands in Dreamweaver.
Thoughts?

Displaying photos is highly subjective. You can put all your images in a CSS styled proof sheet like this:
http://alt-web.com/TEMPLATES/CSS-Semi-liq-photo-sheet.shtml
Or you can use jQuery or Lightbox plug-ins to create really slick slideshows & Galleries with all manner of bells & whistles. What it comes down to is a) which features you need and b) how much effort you want to put into it.
57 Free Image Gallery, Slideshow and Lightbox Solutions -
http://www.1stwebdesigner.com/resources/57-free-image-gallery-slideshow-and-lightbox-solut ions/
Obviously if you're a professional photographer you may need a sophisticated gallery with e-com solutions to sell prints on-line. If this is a hobby/personal site, you may need far less. So to say "this" or "that" product is best for everyone isn't realistic.
Also have a look at http://www.JAlbum.net Download the software and take a test drive. It's free and has a LOT of great features.
Good luck,
Nancy O.
Alt-Web Design & Publishing
Web | Graphics | Print | Media Specialists
http://alt-web.com/
http://twitter.com/altweb

Display result Group wise

Similar Messages

Maybe you are looking for