ABAP Query: How to transport?

We have created one ABAP query in Development system. In Query we did some changes related to code.
We want to transport it to Quality system.For this we are running "RSAQR3TR" program in Devp System . through which we are exporting "User Group, Infoset, Query" in same sequesnce, Which is generating request.
After transporting it to Quality, We are Importing it by running same program.
User group, Infoset , And Query Layout is getting updated but it is not updating the code which we have added into the query.
Please advice

Hi Reddy,
For the second part of question :
When you create a abap query SAP generates a program at the background. You can copy that program to a Zprogram and assingn a Tcode to it.( You can add some more features to the report like drilldown etc.. )
Your technical consultant should be able to help you out on this .
Regards
Balaji

Similar Messages

BASIS query :how to transport user roles

BASIS query :how to transport user roles
regards
Mave

Hi Mave,
Pls follow this
Goto PFCG
Enter the role there.
On the application toolbar you can find the button for transport. Click on that and assign this to a transport request
Release and transport to the other system.
Cheers
Vinod

ABAP Query - How to display non-zero entries

Hi All,
I have created a simple query having the join of 4 tables.
Now I need to display the output for only non-zero entries of a particular field.
How this can be achieved ?
Please let me know-
1) Either , there are ways to restrict the entries during selection itself(I do not want to give this field in selection screen)
2) Or , Delete the entries having zero value before display.
I debugged the standard report for query and found out the internal table where the
result is stored, but it is not allowing to be used in the coding sections of infoset.
Thanks ,
Neethu

In select add condition field1 NE 0 or SPACE.
Edited by: Shaik Hussain on Nov 30, 2010 1:46 PM

ABAP query - default value in selection parameter

In ABAP Query, how to get a default value into the field which is in selection screen?

hi priya,
You can specify a default value to both a Parameter and a Select-Option with the following addition
Default <value>
E.g. Parameters : p_date TYPE sy-datum DEFAULT sy-datum.
Select-options s_date for sy-datum default sy-datum.
thanks
Sachin

Report Painter or ABAP Query

Hi,
I have to create one report with the use of three different Tables. is it possible to create in Report Painter or Report Writer or ABAP Query? or i need to customize that report with ABAPers?
Can anybody please tell me for Report Painter and Report writer, can i use Two Tables?
and in ABAP query how i can create the report?
I'll really appreciate your help.
Thanks,
Niki Shah

Hello Niki
You create a query based on an info-set. Info sets are special views of a dataset so can be :
- Table joins ( more than one table)
- Single tables
- Logical data bases (view of the database)
You create a report painter from a library which is based only on a single totals table.
Regards
Javier Reviriego

Table Join in ABAP Query

Hi,
I'm new to ABAP Query. I want to include a table and join with an existing table in abap query. how to do this?

Hi
select lipsvbeln lipslfimg likp~wadat
        into corresponding fields of table ltab_orders
        from lips join likp on ( lipsvbeln = likpvbeln )
        join vbfa on ( lipsvbeln = vbfavbelv )
        where lips~matnr = matnr
        and   lips~vbeln in vbeln
        and   likp~vbeln in vbeln
        and   vbfa~vbelv in vbeln
        and   lips~werks in werks
        and   likp~wadat in datum
        and   vbfa~vbtyp_n = 'Q'
        and   vbfa~vbtyp_v = 'J'.
Thanks,
Neelima.

ABAP Query - Dump

I have a transport that contains the ABAP Query, user group, query variant and the tcode to run this abap query. The transport has moved to Prod but gives a dump when the tcode is run
Program "AQZZZMM_DATA====QRY_XXX_YYY== " not found.
The infoset query generates a report "AQZZZMM_DATA====QRY_XXX_YYY== ".
What do I need to get this working ?

Hi,
The above solution will work if you assign the transaction in one server, If you want this will not work in quality/production boxes when transported the query..the program name will not be the same in all the servers...
For this. Do the below:
In SE93, Create a Paramter Transaction
-> Transaction = Start_report
-> In default values, give the below details:
     D_SREPOVARI-REPORTTYPE = AQ
     D_SREPOVARI-EXTDREPORT = Name of the Query
     D_SREPOVARI-REPORT = User Group
