ALV report to display data based upon radio button.

i am new to abap, I have a requirement its like there are three radio buttons , r1 r2 r3 If i click r1 datas of r1 should display
if i click r2 datas of r1 and r2 should display if i click r3 datas of r1 r2 and r3 should display , its ALV report. Please give me solution.

Hi
You can use by having the radio buttons in the same group. For ex i'm stating if want to have r radio buttons for change, display and create and you select it with a push button you can code it as ..
//////SAMPLE CODE
SELECTION-SCREEN BEGIN OF BLOCK BLOCK1 WITH FRAME TITLE TEXT-003 NO INTERVALS.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: SRCE RADIOBUTTON GROUP ELE.
SELECTION-SCREEN COMMENT 3(15) TEXT-004.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: VARIN RADIOBUTTON GROUP ELE.
SELECTION-SCREEN COMMENT 3(15) TEXT-005.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: ATTR RADIOBUTTON GROUP ELE.
SELECTION-SCREEN COMMENT 3(15) TEXT-006.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: DOCU RADIOBUTTON GROUP ELE.
SELECTION-SCREEN COMMENT 3(15) TEXT-007.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: TXELE RADIOBUTTON GROUP ELE.
SELECTION-SCREEN COMMENT 3(15) TEXT-008.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN SKIP 1.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON 1(15) TEXT-009 USER-COMMAND DISPL.
SELECTION-SCREEN PUSHBUTTON 18(15) TEXT-010 USER-COMMAND CHNGE.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK BLOCK1.
*PARAMETERS : XXX LIKE T100A-ARBGB MATCHCODE OBJECT YCL_T100A.
AT SELECTION-SCREEN.
CASE SY-UCOMM.
WHEN 'CREAT'.
MESSAGE I000(YCL_MC01) WITH 'Create'. // or insert your alv code here
WHEN 'DISPL'.
MESSAGE I000(YCL_MC01) WITH 'Display'. // or insert your alv code here
WHEN 'CHNGE'.
MESSAGE I000(YCL_MC01) WITH 'Change'. // or insert your alv code here
ENDCASE.
//////SAMPLE CODE
In same you can code it.
Hope this is useful to you.
Regards
Vinodh

Similar Messages

ALV Report to display the status of the requests raised through ESS

Hi All,
We have to develop a ALV report to display the status of the requests raised through ESS
for Leave, Travel & Event Management, Travel and Appraisal workflows.
ESS Travel, ESS TEM, ESS Apraisal workflows are associted with SAP Business Objects.
we are using the function module SWI_WORKITEMS_OF_OBJTYPE_GET to get
the top level work item id's by passing the object type like PDRELA_025, BUS2089.
By using SWP_WORKFLOW_LOG_READ function we are getting the workflow log
by passing top level work item id's as imort parameter.
The report output should have the following fields
Initiator, Initiator Personal No, Request Type( Leave, Travel etc.. )
Date of application of the request, Status ( Approved by RM, Rejected etc )
Name of the Approver, Approved / Rejected Date.
The logic should be work for all the above ESS workflows and should be generalized.
Can any one please let me know the procedure to get the required information from the workflow log.
It would be great if any one suggest on the same how to proceed further to get the information as mentioned above.
Thanks & Regards,
Jagadeeswara Rao Balla.

Hello,
You can get most of that information from fm SAP_WAPI_GET_HEADER, input is workitem_id.
regards
Rick Bakker
Hanabi Technology

Non serial Invoice data based upon GRPO

Hello Experts,
I want to made report on non serial based items.
Means i want data based upon the following way.
Suppose GRPONo 400 have three items Item A, Item B and Item C.
and suppose Item C is non serial based item,
so i have to get sales data(A/R) of Item C for GRPONo 400 only not the different GRPONO of Item C.
Ex:-
GRPONO     GRPODate     ITEMCode     ItemQty      SaleInvoiceNO            SaleInvoiceDate     SaleInvoiceQty
400     12/12/2009     Item C     50                 900            15/02/2010     30
                                                                                600            12/02/2010     20
I want only those Invoice sales data which is actually raised against particular GRPONo.
Thanks,

Hello Gordon,
Thanks for the reply.We are basically used FIFO method for items.
I can able to discover the solution of Serial based items from OSRI and SRI1 table.
But for non serial based items there is no way to discover that particular GRPO Item quanity has been sale against which Invoice NO???????
I want the sales data of Non serial items for particular GRPO Item quantity.
I want to show that particular GRPO qty is sold against which which invoices..
I hope you are more clear about my requirement.
Regards,

Jump from alv report to qa03 screen based on PRUEFLOS field

Hi experts,
I developed one alv report ,in that one field name is PRUEFLOS (inspection lot number).I want to jump from alv report
to QA03 screen based on PRUEFLOS field.I wrote in this way but i didn't get.
FORM USER_COMMAND USING UCOMM LIKE SY-UCOMM SELFIELD TYPE SLIS_SELFIELD.
CASE SELFIELD-FIELDNAME.
    WHEN 'PRUEFLOS'.
      READ TABLE T_FINAL INDEX SELFIELD-TABINDEX.
      SET PARAMETER ID 'QLS' FIELD T_FINAL-PRUEFLOS.
      CALL TRANSACTION 'QA03'   AND SKIP FIRST SCREEN.
ENDCASE.
ENDFORM.
what is the problem ?pls help me in this.

Hi Ram,
Recheck:
1) You have passed 'FORM USER_COMMAND' in 'I_CALLBACK_USER_COMMAND' while calling f.m. for ALV displa, and
2) You have checked the value of user command, i.e.
FORM USER_COMMAND USING UCOMM LIKE SY-UCOMM SELFIELD TYPE SLIS_SELFIELD.
CASE SY-UCOMM.
WHEN '&IC1'.
CASE SELFIELD-FIELDNAME.
WHEN 'PRUEFLOS'.
READ TABLE T_FINAL INDEX SELFIELD-TABINDEX.
SET PARAMETER ID 'QLS' FIELD T_FINAL-PRUEFLOS.
CALL TRANSACTION 'QA03' AND SKIP FIRST SCREEN.
ENDCASE.
ENDCASE.
ENDFORM.
Regards,
Birendra

Report not displaying data from one of the infoproviders

Hi Experts,
Issue: Report not displaying data from one of the infoproviders
I have a report 'ReportA' which has multiprovider MP1 as the source.
MP1 has two Infocubes IC1, IC2 in its design.
Now, when i execute the report, data from IC1 is displayed. But no data from IC2 is displayed.
Is there a setting i need to enable in MP1 ? or is there anything else that needs to be enabled ?
Please reply.
Regards,
Suraj S Nair

