topic Re: If I know a program name, how can I get the source code ? in Application Development and Automation Discussions

If I know a program name, how can I get the source code ?

Former Member — Fri, 05 Dec 2008 07:44:46 GMT

Have you ever read the code in cl_wb_source in SEDI?

Re: If I know a program name, how can I get the source code ?

Former Member — Fri, 05 Dec 2008 08:12:56 GMT

Can you be li'l bit clear. Please elaborate.

Thanks,

Sai

Re: If I know a program name, how can I get the source code ?

Former Member — Fri, 05 Dec 2008 08:15:54 GMT

for example , I wrote the following code

_______________________________________________

data : lv_tmp type string.

lv_tmp = 'aa'.

_______________________________________________

The source code is stored in the repository , i want to load the source code to an internal table, how can I do ?

Best regards,

Blake le

Re: If I know a program name, how can I get the source code ?

Former Member — Fri, 05 Dec 2008 08:19:29 GMT

Hi,

Just go to se38, then type your program name and then click om display.

If program entered by you exists, it will show you the source code.

Thanks

Re: If I know a program name, how can I get the source code ?

Former Member — Fri, 05 Dec 2008 08:21:53 GMT

Hi Nitesh,

I know, but is it possible to get the information by code not se38?

Best regards,

Re: If I know a program name, how can I get the source code ?

Former Member — Fri, 05 Dec 2008 08:28:34 GMT

Hi,

You can try this code to load program in an internal table...


DATA: itab TYPE yrfc_long WITH HEADER LINE,
      itab_inc TYPE yrfc_long, " yrfc_long is of type char length 1024
      prog_incl TYPE rs38m-programm,
      temp1(20) TYPE c,
      temp2(20) TYPE c.


data: prog TYPE rs38m-programm.


prog = 'YDEB_TEST1'. " give the program name.
READ REPORT prog INTO itab.
break-point.
LOOP AT itab WHERE text CP 'include*'.
  SPLIT itab-text AT space INTO temp1 prog_incl.
  REPLACE ALL OCCURRENCES OF '.' IN prog_incl WITH ' '.
  CONDENSE prog_incl.
  READ REPORT prog_incl INTO itab_inc.
  IF sy-subrc = 0.
    DELETE itab INDEX sy-tabix.
    INSERT LINES OF itab_inc INTO itab INDEX sy-tabix.
    REFRESH itab_inc.
  ENDIF.
ENDLOOP.

Re: If I know a program name, how can I get the source code ?

Former Member — Fri, 05 Dec 2008 08:28:37 GMT

Hi,

Use FM RPY_PROGRAM_READ

it will return an internal table having the source code.

regards,

kartik

Re: If I know a program name, how can I get the source code ?

Former Member — Fri, 05 Dec 2008 08:59:10 GMT

Hi Katik,

Thanks very much. This is what I need.

Best regards,

Lament