FBL3N

[Former Member]

Hi evrbody

am using the code below to pass values to the transaction FBL3N.The issue is even though it is taking the values the values are not being passed to the FBL3n tcode.i have to again give the value there.Please help me and also compile the code once so dat u get a clear idea about it.Even if i give the "CALL TRANSACTION 'FBL3N' AND SKIP FIRST SCREEN " the values that are given by me are not being proceesed .please help...

with regards

vijay

REPORT ZFBL3N.

TABLES:SKB1,bsis.

types: begin of gty_acccoco,

saknr like ska1-saknr,

bukrs like skb1-bukrs,

gvtyp like ska1-gvtyp,

end of gty_acccoco.

tables: b0sg, rfxpo, itemset.

tables: sscrfields.

data: gt_accoco type standard table of gty_acccoco,

gt_accoco_bs type standard table of gty_acccoco,

gd_accoco type gty_acccoco.

selection-screen function key 1.

selection-screen begin of block glaccount with frame title text-w02.

select-options: GLACCT for skb1-saknr modif id wkl no database selection.

selection-screen end of block glaccount.

selection-screen begin of block company with frame title text-w03.

select-options: CODE for skb1-bukrs modif id wkl no database

selection.

selection-screen end of block company.

selection-screen begin of block items with frame title text-007.

selection-screen begin of block status with frame title text-002.

selection-screen begin of line.

parameters x_opsel like itemset-xopsel radiobutton group rad1. .

selection-screen comment 3(20) text-003 for field x_opsel.

selection-screen end of line.

parameters pa_stida like rfpdo-allgstid default sy-datlo.

selection-screen skip.

selection-screen begin of line.

parameters x_clsel like itemset-xclsel radiobutton group rad1.

selection-screen comment 3(25) text-004 for field x_clsel.

selection-screen end of line.

select-options so_augdt for bsis-augdt no database selection.

parameters pa_stid2 like rfpdo-allgstid.

selection-screen skip.

selection-screen begin of line.

parameters x_aisel like itemset-xaisel radiobutton group rad1 DEFAULT 'X'.

selection-screen comment 3(20) text-005 for field x_aisel.

selection-screen end of line.

select-options so_budat for bsis-budat no database selection.

selection-screen end of block status.

selection-screen begin of block type with frame title text-006.

parameters: x_norm like itemset-xnorm as checkbox default 'X',

x_shbv like itemset-xshbv no-display,

x_merk like itemset-xmerk as checkbox,

x_park like itemset-xpark as checkbox,

x_apar like itemset-xarit no-display.

selection-screen end of block type.

selection-screen end of block items.

selection-screen begin of block list with frame title text-001.

selection-screen end of block list.

*select-options so_faedt for it_pos-faedt no-display.

parameters: pa_cent type c no-display.

data: gp_yrper type rwcoom-fiscper.

select-options: so_yrper for gp_yrper no-display.

parameters: pa_inet type c no-display.

parameters: pa_grid type c no-display.

call TRANSACTION 'FBL3N' .

[Former Member]

please don't use the transcation code use the porgram of the fbln3n from them system status ....

then anyway you have declares all the selection screen parameter and also parameters .... so now from the you selection - screen parameters it should pass it to the standard FBL3N .... for that

The SUBMIT is used with program name and all the fields in the WITH are the parameters of the FBL3N , program so pass your parameters to the standard one ... so that your parameters it be submited to the the FBL3N .

TABLES:SKB1,bsis.

types: begin of gty_acccoco,
saknr like ska1-saknr,
bukrs like skb1-bukrs,
gvtyp like ska1-gvtyp,
end of gty_acccoco.


tables: b0sg, rfxpo, itemset.
tables: sscrfields.

data: gt_accoco type standard table of gty_acccoco,
gt_accoco_bs type standard table of gty_acccoco,
gd_accoco type gty_acccoco.

selection-screen function key 1.
selection-screen begin of block glaccount with frame title text-w02.
select-options: GLACCT for skb1-saknr modif id wkl no database selection.
selection-screen end of block glaccount.
selection-screen begin of block company with frame title text-w03.
select-options: CODE for skb1-bukrs modif id wkl no database
selection.
selection-screen end of block company.