Hi All,
When i display data directly from the multi provider, without any restrictions, i cannot view the data from infocube IC2.
I feel its not an issue with the Query. It must be a problem with the setting in the Multiprovider MP1.
Infocube IC2 is a copy of Infocube IC1. Multiprovider MP1 first only had IC1 in its design. It was recently IC2 was also included.
I checked the Characteristics, all of them are assigned corectly.
Now, this issue sure has something to do wiht the setting of Multiprovider or please correct me if wrong.
Regards,
Suraj S Nair

ALV report which displays Delivery and Invoice details..by linking vbfa.

Hi...
I wants to develop an ALV Report, which displays Delivery details as well as Invoice details for a range of given sale orders.
For this report I am using Tables : VBAK,VBAP,LIKP,LIPS,VBFA tables .
Here VBFA is a table for Document flow how to link this with report ??
Please reply.
Regards ,
ASHOK
Moderator message : Not enough re-search before posting, spec dumping not allowed. Thread locked.
Edited by: Vinod Kumar on Aug 1, 2011 9:58 AM

VBFA has VBELV and POSNV can be used to map VBAP (sales order item) i.e.
VBFA-VBELV = VBAP-VBELN AND
VBFA-POSNV = VBAP-POSNV
with VBTYP_N = J Values available in VBFA-VBELN and VBFA-POSNN will be LIPS -VBELN and LIPS-POSNR
VBTYP_N/ VBTYP_V = J stands for delivery and C stands for order
Nitesh

How to devolped an Interactive ALV Report to display sales orders

hi,
how to devolped an Interactive ALV Report to display sales orders pertaining to the selected Customers and item details in the secondary list.For this report what are the tables and fields wehave to used give with example.
thank you
radhakrishna

Hi,
look via se38 for BCALV* and SALV*.
Try ABAPDOCU.
Regards, Dieter

Update SAP tables after ALV report is displayed

Hi All,
I have to display a ALV report using function module REUSE_ALV_GRID_DISPLAY.
After the report is displayed, user can edit some of the flds in the report, and the fields need to updated in the table. How do I proceed to accomplish this.
Is it possible to use FM 'REUSE_ALV_DRID_DISPLAY' to do this or we need to use OOPS ALV to do this.
I searched for this in this forum, but couldnt get.
Thanks in advance,
Ananth

You can use the REUSE_ALV_GRID_DISPLAY. and can make it a changable. You can specify the column to be changable. Once the user enters data into that coloumn the interna table automatically gets populated with the values.
I have done a similar program. However you might need to copy some standard GUI status based on your requirements.
Whats ur mail ID. I can send you the program I have developed.
Shreekant

Problem with ALV Grid Not Displaying Data

Hi Gurus,
I have a report program, when i run it I display an output summary on ALV Grid, and when i click on each of the row in the output summary, I'm suppose to see the item detail of each record.
This item detail is showing for some record and is not showing for some other records (when i use different selections). I debugged it and observed that the table populating the ALV grid actually has records in it. The ALV grid is not just displaying the records.
I debugged the 2 examples (one showing record and the other not showing), I found out that nothing is different in the way they run till they populate the final internal record to passed to the ALV Grid.
Please any suggestions on this:
This is the function code for the ALV grid.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program       = g_program_id
      i_callback_pf_status_set = c_detail_status
      i_callback_user_command = c_detail_user_comm
      i_grid_title             = lv_grid_title
      is_layout                = w_detail_layout
      it_fieldcat              = i_detail_fieldcat
      it_sort                  = i_detail_sort
    TABLES
      t_outtab                 = i_faglflexa[]   "NEM - detail
    EXCEPTIONS
      program_error            = 1
      OTHERS                   = 2.
IF sy-subrc <> 0.
    MESSAGE e064
      WITH sy-subrc.
Function REUSE_ALV_GRID_DISPLAY failed on detail view SY-SUBRC = &
ENDIF.

This is the full code:
***INCLUDE ZFIGL_HYPERION_F01.
*&      Form open_files
Open files used by the program.
FORM open_files.
OPEN DATASET p_fileot FOR OUTPUT IN TEXT MODE ENCODING DEFAULT
    MESSAGE g_message.
IF sy-subrc <> 0.
    MESSAGE e056
      WITH g_message.
Unable to open output file &
ENDIF.
ENDFORM.                    " open_files
*&      Form close_files
Close files used by the program.
FORM close_files.
CLOSE DATASET p_fileot.
ENDFORM.                    " close_files
*&      Form extract_data
Extract data from database needed to generate output file and report.
FORM extract_data.
Get the required general ledger totals records.
PERFORM get_faglflext_data.
Derive any other necessary fields for I_FAGLFLEXT.
PERFORM derive_add_fields_faglflext.
Split records by fiscal period.
PERFORM split_records_by_period.
Summarize the detail records to allow for creation of the file and
reporting.
PERFORM summarize_records_by_period.
Get the required general ledger actual line items records.
PERFORM get_faglflexa_data.
Derive any other necessary fields for I_FAGLFLEXA.
PERFORM derive_add_fields_faglflexa.
Sort the detail and summary output tables into key sequence.
PERFORM sort_output_tables.
ENDFORM.                    " extract_data
*&      Form process_data
Create the requested file and report.
FORM process_data.
Create the local file if requested by the user or the month-end file
at month-end.
IF cb_test = c_not_selected.
    PERFORM create_pc_file.
ELSEIF sy-uname = c_user_batch_admin.
    PERFORM create_output_file.
ENDIF.
Create the necessary tables for summary ALV report.
PERFORM build_summary_layout.
PERFORM build_summary_field_catalog.
PERFORM build_summary_sort_table.
Check to see that there is data in the summary output table. If yes,
generate report, if not, then give a message to the user.
READ TABLE i_output_summary INDEX 1 TRANSPORTING NO FIELDS.
IF sy-subrc <> 0.
    MESSAGE s062.
    STOP.
No data extracted for selection criteria entered
ENDIF.
Generate the summary ALV report view.
PERFORM generate_summary_alv_report.
ENDFORM.                    " process_data
*&      Form verify_user_selections
Verify data input by the user.
FORM verify_user_selections.
IF NOT p_ryear IS INITIAL.
    IF p_ryear < 2006 OR
       p_ryear > 2100.
      MESSAGE e057.
Fiscal year is invalid
    ENDIF.
ENDIF.
If program is being run in a non-test mode and the user has left the
fiscal year selection blank, display a error message.
IF cb_test IS INITIAL AND
     p_ryear IS INITIAL.
    MESSAGE e058.
A fiscal year must be entered when generating the file
ENDIF.
If program is being run in a non-test mode and the user has left the
period selection blank, display a error message.
IF cb_test IS INITIAL AND
     s_rpmax IS INITIAL.
    MESSAGE e132.
