06-13-2007 7:48 AM
Hi,
i m using a standard report RFEBKA00 which uses CHAR300 variable(it is not used in selection screen).
can u help me ,
to collect the data from CHAR300 and to use it in my own report.
Message was edited by:
jaya raman
06-13-2007 8:06 AM
hi jayaramm..
you have to use SUBMMIT and send the parameters of your selection screen to the standard submmit prorgram...
beliow is the program for you .... just pick the selection parameter and pass corresponding parameter in the Submit which i mention as ...... replace with = and parameter in the selection screen.
report zrsers.
INCLUDE rfebka03.
INCLUDE rfebfr03. " Data France
INCLUDE RFEKAP00. "n927883
TABLES: rfsdo,
sscrfields,
hrdeaoifld.
DATA: lt_statements TYPE STANDARD TABLE OF fieb_kukey,
l_statement TYPE fieb_kukey.
*Daten für die Mahnsperre "mo260105
TYPES: BEGIN OF s_kukey_mansp,
sign(1),
option(2),
low TYPE kukey_eb,
high TYPE kukey_eb,
mansp TYPE mansp,
anztg TYPE anztg,
bukrs TYPE bukrs,
END OF s_kukey_mansp.
DATA: lt_kukey TYPE STANDARD TABLE OF s_kukey_mansp,
l_kukey LIKE LINE OF lt_kukey,
l_gjahr TYPE gjahr,
LT_GJAHR TYPE STANDARD TABLE OF GJAHR,
L_MANSP TYPE MANSP,
l_kunnr TYPE kunnr,
l_lifnr TYPE lifnr.
FIELD-SYMBOLS: <mansp> LIKE LINE OF gt_mansp.
SELECTION-SCREEN BEGIN OF BLOCK 1 WITH FRAME TITLE text-165.
PARAMETERS: einlesen LIKE rfpdo1-febeinles,
format LIKE rfpdo1-febformat DEFAULT 'M' AS
LISTBOX VISIBLE LENGTH 30 USER-COMMAND bai,
AUSZFILE LIKE RFPDO1-FEBAUSZF,
umsfile LIKE rfpdo1-febumsf,
pcupload LIKE rfpdo1-febpcupld DEFAULT 'X'.
SELECTION-SCREEN END OF BLOCK 1.
*------- Buchungsparameter ---------------------------------------------
SELECTION-SCREEN BEGIN OF BLOCK 2 WITH FRAME TITLE text-160.
*SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pa_xcall TYPE febpdo-xcall RADIOBUTTON GROUP 1.
*SELECTION-SCREEN
* COMMENT 03(29) FOR FIELD pa_xcall.
PARAMETERS: pa_xbkbu TYPE febpdo-xbkbu.
*SELECTION-SCREEN
* COMMENT 35(16) text-171 FOR FIELD pa_xbkbu.
PARAMETERS: pa_mode TYPE rfpdo-allgazmd NO-DISPLAY.
*SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pa_xbdc LIKE febpdo-xbinpt RADIOBUTTON GROUP 1.
SELECTION-SCREEN
COMMENT 03(29) text-163 FOR FIELD pa_xbdc.
SELECTION-SCREEN
COMMENT 35(20) text-164 FOR FIELD mregel.
PARAMETERS: mregel LIKE rfpdo1-febmregel DEFAULT '1'.
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN: BEGIN OF LINE.
PARAMETERS: pa_test LIKE rfpdo1-febtestl RADIOBUTTON GROUP 1.
SELECTION-SCREEN
COMMENT 03(29) text-168 FOR FIELD pa_test.
SELECTION-SCREEN: END OF LINE.
PARAMETERS: valut_on LIKE rfpdo2-febvalut DEFAULT 'X'.
SELECTION-SCREEN END OF BLOCK 2.
*------- Finanzdisposition ---------------------------------------------
SELECTION-SCREEN BEGIN OF BLOCK 5 WITH FRAME TITLE text-172.
SELECTION-SCREEN: BEGIN OF LINE.
PARAMETERS: pa_xdisp LIKE febpdo-xdisp.
SELECTION-SCREEN
COMMENT 03(29) text-170 FOR FIELD pa_xdisp.
PARAMETERS: pa_verd LIKE rfffpdo1-ffdisxverd.
SELECTION-SCREEN
COMMENT 34(15) text-174 FOR FIELD pa_verd.
SELECTION-SCREEN
COMMENT 55(15) text-173 FOR FIELD pa_dsart.
PARAMETERS: pa_dsart LIKE fdes-dsart.
SELECTION-SCREEN: END OF LINE.
PARAMETERS: intraday LIKE rfpdo1_en-akintraday AS CHECKBOX.
SELECTION-SCREEN END OF BLOCK 5.
*C5060356
*------- BAI Preprocessor --------------------------------------
SELECTION-SCREEN BEGIN OF BLOCK 6 WITH FRAME TITLE text-007 .
PARAMETERS: p_baipre TYPE bai_prep AS CHECKBOX MODIF ID mo1,
p_priord LIKE prior_day AS CHECKBOX MODIF ID mo1,
p_stop LIKE stop_flag AS CHECKBOX MODIF ID mo1.
SELECTION-SCREEN END OF BLOCK 6.
*------- Interpretationsparameter --------------------------------------
SELECTION-SCREEN BEGIN OF BLOCK 3 WITH FRAME TITLE text-166.
DATA: num10(10) TYPE n.
DATA: chr16(16) TYPE c.
SELECT-OPTIONS: s_filter FOR febpdo-febfilter1.
SELECT-OPTIONS: t_filter FOR febpdo-febfilter2.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN
COMMENT 01(31) text-176 FOR FIELD pa_bdart.
PARAMETERS: pa_bdart LIKE febpdo-bdart.
SELECTION-SCREEN
COMMENT 36(21) text-177 FOR FIELD pa_bdanz.
PARAMETERS: pa_bdanz LIKE febpdo-bdanz.
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN END OF BLOCK 3.
*------- Ausgabeparameter ----------------------------------------------
SELECTION-SCREEN BEGIN OF BLOCK 4 WITH FRAME TITLE text-167.
PARAMETERS: batch LIKE rfpdo2-febbatch,
p_koausz LIKE rfpdo1-febpausz, " Kontoauszug drucken
p_bupro LIKE rfpdo2-febbupro,
p_statik LIKE rfpdo2-febstat,
pa_lsepa LIKE febpdo-lsepa.
SELECTION-SCREEN END OF BLOCK 4.
SUBMIT RFEBKA00
WITH AUSZFILE = AUSZFILE ***like this replace the .... and pass selection parameters
WITH BATCH = BATCH
WITH EINLESEN ...
WITH FORMAT ...
WITH INTRADAY ...
WITH MREGEL ...
WITH PA_BDANZ ...
WITH PA_BDART ...
WITH PA_DSART ...
WITH PA_LSEPA ...
WITH PA_MODE ...
WITH PA_TEST ...
WITH PA_VERD ...
WITH PA_XBDC ...
WITH PA_XBKBU ...
WITH PA_XCALL ...
WITH PA_XDISP ...
WITH PCUPLOAD ...
WITH P_BAIPRE ...
WITH P_BUPRO ...
WITH P_KOAUSZ ...
WITH P_PRIORD ...
WITH P_STATIK ...
WITH P_STOP ...
WITH S_FILTER ...
WITH T_FILTER ...
WITH UMSFILE ...
WITH VALUT_ON = VALUT_ON and return .
reward points if it is usefull
Girish
06-13-2007 7:51 AM
06-13-2007 7:54 AM
hi,
create a internal table.
pass that variable to that internal table.
then use this internal table in ur report.
Reward points if this useful
Siva
06-13-2007 8:06 AM
hi jayaramm..
you have to use SUBMMIT and send the parameters of your selection screen to the standard submmit prorgram...
beliow is the program for you .... just pick the selection parameter and pass corresponding parameter in the Submit which i mention as ...... replace with = and parameter in the selection screen.
report zrsers.
INCLUDE rfebka03.
INCLUDE rfebfr03. " Data France
INCLUDE RFEKAP00. "n927883
TABLES: rfsdo,
sscrfields,
hrdeaoifld.
DATA: lt_statements TYPE STANDARD TABLE OF fieb_kukey,
l_statement TYPE fieb_kukey.
*Daten für die Mahnsperre "mo260105
TYPES: BEGIN OF s_kukey_mansp,
sign(1),
option(2),
low TYPE kukey_eb,
high TYPE kukey_eb,
mansp TYPE mansp,
anztg TYPE anztg,
bukrs TYPE bukrs,
END OF s_kukey_mansp.
DATA: lt_kukey TYPE STANDARD TABLE OF s_kukey_mansp,
l_kukey LIKE LINE OF lt_kukey,
l_gjahr TYPE gjahr,
LT_GJAHR TYPE STANDARD TABLE OF GJAHR,
L_MANSP TYPE MANSP,
l_kunnr TYPE kunnr,
l_lifnr TYPE lifnr.
FIELD-SYMBOLS: <mansp> LIKE LINE OF gt_mansp.
SELECTION-SCREEN BEGIN OF BLOCK 1 WITH FRAME TITLE text-165.
PARAMETERS: einlesen LIKE rfpdo1-febeinles,
format LIKE rfpdo1-febformat DEFAULT 'M' AS
LISTBOX VISIBLE LENGTH 30 USER-COMMAND bai,
AUSZFILE LIKE RFPDO1-FEBAUSZF,
umsfile LIKE rfpdo1-febumsf,
pcupload LIKE rfpdo1-febpcupld DEFAULT 'X'.
SELECTION-SCREEN END OF BLOCK 1.
*------- Buchungsparameter ---------------------------------------------
SELECTION-SCREEN BEGIN OF BLOCK 2 WITH FRAME TITLE text-160.
*SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pa_xcall TYPE febpdo-xcall RADIOBUTTON GROUP 1.
*SELECTION-SCREEN
* COMMENT 03(29) FOR FIELD pa_xcall.
PARAMETERS: pa_xbkbu TYPE febpdo-xbkbu.
*SELECTION-SCREEN
* COMMENT 35(16) text-171 FOR FIELD pa_xbkbu.
PARAMETERS: pa_mode TYPE rfpdo-allgazmd NO-DISPLAY.
*SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pa_xbdc LIKE febpdo-xbinpt RADIOBUTTON GROUP 1.
SELECTION-SCREEN
COMMENT 03(29) text-163 FOR FIELD pa_xbdc.
SELECTION-SCREEN
COMMENT 35(20) text-164 FOR FIELD mregel.
PARAMETERS: mregel LIKE rfpdo1-febmregel DEFAULT '1'.
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN: BEGIN OF LINE.
PARAMETERS: pa_test LIKE rfpdo1-febtestl RADIOBUTTON GROUP 1.
SELECTION-SCREEN
COMMENT 03(29) text-168 FOR FIELD pa_test.
SELECTION-SCREEN: END OF LINE.
PARAMETERS: valut_on LIKE rfpdo2-febvalut DEFAULT 'X'.
SELECTION-SCREEN END OF BLOCK 2.
*------- Finanzdisposition ---------------------------------------------
SELECTION-SCREEN BEGIN OF BLOCK 5 WITH FRAME TITLE text-172.
SELECTION-SCREEN: BEGIN OF LINE.
PARAMETERS: pa_xdisp LIKE febpdo-xdisp.
SELECTION-SCREEN
COMMENT 03(29) text-170 FOR FIELD pa_xdisp.
PARAMETERS: pa_verd LIKE rfffpdo1-ffdisxverd.
SELECTION-SCREEN
COMMENT 34(15) text-174 FOR FIELD pa_verd.
SELECTION-SCREEN
COMMENT 55(15) text-173 FOR FIELD pa_dsart.
PARAMETERS: pa_dsart LIKE fdes-dsart.
SELECTION-SCREEN: END OF LINE.
PARAMETERS: intraday LIKE rfpdo1_en-akintraday AS CHECKBOX.
SELECTION-SCREEN END OF BLOCK 5.
*C5060356
*------- BAI Preprocessor --------------------------------------
SELECTION-SCREEN BEGIN OF BLOCK 6 WITH FRAME TITLE text-007 .
PARAMETERS: p_baipre TYPE bai_prep AS CHECKBOX MODIF ID mo1,
p_priord LIKE prior_day AS CHECKBOX MODIF ID mo1,
p_stop LIKE stop_flag AS CHECKBOX MODIF ID mo1.
SELECTION-SCREEN END OF BLOCK 6.
*------- Interpretationsparameter --------------------------------------
SELECTION-SCREEN BEGIN OF BLOCK 3 WITH FRAME TITLE text-166.
DATA: num10(10) TYPE n.
DATA: chr16(16) TYPE c.
SELECT-OPTIONS: s_filter FOR febpdo-febfilter1.
SELECT-OPTIONS: t_filter FOR febpdo-febfilter2.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN
COMMENT 01(31) text-176 FOR FIELD pa_bdart.
PARAMETERS: pa_bdart LIKE febpdo-bdart.
SELECTION-SCREEN
COMMENT 36(21) text-177 FOR FIELD pa_bdanz.
PARAMETERS: pa_bdanz LIKE febpdo-bdanz.
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN END OF BLOCK 3.
*------- Ausgabeparameter ----------------------------------------------
SELECTION-SCREEN BEGIN OF BLOCK 4 WITH FRAME TITLE text-167.
PARAMETERS: batch LIKE rfpdo2-febbatch,
p_koausz LIKE rfpdo1-febpausz, " Kontoauszug drucken
p_bupro LIKE rfpdo2-febbupro,
p_statik LIKE rfpdo2-febstat,
pa_lsepa LIKE febpdo-lsepa.
SELECTION-SCREEN END OF BLOCK 4.
SUBMIT RFEBKA00
WITH AUSZFILE = AUSZFILE ***like this replace the .... and pass selection parameters
WITH BATCH = BATCH
WITH EINLESEN ...
WITH FORMAT ...
WITH INTRADAY ...
WITH MREGEL ...
WITH PA_BDANZ ...
WITH PA_BDART ...
WITH PA_DSART ...
WITH PA_LSEPA ...
WITH PA_MODE ...
WITH PA_TEST ...
WITH PA_VERD ...
WITH PA_XBDC ...
WITH PA_XBKBU ...
WITH PA_XCALL ...
WITH PA_XDISP ...
WITH PCUPLOAD ...
WITH P_BAIPRE ...
WITH P_BUPRO ...
WITH P_KOAUSZ ...
WITH P_PRIORD ...
WITH P_STATIK ...
WITH P_STOP ...
WITH S_FILTER ...
WITH T_FILTER ...
WITH UMSFILE ...
WITH VALUT_ON = VALUT_ON and return .
reward points if it is usefull
Girish