Submit Report including internal table

hi ,
My Req is call Report2 from report1 .
EXPORT itab to MEMORY ID 'DEVIC'.
SUBMIT ZREPORT2 AND RETURN.
free memory id 'DEVIC'.
is this correct?
Thanks

hi ,
My Req is call Report2 from report1 and utilize itab of report1 in report2..
EXPORT itab to MEMORY ID 'DEVIC'.
SUBMIT ZREPORT2 AND RETURN.
free memory id 'DEVIC'.
is this correct?
Thanks

Similar Messages

Submit report using internal table

Hi Experts!!,
REPORT 1
TYPES:   BEGIN OF ty_out_table,
         partner LIKE /sapsll/pntbp-partner,
         bpvsy   LIKE /sapsll/pntbp-bpvsy,
         country LIKE adrc-country,
        END OF ty_out_table.
internal table declaration & definition
DATA: gt_out_table TYPE STANDARD TABLE OF ty_out_table
               WITH KEY partner
                        bpvsy.
I have data in internal table gt_out_table.
I want to pass data gt_out_table in report 2. using SUBMIT REPORT.
How to do that ?
REPORT 2
select-options: s_partnr for /sapsll/pntbp-bpvsy.
parameters: p_upd,
                  p_value .
please suggest.
Thanks
Anee

hai,
... WITH SELECTION-TABLE rspar
Effect
If you specify this addition, parameters and selection criteria on the selection screen are supplied from an internal table rspar. You must specify an internal table with the row type RSPARAMS for rspar. The structured data type RSPARAMS is defined in the ABAP Dictionary and has the following components, all of which are data type CHAR:
SELNAME (length 8),
KIND (length 1),
SIGN (length 1),
OPTION (length 2),
LOW (length 45),
HIGH (length 45).
To supply parameters and selection criteria for the selection screen with specific values, the lines in the internal table rspar must contain the following values:
SELNAME must contain the name of a parameter or selection criterion for the selection screen in block capitals
KIND must contain the type of selection screen component (P for parameters, S for selection criteria)
SIGN, OPTION, LOW, and HIGH must contain the values specified for the selection table columns that have the same names as the selection criteria; in the case of parameters, the value must be specified in LOW and all other components are ignored.
If the name of a selection criterion is repeated in rspar, this defines a selection table containing several lines and passes it on to the selection criterion. If parameter names occur several times, the last value is passed on to the parameter.
The contents of the parameters or selection tables for the current program can be entered in the table by the function module RS_REFRESH_FROM_SELECTOPTIONS.
Notes
In contrast to selection tables, the data types of the components LOW and HIGH in table rspar are always of type CHAR and are converted to the type of the parameter or selection criterion during transfer, if necessary.
When entering values, you must ensure that these are entered in the internal format of the ABAP values, and not in the output format of the screen display.

Submit report with internal table

Hi Experts !
I have a requirement where report is showing output in ALV1. Based user action I need to process further in background mode.
I have developed a report which I am submitting for this background mode.
I am opening a Job sumbitting created report with return. Job close.
This created report is in scheduled status in SM37. I have to go there and release it.
To pass parameters to newly created report I have used WITH field names with developed report name. But I am not getting parameters at new report. Similarly used import/export --- set/get but still not getting parameters at submitted report.
Is it because it is in background mode? If so how can I achieve this functionality. Can anybody suggest me something ?

Hi,
IMPORT and EXPORT from memory doesn't work here.
Have a look into the SAP documentation:
When the program is scheduled in the background task, the selections specified by the user or in the additions for filling the selection screen are stored in an internal variant. When the program is executed in the background request, it is processed fully but the selection screen is processed in the background. The system triggers all events, including that for selection screen processing. The variant stored internally is transferred to the selection screen between the INITIALIZATION and AT SELECTION SCREEN OUTPUT events.
The transfer of the parameters should work, if you don't have any statements that clear those parameters. Maybe parameters with SET/GET parameters also will cause a problem. But it should work with this internal variants. Before you start the jov, please have a look in those generated variants, whether the parameters have the right values.
Regards,
Klaus
Edited by: Klaus Babl on Feb 8, 2011 6:58 AM