A period must be entered when generating the file
ENDIF.
IF cb_test IS INITIAL AND
     p_lfile IS INITIAL.
    MESSAGE e071.
Local filename is required when generating the file
ENDIF.
****Basil Balogun's addition to include the hyperion acct in selection. (10/03/2007)***
IF s_rhype IS NOT INITIAL.
    LOOP AT s_rhype.
      CLEAR r_hyper.
      r_hyper-sign = 'I'.
      r_hyper-option = 'CP'.
      CONCATENATE '' s_rhype-low '' INTO r_hyper-low.
      APPEND r_hyper.
    ENDLOOP.
    SELECT bukrs saknr hyper
           FROM zall_gl_hype INTO TABLE i_zall_gl
           WHERE hyper IN r_hyper.
    LOOP AT i_zall_gl INTO w_zall_gl.
      w_zall_gl1-saknr = w_zall_gl-saknr.
      w_zall_gl2-bukrs = w_zall_gl-bukrs.
      APPEND w_zall_gl1-saknr TO i_zall_gl1.
      APPEND w_zall_gl2-bukrs TO i_zall_gl2.
      CLEAR: w_zall_gl, w_zall_gl1, w_zall_gl2.
    ENDLOOP.
    SORT i_zall_gl1 BY saknr.
    SORT i_zall_gl2 BY bukrs.
    DELETE ADJACENT DUPLICATES FROM i_zall_gl1 COMPARING saknr.
    DELETE ADJACENT DUPLICATES FROM i_zall_gl2 COMPARING bukrs.
    IF s_racct IS INITIAL.
      LOOP AT i_zall_gl1 INTO w_zall_gl1.
        r_saknr-sign = 'I'.
        r_saknr-option = 'EQ'.
        r_saknr-low = w_zall_gl1.
        APPEND r_saknr.
        CLEAR r_saknr.
        CLEAR w_zall_gl1.
      ENDLOOP.
    ELSE.
      r_saknr[] = s_racct[].
    ENDIF.
    IF s_rbukrs IS INITIAL.
      LOOP AT i_zall_gl2 INTO w_zall_gl2.
        r_bukrs-sign = 'I'.
        r_bukrs-option = 'EQ'.
        r_bukrs-low = w_zall_gl2-bukrs.
        APPEND r_bukrs.
        CLEAR r_bukrs.
        CLEAR w_zall_gl2.
      ENDLOOP.
    ELSE.
      r_bukrs[] = s_rbukrs[].
    ENDIF.
ELSE.
    r_saknr[] = s_racct[].
    r_bukrs[] = s_rbukrs[].
    SELECT bukrs saknr hyper
           FROM zall_gl_hype INTO TABLE i_zall_gl.
ENDIF.
****Basil Balogun's addition to include the hyperion acct in selection. (10/03/2007)***
ENDFORM.                    " verify_user_selections
*&      Form get_faglflext_data
Get FAGLFLEXT (General Ledger: Totals) data from the database.
FORM get_faglflext_data .
Use the fiscal year for the selection, if it was populated by the
user.
IF NOT p_ryear IS INITIAL.
    SELECT ryear rldnr rvers racct rbukrs prctr rfarea kokrs segment
           zzsarea zzsareaim rassc hsl01 hsl02 hsl03 hsl04 hsl05 hsl06
           hsl07 hsl08 hsl09 hsl10 hsl11 hsl12 hsl13 hsl14 hsl15 hsl16
           hslvt
      INTO TABLE i_faglflext
      FROM faglflext
      WHERE rldnr = c_run_ledger    AND
            rbukrs IN r_bukrs       AND
            racct IN r_saknr       AND
            rfarea IN s_rfarea      AND
            prctr IN s_prctr       AND
            ryear = p_ryear       AND
            rvers = c_run_version.
ELSE.
    SELECT ryear rldnr rvers racct rbukrs prctr rfarea kokrs segment
         zzsarea zzsareaim rassc hsl01 hsl02 hsl03 hsl04 hsl05 hsl06
         hsl07 hsl08 hsl09 hsl10 hsl11 hsl12 hsl13 hsl14 hsl15 hsl16
         hslvt
    INTO TABLE i_faglflext
    FROM faglflext
    WHERE rldnr = c_run_ledger    AND
          rbukrs IN r_bukrs       AND
          racct IN r_saknr       AND
          rfarea IN s_rfarea      AND
          prctr IN s_prctr       AND
          rvers = c_run_version.
ENDIF.
ENDFORM.                    " get_faglflext_data
*&      Form derive_add_fields_faglflext
Derive additional fields needed for the I_FAGLFLEXT.
FORM derive_add_fields_faglflext.
Get needed company code and profit center data from the database.
PERFORM get_t001_data.
PERFORM get_t880_data.
READ TABLE i_faglflext INDEX 1 TRANSPORTING NO FIELDS.
IF sy-subrc = 0.
    PERFORM get_cepc_data.
ENDIF.
SORT i_zall_gl BY bukrs saknr.
LOOP AT i_faglflext INTO w_faglflext.
Get necessary company code data.
    READ TABLE i_t001 INTO w_t001
      WITH KEY bukrs = w_faglflext-rbukrs
               BINARY SEARCH.
    IF sy-subrc <> 0.
      MESSAGE e059
        WITH w_faglflext-rbukrs.
Company code & not found on table T001
    ENDIF.
Determine the entity.
    PERFORM derive_entity USING w_t001-rcomp
                       CHANGING w_faglflext-entity.
Determine the strategic segment.
    PERFORM derive_strategic_segment USING w_faglflext-rassc
                                           w_faglflext-prctr
                                  CHANGING w_faglflext-strat_seg
                                           w_faglflext-zzsareaim
                                           w_faglflext-zzsarea.
Determine the strategic segment channel.
    PERFORM derive_strat_seg_chnl USING w_faglflext-rassc
                                        w_faglflext-prctr
                               CHANGING w_faglflext-strat_seg_chnl.
Determine the all item ID and all products.
    PERFORM derive_all_item_id USING w_t001-waers
                            CHANGING w_faglflext-all_item_id
                                     w_faglflext-all_products.
Determine the all customers and all customers channel.
   PERFORM derive_all_customers_fields USING w_faglflext-strat_seg
*w_faglflext-strat_seg_chnl
                                    CHANGING w_faglflext-all_cust
*w_faglflext-all_cust_chnl.
Determine the sub account using the company ID of the trading partner.
   PERFORM derive_sub_account USING w_faglflext-rassc
                           CHANGING w_faglflext-sub_acct.
    PERFORM derive_sub_account USING w_t001-rcomp
                                     w_faglflext-rassc
                       CHANGING w_faglflext-sub_acct.