selection-screen begin of block items with frame title text-007.
selection-screen begin of block status with frame title text-002.
selection-screen begin of line.
parameters x_opsel like itemset-xopsel radiobutton group rad1. .
selection-screen comment 3(20) text-003 for field x_opsel.
selection-screen end of line.
parameters pa_stida like rfpdo-allgstid default sy-datlo.
selection-screen skip.
selection-screen begin of line.
parameters x_clsel like itemset-xclsel radiobutton group rad1.
selection-screen comment 3(25) text-004 for field x_clsel.
selection-screen end of line.
select-options so_augdt for bsis-augdt no database selection.
parameters pa_stid2 like rfpdo-allgstid.
selection-screen skip.
selection-screen begin of line.
parameters x_aisel like itemset-xaisel radiobutton group rad1 DEFAULT 'X'.
selection-screen comment 3(20) text-005 for field x_aisel.
selection-screen end of line.
select-options so_budat for bsis-budat no database selection.
selection-screen end of block status.
selection-screen begin of block type with frame title text-006.
parameters: x_norm like itemset-xnorm as checkbox default 'X',
x_shbv like itemset-xshbv no-display,
x_merk like itemset-xmerk as checkbox,
x_park like itemset-xpark as checkbox,
x_apar like itemset-xarit no-display.
selection-screen end of block type.
selection-screen end of block items.
selection-screen begin of block list with frame title text-001.
selection-screen end of block list.
*select-options so_faedt for it_pos-faedt no-display.
parameters: pa_cent type c no-display.
data: gp_yrper type rwcoom-fiscper.
select-options: so_yrper for gp_yrper no-display.
parameters: pa_inet type c no-display.

START-OF-SELECTION.


SUBMIT RFITEMGL
        WITH ALCUR  =   so here  pass your  valid  parameter
        WITH EXCDT =
        WITH PA_CENT =
        WITH PA_GRID = ...
        WITH PA_INET .=..
        WITH PA_NMAX .=..
        WITH PA_STID2 ..=.
        WITH PA_STIDA .=..
        WITH PA_VARI ...
        WITH PA_WLBUK ...
        WITH PA_WLSAK ...
        WITH SD_APOPT ...
        WITH SD_AUGDT ...
        WITH SD_BSCHL ...
        WITH SD_BUDAT ...
        WITH SD_BUKRS ...
        WITH SD_FILES ...
        WITH SD_GSBER ...
        WITH SD_GSB_B ...
        WITH SD_IARCH ...
        WITH SD_KOSTL ...
        WITH SD_KTOPL ...
        WITH SD_MEMOR ...
        WITH SD_NOAUT ...
        WITH SD_NOOAP ...
        WITH SD_OBJEC ...
        WITH SD_OPOPT ...
        WITH SD_SAKNR ...
        WITH SD_SHKZG ...
        WITH SD_STIDA ...
        WITH SD_TPC ...
        WITH SD_USEAR ...
        WITH SD_USEAS ...
        WITH SD_USEDB ...
        WITH SD_VBUND ...
        WITH SD_WERKS ...
        WITH SD_ZUONR ...
        WITH SO_ASKTO ...
        WITH SO_AUGDT ...
        WITH SO_BUDAT ...
        WITH SO_BWWR2 ...
        WITH SO_BWWR3 ...
        WITH SO_BWWRT ...
        WITH SO_DMBE2 ...
        WITH SO_DMBE3 ...
        WITH SO_DMSHB ...
        WITH SO_FAEDT ...
        WITH SO_GSBER ...
        WITH SO_HWAE2 ...
        WITH SO_HWAE3 ...
        WITH SO_HWAER ...
        WITH SO_JAMON ...
        WITH SO_KKBWR ...
        WITH SO_KOART ...
        WITH SO_KURSE ...
        WITH SO_QBSHB ...
        WITH SO_QSFBT ...
        WITH SO_QSSHB ...
        WITH SO_SHKZG ...
        WITH SO_SKFBT ...
        WITH SO_SKNTO ...
        WITH SO_VERZ1 ...
        WITH SO_VERZN ...
        WITH SO_WAERS ...
        WITH SO_WLBUK ...
        WITH SO_WLSAK ...
        WITH SO_WRSHB ...
        WITH SO_WSKTO ...
        WITH SO_YRPER ...
        WITH SO_ZALDT ...
        WITH SO_ZINSZ ...
        WITH XX_BUKRS ...
        WITH XX_KTOPL ...
        WITH X_AISEL ...
        WITH X_APAR ...
        WITH X_CLSEL ...
        WITH X_MERK ...
        WITH X_NORM ...
        WITH X_OPSEL ...
        WITH X_PARK ...
        WITH X_SHBV ...      and return   .
remember  it has  given all the parameters  of the standard  pgm  ... if you  dont't want that  much  then Hide   some of the fields with  /*  in the  SUBMIT . @ with .

reward points if it is usefull ....

Girish

[Former Member]

Hi girish

thank a lot....thanks a lot now what should i specify in the submit fields there are many fields...like shud i specify a structure again orelse please telll me...ur answer are really helpful...please get back to me

vijay

[Former Member]

now so to fbl3n there see the parameters dispaly in the selection-screen by f1 help notedown the field in the notepad ..

where ever fields data you want to pass it ..

then those fields only you have to declare in your program like

parameters , selection-screens etc .

then in th submit let it be ther all the with fields ... but you can hide the fields which you don't want by /** so that need no to declare the parameter for that and no to pass it also

if it is usefull , please reward points....