SUBMIT and return the value of that report into internal table

Dear all,
I have a requirement. I want to submit a report and return the value of that report into my internal table.
How to do this.
Pl. guide.

Hi Vidhya,
Below links from SAP help will resolve your issue.
http://help.sap.com/saphelp_nw04/Helpdata/EN/fc/eb3bde358411d1829f0000e829fbfe/content.htm
http://help.sap.com/saphelp_nw04/helpdata/en/fc/eb3bd1358411d1829f0000e829fbfe/content.htm
Edited by: Harsh Bhalla on Jan 2, 2010 11:54 AM

SUBMIT REPORT AND PASS TABLE

i want to submit trans MB5B and move the data of table
BESTand (is this itab?) to my ITAB in my program

Hello Rani,
U can use the following sample code to call the report. U can modify the code as per ur req. however thesecond requirement of urs is not possible as the internal table is defeined only till the program executes and as soon as the control returns back to ur program the internal table is lost.
data: begin of selpr occurs 0.
include structure RSPARAMS.
data: end of selpr.
clear selpr.
refresh selpr.
*selpr-selname = 'KD_LIFNR'.
*selpr-kind = 'S'.
*selpr-sign = 'I'.
*selpr-option = 'EQ'.
*selpr-low = '10000151'.
*append selpr.
clear selpr.
selpr-selname = 'MATNR'.
selpr-kind = 'S'.
selpr-sign = 'I'.
selpr-option = 'EQ'.
selpr-low = '000000000000000967'.
append selpr.
clear selpr.
selpr-selname = 'WERKS'.
selpr-kind = 'S'.
selpr-sign = 'I'.
selpr-option = 'EQ'.
selpr-low = 'MZ01'.
submit RM07MLBD with selection-table selpr and return.
U will have to copy this porgram and play, however u need to be careful as it may server the purpose at this point in tie but during upgrade u may face problems.

Reg:Submit statement Return Internal Table

Hi Team,
I have a query to return the internal table from the called program via SUBMIT statement to the calling statement ??
Example : Thing is that consider reports A and B , Report B is getting called from report A where in B we have one internal table full of data that i need to pull to report A and there i need to process it.
How can i achieve this?
Please let me know the possible ways.
Karthik.S

Hi karthik,
SUBMIT .... AND RETURN EXPORTING LIST TO MEMORY.
Then use FM LIST_FROM_MEMORY.
Thanks,
Anil

Report using internal table events

Hi,
i have an internal table with the fields 1. profitcenter 2. company code 3. gl account 4. amount
for each profit center i need to seggregate accounts based on company code.
the report should look like the one below.
please suggest some code using internal table events at new , at end etc. as im not using alv. your help will be rewarded
regards,
ravi.
-Profitcenter-companycodeglaccount-amount---
-pfcenter1----
glaccount1-1000---
glaccount2-2000---
4444-total--3000---
glaccount1-4000---
glaccount2-1000---
3333-total--5000---
-profitcentre1*total8000---
profitcentre2.........

Hi.
TYPES: BEGIN OF G_I_DATA,
         PROFIT(4)   TYPE C,
         COMPANY(4) TYPE C,
         ACCOUNT(10) TYPE C,
         AMOUNT      TYPE P,
       END OF G_I_DATA.
DATA: G_IT_DATA TYPE TABLE OF G_I_DATA,
      G_WA_DATA TYPE G_I_DATA.
DATA: G_SUM_COMPANY TYPE P,
      G_SUM_PROFIT   TYPE P,
      G_AMOUNT       TYPE P.
