Using call Function
Example
proceed = 'Y'.
*CHECK EMPLOYMENT STATUS (ACTION INFOTYPE).
clear i0000. refresh i0000.
call function 'HR_READ_INFOTYPE'
exporting
pernr = temp_02-pfno
infty = '0000'
begda = pchbegda
endda = pchendda
tables
infty_tab = i0000.
loop at i0000.
if empstat <> space and not i0000-stat2 in empstat.
proceed = 'N'.
endif. "empstat <> space and not i0000-stat2 in empstat.
exit.
endloop. "at i0000.
if sy-subrc ne 0.
proceed = 'N'.
endif. "sy-subrc ne 0.
Example
ZDLLBMW001
Information provided by Siti Sarah
Example
proceed = 'Y'.
*CHECK EMPLOYMENT STATUS (ACTION INFOTYPE).
clear i0000. refresh i0000.
call function 'HR_READ_INFOTYPE'
exporting
pernr = temp_02-pfno
infty = '0000'
begda = pchbegda
endda = pchendda
tables
infty_tab = i0000.
loop at i0000.
if empstat <> space and not i0000-stat2 in empstat.
proceed = 'N'.
endif. "empstat <> space and not i0000-stat2 in empstat.
exit.
endloop. "at i0000.
if sy-subrc ne 0.
proceed = 'N'.
endif. "sy-subrc ne 0.
Example
ZDLLBMW001
Information provided by Siti Sarah
Post a Comment