Creating SHDB Recording for Transact SE38

[Former Member]

I have a dilemma with our 1099 process. We are unable to release the executing of the 1099 program to our user area because of security issues w/ transaction SE34/SA38. I am attempting to create a SHDB recording session of SE38 with the 1099 report program (RFIDYYWT) up to the selection screen and terminate the session there. I then save the recording to a program and am attempting to edit the program by protecting the program entry textbox on SE38. I also want to process the program immediately. Can we do this w/ SHDB I know that it is normally used to load data but I just want to use it to display a data entry page.

report ZMAPE_1099M

no standard page heading line-size 255.

include bdcrecx1.

start-of-selection.

perform open_group.

perform bdc_dynpro using 'SAPLWBABAP' '0100'.

perform bdc_field using 'BDC_CURSOR'

'RS38M-PROGRAMM'.

perform bdc_field using 'BDC_OKCODE'

'=SHOP'.

perform bdc_field using 'RS38M-PROGRAMM'

'RFIDYYWT'.

perform bdc_field using 'RS38M-FUNC_EDIT'

'X'.

perform bdc_dynpro using 'SAPLS38E' '0400'.

perform bdc_field using 'BDC_OKCODE'

'=WB_EXEC'.

perform bdc_field using 'BDC_CURSOR'

'RSTXP-TDLINE(01)'.

perform bdc_field using 'RSTXP-TDFIRST'

' 1'.

perform bdc_dynpro using 'RFIDYYWT' '1000'.

*perform bdc_field using 'BDC_OKCODE'

• '/EE'.

*perform bdc_field using 'BDC_CURSOR'

• 'P_OUTG'.

*perform bdc_dynpro using 'SAPLS38E' '0400'.

*perform bdc_field using 'BDC_OKCODE'

• '/EWB_BACK'.

*perform bdc_field using 'BDC_CURSOR'

• 'RSTXP-TDLINE(01)'.

*perform bdc_field using 'RSTXP-TDFIRST'

• ' 1'.

*perform bdc_dynpro using 'SAPLWBABAP' '0100'.

*perform bdc_field using 'BDC_CURSOR'

• 'RS38M-PROGRAMM'.

*perform bdc_field using 'BDC_OKCODE'

• '=BACK'.

*perform bdc_field using 'RS38M-PROGRAMM'

• 'RFIDYYWT'.

*perform bdc_field using 'RS38M-FUNC_EDIT'

• 'X'.

perform bdc_transaction using 'SE38'.

perform close_group.

[former_member194669]

Instead of recording to SE38 you need to look into function module ABAP4_CALL_TRANSACTION

a®