topic Re: Function Module in Application Development and Automation Discussions

Function Module

abdulazeez12 — Mon, 11 Sep 2006 18:12:16 GMT

Hii All,

I am working on an object where it is desired that system id and mandt is to be checked and if the server is DEV and client is 200, then, the processing is to be done. Else, it should throw an error message. This type of functionality is configured in the client level settings.

Now, to resolve this, I can use

if sy-sysid = DEV and sy-mandt = 200

else

error message.

endif.

But, I dont want to hardcode these system variable values to check the condition.

Can anyone tell me how is it possible without hardcoding thevalues? Is there any function module for this? Howis client level configuration changes be prevented? any table exixts where i can check if i can go ahead or not?

Appreciate your replies..

Thanks

Re: Function Module

Former Member — Mon, 11 Sep 2006 18:39:02 GMT

HI,

You can use SUSR_ZBV_CLIENTSYSTEMS_GET Function module,

Goto SE37 and execute this transaction, and give username in the column Delivery_mode , then press F8. you will get Export Parameters, click the table Icon,You will get Client and System. Client is the first Column and the System is 4th Column,

You will get here what you want, but i do not know whether it is the correct way or not....

Regards

Sudheer

Re: Function Module

sridhar_k1 — Mon, 11 Sep 2006 18:49:21 GMT

Try the following code:

tables t000.

select single * from t000 client specified

where mandt = sy-mandt

and ccnocliind eq space.

if sy-subrc ne 0.

Raise error.

endif.

check the allowed values of t000-ccnocliind and adjust your select statement accordingly.

Regards

Sridhar

Re: Function Module

ferry_lianto — Mon, 11 Sep 2006 18:54:13 GMT

Hi Shakir,

Perhaps you can use table TVARV to store the system information for your validation instead of hardcoded.

To maintain table TVARV, please use transaction code STVARV. Click on Change button and create a variant by entering the value and save the variant. Before check the button "Include changed entries in transport request".

SELECT SINGLE * 
FROM TVARV
WHERE NAME = 'REPORT_XYZ_SYSTEM_INFO'. 

IF SY-MANDT = TVARV-LOW AND    <-- "DEV 
   SY-SYSID = TVARV-HIGH.      <-- "200
   ...                         "Perform activity 
ELSE.
   ...                         "Error message
ENDIF.

Hope this will help.

Regards,

Ferry Lianto