Save the transaction..Now if the program is generated with different names in the quality/proudction, this will still work..
Regards
Vijay Hebbal

How to get the transport request number of ABAP query.

I want to find out last Transport Request number used of a transporting changes Abap query from development to quality system.
Also is it possible to do some comparison on version existing in development and quality for abap query.

goto SE03 ..
In Object Directory -> Double click on
Change Object Directory Entries
Enter AQQU(This is for ABAP Query) in the modifiable box ..
press enter ...
Check this check box ... Enter the ABAP query and press F8.
Double click on the Query and in the popup click on the
Lock Overview ...
U'll find the request number ...
Edited by: Srinivas Gurram Reddy on Apr 2, 2008 6:53 PM

How to transport ABAP Query

Hi ,
i would like to know if it's possible to transport ABAP Query from one server to another using CTS. eg: development server to test server. plus can we assign a transaction code to an ABAP Query.
its very urgent.
Plz respond.
Rgds,
BPNR....

Hi Reddy,
For the second part of question :
When you create a abap query SAP generates a program at the background. You can copy that program to a Zprogram and assingn a Tcode to it.( You can add some more features to the report like drilldown etc.. )
Your technical consultant should be able to help you out on this .
Regards
Balaji

Transport of Abap Query

Hi,
Can anybody tel me how to transport Abap Query.

Hi,
ABAP/4 Query is a powerful tool to generate simple reports without any coding. ABAP/4 Query can generate the following 3 simple reports: Basic List: It is the simple reports. Statistics: Reports with statistical functions like Average, Percentages. Ranked Lists: For analytical reports. - For creating a ABAP/4 Query, programmer has to create user group and a functional group. Functional group can be created using with or without logical database table. Finally, assign user group to functional group. Finally, create a query on the functional group generated.
You can transport queries between systems in SQ02 (hit the lorry button) or run program RSAQR3TR.
You download the infosets, queries etc into a file and load them into whichever system you wish.
regards,
vineela.

Transport of ABAP query to production server

Hi!
I have developed a report with ABAP query in development server with transaction codes SQ01, SQ02 AND SQ03 respectively.
I also got the program name from SQ01.
Now , how to attach a transaction code with the program that is generated from ABAP query and transport it to production server
successfully.
If the program is attached directly to the tr code through SE93 and transported----- program is not found in the pr. server.
pls help me out , requirement is very urgent.
points to be rewarded .
regards
Amit

hi amit,
if i understood correctly.is ur query and infoset transported or imported to production.
Regards,
sudheer

How to add join conditions in ABAP Query.

Hi,
I need a help on "ABAP Query".
How to add join conditions in ABAP Query.
Thanks in advance.
Thanks & Regards,
Ramana

Hi,
See below code,
*& Report ZRNP_ALV_SO
REPORT zrnp_alv_so MESSAGE-ID z7rnp .
INCLUDE zrnp_include .
*SELECTION SCREEN                                                      *
SELECTION-SCREEN BEGIN OF BLOCK blk1 WITH FRAME TITLE text-004 .
SELECT-OPTIONS: s_vbeln FOR vbak-vbeln ,
                s_auart FOR v_auart ,
                s_vkorg FOR v_vkorg ,
                s_spart FOR v_spart ,
                s_kunnr FOR v_kunnr ,
                s_matnr FOR v_matnr .
SELECTION-SCREEN END OF BLOCK blk1 .
*AT SELECTION SCREEN                                                   *
AT SELECTION-SCREEN.
SELECT SINGLE vbeln
                 FROM vbak INTO vbak-vbeln
                 WHERE vbeln IN s_vbeln.
IF sy-subrc <> 0.
    MESSAGE e202.