G_WA_DATA-PROFIT = '0001'.
G_WA_DATA-COMPANY = '1111'.
G_WA_DATA-ACCOUNT = 'ACCOUNT1'.
G_WA_DATA-AMOUNT = 2000.
APPEND G_WA_DATA TO G_IT_DATA.
G_WA_DATA-PROFIT = '0001'.
G_WA_DATA-COMPANY = '1111'.
G_WA_DATA-ACCOUNT = 'ACCOUNT2'.
G_WA_DATA-AMOUNT = 3000.
APPEND G_WA_DATA TO G_IT_DATA.
G_WA_DATA-PROFIT = '0001'.
G_WA_DATA-COMPANY = '2222'.
G_WA_DATA-ACCOUNT = 'ACCOUNT1'.
G_WA_DATA-AMOUNT = 4000.
APPEND G_WA_DATA TO G_IT_DATA.
G_WA_DATA-PROFIT = '0001'.
G_WA_DATA-COMPANY = '2222'.
G_WA_DATA-ACCOUNT = 'ACCOUNT2'.
G_WA_DATA-AMOUNT = 5000.
APPEND G_WA_DATA TO G_IT_DATA.
G_WA_DATA-PROFIT = '0002'.
G_WA_DATA-COMPANY = '1111'.
G_WA_DATA-ACCOUNT = 'ACCOUNT1'.
G_WA_DATA-AMOUNT = 2000.
APPEND G_WA_DATA TO G_IT_DATA.
G_WA_DATA-PROFIT = '0002'.
G_WA_DATA-COMPANY = '1111'.
G_WA_DATA-ACCOUNT = 'ACCOUNT2'.
G_WA_DATA-AMOUNT = 3000.
APPEND G_WA_DATA TO G_IT_DATA.
G_WA_DATA-PROFIT = '0002'.
G_WA_DATA-COMPANY = '2222'.
G_WA_DATA-ACCOUNT = 'ACCOUNT1'.
G_WA_DATA-AMOUNT = 4000.
APPEND G_WA_DATA TO G_IT_DATA.
G_WA_DATA-PROFIT = '0002'.
G_WA_DATA-COMPANY = '2222'.
G_WA_DATA-ACCOUNT = 'ACCOUNT2'.
G_WA_DATA-AMOUNT = 5000.
APPEND G_WA_DATA TO G_IT_DATA.
SORT G_IT_DATA BY PROFIT COMPANY ACCOUNT.
WRITE: /6 'ProfitCenter', 20 'CompanyCode',
          34 'Glaccount', 48 'Amount'.
WRITE: /6 SY-ULINE(50).
LOOP AT G_IT_DATA INTO G_WA_DATA.
    AT NEW PROFIT.
      WRITE: /6 G_WA_DATA-PROFIT.
    ENDAT.
    G_AMOUNT = G_WA_DATA-AMOUNT.
    AT NEW ACCOUNT.
      WRITE: /34 G_WA_DATA-ACCOUNT,
             48 G_AMOUNT.
    ENDAT.
    G_SUM_PROFIT = G_SUM_PROFIT + G_WA_DATA-AMOUNT.
    G_SUM_COMPANY = G_SUM_COMPANY + G_WA_DATA-AMOUNT.
    AT END OF COMPANY.
      WRITE: /20 G_WA_DATA-COMPANY,
              34 'Totle',
              48 G_SUM_COMPANY.
      CLEAR G_SUM_COMPANY.
      WRITE: /6 '*******'.
    ENDAT.
    AT END OF PROFIT.
      WRITE: /6 G_WA_DATA-PROFIT,
              20 'Totle',
              48 G_SUM_PROFIT.
      CLEAR G_SUM_PROFIT.
      WRITE: /6 '*************************************'.
    ENDAT.
ENDLOOP.

How to send the edited output fields of an ABAP report into internal table

Hi,
I had edited the output fields of an ALV GRID report now how can i again update the fields of the internal table with this edited new data .
Please suggest me if any method or FM exists for this.
Thanks in advance
With Regards
Ajay

hi,
you have to use the following code in the user command
*&      Form command
*       TO HANDLE USER ACTIONS AGAINST PF-STATUS
*      -->UCOMM      text
*      -->SELFIELD   text
FORM COMMAND USING UCOMM LIKE SY-UCOMM SELFIELD TYPE SLIS_SELFIELD.
DATA : LV_OKCODE TYPE SY-UCOMM.
LV_OKCODE = UCOMM.
CASE LV_OKCODE.
    WHEN 'PROCESS'. "button
           selfield-refresh = 'X'.
