Skip to Content
avatar image
Former Member

high priority:-Points will be rewarded

I have to do partial release of SD in batch program,

How can I use FM "FKK_S_SECURITY_CHANGE" for this purpose as it taking me into online.

Points will be rewarded fully

Regards,

Shailendra Tolambiya

Add comment
10|10000 characters needed characters exceeded

  • Get RSS Feed

2 Answers

  • avatar image
    Former Member
    Aug 20, 2007 at 12:17 PM

    Hi,

    report ztst_test1.

    type-pools: fkkse.

    data: l_auto type fkkse_security_auto,

    l_obj type fkkse_security,

    l_security type fkk_sec-security,

    l_db_update type sy-datar.

    l_security = '099000000717'.

    call function 'FKK_S_SECURITY_PROVIDE'

    exporting

    x_security = l_security

    x_wmode = '02'

    importing

    y_obj = l_obj

    y_auto = l_auto

    • TABLES

    • T_FKKOP_REQ =

    exceptions

    not_found = 1

    foreign_lock = 2

    not_authorized = 3

    general_fault = 4

    others = 5.

    if sy-subrc = 0.

    l_auto-use = 'X'.

    l_auto-okcode = 'REV'.

    l_auto-sec_d-rev_reason = 'OTHL'.

    l_auto-sec_d-nc_status = space.

    call function 'FKK_S_SECURITY_CHANGE'

    exporting

    x_security = l_security

    x_upd_online = 'X'

    x_no_dialog = 'X'

    x_auto = l_auto

    • x_obj = l_obj

    • X_NO_OTHER =

    importing

    y_db_update = l_db_update

    • Y_NEW_SECURITY =

    • Y_EXIT_TYPE =

    • Y_NEW_SEC =

    • Y_CURFIELD =

    exceptions

    not_found = 1

    foreign_lock = 2

    not_authorized = 3

    general_fault = 4

    input_error = 5

    others = 6.

    if sy-subrc = 0.

    write:/ 'Update Successful'.

    endif.

    else.

    write:/ 'Error occurred, operation terminated'.

    endif.

    Regards

    Sudheer

    Add comment
    10|10000 characters needed characters exceeded

  • avatar image
    Former Member
    Aug 20, 2007 at 12:19 PM

    Check out this realated thread

    fkkssecuritychange-help

    Regards,

    Santosh

    Add comment
    10|10000 characters needed characters exceeded