ENDIF.
*START OF SELECTION                                                    *
START-OF-SELECTION .
PERFORM data_select.
PERFORM t_sort USING i_sort .
PERFORM event_cat USING i_event .
PERFORM fld_cat USING i_fldcat[] .
PERFORM t_layout USING i_layout .
PERFORM fld_cat2 USING i_fldcat2[] .
PERFORM call_alv.
* DATA SELECT                                                          *
*&      Form DATA_SELECT
*       text
* --> p1        text
* <-- p2        text
FORM data_select .
REFRESH: it_vbfa, it_so1, it_del_ful ,it_del1 .
BREAK-POINT.
*SELECT*
        *a~vbeln*
        *a~auart*
        *a~vkorg*
        *a~spart*
        *a~kunnr*
        *b~posnr*
        *b~matnr*
        *c~maktx*
        *b~kwmeng*
        *b~vrkme*
        *INTO TABLE it_so1 FROM vbak AS a*
              *INNER JOIN vbap AS b ON b~vbeln = a~vbeln*
              *INNER JOIN makt AS c ON c~matnr = b~matnr*
              *AND c~spras = sy-langu*
              *WHERE a~vbeln IN s_vbeln .*
IF sy-subrc = 0.
    SORT it_so1 BY vbeln.
    DELETE ADJACENT DUPLICATES FROM it_so1.
ENDIF.
* COLURING DISPLAY                                                     *
DATA: ld_color(1) TYPE c .
* LOOP AT it_so1 INTO wa_so.
* Populate color variable with colour properties
* Char 1 = C (This is a color property)
* Char 2 = 3 (Color codes: 1 - 7)
* Char 3 = Intensified on/off ( 1 or 0 )
* Char 4 = Inverse display on/off ( 1 or 0 )
*           i.e. wa_ekko-line_color = 'C410'
*    ld_color = ld_color + 1.
* Only 7 colours so need to reset color value
*    IF ld_color = 8.
*      ld_color = 1.
*    ENDIF.
*    CONCATENATE 'C' ld_color '10' INTO wa_so-line_color.
** wa_ekko-line_color = 'C410'.
*    MODIFY it_so1 FROM wa_so.
* ENDLOOP .
* IF sy-subrc = 0.
IF NOT it_so1[] IS INITIAL.
    SELECT vbelv
           posnv
           vbeln
           posnn
           vbtyp_n
           INTO TABLE it_vbfa
           FROM vbfa
           FOR ALL ENTRIES IN it_so1
           WHERE vbelv = it_so1-vbeln
           AND   posnn = it_so1-posnr
           AND vbtyp_n ='J' .
    IF sy-subrc = 0.
      SELECT vbeln
             posnr
             matnr
             werks
             lgort
             charg
             lfimg
             vrkme
             FROM lips INTO TABLE it_del_ful
             FOR ALL ENTRIES IN it_vbfa
             WHERE vbeln = it_vbfa-vbeln
             AND   posnr = it_vbfa-posnn.
    ENDIF.
ENDIF.
ENDFORM.                    " DATA_SELECT
**************** EVENT CATALOG ****************************************
*&      Form EVENT_CAT
*       text
*      -->P_I_EVENT text
FORM event_cat USING    p_i_event TYPE slis_t_event .
REFRESH p_i_event .
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
* EXPORTING
*   I_LIST_TYPE           = 0
   IMPORTING
      et_events             = p_i_event
* EXCEPTIONS
*   LIST_TYPE_WRONG       = 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.
READ TABLE p_i_event WITH KEY name = slis_ev_top_of_page INTO t_event.
IF sy-subrc = 0.
    MOVE 'TOP_OF_PAGE' TO t_event-form.
    MODIFY p_i_event FROM t_event INDEX sy-tabix TRANSPORTING form.
