insert_to_day.sql

ERP管理功能

DECLARE
	v_hour		VARCHAR2(2);
	v_day		VARCHAR2(2);
	v_sqlStr	VARCHAR2(900);	
BEGIN
	v_hour := to_char(sysdate-1/24,'hh24');
	v_day  := to_char(sysdate,'fmdd');
	DBMS_OUTPUT.PUT_LINE(v_hour);
	v_sqlStr := 'insert into fy_day_'||v_day||'(
	select login_name,trunc(sysdate,''hh24''),lab_ip,sum(time_duration) from fy_detail_'||v_day||'
		where logout_date >= trunc(sysdate-1/24,''hh24'')
		and logout_date < trunc(sysdate,''hh24'')
		group by login_name,lab_ip)';
EXECUTE IMMEDIATE v_sqlStr;
END;