ENDCASE.
ENDFORM.                    "command
hope this helps
Regards
Ritesh

Submit report using selection table not working in OO CL_SALV classes

I have used CL_SALV classes in my report. now the problem is submit report is not working. any suggestions.
It works in REUSE_ALV FM

Still i m facing the same problem

How to include internal table

hi,
i have code where the "w_chepctycod" is a single value...but now my requirements is that it will have 2 entries...
select single ZCHEPCTYCOD
         from Z2RLCHEPCTYCOD
         into w_chepctycod
        where land1 = s_bukrs-low(02).
SELECT * FROM z2rlbasedat
           APPENDING TABLE ts_z2rlbasedat
           FOR ALL ENTRIES IN ts_z3rl_docket_umi
           WHERE zzumicur = ts_z3rl_docket_umi-zzumicur AND
                 ( status = c_rej OR
                   status = c_sus ) and
               CHEPCTYCOD = w_chepctycod.
for the first SELECT, i will remove single and make internal table...
select ZCHEPCTYCOD
         from Z2RLCHEPCTYCOD
         into table ts_chepctycod
        where land1 = s_bukrs-low(02).
but in my second SELECT, how will I inculde 'ts_chepctycod' ??????
kindly help....
thanks

Hi,
Keep you first select statement as it is
select single ZCHEPCTYCOD
from Z2RLCHEPCTYCOD
into w_chepctycod
where land1 = s_bukrs-low(02).
SELECT * FROM z2rlbasedat
APPENDING TABLE ts_z2rlbasedat
FOR ALL ENTRIES IN ts_z3rl_docket_umi
WHERE zzumicur = ts_z3rl_docket_umi-zzumicur AND
( status = c_rej OR
status = c_sus ) .
Now, you check for w_chepctycod
the code will be something like this,
Loop at ts_z2rlbasedat .
read table Z2RLCHEPCTYCOD with key CHEPCTYCOD = ts_z2rlbasedat -chepctycod .
if sy-subrc eq 0.
Your program logic
else.
delete ts_z2rlbasedat .
endif.
endloop.
You can try this, may this will help
Rani

Problem with SUBMIT report [ WITH SELECTION-TABLE ] or [ IN range ]

Hello Everybody,
I am trying to call transaction F.80 for mass reversal of FI documents by using SUBMIT sentence and its parameters like this:
LOOP AT i_zfi013 INTO wa_zfi013.
    PERFORM llena_params USING 'BR_BELNR' 'S' 'I' 'EQ' wa_zfi013-num_doc ''.
range_line-sign   = 'I'.
range_line-option = 'EQ'.
range_line-low    = wa_zfi013-num_doc.
APPEND range_line TO range_tab.
endloop.
Line: -
      SUBMIT sapf080
        WITH br_bukrs-low = p_bukrs
        WITH SELECTION-TABLE it_params [ same problem with - WITH BR_BELNR IN range_tab]
        WITH br_gjahr-low = p_an1
        WITH stogrd = '05'
        WITH testlauf = ''
        AND RETURN.
My problem is that when the report is executed the BR_BELNR only delete one document of the all the inputs in the selection criteria from the loop. if I add the statement [ VIA SELECTION-SCREEN] in the SUBMIT if open the multiple selection criteria in the screen I can check that all the documents are set in it from the ABAP code in the loop from it I just need to push F8 to copy them and run the program processing all the documents normally .
Can some one help me with this? is there a way to execute the transaction BY the SUBMIT with the multiple selection criteria for the Document Number working well?
Thank for you time and help.

