topic Re: Table or FM to get released information in Application Development and Automation Discussions

Table or FM to get released information

Former Member — Thu, 21 Nov 2013 18:16:56 GMT

Hello, I wnat to get realsed information, (Which is the person pending to authorization?) I wnat to get this information:

Anyone knows where can I find this information?

Regards

Re: Table or FM to get released information

Former Member — Thu, 21 Nov 2013 18:21:09 GMT

Hello,

I am unable to view the screen shot! can you please attach it in another way!

Re: Table or FM to get released information

Former Member — Thu, 21 Nov 2013 18:38:13 GMT

Could you let us know the transaction code being used?

Pasting a screenshot in English language would help in getting accurate replies.

Re: Table or FM to get released information

Former Member — Thu, 21 Nov 2013 18:47:55 GMT

Fields are in table EKKO starting with FRG- SX for strategy and FRG-ZU for Releasestatus. Another important field in EKKO is procstat. Look at F4-help for the field.

Re: Table or FM to get released information

Former Member — Thu, 21 Nov 2013 20:04:55 GMT

ME23N

Re: Table or FM to get released information

Former Member — Thu, 21 Nov 2013 20:31:55 GMT

Hello, Thanks for information, but I want to know how is the person pending for autorization? (yellow triangle) for this example the person pending for autorization is "Sub-Director Planta" (yellow triangle)

Do you know which table I need to see this information?

Regards

Re: Table or FM to get released information

Former Member — Thu, 21 Nov 2013 20:42:02 GMT

I believe you would be getting it from Class

CL_PO_HEADER_HANDLE_MM Interface/method :

IF_RELEASABLE_MM~GET_RESPONSIBLE

this in turn calls the FM ME_REL_GET_RESPONSIBLE_EKKO

Regards

Ram

Message was edited by: Ramachandran Rakhunathan

Re: Table or FM to get released information

Former Member — Fri, 22 Nov 2013 22:42:19 GMT

Hello, I did solved my problem,

Here my solution:

Go to Ekko with EBELN and Get the field:
 FRGSX <- Rel. Strategy
   FRGGR  <-    Release group
 FRGZU  <- Release status
 Then
SELECT SINGLE * FROM T16FS
      INTO WA_T16FS
      WHERE FRGSX EQ WA_ALV-FRGSX
      AND FRGGR EQ WA_ALV-FRGGR.
         IF wa_alv-frgke EQ '0'.
           v_cant_lib = 0.
           v_cant_lib = strlen( wa_alv-frgzu ).
 *           IF WA_ALV-FRGGR = 'VR' .
               CASE v_cant_lib.
             WHEN 0.
              v_cod_lib = WA_T16FS-FRGC1.
             WHEN 1.
               v_cod_lib = WA_T16FS-FRGC2.
            WHEN 2.
              v_cod_lib = WA_T16FS-FRGC3.
             WHEN 3.
             v_cod_lib = WA_T16FS-FRGC4.
            WHEN 4.
             v_cod_lib = WA_T16FS-FRGC5.
             WHEN 5.
              v_cod_lib = WA_T16FS-FRGC6.
            WHEN 6.
             v_cod_lib = WA_T16FS-FRGC7.
             WHEN 7.
              v_cod_lib = WA_T16FS-FRGC8.
              ENDCASE.
           READ TABLE it_t16 INTO wa_t16
             WITH KEY frggr = wa_alv-frggr
                      frgco = v_cod_lib.
           IF sy-subrc = 0.
             wa_alv-frgct = wa_t16-frgct.
           ENDIF.
         ELSEIF wa_alv-frgke EQ '5' or
                wa_alv-frgke EQ '6'.
           wa_alv-frgct = "Total released'.
         ELSEIF wa_alv-frgke IS INITIAL.
           wa_alv-frgct = 'Without Strategy'.
         ENDIF.
         MODIFY IT_ALV FROM WA_ALV TRANSPORTING OBMNG ZTER2 ERNAMT DATVR UDATE FRGCT.
ENDLOOP.

Thanks all and regards