ENDIF.
CLEAR t_event .
ENDFORM.                    " EVENT_CAT
**********FORM FOR EVENT TOP_OF_PAGE**********************************
FORM top_of_page .
REFRESH i_listheader.
DATA: t_header TYPE slis_listheader.
DATA: v_text(50).
WRITE sy-datum TO v_text.
CLEAR t_header.
t_header-typ = 'S'.
t_header-key = "Date".
t_header-info = v_text.
APPEND t_header TO i_listheader.
CLEAR t_header.
CLEAR v_text.
WRITE: 'SALES ORDER & DELIVERY DETAILS REPORT ' TO v_text .
t_header-typ = 'S'.
t_header-key = 'TITLE'.
t_header-info = v_text.
APPEND t_header TO i_listheader.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = i_listheader.
*      I_LOGO             = 'ALV_BACKGROUND'.
*   I_END_OF_LIST_GRID       =
ENDFORM.                    "TOP_OF_PAGE
******** FIRST ALV GRID DISPLAY ***************************************
FORM call_alv .
* FORM TO MAKE THE CELL CONTENTS INVISIBLE.
* PERFORM INVISIBLE_CELL_CONTENTS. *
*EXCLUDE-DECLARATION.
CLEAR wa_exclude.
wa_exclude-fcode = '&VEXCEL'.
APPEND wa_exclude TO i_exclude.
*&      Form CALL_ALV
*       text
* --> p1        text
* <-- p2        text
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
     i_callback_program                = sy-repid
*    I_CALLBACK_PF_STATUS_SET          = 'SET_PF_STATUS'
     i_callback_user_command           = 'USER_COMMAND1'
     i_callback_top_of_page            = 'TOP_OF_PAGE'
     i_background_id                   = 'ALV_BACKGROUND'
     is_layout                         = i_layout
     it_fieldcat                       = i_fldcat[]
     it_excluding                      = i_exclude
     it_sort                           = i_sort
     it_events                         = i_event
    TABLES
     t_outtab                          = it_so1