****Begin Basil changes to include hyperion acct in selection (10/03/2007).
    READ TABLE i_zall_gl INTO w_zall_gl
                 WITH KEY bukrs = w_faglflext-rbukrs
                          saknr = w_faglflext-racct
                      BINARY SEARCH.
    IF sy-subrc = 0.
****End Basil changes to include hyperion acct in selection (10/03/2007).
Determine the Hyperion account number from G/L account long text.
      PERFORM derive_hyperion_account USING w_faglflext-racct
                                            w_faglflext-rfarea
                                            "KMK5/22/06 ITR: 20592
                                            w_faglflext-sub_acct
                                            w_faglflext-rassc
                                            w_faglflext-prctr
                     CHANGING w_faglflext-hyperion_acct
                              w_faglflext-reverse_sign "NEM8/21/06 ITR: 24286
                              w_faglflext-balance_sheet "NEM8/21/06 ITR: 24286
                              w_faglflext-zzsarea
                              w_faglflext-zzsareaim
                              w_faglflext-strat_seg.
    ENDIF.
Determine the all customers and all customers channel.
    PERFORM derive_all_customers_fields USING w_faglflext-strat_seg
                                              w_faglflext-strat_seg_chnl
                                     CHANGING w_faglflext-all_cust
                                              w_faglflext-all_cust_chnl.
Update i_FAGLFLEXT with the newly derive fields.
    MODIFY i_faglflext FROM w_faglflext
      TRANSPORTING entity
                   strat_seg
                   strat_seg_chnl
                   all_item_id
                   all_products
                   all_cust
                   all_cust_chnl
                   hyperion_acct
                   sub_acct
                   fiscal_period
                   zzsarea
                   zzsareaim
                   reverse_sign        "NEM8/21/06 ITR: 24286
                   balance_sheet.      "NEM8/21/06 ITR: 24286
ENDLOOP.
CHECK s_rhype IS NOT INITIAL.
SORT s_rhype BY low.
LOOP AT i_faglflext INTO w_faglflext.
    READ TABLE s_rhype WITH KEY low = w_faglflext-hyperion_acct.
    IF sy-subrc NE 0.
      CLEAR w_faglflext-hyperion_acct.
      MODIFY i_faglflext FROM w_faglflext.
    ENDIF.
ENDLOOP.
DELETE i_faglflext WHERE hyperion_acct IS INITIAL.
ENDFORM.                    " derive_add_fields_faglflext
*&      Form derive_entity
Derive the entity using the company code.
     -->RCOMP - Company code.
     <--ENTITY - Entity
FORM derive_entity USING rcomp TYPE t_t001-rcomp
                CHANGING entity TYPE t_faglflext-entity.
CLEAR:
    entity.
Get necessary global company code data.
READ TABLE i_t880 INTO w_t880
    WITH KEY rcomp = rcomp
             BINARY SEARCH.
IF sy-subrc = 0.
    entity = w_t880-name2+0(3).
    TRANSLATE entity TO UPPER CASE.
ELSE.
    MESSAGE e060
      WITH w_t001-rcomp.
Company code & not found on table T880
ENDIF.
ENDFORM.                    " derive_entity
*&      Form get_t001_data
Get T001 (Company Codes) data from the database.
FORM get_t001_data.
SELECT bukrs waers rcomp
    INTO TABLE i_t001
    FROM t001
    CLIENT SPECIFIED
    WHERE mandt = sy-mandt.
SORT i_t001 BY bukrs.
ENDFORM.                    " get_t001_data
*&      Form get_t880_data
Get T880 (Global Company Data (for KONS Ledger)) data from the
database.
FORM get_t880_data.
SELECT rcomp name2
    INTO TABLE i_t880
    FROM t880
    CLIENT SPECIFIED
    WHERE mandt = sy-mandt.
SORT i_t880 BY rcomp.
ENDFORM.                    " get_t880_data
*&      Form derive_all_item_id
Derive the all item ID from the company code currency key.
     -->WAERS       - Currency key.
     <--ALL_ITEM_ID - All item ID.
     <--ALL_ITEM_ID - All item ID.
FORM derive_all_item_id USING waers        TYPE t_t001-waers
                     CHANGING all_item_id TYPE t_faglflext-all_item_id
                              all_products TYPE t_faglflext-all_products
CLEAR:
    all_item_id.
Populate all item ID.
all_item_id = c_all_item_id.
IF waers = c_us_dollars.
    REPLACE '*' WITH c_united_states INTO all_item_id.
ELSE.
    REPLACE '*' WITH c_local         INTO all_item_id.
ENDIF.
Populate all products.
all_products   = c_all_products.
TRANSLATE all_products TO UPPER CASE.
ENDFORM.                    " derive_all_item_id
*&      Form derive_all_customers_fields
Derive the all customers and all customer channel fields from
the strategic segment and strategic segment channel respectively.
     -->STRAT_SEG      - Strategic segment.
     -->STRAT_SEG_CHNL - Strategic segment channel.
     <--ALL_CUST       - All customers.
     <--ALL_CUST_CHNL - All customers channel.
FORM derive_all_customers_fields USING strat_seg      TYPE
t_faglflext-strat_seg
                                       strat_seg_chnl TYPE
                                       t_faglflext-strat_seg_chnl
                              CHANGING all_cust       TYPE
                              t_faglflext-all_cust
                                       all_cust_chnl TYPE
                                       t_faglflext-all_cust_chnl.
CLEAR:
    all_cust,
    all_cust_chnl.
all_cust        = strat_seg.
all_cust+2(1)   = c_all_customers.
TRANSLATE all_cust TO UPPER CASE.
all_cust_chnl   = strat_seg_chnl.
TRANSLATE all_cust_chnl TO UPPER CASE.
ENDFORM.                    " derive_all_customers_fields
*&      Form derive_hyperion_account
Read G/L account long text to get the Hyperion account number.
     -->RACCT         - SAP G/L account number.
     <--HYPERION_ACCT - Hyperion account number.
FORM derive_hyperion_account USING racct         TYPE t_faglflext-racct
                                   farea         TYPE t_faglflext-rfarea
                                   "KMK5/22/06 ITR 20592
                                   sub_account   TYPE
                                   t_faglflext-sub_acct
                                   rassc         TYPE t_faglflext-rassc
                                   prctr         TYPE t_faglflext-prctr
                      CHANGING hyperion_acct TYPE t_faglflext-hyperion_acct
                               reverse_sign TYPE t_faglflext-reverse_sign "NEM8/21/06 ITR: 24286
                               balance_sheet TYPE t_faglflext-balance_sheet "NEM8/21/06 ITR: 24286
                               zzsarea       TYPE t_faglflext-zzsarea
                               zzsareaim     TYPE t_faglflext-zzsareaim
                               strat_seg     TYPE t_faglflext-strat_seg.
