help in report

[Former Member]

Hi Friends,

I have one issue , in my report i am displaying vendor details, when i double click on vendor number, it shud go to initial screen of tcode 'XK03',

i am able to pass parameter id for

vendor

company code and purchase organization,

but i have to check atleast one checkbox,

how to set to check that checkbox of tcode 'XK03'

points will be given

thanks

anand

[Former Member]

Hi Friends,

I have one issue , in my report i am displaying vendor details, when i double click on vendor number, it shud go to initial screen of tcode 'XK03',

i am able to pass parameter id for

vendor

company code and purchase organization,

but i have to check atleast one checkbox,

how to set to check that checkbox of tcode 'XK03'

points will be given

thanks

anand

[Former Member]

Do a BDC recording for XK03 (only to fill values in 1st screen of XK03).

Use BDCDATA internal table alongwith CALL TRANSACTION statement. Call the transaction in E(error) mode.

Control will stop on the 1st screen of XK03.

If you add the OKCODE for the execute button as well then the control will stop at the next screen.

[Former Member]

Hi Anand,

Here is the sample program. I have also implemented the same thing, but for the different transaction (FD32).

TABLES: T001.

DATA:  IT_BDCDATA LIKE BDCDATA OCCURS 0 WITH HEADER LINE.

DATA:   OPT TYPE CTU_PARAMS.

CALL FUNCTION 'BDC_OPEN_GROUP'

EXPORTING

CLIENT              = SY-MANDT

KEEP                = 'X'

USER                = SY-UNAME

EXCEPTIONS

CLIENT_INVALID      = 1

DESTINATION_INVALID = 2

GROUP_INVALID       = 3

GROUP_IS_LOCKED     = 4

HOLDDATE_INVALID    = 5

INTERNAL_ERROR      = 6

QUEUE_ERROR         = 7

RUNNING             = 8

SYSTEM_LOCK_ERROR   = 9

USER_INVALID        = 10

OTHERS              = 11.

IF SY-SUBRC <> 0.

* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

ENDIF.

CLEAR IT_BDCDATA.

IT_BDCDATA-PROGRAM = 'SAPMF02C'.

IT_BDCDATA-DYNPRO =  '0100'.

IT_BDCDATA-DYNBEGIN = 'X'.

APPEND IT_BDCDATA.

CLEAR IT_BDCDATA.

IT_BDCDATA-FNAM = 'BDC_CURSOR'.

IT_BDCDATA-FVAL = 'RF02L-D0220'.

APPEND IT_BDCDATA.

SELECT SINGLE * FROM  TVKO

WHERE  VKORG  = KNVV-VKORG.

*&Get Credit Control Area

SELECT SINGLE * FROM T001

WHERE BUKRS = TVKO-BUKRS.

CLEAR IT_BDCDATA.

IT_BDCDATA-FNAM = 'RF02L-KKBER'.

IT_BDCDATA-FVAL = T001-KKBER.

APPEND IT_BDCDATA.

CLEAR IT_BDCDATA.

IT_BDCDATA-FNAM = 'RF02L-D0105'.

IT_BDCDATA-FVAL = 'X'.

APPEND IT_BDCDATA.

CLEAR IT_BDCDATA.

IT_BDCDATA-FNAM = 'RF02L-D0110'.

IT_BDCDATA-FVAL = 'X'.

APPEND IT_BDCDATA.

CLEAR IT_BDCDATA.

IT_BDCDATA-FNAM = 'RF02L-D0120'.

IT_BDCDATA-FVAL = 'X'.

APPEND IT_BDCDATA.

CLEAR IT_BDCDATA.

IT_BDCDATA-FNAM = 'RF02L-D0210'.

IT_BDCDATA-FVAL = 'X'.

APPEND IT_BDCDATA.

CLEAR IT_BDCDATA.

IT_BDCDATA-FNAM = 'RF02L-D0220'.

IT_BDCDATA-FVAL = 'X'.

APPEND IT_BDCDATA.

CLEAR IT_BDCDATA.

IT_BDCDATA-FNAM = 'BDC_OKCODE'.

IT_BDCDATA-FVAL = '/00'.

APPEND IT_BDCDATA.

OPT-DISMODE = 'E'.

OPT-DEFSIZE = 'X'.

SET PARAMETER ID 'KUN' FIELD OBJECT-KEY-CUSTOMERNO.

SET PARAMETER ID 'KKB' FIELD T001-KKBER.

CALL TRANSACTION 'FD32' USING IT_BDCDATA OPTIONS FROM OPT.

[Former Member]

Hi Chaun and Rao thanks for help, given points for you both