ABAP 日期时间函数 - SAPJX 技术博客
日期时间收集：
(内页-点击名称可查看操作)
获取查询日期前、后的年、月、日
获取查询日期最后一天的日期
获取查询日期过去N月的日期
获取查询日期未来N月的日期
获取查询日期该年的第几周
输出格式：YYYYWW
获取查询周数的第一天
获取查询日期该天是星期几
获取查询日期该年的第几周和这周周一、周日日期
周起始日是周一
获取查询日期该年的第几周和这周周一、周日日期，该天是周几
周起始日是周日
DATE_CHECK_PLAUSIBILITY
检查日期有效性
SY-SUBRC = 0 有效
TIME_CHECK_PLAUSIBILITY
检查时间有效性
SY-SUBRC = 0 有效
判断某天是否是假日
将标准日期格式转换为数字格式
将数字日期格式转换为系统日期格式
将查询日期转为工厂日历日期
获取两日期间的：天数、周数、月数、年数、期间月份开始截止日期
计算两日期之间间隔的天数
比较两个日期大小
返回：GT、EQ、LT等
两日期的时间差
时间：12/24小时制转换
获取所有的月份名字
获取所有的星期名字
查看日期属性 包括：该日期是星期几，第几天（周2=2），是不是公共假期等
需要输入国家日历
弹出日历对话框，供用户选择日期
弹出时间对话框，供用户选择时间
弹出选择年和月的对话框
弹出选择周的对话框
获得当前的财政年（fiscal year）
FIRST_DAY_IN_PERIOD_GET
获得期间首日
LAST_DAY_IN_PERIOD_GET
获得期间末日
函数操作说明：
获取输入日期前、后的年、月、日
DATA: date TYPE vtbbewe-dvalut,
flag TYPE trff_flg,
days TYPE trff_type_n_2.
CALL FUNCTION 'FIMA_DATE_CREATE'
= '' "输入日期
i_flg_end_of_month
"两年后的日期. 即输入日期的年加2所得日期，可为负数，表示前两年
"一个月后的日期.即输入日期的月加1所得日期，可为负数，表示前一个月
"23天后的日期。可为负数，表示23天前的日期
i_calendar_days
"10天后的日历。同I_DAYS参数。
i_set_last_day_of_month = 'X'
"返回的日期为当前月份的最后一天
"返回的日期为当前月份的最后一天
e_flg_end_of_month
"如果输入参数I_SET_LAST_DAY_OF_MONTH设置’X’了，则返回值为’X’。
e_days_of_i_date
"返回输入日期的i_calendar_days字段与I_DAYS字段的和。
输出结果：
获取输入日期前、后的年、月、日
DATA calc_date TYPE p0001-begda.
CALL FUNCTION 'RP_CALC_DATE_IN_INTERVAL'
"+号：表示 N天/月/年后的日期， -号：表示过去的日期
calc_date = calc_date.
"返回结果：10天后的日期（）
获取输入日期最后一天的日期
DATA date TYPE sy-datum.
CALL FUNCTION 'LAST_DAY_OF_MONTHS'
last_day_of_month = date
"返回日期：
EXCEPTIONS
day_in_no_date
获取输入日期最后一天的日期
DATA date TYPE sy-datum.
CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS'
last_day_of_month = date
"返回日期：
EXCEPTIONS
day_in_no_date
获取输入日期最后一天的日期
DATA date TYPE sy-datum.
CALL FUNCTION 'BKK_GET_MONTH_LASTDAY'
i_date = ''
e_date = date.
"返回日期：
获取输入日期过去N月的日期
DATA date TYPE sy-datum.
CALL FUNCTION 'CCM_GO_BACK_MONTHS'
backmonths = 3
"返回日期：
获取输入日期后来N月的日期
DATA date TYPE sy-datum.
CALL FUNCTION 'MONTH_PLUS_DETERMINE'
olddate = ''
newdate = date.
"返回日期：
获取输入日期该年的周数，输出格式为：YYYYWW。
DATA week TYPE scal-week.
CALL FUNCTION 'DATE_GET_WEEK'
"返回周数:201401
EXCEPTIONS
date_invalid = 1
获取输入周数的第一天
DATA date TYPE sy-datum.
CALL FUNCTION 'WEEK_GET_FIRST_DAY'
= '201401'
"返回该周第一天(周一)：
EXCEPTIONS
week_invalid = 1
获取输入日期该天是星期几/周几
DATA wotnr TYPE p.
CALL FUNCTION 'DAY_IN_WEEK'
datum = ''
wotnr = wotnr.
"返回：3 =》星期三/周三
获取输入日期该年的周数和这周周一、周日日期（周起始日是周一）
DATA: week
TYPE scal-week ,
monday TYPE sy-datum,
sunday TYPE sy-datum.
CALL FUNCTION 'GET_WEEK_INFO_BASED_ON_DATE'
"返回周数：201401
monday = monday
"返回周一日期：
sunday = sunday.
"返回周日日期：
获取查询日期该年的第几周和这周周一、周日日期，该天是星期几/周几（周起始日是周日）
DATA: sunday
TYPE sy-datum,
TYPE sy-datum,
day_in_week TYPE i,
TYPE p08_weekno.
CALL FUNCTION 'HR_GBSSP_GET_WEEK_DATES'
"返回本周开始日期（周日）：
p_saturday
= saturday
"返回本周结束日期（周六）：
p_day_in_week = day_in_week
"返回该日星期几/周几: 4 => 星期三/周三
"(这周中的第4天，由于开始日期是周日，故需要-1)
= week_no.
"返回本周开始日期的周数：201352
判断某天是否是假日
DATA holiday TYPE c.
DATA attributes TYPE SORTED TABLE OF thol.
CALL FUNCTION 'HOLIDAY_CHECK_AND_GET_INFO'
"输入日期:春节
holiday_calendar_id
"假日日历 ID
with_holiday_attributes
holiday_found
"输出是否为假日的标记
输出结果：X
holiday_attributes
= attributes
"输出该假日的属性
"若WITH_HOLIDAY_ATTRIBUTES参数 = X，则会带出属性记录
EXCEPTIONS
calendar_buffer_not_loadable = 1
date_after_range
date_before_range
date_invalid
holiday_calendar_id_missing
holiday_calendar_not_found
将标准日期格式转换为内部数字格式
日期的格式与用户参数有关，转化为内部数字格式时，都为：YYYYMMDD.
DATA date TYPE sy-datum.
CALL FUNCTION 'CONVERT_DATE_TO_INTERNAL'
date_external
= '' "当前用户日期格式：YYYY.MM.DD
accept_initial_date
date_internal
EXCEPTIONS
date_external_is_invalid = 1
将内部数字日期格式转换为系统日期格式
系统日期格式输出时，与用户参数设置有关
DATA date2(10) TYPE c.
CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL'
date_internal
date_external
"根据用户日期格式参数输出:YYYY.MM.DD
EXCEPTIONS
date_internal_is_invalid = 1
根据日期返回工厂日历日期
DATA: date
TYPE scal-date,
factorydate TYPE facdate,
workingday
TYPE scal-indicator.
CALL FUNCTION 'DATE_CONVERT_TO_FACTORYDATE'
correct_option
"表示工作日计算方式的标记
"必须转换的日期
factory_calendar_id
"工厂日历ID
"工厂日历日期
factorydate
= factorydate
"指定日历中的工作日数
workingday_indicator
= workingday
"表示某日期是否为工作日的标志
EXCEPTIONS
calendar_buffer_not_loadable = 1
correct_option_invalid
date_after_range
date_before_range
date_invalid
factory_calendar_not_found
输出结果：
factorydate:
workingday:
获取两个日期期间的：天数、周数、月数、年数；
包括期间月份的开始(月份第一天日期)、截止日期（月份最后一天日期）
TYPE-POOLS: p99sg.
DATA: days
months TYPE i,
DATA: month_tab TYPE STANDARD TABLE OF p99sg_month_tab_row.
CALL FUNCTION 'HR_99S_INTERVAL_BETWEEN_DATES'
"返回天数：266
"返回周数：52
"返回月数：12
"返回年数：1
month_tab = month_tab.
"期间月份首尾日
month_tab 内容明细：
计算两个日期期间的天数
DATA: days
months TYPE i,
CALL FUNCTION 'FIMA_DAYS_AND_MONTHS_AND_YEARS'
i_date_from
i_flg_separate = ' '
"是否单独计算 若有标识，则返回两日期相差的天数
"返回天数：638
"返回月数：21
"返回年数：2
* 单独计算
CALL FUNCTION 'FIMA_DAYS_AND_MONTHS_AND_YEARS'
i_date_from
i_flg_separate = 'X'
"返回天数：0
"返回月数：9
"返回年数：1
比较两个日期大小，返回结果是关系操作符：GT、EQ、LT
TYPE-POOLS trff .
DATA log_op TYPE trff_type_c_2.
CALL FUNCTION 'FIMA_DATE_COMPARE'
i_flg_intraday = ' '
= '000000'
"计算期间开始的排除标识
"计算期间开始的月末标识符
i_comp_date
i_comp_time
= '000000'
i_comp_sincl
"计算期间结束的包含标识
i_comp_sult
"计算期间结束的月末标识符
"返回比较结果：LT
两个日期作差，即是两个日期相减，包括当天时间。
DATA: datediff TYPE p,
timediff TYPE p,
earliest TYPE c.
CALL FUNCTION 'SD_DATETIME_DIFFERENCE'
= '240000'
= '083000'
= datediff
"返回日期差：0
= timediff
"返回时间差：16
= earliest
"返回时间正负：2，1-负 0-相等 2-正
EXCEPTIONS
invalid_datetime = 1
12小时制与24小时制的时间转换，例如：07:00:00 pm -> 19:00:00。
DATA: lv_in_time
TYPE tims,
lv_out_time TYPE tims,
lv_in_time = '060000'.
CALL FUNCTION 'HRVE_CONVERT_TIME'
" A = 24小时制 -> 12小时制
B = 12小时制 -> 24小时制
input_time
= lv_in_time
input_am_pm
output_time
= lv_out_time
output_am_pm
= lv_am_pm
EXCEPTIONS
parameter_error = 1
WRITE:/ | Input Time - { lv_in_time }|.
" 输出：060000
WRITE:/ |Output Time - { lv_out_time }|.
" 输出：180000
获取所有的月份名字信息
DATA return_code TYPE sy-subrc.
DATA month_names TYPE STANDARD TABLE OF t247.
CALL FUNCTION 'MONTH_NAMES_GET'
= sy-langu
"系统当前语言
return_code
= return_code
"返回 SY-SUBRC
month_names
= month_names
"返回月份信息
EXCEPTIONS
month_names_not_found = 1
month_names 明细内容：
获取所有的星期名字
DATA return_code TYPE sy-subrc.
DATA weekday TYPE STANDARD TABLE OF t246.
CALL FUNCTION 'WEEKDAY_GET'
= sy-langu
"系统当前语言
return_code
= return_code
"返回 SY-SUBRC
"返回星期名字信息
EXCEPTIONS
weekday_not_found = 1
weekday 内容明细：
查看日期属性 包括：该日期是星期几，第几天，是否公共假期等；
公共假期等内容需要输入国家日历。
DATA: year_of_valid_from TYPE scal-year,
year_of_valid_to
TYPE scal-year,
return_code
TYPE sy-subrc.
DATA day_attributes TYPE STANDARD TABLE OF casdayattr.
CALL FUNCTION 'DAY_ATTRIBUTES_GET'
factory_calendar
"工厂日历ID
holiday_calendar
"假期日历ID
= sy-langu
"系统当前语言
year_of_valid_from
= year_of_valid_from
year_of_valid_to
= year_of_valid_to
returncode
= return_code
day_attributes
= day_attributes "返回日期每日属性
EXCEPTIONS
factory_calendar_not_found = 1
holiday_calendar_not_found = 2
date_has_invalid_format
date_inconsistency
day_attributes 内容明细：
为 F4 帮助显示日历，弹出日历对话框，供用户选择日期
PARAMETERS:p1(6) TYPE c.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p1.
DATA:l_date TYPE sy-datum.
CALL FUNCTION 'F4_DATE'
date_for_first_month
= sy-datum
select_date
"用户选择后返回的日期
EXCEPTIONS
calendar_buffer_not_loadable = 1
date_after_range
date_before_range
date_invalid
factory_calendar_not_found
holiday_calendar_not_found
parameter_conflict
显示效果：
为 F4 帮助显示时间，弹出时间对话框，供用户选择时间
PARAMETERS:p1(6) TYPE c.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p1.
DATA: l_time TYPE sy-uzeit.
CALL FUNCTION 'F4_CLOCK'
start_time
= sy-uzeit
selected_time = l_time.
效果显示：
为 F4 帮助显示月份：弹出选择年和月的对话框
PARAMETERS: p_year
TYPE mard-lfgja DEFAULT sy-datum+0(4),
TYPE mard-lfmon.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_month.
DATA: actual_month
LIKE isellist-month,
selected_month LIKE isellist-month,
return_code
TYPE sy-subrc.
CONCATENATE p_year sy-datum+4(2) INTO actual_month.
CALL FUNCTION 'POPUP_TO_SELECT_MONTH'
actual_month
= actual_month
factory_calendar
"工厂日历 ID
holiday_calendar
"假日日历 ID
= sy-langu
"当前系统语言
start_column
"弹出框屏幕位置
"弹出框屏幕位置
selected_month
= selected_month "返回用户输入月份
return_code
= return_code
"返回 sy-subrc
EXCEPTIONS
factory_calendar_not_found = 1
holiday_calendar_not_found = 2
month_not_found
IF return_code = 0.
= selected_month+0(4).
p_month = selected_month+4(2).
效果显示：
弹出选择周的对话框
DATA: begin_date TYPE sy-datum,
TYPE sy-datum.
CALL FUNCTION 'POPUP_CALENDAR_SDB'
"启用天 选择
"启用周 选择
"启用月 选择
sel_interval = 'X'
= sy-datum
"默认选择日期
begin_date
= begin_date "返回选择周第一天
= end_date.
"返回选择周最后一天
效果显示：
获得当前的财政年（Fiscal year）
DATA: currm TYPE bkpf-monat,
curry TYPE bkpf-gjahr,
prevm TYPE bkpf-monat,
prevy TYPE bkpf-gjahr.
CALL FUNCTION 'GET_CURRENT_YEAR'
bukrs = '3010'
"输入公司代码
= sy-datum
currm = currm
"当前会计期间
curry = curry
"当前会计年度
prevm = prevm
"上期会计期间
prevy = prevy.
"上期会计年度
更新日志：
新增 HRVE_CONVERT_TIME 函数
参考文章：网页设计的问题，怎么设定一幅图片，让它在后台显示开始时间和到期时间？各位哥哥姐姐帮帮忙，急用……_百度知道
网页设计的问题，怎么设定一幅图片，让它在后台显示开始时间和到期时间？各位哥哥姐姐帮帮忙，急用……
要求图片到期后自动换成另一幅广告图片。分不是问题，问题解决后绝对有追加
各位哥哥姐姐我想要点代码，我实在想不出了，你们会的多辛苦一下下，我给你们多加分，我Q，其实我的要求不算太难，就是广告图片到期后，自动换成下一组图片。
我有更好的答案
代码发你邮箱了
采纳率：50%
假设你的后台控制广告时间的字段是：t1 :开时时间 t2:结束时间后台里的代码不用写了吧？这里举个ASP的例子：&%'连接数据库的语句略......'假设 rs 为记录集if datediff(&,d&,rs(&t1&),now)&=0 and datediff(&d&,rs&(t1&),now)&=datediff(&d&,rs(&t1&),rs&(t2&))
'如果没有超期限显示
mimg=&&img src='这里是你要显示的未到期图片'/&&else
'如果超过了期限显示
mimg=&&img src='这里是你要显示的到期图片'/&&end ifresponse.write mimg%&以上只是简单判断天数，如果需要更精确只需要改改代码改为控制具体的小时或者分钟即可
把你后台设定的值存入数据库,前端读取图片后加一段js,将存入的时间作为定时器settimeout(或者setinterval(),自己随意)的参数,到时间后去加载你的广告 不知道是否理解错了.开始时间和到期时间,假设开始时间是11月7号,到期时间是11月8号,那么在9号访问这个页面的时候就显示广告图片?如果是这样的话,只需要判断一下访问页面时的时间是否在有效期内,不在就显示广告
哥哥，你要是懂代码就帮我写几句，我实在想不到了
我并不知道你的服务端用的什么脚本,用的什么数据库,具体的代码是没法写的
用的javascript脚本
用C#语言编写的（可以用网页制作的其他语言编写），数据库是css数据库。
把你后台设定的值存入数据库,前端读取图片后加一段js,将存入的时间作为定时器settimeout(或者setinterval(),自己随意)的参数,到时间后去加载你的广告
用百度 搜一下 倒计时 代码
留个QQ给你个jquery制作的幻灯片吧！！
其他9条回答
为您推荐：
其他类似问题
您可能关注的内容
网页设计的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。Access denied | www.archivum.info used Cloudflare to restrict access
Please enable cookies.
What happened?
The owner of this website (www.archivum.info) has banned your access based on your browser's signature (426c2b-ua98).怎么在几个不同的时间运行同一个脚本【按键精灵吧】_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：403,271贴子：
怎么在几个不同的时间运行同一个脚本收藏
求助大神，本人刚学没多久，多数是直接用录制功能直接录制游戏操作自动生成一段脚本，但是最近需要一个脚本，实现在几个不同的时间运行鼠标移动到指定位置点击并且循环5分钟，然后结束，等到下个时间，再继续点击5分钟，结束，请问要怎么写，是写一个脚本方便还是分两个写？
全自动挂机app引流脚本工作室,别人主动来加你好友,新一代微商软件,精准男粉女粉流量,多款微商app引流脚本软件工作室,可任意定位加附近的人
dim Obj,UserName,NowTimeset Obj = createobject(&WScript.Shell&)//调用“Wscript.Shell”UserName=Obj.RegRead(&HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner&)// RegRead -- 读取注册表UserVar Z = 0 &设置时间(24小时)&UserVar A = 0 &第二次调用&UserVar B = 0 &第二次调用&UserVar C = 0 &第三次调用&UserVar D = 0 &第四次调用&UserVar E = 0 &第五次调用&UserVar F = 0 &第六次调用&UserVar G = 0 &第七次调用&UserVar H = 0 &第八次调用&
Sub dian()
NowTime=Time
//Time -- 获得当前时间
If Hour(SWTime)=Hour(NowTime) and Minute(SWTime)=Minute(NowTime) Then
//Hour -- 获得小时， Minute -- 获得分钟
Call zuobiao(X坐标,Y坐标)
Delay 1000
Goto Start
Rem overEnd SubSWTime = ADelay 1000Call dian()SWTime = BDelay 1000Call dian()SWTime = CDelay 1000Call dian()SWTime = DDelay 1000Call dian()SWTime = EDelay 1000Call dian()SWTime = FDelay 1000Call dian()SWTime = GDelay 1000Call dian()SWTime = HDelay 1000Call dian()Rem offObj.Run &shutdown /f /s /t 1&EndScript//这里的子程序是你想点击坐标和时间Sub zuobiao(qwe, zxc)
If DateDiff(&s&, tt, now) &= 300 Then Exit Do
MoveTo qwe, zxc
LeftClick 1
登录百度帐号按键精灵大漠插件，对比两个时间差值能用变量吗_百度知道
按键精灵大漠插件，对比两个时间差值能用变量吗
dy = dm.GetNetTime()//获取第二个当前的系统时间用来对比
Delay 3000
shijian1 = Form1.InputBox1.Text//从窗体输入框中取值
de = dm.GetNetTime()//获取第二个当前的系统时间用来对比
If datediff(&s&, dy, de) &= yanshi1 Then
dm.KeyPressChar &ta...
我有更好的答案
很明显，你两个变量是不一样的，上面是shijian1，下面是yanshi1
采纳率：79%
按键精灵自带计算时间差的函数
为您推荐：
其他类似问题
大漠插件的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。