Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 10473

Re: PA48 Hire Actions Used

$
0
0

Hi,

This question is Not Answered yet.

 

You need to enhance the function HR_PREPARE_NEW_EE.

 

1-Insert a enhancement point at end of function code.

 

2- paste this code in your enhancement point

 

3- be happy

 

In my case, I want to default the action 30 instead 01.

 

Regards,

Eduardo Marcelino

 

 

PERFORM ppv USING '30' 'P0000-MASSN' '00'.

 

     CALL FUNCTION 'ENQUEUE_EPT752F'

          EXPORTING

               mandt          = sy-mandt

*           otype          = t752f-otype                    "XDPK006716

               pernr          = t752f-pernr

          EXCEPTIONS

               foreign_lock   = 1

               system_failure = 2

               OTHERS         = 3.

     IF sy-subrc = 0.

       sw_enqueue = yes.

     ENDIF.

 

   IF sw_enqueue = no.

*  message e309(pa).

*    Die Tabelle T752F konnte nicht gesperrt werden.

     CALL FUNCTION 'BALW_BAPIRETURN_GET'

          EXPORTING

               type       = 'E'

               cl         = 'PA'

               number     = 309

          IMPORTING

               bapireturn = error

          EXCEPTIONS

               OTHERS     = 1.

     RETURN.

   ENDIF.

 

   LOOP AT proposed_values WHERE fname = 'P0000-MASSN'.

     MOVE-CORRESPONDING proposed_values TO t752f.

     INSERT t752f.

   ENDLOOP.

 

   CALL FUNCTION 'DEQUEUE_EPT752F'

        EXPORTING

             mandt      = sy-mandt

*         otype      = t752f-otype                          "XDPK006716

             pernr      = t752f-pernr

        EXCEPTIONS

             OTHERS     = 1.


Viewing all articles
Browse latest Browse all 10473

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>