This is my code:
TYPES: BEGIN OF T_ZFI013,
          BUKRS     TYPE BUKRS,
          GJAHR     TYPE GJAHR,
          MONAT     TYPE MONAT,
          ANLN1     TYPE ANLN1,
          ANLN2     TYPE ANLN2,
          NUM_DOC     TYPE BELNR_D,
          DATE     TYPE DATUM,
          TIME TYPE UZEIT,
          USER     TYPE SYUNAME,
         END OF T_ZFI013.
   DATA: I_ZFI013 TYPE STANDARD TABLE OF T_ZFI013,
         WA_ZFI013 TYPE T_ZFI013,
DATA: br_belnr       TYPE BELNR_D,
        rspar_tab TYPE TABLE OF rsparams,
        rspar_line LIKE LINE OF rspar_tab,
        range_tab LIKE RANGE OF br_belnr,
        range_line LIKE LINE OF range_tab."range_tab.
LOOP AT i_zfi013 INTO wa_zfi013.
    range_line-sign   = 'I'.
    range_line-option = 'EQ'.
    range_line-low    = wa_zfi013-num_doc.
    APPEND range_line TO range_tab.
ENDLOOP.
SUBMIT sapf080
    WITH br_bukrs-low = p_bukrs
    WITH br_belnr IN range_tab
    WITH br_gjahr-low = p_an1
    WITH stogrd = '05'
    WITH testlauf = ''.
This is the RANGE_TAB table before submit:
1     I     EQ     1001xxxxxx
2     I     EQ     1002xxxxxx
3     I     EQ     1003xxxxxx
4     I     EQ     1004xxxxxx
5     I     EQ     1005xxxxxx
6     I     EQ     1006xxxxxx
7     I     EQ     1007xxxxxx
8     I     EQ     1008xxxxxx
I think this wont work for some reason so I will start to do this by a BDC.
Many thanks for your help.

Submit report using selection-table to report 'RKAEP000'(Tcode ksb1)

Hi,
I am calling report "RKAEP000'(This is the report for tcode KSB1) using submit statement in my program to import the ksb1 output in my program. For time being I am calling this report using selection-set 'variant'.
The selection screen of ksb1 is designed with modulepool program (screen 100).
The selection screen of my program is similar to ksb1 initial screen, except layout option and controlling area is on the screen itself instead of calling it through menu.
Please tell me how to post the selction criteria of my report to the calling program 'RKAEP000'.
Thanks,
suresh

You can use WITH addition of SUBMIT statement.
SUBMIT report1 USING SELECTION-SCREEN '1100'
               WITH SELECTION-TABLE rspar_tab
               WITH selcrit2 BETWEEN 'H' AND 'K'
               WITH selcrit2 IN range_tab
               AND RETURN.
Regards,
Premal

SUBMIT report using selection-table issue

Hi Experts,
Actually I am calling report2 from report1.
In report1 i have select-options field WERKS.
In report2 I have parameters field WERKS.
Please let m know how to call report2 using SUBMIT button selection-table concept.
How to insert records in selection-table and how to use this values to submit for parameter field.
Please help me.

Hello,
For selct options create a range same as tha of plant type,fill the data and submit as follow.
submit XYZ report
with s_werks in r_werks
p_bukrs eq lv_bukrs,
and return.
Hope it helps.
Pleas e let me know in case of any problem.
Regards,
Nabheet Madan

Submit data from internal table to standered program RPTBPC10.

Dear Friends,
How to Pass parameter of personnel number to standard SAP program RPTBPC10 from a Customize report . After program execution return the program control to Y program and capture the data from pa2001for infotype 2001 and infotype 2006.
and send mail to user by costomize report.

Please see the link:- [Re: Call Program from another Program using varient|Re: Call Program from another Program using varient]

IMPORT Statement Issue (Internal Table)

Hi All,
I am using an IMPORT statement to get all the data from other report's internal table. Now whenever this (the other report's internal table) is changed (for field addition, etc), my report throws a dump. Hence, everytime I have to add these fields in my program as well.
Is there any way by which I can include the whole internal table of that report in my program just like
'INCLUDE STRUCTURE VBRK'.
Thanks in advance