DATA:
    lv_text_name          TYPE thead-tdname,
    l_strl                TYPE i VALUE 0,
    l_hyperion_acct(10),                       "KMK5/20/06 ITR 20527
    l_farea(10)           VALUE '0000000000', "KMK5/22/06 ITR 20592
    l_balance_sheet(1),                        "NEM8/17/06 ITR 25792
    l_string              TYPE tline-tdline.   "NEM8/17/06 ITR 25792
DATA: l_hyp_account_1 TYPE tline-tdline,
        l_hyp_account_2 TYPE tline-tdline,
        l_hyp_account_3 TYPE tline-tdline.
reverse_sign = '1'.
SELECT SINGLE bilkt xbilk
    FROM ska1
    INTO (l_hyperion_acct,l_balance_sheet)
    WHERE ktopl = c_global_tcoa
      AND   saknr = racct.
balance_sheet = l_balance_sheet.
l_string = w_zall_gl-hyper.
SEARCH l_string FOR '-'.
IF sy-subrc = '0'.
    reverse_sign = -1.
ELSE.
    reverse_sign = 1.
ENDIF.
CHECK w_zall_gl-hyper IS NOT INITIAL.
CLEAR: l_hyp_account_1, l_hyp_account_2, l_hyp_account_3.
SPLIT w_zall_gl-hyper
    AT ';'
    INTO l_hyp_account_1 l_hyp_account_2 l_hyp_account_3.
IF l_hyp_account_2 IS INITIAL.      " Only one hyperion account
    hyperion_acct = l_hyp_account_1+0(7).
    l_strl = STRLEN( hyperion_acct ) - 1.
    IF hyperion_acct+l_strl(1) EQ '1'.
      CLEAR sub_account.
      PERFORM repopulate_strategic_segment
        USING rassc prctr
        CHANGING strat_seg.
      zzsareaim = g_hold_sales_type.
      zzsarea = g_hold_sales_area.
    ENDIF.
ELSE.                                " Two or more hyperion accounts
    IF sub_account > ''.
      hyperion_acct = l_hyp_account_2+0(7).
    ELSE.
      hyperion_acct = l_hyp_account_1+0(7).
    ENDIF.
ENDIF.
CLEAR: w_hyperion.
w_hyperion-racct           = racct.
w_hyperion-hyperion_acct   = hyperion_acct.
w_hyperion-reverse_sign    = reverse_sign.
ENDFORM.                    " derive_hyperion_account
*&      Form derive_sub_account
Determine the sub account based on the company ID of the trading
partner.
     -->RASSC    - Company ID of trading partner.
     <--SUB_ACCT - Sub account.
*FORM derive_sub_account USING rassc    TYPE t_faglflext-rassc
                    CHANGING sub_acct TYPE t_faglflext-sub_acct.
IF rassc IS INITIAL.
   CLEAR: sub_acct.
ELSE.
   sub_acct = rassc.
   TRANSLATE sub_acct TO UPPER CASE.
ENDIF.
*ENDFORM.                    " derive_sub_account
FORM derive_sub_account USING rcomp TYPE t_t001-rcomp
                              rassc TYPE t_faglflext-rassc
                CHANGING sub_acct TYPE t_faglflext-sub_acct.
IF rassc IS INITIAL.
    CLEAR: sub_acct.
ELSE.
    READ TABLE i_t880 INTO w_t880
      WITH KEY rcomp = rassc
               BINARY SEARCH.
    IF sy-subrc = 0.
      sub_acct = w_t880-name2.
      TRANSLATE sub_acct TO UPPER CASE.
    ELSE.
   MESSAGE e060
     WITH w_t001-rcomp.
Company code & not found on table T880
    ENDIF.
ENDIF.
ENDFORM.                    " derive_sub_account
*&      Form repopulate_strategic_segment
Derive the strategic segment based on the company ID of the trading
partner or the profit center.
     -->RASSC     - Company ID of trading partner.
     -->PRCTR     - Profit center.
     <--STRAT_SEG - Strategic segment.
FORM repopulate_strategic_segment USING rassc     TYPE t_faglflext-rassc
                                    prctr     TYPE t_faglflext-prctr
                           CHANGING strat_seg TYPE t_faglflext-strat_seg
DATA:
    lv_segment              TYPE cepc-segment.
CLEAR:
    strat_seg.
Find the valid profit center record.
LOOP AT i_cepc INTO w_cepc
    WHERE prctr = prctr    AND
          datab <= sy-datum AND
          datbi >= sy-datum.
Pad segment with leading zeros if necessary.
    lv_segment      = w_cepc-segment.
    SHIFT lv_segment RIGHT DELETING TRAILING ' '.
    TRANSLATE lv_segment USING ' 0'.
Get the segment name from FAGL_SEGMT (Master Data for Segments).
    SELECT SINGLE *
      FROM fagl_segmt
      WHERE langu   = sy-langu AND
            segment = lv_segment.
    IF sy-subrc = 0.
      strat_seg      = fagl_segmt-name+0(3).
      TRANSLATE strat_seg TO UPPER CASE.
    ENDIF.
ENDLOOP.
ENDFORM.                    "repopulate_strategic_segment
" repopulate_strategic_segment&----
*&      Form derive_strategic_segment
Derive the strategic segment based on the company ID of the trading
partner or the profit center.
     -->RASSC     - Company ID of trading partner.
     -->PRCTR     - Profit center.
     <--STRAT_SEG - Strategic segment.
FORM derive_strategic_segment USING rassc     TYPE t_faglflext-rassc
                                    prctr     TYPE t_faglflext-prctr
                           CHANGING strat_seg TYPE t_faglflext-strat_seg
                                    sales_type TYPE t_faglflext-zzsareaim
                                    sales_area TYPE t_faglflext-zzsarea.
DATA:
    lv_segment              TYPE cepc-segment.
CLEAR:
    strat_seg.
*Hold values in Sales Type and Sales area before setting to default
*values
In case need to use them later
g_hold_sales_type = sales_type.
g_hold_sales_area = sales_area.
If the company ID of the trading partner is populated, then set the
strategic segment to a default value.
And set Sales Type and Sales area to default values     **NEM 07/13/06
IF NOT rassc IS INITIAL.
    strat_seg   = c_def_strat_seg.
    sales_type = c_sales_type.
    sales_area = c_sales_area.
    TRANSLATE strat_seg TO UPPER CASE.
    TRANSLATE sales_type TO UPPER CASE.
    TRANSLATE sales_area TO UPPER CASE.
    EXIT.
