Function Module- 'Released for customers'

[Former Member]

Dear All,

We are not supposed to use 'internally released' or 'not released' FM in SAP.

My question is that is it possible to get the list of FMs in SAP HR which are 'released for customers'? Please help.

Regards,

Ajinkya

[kiran_k8]

Ajinkya,

TFIDR table's released date will get the required info on whether the FM is released for Customer Usage or not.

K.Kiran.

[SharathYaralkattimath]

Check entries in TFDIR table by passing APPL = 'P' , (P is for HR.)  & FREEDATE NE space.

[Former Member]

Thanks Sharath and Kiran for your reply.

However, I checked one FM- 'COMPUTE_YEARS_BETWEEN_DATES'. It has FREEDATE as 17.08.1992; but the attributes of this FM shows that it is not released! How is this possible??

The snaps are as shown below. What should be done in this case?

Regards,

Ajinkya

[ec1]

I feel sad whenever I see an old question that has not been answered because I was looking for the same answer as well.

So let me try to answer this and hopefully this can be useful to someone else who is looking for the same answer.

To find FMs that have been released to customer, goto table RODIR,

filter OBJECTTYPE=FUNC, OBJECT=<FM name>

if the record is found, CLIOBJECT = 'X' and RELEASED = 'X', the FM has been released for customer.

If you have many FMs you want to check, create a report with following code.

TABLES: tfdir.

SELECT-OPTIONS: s_func FOR tfdir-funcname.

DATA: function TYPE REF TO CL_FUNCTION_BUILDER_DATA,

       header TYPE HEADER_FB,

       enho_in_upgrade_mode TYPE c,

       interface TYPE RSFBINTFV,

       t_tfdir TYPE STANDARD TABLE OF tfdir,

       w_tfdir LIKE LINE OF t_tfdir.

SELECT *

   INTO CORRESPONDING FIELDS OF TABLE t_tfdir

   FROM tfdir

   WHERE funcname IN s_func.

IF sy-subrc = 0.

   create object function.

   LOOP AT t_tfdir INTO w_tfdir.

     CLEAR: header, interface.

     header-name = w_tfdir-funcname.

     header-changingla = sy-langu.

     call method function->import

       EXPORTING

         suppress_active_check = header-loadstate

       IMPORTING

         enho_in_upgrade_mode  = enho_in_upgrade_mode

       CHANGING

         header                = header

         interface             = interface

       EXCEPTIONS

         cancelled             = 1.

     IF sy-subrc = 0.

       WRITE:/ w_tfdir-funcname, header-freigtext.

     ENDIF.

   ENDLOOP.

ENDIF.