打卡
call function 'hr_person_read_work_schedule'
exporting
begin_date = p_begda
end_date = p_endda
* grouping_dws =
* grouping_attendence =
* grouping_substitute =
* read_from_database = ' '
* im_read_no_locked_records =
tables
pernr_tab = lt_pernr_tab （入參表）
（每個表必須都得傳輸過去，可以為空，但是必須要有）可以同時insert，delete
ins_teven = ins_teven
ven_more = del_teven_more
ins_teven_more = ins_teven_more
exceptions
insert_failed = 1
update_failed = 2
others = 3.
loop at lt_pa2011.
call function 'number_get_next'
insert 必須配合這個函式使用
exporting
nr_range_nr = '01'
object = 'pd_seq_nr'
quantity = '00000000000000000001'
* subobject = ' '
* toyear = '0000'
* ignore_buffer = ' '
importing
number = ins_teven-pdsnr
* quantity = l_num
* returncode =
exceptions
interval_not_found = 1
number_range_not_intern = 2
object_not_found = 3
quantity_is_0 = 4
quantity_is_not_1 = 5
interval_overflow = 6
buffer_overflow = 7
others = 8.
if sy-subrc <> 0.
* implement suitable error handling here
endif.
endloop.
考勤fm
hr_read_timedata_psp
hr_abs_att_times_at_entry
zpublic_kqxx 考勤資訊的讀取
data:begin of mt_pa2002 occurs 0,
pernr type persno,
smon type smon,
awart like pa2002-awart,
zrs type p decimals 2, "ci次數
endda type dats,
end of mt_pa2002.
data :lt_2002 like table of mt_pa2002 with header line.
loop at gt_pa2002 .
mt_pa2002-pernr = gt_pa2002-pernr.
mt_pa2002-awart = gt_pa2002-awart.
if gt_pa2002-endda+6(2) >= '24'.
call function 'fima_date_create'
exporting
i_date = gt_pa2002-endda
i_months = +1
importing
e_date = gt_pa2002-endda.
mt_pa2002-smon = gt_pa2002-endda+0(6) .
else.
mt_pa2002-smon = gt_pa2002-endda+0(6).
endif.
endloop.
sort mt_pa2002 by pernr smon awart ascending .
loop at mt_pa2002 .
if mt_pa2002-awart = '1010' or mt_pa2002-awart = '1011'
or mt_pa2002-awart = '1012' .
cqts = cqts + 1.
cqts = cqts * 1 / 2.
else.
cqts = cqts + 1. "出勤天數
endif.
at end of awart.
lt_2002-pernr = mt_pa2002-pernr.
lt_2002-smon = mt_pa2002-smon.
lt_2002-awart = mt_pa2002-awart.
lt_2002-zrs = cqts.
clear:cqts.
endat.
endloop.
sort lt_2002 by pernr smon awart.
考勤打卡設計方案
select from t kq wastebook where date format kaoqin time,y m d 2016 07 05 這個單位打幾次卡？一般是二次或四次，不支援其它班次 一輪班次 06 00 00 至 09 00 00 上午上班班次 其中 08 00 00之前為正常到崗...
考勤打卡設計方案
select from t kq wastebook where date format kaoqin time,y m d 2016 07 05 這個單位打幾次卡？一般是二次或四次，不支援其它班次 一輪班次 06 00 00 至 09 00 00 上午上班班次 其中 08 00 00之前為正常到崗...
考勤排班 打卡助手 考勤 排班一目了然
打卡助手直擊考勤排班痛點，員工管理者對排班考勤一目了然，實現極致輕簡辦公。移動考勤軟體之所以能盛行，就是因為，簡單，便捷。打卡助手是一款優質大眾的考勤管理系統，重要的是，打卡助手是天津卓朗科技免費提供給各個大中小型企業免費使用的，不是試用，是免費使用哦！這樣能幫助企業節省一部分運營成本，考勤，打卡是...