ENDIF.
Find the valid profit center record.
LOOP AT i_cepc INTO w_cepc
    WHERE prctr = prctr    AND
          datab <= sy-datum AND
          datbi >= sy-datum.
Pad segment with leading zeros if necessary.
    lv_segment      = w_cepc-segment.
    SHIFT lv_segment RIGHT DELETING TRAILING ' '.
    TRANSLATE lv_segment USING ' 0'.
Get the segment name from FAGL_SEGMT (Master Data for Segments).
    SELECT SINGLE *
      FROM fagl_segmt
      WHERE langu   = sy-langu AND
            segment = lv_segment.
    IF sy-subrc = 0.
      strat_seg      = fagl_segmt-name+0(3).
      TRANSLATE strat_seg TO UPPER CASE.
    ENDIF.
ENDLOOP.
ENDFORM.                    " derive_strategic_segment
*&      Form get_cepc_data
Get CEPC (Profit Center Master Data Table) data from the database.
FORM get_cepc_data.
SELECT prctr datbi kokrs datab khinr segment
    INTO TABLE i_cepc
    FROM cepc
    FOR ALL ENTRIES IN i_faglflext
    WHERE prctr = i_faglflext-prctr.
SORT i_cepc BY prctr datab.
ENDFORM.                    " get_cepc_data
*&      Form derive_strat_seg_chnl
Derive the strategic segment channel based on the company ID of the
trading partner or the profit center area.
     -->RASSC          - Company ID of trading partner.
     -->PRCTR          - Profit center.
     <--STRAT_SEG_CHNL - Strategic segment channel.
FORM derive_strat_seg_chnl USING rassc          TYPE t_faglflext-rassc
                                 prctr          TYPE t_faglflext-prctr
                        CHANGING strat_seg_chnl TYPE
                        t_faglflext-strat_seg_chnl.
CLEAR:
    g_setclass,
    g_subclass,
    g_setname,
    strat_seg_chnl.
If the company ID of the trading partner is populated, then set the
strategic segment to a default value.
IF NOT rassc IS INITIAL.
    strat_seg_chnl = c_def_strat_seg_chnl.
    TRANSLATE strat_seg_chnl TO UPPER CASE.
    EXIT.
ENDIF.
Check for SETNAME = 2*** in setleaf table.
PERFORM get_setleaf_data USING c_prctr_group
                                   prctr
                          CHANGING g_subrc.
IF g_subrc NE c_no_record.
    PERFORM find_setleaf_record CHANGING g_subrc.
    SELECT SINGLE *
    FROM setheadert
    WHERE setclass = g_setclass AND
           subclass = g_subclass AND
           setname = g_setname AND
           langu    = sy-langu.
    IF sy-subrc = 0.
      strat_seg_chnl    = setheadert-descript+0(2).
      TRANSLATE strat_seg_chnl TO UPPER CASE.
    ENDIF.
ELSE.
Find the valid profit center record.
    LOOP AT i_cepc INTO w_cepc
      WHERE prctr = prctr    AND
            datab <= sy-datum AND
            datbi >= sy-datum.
Get the correct SETNODE (Lower-level sets in sets) record.
      PERFORM get_setnode_data USING c_prctr_group
                                     w_cepc-khinr
                            CHANGING g_subrc.
      PERFORM find_setnode_record CHANGING g_subrc.
      IF g_subrc = c_no_record.
        EXIT.
      ENDIF.
If an appropriate SETNODE record still has not been found, then
keep looking.
      IF g_subrc = c_wrong_record.
        DO.
          PERFORM get_setnode_data USING c_prctr_group
                                         w_setnode-setname
                                CHANGING g_subrc.
          PERFORM find_setnode_record CHANGING g_subrc.
          IF g_subrc = c_no_record OR
             g_subrc = c_correct_record.
            EXIT.
          ENDIF.
        ENDDO.
      ENDIF.
In the end, there was no SETNODE record to find.
      IF g_subrc = c_no_record.
        EXIT.
      ENDIF.
      SELECT SINGLE *
        FROM setheadert
        WHERE setclass = g_setclass AND
               subclass = g_subclass AND
               setname = g_setname AND
               langu    = sy-langu.
      IF sy-subrc = 0.
        strat_seg_chnl    = setheadert-descript+0(2).
        TRANSLATE strat_seg_chnl TO UPPER CASE.
      ENDIF.
    ENDLOOP.
ENDIF.
ENDFORM.                    " derive_strat_seg_chnl
*&      Form get_setnode_data
Get SETNODE (Lower-level sets in sets) data from the database.
     -->SETCLASS   - Set class.
     -->SUBSETNAME - Subordinate set ID.
     <--SUBRC      - Return code.
FORM get_setnode_data USING setclass   TYPE c
                            subsetname TYPE c
                   CHANGING subrc      TYPE sy-subrc.
SELECT setclass subclass setname
    INTO TABLE i_setnode
    FROM setnode
    WHERE setclass   = c_prctr_group AND
          subsetname = subsetname.
subrc = sy-subrc.
ENDFORM.                    " get_setnode_data
*&      Form get_setleaf_data
Get SETLEAF (Values in Sets) data from the database.
     -->SETCLASS   - Set class.
     -->VALFROM    - Subordinate set ID.
     <--SUBRC      - Return code.
FORM get_setleaf_data USING setclass   TYPE c
                            valfrom    TYPE c
                   CHANGING subrc      TYPE sy-subrc.
subrc = c_correct_record.
SELECT setclass setname valfrom subclass
    INTO TABLE i_setleaf
    FROM setleaf
    WHERE setclass   = c_prctr_group AND
          valfrom = valfrom AND
          setname GE '2000' AND
          setname LE '2999'.
IF sy-subrc <> 0.
    subrc = c_no_record.
    EXIT.
ENDIF.
ENDFORM.                    " get_setleaf_data
*&      Form find_setleaf_record
Find the appropriate SETLEAF record.
     <--SUBRC      - Return code.
FORM find_setleaf_record CHANGING subrc TYPE sy-subrc.
subrc = c_wrong_record.
If no records were found during selection, then exit the routine.
READ TABLE i_setleaf INDEX 1 TRANSPORTING NO FIELDS.
IF sy-subrc <> 0.
    subrc = c_no_record.
    EXIT.
ENDIF.
Check to see if one of the records has a setname in the 2000 series of
numbers.
LOOP AT i_setleaf INTO w_setleaf.
    g_setclass = w_setleaf-setclass.
    g_subclass = w_setleaf-subclass.
    g_setname = w_setleaf-setname.
    subrc = c_correct_record.
