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

Re: Field - Symbol - Abap HR

$
0
0

Hi Barnabas,

 

This exactly what you are trying to do

*--Decleare internal table

TYPES : BEGIN OF ty_pa0041,

           pernr TYPE pa0041-pernr,

           dar01 TYPE pa0041-dar01,

           dat01 TYPE pa0041-dat01,

           dar02 TYPE pa0041-dar02,

           dat02 TYPE pa0041-dat02,

           dar03 TYPE pa0041-dar03,

           dat03 TYPE pa0041-dat03,

           dar04 TYPE pa0041-dar04,

           dat04 TYPE pa0041-dat04,

          END OF ty_pa0041.

 

DATA : lt_pa0041 TYPE STANDARD TABLE OF ty_pa0041,

            ls_pa0041 TYPE ty_pa0041.

 

*--Read Secondment end date ( For my case it's RG)


SELECT pernr

        dar01 dat01 dar02 dat02 dar03 dat03 dar04 dat04

   INTO TABLE lt_pa0041

   FROM pa0041

   WHERE pernr = gs_final-pernr AND

                endda = '99991231'.

 

*--Find out corrosponding date according to 'RG'

LOOP AT lt_pa0041 INTO ls_pa0041.

   IF ls_pa0041-dar01 = 'RG'.

     lv_date1 = ls_pa0041-dat01.

   ELSEIF ls_pa0041-dar02 = 'RG'.

     lv_date1 = ls_pa0041-dat02.

   ELSEIF ls_pa0041-dar03 = 'RG'.

     lv_date1 = ls_pa0041-dat03.

   ELSEIF ls_pa0041-dar04 = 'RG'.

     lv_date1 = ls_pa0041-dat04.

    ENDIF.

ENDLOOP.


I hope it fits your requirement


Viewing all articles
Browse latest Browse all 8581

Trending Articles



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