Hi, CHeck this code related to your problem..This will helpful to you...
I have done this program earlier..I hope it will helpful to u..
This programa calling the other program to import the data..
Check it out...
*" Tables declarations.................................................
TABLES:
spfli.
*" Type declarations...................................................
Type declaration of the structure to hold data from table SPFLI     *
TYPES:
BEGIN OF type_s_spfli,
    carrid LIKE spfli-carrid,          " Carrier Id
    connid LIKE spfli-connid,          " Connection Number
    cityfrom LIKE spfli-cityfrom,      " City from
    cityto LIKE spfli-cityto,          " City to
    airpfrom LIKE spfli-airpfrom,      " Airport from
    airpto LIKE spfli-airpto,          " Airport to
    countryfr LIKE spfli-countryfr,    " Country from
    countryto LIKE spfli-countryto,    " Country to
END OF type_s_spfli.
Data Declaration...................................................*
     Field String To Hold Flight Details Record from SPFLI          *
DATA
fs_spfli TYPE type_s_spfli.
Data Declaration...................................................*
     Internal Table To Hold Flight Details Records from SPFLI       *
DATA
t_spfli LIKE STANDARD TABLE OF fs_spfli.
TYPES:
BEGIN OF types_s_itab,
    carrid LIKE sflight-carrid,        " Carrier id
    connid LIKE sflight-connid,        " Connection number
    fldate LIKE sflight-fldate,        " Flight date
END OF types_s_itab.
Data Declaration...................................................*
     Field String To Hold Flight Details Record from SFLIGHT        *
DATA
fs_itab TYPE types_s_itab.
Data Declaration...................................................*
     Internal Table To Hold Flight Details Records from SFLIGHT     *
DATA
t_itab LIKE STANDARD TABLE OF fs_itab.
*" Type declarations...................................................
Type declaration of the structure to hold data from table SBOOK     *
TYPES:
BEGIN OF type_s_sbook,
   carrid LIKE sbook-carrid,           " Carrier Id
   connid LIKE sbook-connid,           " Connection Number
   fldate LIKE sbook-fldate,           " Flight date
   bookid LIKE sbook-bookid,           " Booking number
   loccuram LIKE sbook-loccuram,       " Local currency
   loccurkey LIKE sbook-loccurkey,
   order_date LIKE sbook-order_date,   " Booking date
END OF type_s_sbook.
Data Declaration...................................................*
     Field String To Hold Flight Details Record from BOOK           *
DATA
fs_sbook TYPE type_s_sbook.
Data Declaration...................................................*
     Internal Table To Hold Flight Details Records from SBOOK       *
DATA
t_sbook LIKE STANDARD TABLE OF fs_sbook.
DATA
w_checkbox.                          " Checkbox
SELECT-OPTIONS:
s_carr FOR spfli-carrid.             " Carrier id range
                      START-OF-SELECTION EVENT                      *
START-OF-SELECTION.
PERFORM selectq.
                      END-OF-SELECTION EVENT                        *
END-OF-SELECTION.
SET PF-STATUS 'YH1314_030502'.
PERFORM display_basic.
AT USER-COMMAND.
PERFORM ucomm.
*&    Form selectq
    This subroutine retreive data from SPFLI table
There are no interface parameters to be passed to this subroutine.
FORM selectq .
SELECT carrid                        " Carrier id
         connid                        " Connection number
         cityfrom                      " City from
         cityto                        " City to
         airpfrom                      " Airport from
         airpto                        " Airport to
         countryfr                     " Country from
         countryto                     " Country to
         INTO CORRESPONDING FIELDS OF TABLE t_spfli
         FROM spfli
         WHERE carrid IN s_carr.
ENDFORM.                               " Selectq
*&      Form display_basic
    This subroutine displays data from internal table
There are no interface parameters to be passed to this subroutine.
FORM display_basic .
LOOP AT t_spfli INTO fs_spfli.
    WRITE:
      / w_checkbox AS CHECKBOX,
        fs_spfli-carrid,
        fs_spfli-connid,
        fs_spfli-cityfrom,
        fs_spfli-cityto,
        fs_spfli-airpfrom,
        fs_spfli-airpto,
        fs_spfli-countryfr,
        fs_spfli-countryto.
