topic program RGGBS000 subroutine in Application Development and Automation Discussions

program RGGBS000 subroutine

Former Member — Thu, 16 Oct 2008 03:52:54 GMT

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

Re: program RGGBS000 subroutine

former_member480923 — Thu, 16 Oct 2008 04:55:41 GMT

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.

Re: program RGGBS000 subroutine

Former Member — Thu, 16 Oct 2008 04:58:48 GMT

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

Re: program RGGBS000 subroutine

former_member377111 — Thu, 16 Oct 2008 05:11:30 GMT

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