Saturday, 28 September 2013

Now validate employee's country grouping through class!!

TABLES pernr.

NODES peras.

INFOTYPES     0001.

FIELD-SYMBOLS <fs_p0001> TYPE p0001.

CONSTANTS     c_molga TYPE molga VALUE 'AE'.


START-OF-SELECTION.

GET peras.
*    Check if molga is a UAE molga
   LOOP AT p0001 ASSIGNING <fs_p0001> WHERE begda <= pn-endda
                                       AND  endda >= pn-begda.
     DATA lx_t500p TYPE t500p.
     lx_t500p cl_hr_t500p=>read<fs_p0001>-werks ).
     IF lx_t500p IS INITIAL.
       RETURN.
     ELSEIF NOT lx_t500p-molga c_molga.
       RETURN.
     ENDIF.
     EXIT.
   ENDLOOP.
   IF sy-subrc <> 0.
     RETURN.
   ENDIF.

END-OF-SELECTION.

No comments:

Post a Comment

Note: only a member of this blog may post a comment.