* 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.                    " CALL_ALV
************** FIRST FIELDCATALOG *************************************
*&      Form FLD_CAT
*       text
*      -->P_I_FLDCAT[] text
FORM fld_cat USING    p_i_fldcat TYPE slis_t_fieldcat_alv.
CLEAR i_fldcat.
i_fldcat-fieldname   = 'VBELN'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat-tabname     = 'IT_SO1'."TABLE NAME
i_fldcat-seltext_m   = 'SALES ORDER NO.'.
i_fldcat-col_pos     = 1.        " POSITION OF THE COLUMN.
i_fldcat-outputlen   = 20.       " SET THE OUTPUT LENGTH.
i_fldcat-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat-hotspot     = 'X'.
i_fldcat-just(1)     = 'C'.
APPEND i_fldcat.
CLEAR i_fldcat.
i_fldcat-fieldname   = 'AUART'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat-tabname     = 'IT_SO1'."TABLE NAME
i_fldcat-seltext_m   = 'SALES DOC. TYPE'.
i_fldcat-col_pos     = 2.        " POSITION OF THE COLUMN.
i_fldcat-outputlen   = 15.       " SET THE OUTPUT LENGTH.
i_fldcat-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat-just(1)     = 'C'.
APPEND i_fldcat.
CLEAR i_fldcat.
i_fldcat-fieldname   = 'VKORG'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat-tabname     = 'IT_SO1'.
i_fldcat-seltext_m   = 'SALES ORG.'.
i_fldcat-col_pos     = 3.        " POSITION OF THE COLUMN.
i_fldcat-outputlen   = 12.       " SET THE OUTPUT LENGTH.
i_fldcat-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat-just(1)     = 'C'.
APPEND i_fldcat.
CLEAR i_fldcat.
i_fldcat-fieldname   = 'SPART'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat-tabname     = 'IT_SO1'.
i_fldcat-seltext_m   = 'DIVISION'.
i_fldcat-col_pos     = 4.        " POSITION OF THE COLUMN.
i_fldcat-outputlen   = 10.       " SET THE OUTPUT LENGTH.
i_fldcat-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat-just(1)     = 'C'.
APPEND i_fldcat.
CLEAR i_fldcat.
i_fldcat-fieldname   = 'KUNNR'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat-tabname     = 'IT_SO1'.
i_fldcat-seltext_m   = 'SOLD TO PARTY'.
i_fldcat-col_pos     = 5.        " POSITION OF THE COLUMN.
i_fldcat-outputlen   = 15.       " SET THE OUTPUT LENGTH.
i_fldcat-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat-just(1)     = 'C'.
APPEND i_fldcat.
CLEAR i_fldcat.
i_fldcat-fieldname   = 'POSNR'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat-tabname     = 'IT_SO1'.
i_fldcat-seltext_m   = 'SALES DOC. ITEM'.
i_fldcat-col_pos     = 6.        " POSITION OF THE COLUMN.
i_fldcat-outputlen   = 17.       " SET THE OUTPUT LENGTH.
i_fldcat-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat-just(1)     = 'C'.
APPEND i_fldcat.
CLEAR i_fldcat.
i_fldcat-fieldname   = 'MATNR'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat-tabname     = 'IT_SO1'.
i_fldcat-seltext_m   = 'MATERIAL NO.'.
i_fldcat-col_pos     = 7.        " POSITION OF THE COLUMN.
i_fldcat-outputlen   = 20.       " SET THE OUTPUT LENGTH.
i_fldcat-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat-just(1)     = 'C'.
APPEND i_fldcat.
CLEAR i_fldcat.
i_fldcat-fieldname   = 'MAKTX'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat-tabname     = 'IT_SO1'.
i_fldcat-seltext_m   = 'DESCRIPTION'.
i_fldcat-col_pos     = 8.        " POSITION OF THE COLUMN.
i_fldcat-outputlen   = 20.       " SET THE OUTPUT LENGTH.
i_fldcat-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat-just(1)     = 'C'.
APPEND i_fldcat.
CLEAR i_fldcat.
i_fldcat-fieldname   = 'KWMENG'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat-tabname     = 'IT_SO1'.
i_fldcat-seltext_m   = 'QUANTITY'.
i_fldcat-col_pos     = 9.        " POSITION OF THE COLUMN.
i_fldcat-outputlen   = 15.       " SET THE OUTPUT LENGTH.
i_fldcat-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat-do_sum    = 'X'.        " For doing "SUM"
i_fldcat-just(1)     = 'C'.
APPEND i_fldcat.
CLEAR i_fldcat.
i_fldcat-fieldname   = 'VRKME'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat-tabname     = 'IT_SO1'.
i_fldcat-seltext_m   = 'SALES UNIT'.
i_fldcat-col_pos     = 10.       " POSITION OF THE COLUMN.
i_fldcat-outputlen   = 10.       " SET THE OUTPUT LENGTH.
i_fldcat-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat-just(1)     = 'C'.
APPEND i_fldcat.
ENDFORM.                    " FLD_CAT
****************** ALV SORTING ***************************************
*&      Form SORT
*       text
*      -->P_I_SORT text
FORM t_sort USING    p_i_sort TYPE slis_t_sortinfo_alv .
DATA: i_sort TYPE slis_sortinfo_alv .
REFRESH p_i_sort .
CLEAR i_sort.
i_sort-spos = 1.
i_sort-tabname = 'IT_SO1'.
i_sort-fieldname = 'VBELN'.
i_sort-up = 'X'.
i_sort-subtot = 'X'.
i_sort-group = '*'.
APPEND i_sort TO p_i_sort.
ENDFORM.                    " SORT
*FORM SET_PF_STATUS USING rt_extab TYPE slis_t_extab.
* SET PF-STATUS 'ZSTANDARD'.
*ENDFORM. "Set_pf_status
***********FORM FOR EVENT USER_COMMAND1********************************
FORM user_command1 USING r_ucomm LIKE sy-ucomm
                         rs_selfield TYPE slis_selfield.
*CASE R_UCOMM .
*    WHEN '&IC1' .
*    IF rs_selfield-FIELDNAME = 'VBELN' .
*    ENDIF .
* WHEN OTHERS .
* ENDCASE .
CLEAR wa_so.
REFRESH: it_del1 .
IF r_ucomm = '&IC1' AND rs_selfield-fieldname = 'VBELN' AND
rs_selfield-value IS NOT INITIAL.
    READ TABLE it_so1 INTO wa_so INDEX rs_selfield-tabindex.
    IF sy-subrc = 0.
      LOOP AT it_vbfa INTO wa_vbfa WHERE vbelv = wa_so-vbeln
                                   AND   posnv = wa_so-posnr.
        READ TABLE it_del_ful INTO wa_it_del_ful
             WITH KEY vbeln = wa_vbfa-vbelv
                      posnr = wa_vbfa-posnn.
        IF sy-subrc = 0.
          CLEAR wa_del.
          MOVE wa_it_del_ful TO wa_del.
          APPEND wa_del TO it_del1.
        ENDIF.
      ENDLOOP.
    ENDIF.