ENDLOOP.
ENDFORM.                    " find_setleaf_record
*&      Form find_setnode_record
Find the appropriate SETNODE record.
     <--SUBRC      - Return code.
FORM find_setnode_record CHANGING subrc TYPE sy-subrc.
subrc = c_wrong_record.
If no records were found during selection, then exit the routine.
READ TABLE i_setnode INDEX 1 TRANSPORTING NO FIELDS.
IF sy-subrc <> 0.
    subrc = c_no_record.
    EXIT.
ENDIF.
Check to see if one of the records has a setname in the 2000 series of
numbers.
LOOP AT i_setnode INTO w_setnode.
    IF w_setnode-setname+0(1) = c_valid_number.
      g_setclass = w_setnode-setclass.
      g_subclass = w_setnode-subclass.
      g_setname = w_setnode-setname.
      subrc = c_correct_record.
      EXIT.
    ENDIF.
ENDLOOP.
ENDFORM.                    " find_setnode_record
*&      Form split_records_by_period
Split the i_FAGLFLEXT records by fiscal period. This is necessary
because all (16) fiscal periods are on one record.
FORM split_records_by_period .
REFRESH:
    i_output_detail.
LOOP AT i_faglflext INTO w_faglflext.
START OF CHANGES BY BAYAPV on 07/07/2007**********************
*SELECT SINGLE BUKRS
      SAKNR
      XOPVW
      into w_skb1
      from skb1
      FOR ALL ENTRIES IN I_FAGLFLEXT
      where bukrs = w_faglflext-rbukrs
        and SAKNR = w_faglflext-racct.
*IF w_skb1-XOPVW = 'X'.
*SELECT BUKRS
      HKONT

Filtering of the data based upon the selection screen data using ldb

Hi Experts ,
I am using ldb pnpce, for my report ,and i created my own report category with selection paramaters
action type and payroll area
now the problem is when i am giving the action type as Z0 ,the data to be extracted is not getting filtered
based upon the action type ,the data consists the records having different action types other than Z0
Please give me some solution for this

Thanks Durga ,but the link wat ever u was for hiding the selection screen fields
but my question is when am using get pernr event my data is not getting filtered with the selection screen paramater value
i,e m giving action type as only hiring ,but m getting the data for all the action types ,its not filtering based upon my selection

SSRS report not displaying data in correct order

Guys,
I have a SSRS 2012 report not displaying returned records from SQL in the correct order. Running the stored procedure in SSMS and supplying the parameter values returns the data correctly and running Query Designer in SSRS using the stored procedure
on the dataset in question, likewise returns the data correctly. Only when I run the actual report does the data display incorrectly(always last name order). I've done similar reporting using very similar stored procedures and I've never had this
problem. Below is the stored procedure. "@SortBy" is the parameter with the sorting value. 1=Due Date; 2=Denial Amt and 3=Last name and is passed by SSRS to SQL. Wish I could supply screen shots.
Thanks for any help,
Dave
ALTER PROCEDURE [dbo].[RAC_PT_List]
@Level as int,
@SortBy as int,
@PTLName as varchar(30) = NULL,
@User as varchar(10) = NULL
AS
SELECT pat.headerID,
pat.PT_LName + ', ' + pat.PT_FName AS PTName,
pat.PT_AcctNo,
rco.RCO_CLMREF,
rco.RCO_AppealLevel,
rco.RCO_LevelNo,
rco.RCO_AuditorStatus,
let.LET_DEN_DueDate,
CONVERT(varchar(12),let.LET_DEN_DueDate) as DueDate,
let.LET_DEN_Dollars,
let.userID
FROM Master_PT_List pat
INNER JOIN Master_RCO_Work rco on RCO.PT_headerID = pat.headerID
INNER JOIN Master_Letters let on LET.PT_headerID = pat.headerID
WHERE (@PTLName IS NULL OR(pat.PT_LName LIKE + '%' + @PTLName + '%'))
AND (rco.RCO_LevelNo = @Level)
AND (let.userID = @User)
--AND (rco.RCO_AuditorStatus <> 'Closed' and rco.RCO_AdminStatus <> 'Closed')
ORDER BY
CASE WHEN @SortBy = '1' THEN LET_DEN_DueDate
END
DESC,
CASE WHEN @SortBy = '2' THEN let.LET_DEN_Dollars
END
DESC,
CASE WHEN @SortBy = '3' THEN pat.PT_LName
END

Hi DaveMac1960,
According to your description, when you render data in report, you find it always shows the data with unexpected order. Right?
In Reporting Services, if we don't set any sorting in tablix, it will order the data as your query in SSMS or Query Builder. In some scenario, for example, we add parent group for data rows, it will have the rows sort by the group on data field by default,
and the "order by" in your query will be ignored. So please check the Sorting tab in Tablix Properties, in this scenario, we suggest you delete any sorting in the Sorting tab so that the "Order By" clause can work.
Reference:
Sort Data in a Data Region (Report Builder and SSRS)
If you have any question, please feel free to ask.
Best Regards,
Simon Hou

How to auto-populate dates in a calendar based on radio buttons?

