Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

How to hide ABAP report source codes like program SAPMSYST

Former Member
0 Likes
2,646

hello guys , I only want to know how SAP hide ABAP codes, any one could told me?

BRs.

Justin

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
1,340

Hi ,

Code is available in SCN forum , please search it.

See the below link..

http://www.sap-img.com/abap.htm

Thanks

Shambhu

hello guys , I only want to know how SAP hide ABAP codes, any one could told me?

BRs.

Justin

8 REPLIES 8
Read only

Former Member
0 Likes
1,341

Hi ,

Code is available in SCN forum , please search it.

See the below link..

http://www.sap-img.com/abap.htm

Thanks

Shambhu

Read only

Former Member
0 Likes
1,340

Hello

Just search SDN by hide code . You will find hints

P.s.:

Read only

0 Likes
1,340

Thanks for your replying.

I also try *@#@@[SAP] in report, but it doesnot work in ECC6.0.

Read only

0 Likes
1,340

Hello

In my previous post a give you a link.

See this. Look at meesage from Pavan Pachimatla. This snippet working fine.

Read only

Former Member
0 Likes
1,340

Thanks for everyone's response.

I have try codes in http://www.sap-img.com/abap/program-to-hide-abap-source-code-and-protects-it.htm,

But the program dumped.

Runtime Errors DBIF_DSQL2_OBJ_UNKNOWN

Exception CX_SY_NATIVE_SQL_ERROR

Short text

Table does not exist in database.

SELECT PROG INTO :F5 FROM D010S WHERE PROG = :NEW_NAME

Read only

0 Likes
1,340

hi

u can use table name D010TAB

IF J > 1.

WRITE: / 'Cannot generate appropriate program name'.

EXIT.

ENDIF.

DATA: F5(8).

EXEC SQL.

SELECT MASTER INTO :F5 FROM D010TAB WHERE MASTER = :NEW_NAME

ENDEXEC.

IF F5 IS INITIAL.

  • There is no such hidden program, hide it

EXEC SQL.

UPDATE D010TAB SET MASTER = :NEW_NAME WHERE MASTER = :PROGRAM

ENDEXEC.

concatenate 'Program' :program 'was hidden.'

into message separated by space.

ELSE.

  • There is already a hidden program there, unhide it

EXEC SQL.

UPDATE D010TAB SET MASTER = :PROGRAM WHERE MASTER = :NEW_NAME

ENDEXEC.

concatenate 'Program' :program 'was restored.'

into message separated by space.

ENDIF.

write message.

Edited by: krupa jani on Nov 9, 2009 7:30 AM

Read only

Former Member
0 Likes
1,340

I used table D010SINF instead of D010S and the code runs and works, but, the problem is that when you "encrypt" the code, the program name no longer exists in the tabla TRDIR, so, you have to disable that check in order to "decrypt" the code.