ENDIF.
********* SECOND ALV GRID DISPLAY ***********************************
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
    i_callback_program                = sy-repid
*   I_CALLBACK_PF_STATUS_SET          = 'SET_PF_STATUS'
    i_callback_user_command           = 'USER_COMMAND2'
    i_callback_top_of_page            = 'TOP_OF_PAGE'
    i_background_id                   = 'ALV_BACKGROUND'
    it_fieldcat                       = i_fldcat2[]
    it_sort                           = i_sort
    TABLES
    t_outtab                          = it_del_ful
* 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 .                    "USER_COMMAND1
********** FORM FOR EVENT USER_COMMAND 2 ******************************
FORM user_command2 USING r_ucomm LIKE sy-ucomm
                         rs_selfield TYPE slis_selfield.
CLEAR wa_so.
REFRESH: it_del1 .
IF r_ucomm = '&IC1' AND rs_selfield-fieldname = 'VBELN' AND
rs_selfield-value IS NOT INITIAL.
    READ TABLE it_so1 INTO wa_so INDEX rs_selfield-tabindex.
*    IF SY-SUBRC = 0.
*       LOOP AT it_vbfa INTO wa_vbfa WHERE vbelv = WA_SO-vbeln
*                                    AND   posnv = WA_SO-posnr.
    READ TABLE it_del_ful INTO wa_it_del_ful
         WITH KEY vbeln = rs_selfield-value
                 " vbeln = wa_vbfa-vbeln
                  posnr = wa_vbfa-posnn.
    IF rs_selfield-fieldname = 'VBELN'.
      SET PARAMETER ID 'VL' FIELD wa_vbfa-vbeln .
      CALL TRANSACTION 'VL03' AND SKIP FIRST SCREEN.
    ENDIF .