Girish

[Former Member]

HI GIRISH

please give me an example orelse if u dony mind can u give me ur numbe or mail ur number to ged.vijay@gmail.com

vijay

[Former Member]

9945746500

[Former Member]

the below pogram is on hr .....

you can see the coding ... in simlar way you can you it ...

see the dark codes

REPORT /kyk/rpurmpk0_01 MESSAGE-ID 38 LINE-SIZE 79.

***************************************************************************************
*Description  :This report extracts remittance items from the third-party remittance
*tables T51R5 and T51R6 and places them into a posting run. The posting run represents
*remittances in the form of a sequence of documents which you can then examine, release
*and post to FI.

*The actual program  was submitted  and  the selection-screen parameters are passed
*from the called prograb by restricting the parameters.
***************************************************************************************


TABLES:  t51r5.           " Cumulated remittance (credit)

SELECTION-SCREEN BEGIN OF BLOCK s01 WITH FRAME TITLE text-030.
SELECT-OPTIONS:
*                bukrs FOR t51r5-bukrs NO INTERVALS NO-DISPLAY,
*                gsber FOR t51r5-gsber NO INTERVALS NO-DISPLAY,
                s_crety FOR t51r5-crety NO INTERVALS,
                duedt FOR t51r5-duedt OBLIGATORY DEFAULT sy-datum
                                      OPTION LE
                                      NO-EXTENSION NO INTERVALS.
SELECTION-SCREEN END OF BLOCK s01.

* Parameters
SELECTION-SCREEN BEGIN OF BLOCK s02 WITH FRAME TITLE text-001.
* parameters for new CIPO/TRANS handling
SELECTION-SCREEN BEGIN OF BLOCK s03 WITH FRAME TITLE text-003.
PARAMETERS: <b>pname</b> LIKE pevst-name      DEFAULT text-004.
PARAMETERS:<b> idate</b> LIKE hrpp_item-idate DEFAULT sy-datum.
*PARAMETERS:<b> pvari</b> LIKE t52e2-pvari     DEFAULT text-008 OBLIGATORY.
PARAMETERS: bldat LIKE ppdhd-bldat.
SELECTION-SCREEN END OF BLOCK s03.
*SELECTION-SCREEN BEGIN OF BLOCK s07 WITH FRAME TITLE text-096.
*PARAMETERS: s_cussn TYPE xfeld USER-COMMAND enter.
*SELECTION-SCREEN END OF BLOCK s07.
SELECTION-SCREEN BEGIN OF BLOCK s88 WITH FRAME TITLE text-205  ." sv_optfr.
PARAMETERS: test     TYPE pcna_testmode
                     RADIOBUTTON GROUP rb88
                     DEFAULT 'X'
                     USER-COMMAND enter,
            prod     TYPE pcna_prodmode
                     RADIOBUTTON GROUP rb88.
SELECTION-SCREEN END OF BLOCK s88.
*PARAMETERS: down    TYPE p3pr_post_down AS CHECKBOX DEFAULT ' ' USER-COMMAND DOWN.
*PARAMETERS: p_nosimu TYPE P_EVSIMU AS CHECKBOX DEFAULT 'X' .
*PARAMETERS: prot3   TYPE p3pr_post_log1 AS CHECKBOX DEFAULT 'X'.
*PARAMETERS: s_fiupd TYPE p3pr_f  iupd AS CHECKBOX DEFAULT 'X'.
SELECTION-SCREEN END OF BLOCK s02.
*PARAMETERS: pyparaid LIKE pay_pm_paraid NO-DISPLAY.


START-OF-SELECTION.



  SUBMIT rpurmpk0        " actual  "RPURMPK0"  report  was submitted  with  selected  Paramaters .
          WITH bldat EQ bldat       " Document Date in Document
*          WITH bukrs IN <b> bukrs      </b> " Company Code
          WITH down  EQ space       " Download/export TemSe file
          WITH duedt IN <b>duedt</b>       " Due Date
*          WITH gsber IN gsber       " Bussiness Area
          WITH idate EQ <b>idate</b>       " Default posting date
          WITH pname EQ pname       " Text on posting run
          WITH prod EQ <b>prod    </b>     " Production Mod
          WITH prot3 EQ 'X'         " Include due date
          WITH pvari EQ <b> 'CA01' "</b>pvari      " Posting Variant
*          WITH pyparaid EQ pyparaid
*          WITH p_type EQ space
          WITH s_crety IN <b>s_crety  </b> " HR payee type
*           with s_cussn ...
          WITH s_fiupd EQ 'X'       " FI update
          WITH test EQ test         " Test Mode
        AND RETURN.

reward points if it is usefull

Girish

[Former Member]

HI GIRISH

THnaks a lot...wil stay in touch my email id is

ged.vijay@gmail.com & vijay_varsha3333@yahoo.com.i had already added u in yahoo...thankq