Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Calling standard prog from zprogram.

Former Member
0 Likes
606

Hi all,

Please tell me how to call 3rd screen of standard SAP program from z program.

Should exclude first two screen of standard SAP prog and data should be sent to 3rd screen and executed.

Or may be first two screens executed and then third screen in sequence and output after third screen to be directly displayed.

Thanks.

Edited by: Sanjiv N on Nov 24, 2008 2:42 PM

Edited by: Sanjiv N on Nov 24, 2008 2:44 PM

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
578

Dear Sanjeev,

please use below code snippet. It will solve your problem. To get program name and screen details, make one recording program using ur tcode and apply below logic as its is.

DATA: bdcdata_wa TYPE bdcdata,

bdcdata_tab TYPE TABLE OF bdcdata.

DATA opt TYPE ctu_params.

CASE r_ucomm.

WHEN '&IC1'.

READ TABLE it_final INDEX rs_selfield-tabindex.

CHECK sy-subrc = 0.

CLEAR bdcdata_wa.

bdcdata_wa-program = 'SAPLFTR_IRATE'.

bdcdata_wa-dynpro = '1000'.

bdcdata_wa-dynbegin = 'X'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'BDC_CURSOR'.

bdcdata_wa-fval = 'VTGFHA-BUKRS'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'VTGFHA-BUKRS'.

bdcdata_wa-fval = '1000'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'BDC_CURSOR'.

bdcdata_wa-fval = 'VTGFHA-RFHA'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'VTGFHA-RFHA'.

bdcdata_wa-fval = it_final-rfha.

APPEND bdcdata_wa TO bdcdata_tab.

opt-dismode = 'E'.

opt-defsize = 'X'.

CASE rs_selfield-fieldname.

WHEN 'RFHA'.

CALL TRANSACTION 'TM_53' USING bdcdata_tab OPTIONS FROM opt ."AND SKIP FIRST SCREEN.

ENDCASE.

ENDCASE.

hopw it will help u....

regards,

Prashanth Maturu.

Dear Sanjeev,

please use below code snippet. It will solve your problem. To get program name and screen details, make one recording program using ur tcode and apply below logic as its is.

DATA: bdcdata_wa TYPE bdcdata,

bdcdata_tab TYPE TABLE OF bdcdata.

DATA opt TYPE ctu_params.

CASE r_ucomm.

WHEN '&IC1'.

READ TABLE it_final INDEX rs_selfield-tabindex.

CHECK sy-subrc = 0.

CLEAR bdcdata_wa.

bdcdata_wa-program = 'SAPLFTR_IRATE'.

bdcdata_wa-dynpro = '1000'.

bdcdata_wa-dynbegin = 'X'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'BDC_CURSOR'.

bdcdata_wa-fval = 'VTGFHA-BUKRS'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'VTGFHA-BUKRS'.

bdcdata_wa-fval = '1000'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'BDC_CURSOR'.

bdcdata_wa-fval = 'VTGFHA-RFHA'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'VTGFHA-RFHA'.

bdcdata_wa-fval = it_final-rfha.

APPEND bdcdata_wa TO bdcdata_tab.

opt-dismode = 'E'.

opt-defsize = 'X'.

CASE rs_selfield-fieldname.

WHEN 'RFHA'.

CALL TRANSACTION 'TM_53' USING bdcdata_tab OPTIONS FROM opt ."AND SKIP FIRST SCREEN.

ENDCASE.

ENDCASE.

hopw it will help u....

regards,

Prashanth Maturu.

3 REPLIES 3
Read only

Former Member
0 Likes
578

hi,

give the program name and screen no that will work. append it to bdcdata structure

Read only

Former Member
0 Likes
578

Hi

Try to create a BDC in order to go to a certain screen and running it by call transaction in E (error) mode: in this way the BDC will be stopped to the screen u need.

Max

Read only

Former Member
0 Likes
579

Dear Sanjeev,

please use below code snippet. It will solve your problem. To get program name and screen details, make one recording program using ur tcode and apply below logic as its is.

DATA: bdcdata_wa TYPE bdcdata,

bdcdata_tab TYPE TABLE OF bdcdata.

DATA opt TYPE ctu_params.

CASE r_ucomm.

WHEN '&IC1'.

READ TABLE it_final INDEX rs_selfield-tabindex.

CHECK sy-subrc = 0.

CLEAR bdcdata_wa.

bdcdata_wa-program = 'SAPLFTR_IRATE'.

bdcdata_wa-dynpro = '1000'.

bdcdata_wa-dynbegin = 'X'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'BDC_CURSOR'.

bdcdata_wa-fval = 'VTGFHA-BUKRS'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'VTGFHA-BUKRS'.

bdcdata_wa-fval = '1000'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'BDC_CURSOR'.

bdcdata_wa-fval = 'VTGFHA-RFHA'.

APPEND bdcdata_wa TO bdcdata_tab.

CLEAR bdcdata_wa.

bdcdata_wa-fnam = 'VTGFHA-RFHA'.

bdcdata_wa-fval = it_final-rfha.

APPEND bdcdata_wa TO bdcdata_tab.

opt-dismode = 'E'.

opt-defsize = 'X'.

CASE rs_selfield-fieldname.

WHEN 'RFHA'.

CALL TRANSACTION 'TM_53' USING bdcdata_tab OPTIONS FROM opt ."AND SKIP FIRST SCREEN.

ENDCASE.

ENDCASE.

hopw it will help u....

regards,

Prashanth Maturu.