Quantcast
Channel: SCN : All Content - All Communities
Viewing all articles
Browse latest Browse all 3523

Status_read FM not working properly in outbound idoc

$
0
0

Hi all,

 

I am updating custom segment with status of quotation in outbound idoc FM (IDOC_OUTPUT_ORDRSP ) in exit EXIT_SAPLVEDC_003

 

1. Status_read Function module working fine for all status in runtime except approval status for pending status it is working fine. ( I checked the code with hardcoded text for approval Status and it works , So Jest table not  updating approval status at run time process ).

 

2. Status_read FM not returning approval status at runtime from va22 , but if we run the idoc manually then it works fine .

 

* Get BELNR ( Which will have the Sales order number in this interface )
       lv_vbeln = ls_e1edk01-belnr.

* Converting to internal format
       CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
         EXPORTING
           input  = lv_vbeln
         IMPORTING
           output = lv_vbeln.


       IF lv_vbeln IS NOT INITIAL.
* Get Sales Order Header details

         SELECT SINGLE vbeln
                       erdat
                       erzet
                       ernam
                       angdt
                       auart
                       objnr
                       ktext
                       vkorg FROM vbak INTO ls_vbak
                                   WHERE vbeln EQ lv_vbeln.
         IF sy-subrc EQ 0.

* Get the Status Profile and User Stauts
           CALL FUNCTION 'STATUS_READ'
             EXPORTING
               objnr            = ls_vbak-objnr
               only_active      = lc_x
             IMPORTING
               obtyp            = lv_obtyp
               stsma            = lv_stsma
               stonr            = lv_stonr
             TABLES
               status           = lt_status
             EXCEPTIONS
               object_not_found = 1
               OTHERS           = 2.
           IF sy-subrc EQ 0.
* Delete records other than the User status
             DELETE lt_status WHERE stat NA lc_e.

* Read the active user status
             READ TABLE lt_status INTO ls_status WITH KEY inact = space.
             IF sy-subrc EQ 0.
               IF lv_stsma IS NOT INITIAL AND ls_status-stat IS NOT INITIAL.
                 SELECT SINGLE txt30 FROM tj30t INTO ( lv_text )
                                       WHERE stsma EQ lv_stsma
                                        AND  estat EQ ls_status-stat
                                        AND  spras EQ sy-langu. "#EC WARN_OK
               ENDIF.
             ENDIF.
* Object status text
           ENDIF.
         ENDIF.


Please help me in this


Viewing all articles
Browse latest Browse all 3523

Trending Articles



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