Hi,
I'm trying to create an availability form that is submitted on a monthly basis. What I'd like is to have a radio button the user could click to indicate what day the first of the month falls on (Monday through Sunday), and have fields auto-populate with the remainder of the dates on the calendar. As it stands right now, I've got the radio buttons and the text fields, but I'm running into serious issues getting the text fields to auto-fill based on the selected radio button.
I've labelled the radio button group "First Day of Month" and the individual values are "Monday" "Tuesday" "Wednesday" "Thursday" "Friday" "Saturday" "Sunday" and "Start". The "Start" button is hidden but is checked by default.
My text fields are even simpler: "Monday 1" "Monday 2" "Monday 3" "Monday 4" and "Monday 5" (and then, obviously, repeated for each day of the week.
I am horrible at scripting, so I think that might be where I'm running into issues. What I'd like to put is something like this (only, you know, functional, and for each days' text value):
For "Monday 1"
if "First Day of Month.value" = "Monday", "Monday 1.value" ="1"
else "Monday 1.value" = ""
For "Wednesday 3"
if "First Day of Month.value" = "Sunday", "Wednesday 3.value" = "11"
if "First Day of Month.value" = "Monday", "Wednesday 3.value" = "17"
if "First Day of Month.value" = "Tuesday", "Wednesday 3.value" = "16"
if "First Day of Month.value" = "Wednesday", "Wednesday 3.value" = "15"
if "First Day of Month.value" = "Thursday", "Wednesday 3" = "14"
if "First Day of Month.value" = "Friday", "Wednesday 3.value" = "13"
if "First Day of Month.value" = "Saturday", "Wednesday 3.value" = "12"
else "Wednesday 3.value" = ""
For "Sunday 5"
if "First Day of Month.value" = "Sunday", "Sunday 5.value" = "29"
if "First Day of Month.value" = "Friday", "Sunday 5.value" = "31"
if "First Day of Month.value" = "Saturday", "Sunday 5.value" = "30"
else "Sunday 5.value" = ""
Is this possible? I have no doubt there's a better way to do it (with proper coding and everything), so any help would definitely be appreciated!

Hello,
Which sharepoint edition you are using? I would prefer to customize your list form in infopath form then add new connection which will connect to your SQL. Later you can filter data based on cust ID. Here is the link to add connection in infopath:
http://office.microsoft.com/en-in/infopath-help/add-a-data-connection-to-a-microsoft-sql-server-database-HP010092823.aspx
If you want to do it via code then simple ADO.NET connector will help.
http://www.codeproject.com/Articles/33862/Connecting-to-Database-Using-Custom-Webpart-in-Sha
Hope it could help
Hemendra:Yesterday is just a memory,Tomorrow we may never see<br/> Please remember to mark the replies as answers if they help and unmark them if they provide no help

Alv report colour display

hi
i have a requirment in my alv report ,i need to show values of material description i.e only gsm values in different colour i. 296 GSM and corresponding below values 285 GSM,.below show is sample output onf my alv report.
materialno                              material deccription
                          GB CPB HWC 296 GSM 055.000 X 092.000
                          GB CPB HWC 296 GSM 082.000 X 117.000
                          GB CPB HWC 285 GSM 045.200 X 070.500
                          GB CPB HWC 285 GSM 045.200 X 070.500
                          GBCPB HWC 285 GSM 045.200 X 070.500
                          GB CPB HWC 285 GSM 045.200 X 070.500

Hi
i am sending you a code where i had colored one field
you can refer this program and you can understand very well where exactly what we have to do for colors
reward if usefull
REPORT zalv_with_colored_fields .
TYPE-POOLS : slis.
DATA : BEGIN OF it_final1 OCCURS 0,
         carrid TYPE spfli-carrid,
         connid TYPE spfli-connid,
         cityfrom TYPE spfli-cityfrom,
         cityto TYPE spfli-cityto,
         cellcolors TYPE lvc_t_scol,
         END OF it_final1 .
DATA : BEGIN OF it_final OCCURS 0,
         carrid TYPE spfli-carrid,
         connid TYPE spfli-connid,
         cityfrom TYPE spfli-cityfrom,
         cityto TYPE spfli-cityto,
         END OF it_final .
DATA : git_cellcolors TYPE TABLE OF lvc_s_scol,
       gwa_color    TYPE lvc_s_scol,
       layout       TYPE slis_layout_alv.
DATA : it_fieldcat TYPE slis_t_fieldcat_alv,
       wa_fieldcat LIKE LINE OF it_fieldcat.
START-OF-SELECTION .
SELECT carrid connid cityfrom cityto FROM spfli INTO TABLE it_final .
wa_fieldcat-col_pos   = '0'.
wa_fieldcat-tabname   = 'IT_FINAL' .
wa_fieldcat-fieldname = 'CARRID' .
wa_fieldcat-seltext_m = 'Carrier ID'(001) .
APPEND wa_fieldcat TO it_fieldcat .
wa_fieldcat-col_pos   = '1'.
wa_fieldcat-tabname   = 'IT_FINAL' .
wa_fieldcat-fieldname = 'CONNID' .
wa_fieldcat-seltext_m = 'Flight Connection Number'(002) .
APPEND wa_fieldcat TO it_fieldcat .
wa_fieldcat-col_pos   = '2'.
wa_fieldcat-tabname   = 'IT_FINAL' .
wa_fieldcat-fieldname = 'CITYFROM' .
wa_fieldcat-seltext_m = 'City from'(003) .
APPEND wa_fieldcat TO it_fieldcat .
wa_fieldcat-col_pos   = '3'.
wa_fieldcat-tabname   = 'IT_FINAL' .
wa_fieldcat-fieldname = 'CITYTO' .
wa_fieldcat-seltext_m = 'City to'(004) .
APPEND wa_fieldcat TO it_fieldcat .
LOOP AT it_final .
    it_final1-carrid   = it_final-carrid.
    it_final1-connid   = it_final-connid.
    it_final1-cityfrom = it_final-cityfrom.
    it_final1-cityto   = it_final-cityto.
    CLEAR gwa_color.
<b> IF it_final-carrid    = 'AA' .
      gwa_color-fname     = 'CARRID'.
      gwa_color-nokeycol = '1'.
     gwa_color-color-col = '6'.
      gwa_color-color-int = '1'.</b>
      APPEND gwa_color TO git_cellcolors.
      it_final1-cellcolors = git_cellcolors.
    ENDIF.
    IF it_final-carrid    = 'AZ' .
      gwa_color-fname     = 'CARRID'.
     gwa_color-nokeycol = '1'.
      gwa_color-color-col = '5'.
      gwa_color-color-int = '1'.
      APPEND gwa_color TO git_cellcolors.
      it_final1-cellcolors = git_cellcolors.
    ENDIF.</b>
    REFRESH git_cellcolors.
    APPEND it_final1.
    CLEAR : it_final , it_final1 .
ENDLOOP.
layout-coltab_fieldname = 'CELLCOLORS'.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      is_layout   = layout
      it_fieldcat = it_fieldcat
    TABLES
      t_outtab    = it_final1.

Routing Report to display data in CA03

Hi Experts,
I am making a report that displays the routings of all materials. In the table PLPO, i can see all the informations of operations its hours. But if an operation is deleted in the routing master then the entry inthe table is not deleted. So when i diaplay the data in the report the delleted operation is also listed. How can i find in the table PLPO that which line is deleted. Is there any link with field ARBID.
Regards
SAPXPT

Hi,
You will have to read the valid routing operations from the table PLAS. Logic would be PLAS-LOEKZ should be blank.
Add the above into your program & you will be reading the relevant operations.
Regards,
Vivek

Selectively display link based upon userID

I know how to add security to tabs, etc. in Portal, but I have a jsp portlet that contains various links and images. I want to selectively display some of these items based upon the user currently viewing the page. Is it possible to add security at this level?
Thanks in advance.

The links and images on the jsp portlet are not Portal items, I do not think you can use portal security to
secure them. But for links and images on portal pages, each of them can be secured.
Why not create a page, put your links and items to it, and set the item level security. Then expose the page
as a portlet, this page portlet can be include on other pages.

ALV report to display data based upon radio button.

Similar Messages

Maybe you are looking for