ENDLOOP.                             " LOOP AT T-SPFLI INTO...
ENDFORM.                               " Display_basic
*&      Form UCOMM
This subroutine for at user-command event
There are no interface parameters to be passed to this subroutine.
FORM ucomm .
RANGES :
    r_carr FOR spfli-carrid,
    r_conn FOR spfli-connid,
    r_carrid FOR sflight-carrid,
    r_connid FOR sflight-connid,
    r_fldate FOR sflight-fldate.
CASE sy-ucomm.
    WHEN 'DISPLAY'.
      DATA:
        lw_lines TYPE i,
        lw_lineno TYPE i VALUE 3.
      DESCRIBE TABLE t_spfli LINES lw_lines.
      DO lw_lines TIMES.
        READ LINE lw_lineno FIELD
             VALUE w_checkbox   INTO w_checkbox
                   fs_spfli-carrid INTO fs_spfli-carrid
                   fs_spfli-connid INTO fs_spfli-connid.
        IF sy-subrc = 0.
          IF w_checkbox = 'X'.
            r_carr-sign = 'I'.
            r_carr-option = 'EQ'.
            r_carr-low = fs_spfli-carrid.
            APPEND r_carr.
            r_conn-sign = 'I'.
            r_conn-option = 'EQ'.
            r_conn-low = fs_spfli-connid.
            APPEND r_conn.
          ENDIF.                       " IF W_CHECKBOX = 'X'
        ENDIF.                         " IF SY-SUBRC = 0
        ADD 1 TO lw_lineno.
      ENDDO.                           " DO LW_LINES TIMES
      SUBMIT yh1314_030502_call
        WITH s_carr IN r_carr
        WITH s_conn IN r_conn
         AND RETURN.
      IMPORT t_itab FROM MEMORY ID 'YH1314'.
      LOOP AT t_itab INTO fs_itab.
        r_carrid-sign = 'I'.
        r_carrid-option = 'EQ'.
        r_carrid-low = fs_itab-carrid.
        APPEND r_carrid.
        r_connid-sign = 'I'.
        r_connid-option = 'EQ'.
        r_connid-low = fs_itab-connid.
        APPEND r_connid.
        r_fldate-sign = 'I'.
        r_fldate-option = 'EQ'.
        r_fldate-low = fs_itab-fldate.
        APPEND r_fldate.
      ENDLOOP.                         " LOOP AT T_ITAB INTO.....
      SELECT carrid                    " Carriee Id
             connid                    " Connection number
             fldate                    " Flight date
             bookid                    " Booking number
             loccuram                  " Local Currency
             order_date                " Booking date
         INTO CORRESPONDING FIELDS OF TABLE t_sbook
         FROM sbook
         WHERE carrid IN r_carrid AND
               connid IN r_connid AND
               fldate IN r_fldate.
      IF SY-SUBRC NE 0.
        MESSAGE 'NO RECORDS FOUND'(006) TYPE 'S'.
      ENDIF.                           " IF SY-SUBRC NE 0
      LOOP AT t_sbook INTO fs_sbook.
        AT FIRST.
          WRITE: /5 'Carrier Id'(001),
                 20 'Conn Id'(002),
                 35 'Flight date'(003),
                 50 'Book Id'(004),
                 65 'Local Currency'(005).
        ENDAT.                         " AT FIRST
        WRITE: /5 fs_sbook-carrid,
               20 fs_sbook-connid,
               35 fs_sbook-fldate,
               50 fs_sbook-bookid,
               65 fs_sbook-loccuram CURRENCY fs_sbook-loccurkey.
      ENDLOOP.                         " LOOP AT T_SBOOK INTO.....
ENDCASE.                             " CASE SY-UCOMM
ENDFORM.                               " UCOMM
Regards
Kiran

Submit Report including internal table

Similar Messages

Maybe you are looking for