Skip to Content
avatar image
Former Member

program RGGBS000 subroutine

Hello All,

For my requirement i need to copy the program RGGBS000 into a zRGGBS000 and then declare a specific exit till this part i have done!!!

Problem is how do i create a subroutine here ?

I guess the other subroutine are been called dynamically

how do i call my subroutine say example form u201 using var.

Please let me know about ths .

regards

bhanu

Add comment
10|10000 characters needed characters exceeded

  • Get RSS Feed

3 Answers

  • avatar image
    Former Member
    Oct 16, 2008 at 04:55 AM

    U have to use the transaction: OB28, GGB0, GGB1, GGVZ and other group of transactions for doing the checks this checks will put the code in the same exit program automatically.

    Hope That Helps

    Anirban M.

    Add comment
    10|10000 characters needed characters exceeded

  • avatar image
    Former Member
    Oct 16, 2008 at 04:58 AM

    Hi,

    In your program you will have an option to write the FORM ENDFORM statements but it is not here that the subroutines can be called. For example you have stated U201.

    Only FORM U201

    ENDFORM statement can be written here.

    To run this form you need to have an entry in either substitution or validation in transactions like

    OBBH, OB28 etc..

    Hope this helps,

    Regards,

    Pramod

    Add comment
    10|10000 characters needed characters exceeded

  • avatar image
    Former Member
    Oct 16, 2008 at 05:11 AM

    Hi Bhanu,

    Copy the programe call your new perfor in the GET_EXIT_TITLES form.

    Eg: exits-name = 'U997'.

    exits-param = c_exit_param_none .

    exits-title = text-102. "Cons. transaction type

    APPEND exits. "from xref1/2

    After this insert your perform within the programe

    eg:

    FORM U997." using lv_MAKTX." bseg-matnr changing bseg-zuonr.

    data:LV_maktx like makt-maktx.

    clear:LV_maktx.

    select single maktx from MAKT into lv_maktx where matnr = bseg-matnr.

    if sy-subrc eq 0.

    bseg-zuonr = LV_maktx.

    move lv_maktx to bseg-zuonr.

    modify bseg.

    endif.

    ENDFORM.

    please refer the note 842318 for more clarity.

    Hope this will help you

    Regard

    N

    Add comment
    10|10000 characters needed characters exceeded