*       ENDLOOP.
*    ENDIF.
ENDIF.
ENDFORM .                    "USER_COMMAND2
********* SECOND FIELDCATALOG ******************************************
*&      Form FLD_CAT2
*       text
*      -->P_I_FLDCAT2[] text
FORM fld_cat2 USING    p_i_fldcat2 TYPE slis_t_fieldcat_alv .
CLEAR i_fldcat2.
i_fldcat2-fieldname   = 'VBELN'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat2-tabname     = 'IT_DEL_FUL'."TABLE NAME
i_fldcat2-seltext_m   = 'DELIVERY NO.'.
i_fldcat2-col_pos     = 1.        " POSITION OF THE COLUMN.
i_fldcat2-outputlen   = 20.       " SET THE OUTPUT LENGTH.
i_fldcat2-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat2-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat2-hotspot     = 'X'.
i_fldcat2-just(1)     = 'C'.
APPEND i_fldcat2.
CLEAR i_fldcat2.
i_fldcat2-fieldname   = 'POSNR'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat2-seltext_m   = 'DELIVERY ITEM'.
i_fldcat2-col_pos     = 2.        " POSITION OF THE COLUMN.
i_fldcat2-outputlen   = 20.       " SET THE OUTPUT LENGTH.
i_fldcat2-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat2-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat2-just(1)     = 'C'.
APPEND i_fldcat2.
CLEAR i_fldcat2.
i_fldcat2-fieldname   = 'MATNR'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat2-seltext_m   = 'MATERIAL NO.'.
i_fldcat2-col_pos     = 3.        " POSITION OF THE COLUMN.
i_fldcat2-outputlen   = 20.       " SET THE OUTPUT LENGTH.
i_fldcat2-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat2-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat2-just(1)     = 'C'.
APPEND i_fldcat2.
CLEAR i_fldcat2.
i_fldcat2-fieldname   = 'WERKS'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat2-seltext_m   = 'PLANT.'.
i_fldcat2-col_pos     = 4.        " POSITION OF THE COLUMN.
i_fldcat2-outputlen   = 20.       " SET THE OUTPUT LENGTH.
i_fldcat2-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat2-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat2-just(1)     = 'C'.
APPEND i_fldcat2.
CLEAR i_fldcat2.
i_fldcat2-fieldname   = 'LGORT'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat2-seltext_m   = 'ST. LOCATION'.
i_fldcat2-col_pos     = 5.        " POSITION OF THE COLUMN.
i_fldcat2-outputlen   = 20.       " SET THE OUTPUT LENGTH.
i_fldcat2-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat2-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat2-just(1)     = 'C'.
APPEND i_fldcat2.
CLEAR i_fldcat2.
i_fldcat2-fieldname   = 'CHARG'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat2-seltext_m   = 'BATCH NO.'.
i_fldcat2-col_pos     = 6.        " POSITION OF THE COLUMN.
i_fldcat2-outputlen   = 20.       " SET THE OUTPUT LENGTH.
i_fldcat2-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat2-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat2-just(1)     = 'C'.
APPEND i_fldcat2.
CLEAR i_fldcat2.
i_fldcat2-fieldname   = 'LFIMG'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat2-seltext_m   = 'ACT. DEL. QTY.'.
i_fldcat2-col_pos     = 7.        " POSITION OF THE COLUMN.
i_fldcat2-outputlen   = 20.       " SET THE OUTPUT LENGTH.
i_fldcat2-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat2-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat2-just(1)     = 'C'.
APPEND i_fldcat2.
CLEAR i_fldcat2.
i_fldcat2-fieldname   = 'VRKME'. "FIELD FOR WHICH CATALOG ID FILLED
i_fldcat2-seltext_m   = 'SALES UNIT.'.
i_fldcat2-col_pos     = 8.        " POSITION OF THE COLUMN.
i_fldcat2-outputlen   = 20.       " SET THE OUTPUT LENGTH.
i_fldcat2-emphasize   = 'X'.      " COLOR OF THIS COLUMN.
i_fldcat2-key         = 'X'.      " SO THAT THIS FIELD IS NOT
"SCROLLABLE AND HIDDABLE.
i_fldcat2-just(1)     = 'C'.
APPEND i_fldcat2.
ENDFORM.                                                    " FLD_CAT2
***************** ALV LAYOUT *******************************************
*&      Form LAYOUT
*       text
*      -->P_I_LAYOUT text
FORM t_layout USING    p_i_layout TYPE slis_layout_alv .
p_i_layout-zebra = 'X'.
p_i_layout-totals_text = 'GRAND TOTAL ='.
* p_i_layout-CONFIRMATION_PROMPT = 'X'.
* p_i_layout-DEF_STATUS = ' '.
p_i_layout-info_fieldname = 'LINE_COLOR'.
ENDFORM.                    " LAYOUT

ABAP Query transports not handled by CHARM

Hi,
How should ABAP query transports be handled in CHARM??
The ABAP query transport tool doesn't allow picking a transport that is already created (Own transport), it creates a new transports which is outside of CHARM. I had to assign the objects in the transport manually to the appropriate CHARM transport.
Any ideas???
ABAP query don't seem to be using the standard transport tool.
Thanks
Stephane

Hi
Instead of assigning the objects you can directly assign the trasnports to the charm task list of the project
check q22 (registerting transport created outside of charm)
Change Request Management scenario: Usual questions and known errors
hope it clarifies
regards
prakhar

ABAP Query Transports

How to do ABAP Query Transports?

Hi,
Use the SAP std report - RSAQR3TR.
Reward points if helps.
Regards,
JLN

ABAP Query transport request

Hi All,
We created an ABAP Query report for Transfer order address and it is system generated report. When I am trying to find the version management but is it showing no version found. Even I have created TR manunally and imported to quality system, But this program is not moved.
I have a doubt here this is system generated program that we cant import to other system or can we import?
Can you please let us know how can we transport ABAP query report?
Regards,
Jyothi CH.

Hi Jyothi,
Copy this report in another prog, save with package. that time it will be asking request. make request for this copy prog
so this way you can able to find transport request.
Regards,
Kunjan

ABAP Query: How to transport?

Similar Messages

Maybe you are looking for