SAP ABAP日期函数介绍

1、获得最后一天
CALL FUNCTION ‘FIMA_DATE_CREATE’
EXPORTING
I_DATE                       = I_DATE “输入日期。sy-datum类型如:‘20110402’。
I_FLG_END_OF_MONTH            = ‘ ‘
I_YEARS                       = 2 “两年后的日期时间,既sy-datum的年加2所得日期,可为负数,表示前两年
I_MONTHS                      = 1 “一个月后的日期。既sy-datum的月加1所得日期,可为负数,表示前一个月
I_DAYS                        = 23 “23天后的日期。可为负数,表示23天前的日期
I_CALENDAR_DAYS               = 10 “10天后的日历。同I_DAYS参数。
I_SET_LAST_DAY_OF_MONTH       = ‘X’ “返回的日期为当前月份的最后一天
IMPORTING
E_DATE                        = E_DATE “返回的日期。如果I_DAYS和I_CALENDAR_DAYS都设置,则天数累加
E_FLG_END_OF_MONTH            = FLAG     “如果输入参数I_SET_LAST_DAY_OF_MONTH设置’X’了,则返回值为’X’。
E_DAYS_OF_I_DATE              = DAY. “返回输入日期的‘日’字段与I_DAYS字段的和。本例子为:25

2、获得周数

DATA WEEK LIKE SCAL-WEEK.
CALL FUNCTION ‘DATE_GET_WEEK’
EXPORTING
DATE               = SY-DATUM ”输入日期,如:‘20110402’
IMPORTING
WEEK               = WEEK.“返回输入日期为该年第几周。如:‘201113’。表示为2011年的第13周。
3、获得某周的第一天日期

DATA DATE LIKE SCAL-DATE.
CALL FUNCTION ‘WEEK_GET_FIRST_DAY’
EXPORTING
WEEK               = ‘201113’ “表示2011年的第13周
IMPORTING
DATE               = DATE. “返回的DATE值为20110328,既2011年第13周的第一天是3月28日。

4、得到输入日期N个月前/后的日期

4.1 返回指定月以前的日期
CALL FUNCTION ‘CCM_GO_BACK_MONTHS’
EXPORTING
CURRDATE         = sy-datum
BACKMONTHS       = 6
IMPORTING
NEWDATE          = DATE .
4.2 返回指定年,月,日以前或以后的日期.年月日得加减
CALL FUNCTION ‘RP_CALC_DATE_IN_INTERVAL’
EXPORTING
DATE            = sy-datum
DAYS            = 10
MONTHS          = 5
SIGNUM          = ‘+'”取值为‘+’或‘-’
YEARS           = 1
IMPORTING
CALC_DATE       = date  .
5、返回两个日期之间的年数、月数、天数

CALL FUNCTION ‘FIMA_DAYS_AND_MONTHS_AND_YEARS’
EXPORTING
I_DATE_FROM          = ‘20110402’
*   I_KEY_DAY_FROM       =
I_DATE_TO            = ‘20110522’
*   I_KEY_DAY_TO         =
*   I_FLG_SEPARATE       = ‘ ‘
IMPORTING
E_DAYS               = E_DAYS    “值为50
E_MONTHS             = E_MONTHS “值为2
E_YEARS              = E_YEARS .  “值为1
获取两日期之间天数函数:
FIMA_DAYS_AND_MONTHS_AND_YEARS
取得当月的第一天和最后一天
CONCATENATE sy-datum(6) ’01’ INTO so_date-low.
CALL FUNCTION ‘BKK_GET_MONTH_LASTDAY’
EXPORTING
i_date = sy-datum
IMPORTING
e_date = so_date-high.
so_date-sign = ‘I’. so_date-option = ‘BT’. APPEND so_date.
RP_CALC_DATE_IN_INTERVAL 年月日加减

6、获取输入日期月份的最后一天

BKK_GET_MONTH_LASTDAY
EXPORTING
I_DATE = ‘20110403’
IMPORTING
E_DATE = E_DATE. “E_DATE= ‘20110430’
7、日期有效性检查

DATE_CHECK_PLAUSIBILITY
8、获得所有的月份信息

DATA MONTH_NAMES LIKE T247 OCCURS 0.
CALL FUNCTION ‘MONTH_NAMES_GET’
EXPORTING
LANGUAGE                    = SY-LANGU
* IMPORTING
*   RETURN_CODE                 =
TABLES
MONTH_NAMES                 = MONTH_NAMES
* EXCEPTIONS
*   MONTH_NAMES_NOT_FOUND       = 1
*   OTHERS                      = 2
.
9.弹出一个窗口显示一个日历允许用户选择一个日期

CALL FUNCTION ‘F4_DATE’
EXPORTING
DATE_FOR_FIRST_MONTH               = SY-DATUM
DISPLAY                            = ‘X’ “如果为X则只显示日历窗口,而没有返回值
*   FACTORY_CALENDAR_ID                = ‘ ‘
*   GREGORIAN_CALENDAR_FLAG            = ‘ ‘
*   HOLIDAY_CALENDAR_ID                = ‘ ‘
*   PROGNAME_FOR_FIRST_MONTH           = ‘ ‘
IMPORTING
SELECT_DATE                        =  “返回值为选择的日期
*   SELECT_WEEK                        =
*   SELECT_WEEK_BEGIN                  =
*   SELECT_WEEK_END                    =
* EXCEPTIONS
*   CALENDAR_BUFFER_NOT_LOADABLE       = 1
*   DATE_AFTER_RANGE                   = 2
*   DATE_BEFORE_RANGE                  = 3
*   DATE_INVALID                       = 4
*   FACTORY_CALENDAR_NOT_FOUND         = 5
*   HOLIDAY_CALENDAR_NOT_FOUND         = 6
*   PARAMETER_CONFLICT                 = 7
*   OTHERS                             = 8

10、获取一年的第几周和这个周一和周日的日期

FM:GET_WEEK_INFO_BASED_ON_DATE
输入参数                        值
DATE                            2008.01.09
输出参数                        值
WEEK                            200802      <—-2008年第二周
MONDAY                          2008.01.07 <—-这个周周一的日期
SUNDAY                          2008.01.13 <—-周日的日期
11、输入日期是星期几

FM:DAY_IN_WEEK
输入参数                        值
DATUM                           2008.01.09
输出参数                        值
WOTNR                           3           <—-2008-1-9为周三
12、弹窗选择时间

CALL ‘F4_CLOCK’
EXPORTING
START_TIME = ’15:18:20’或‘151820’”输入时可选的
DISPLAY    =
IMPORTING
SELECTED_TIME = “返回选择的时间
13、 年和月的选择窗口

DATA MONTH LIKE ISELLIST-MONTH.
CALL FUNCTION ‘POPUP_TO_SELECT_MONTH’
EXPORTING
ACTUAL_MONTH                     = SY-DATUM+0(6)
*   FACTORY_CALENDAR                 = ‘ ‘
*   HOLIDAY_CALENDAR                 = ‘ ‘
LANGUAGE                         = SY-LANGU
START_COLUMN                     = 8
START_ROW                        = 5
IMPORTING
SELECTED_MONTH                   = MONTH “返回值为六位数字
*   RETURN_CODE                      =
EXCEPTIONS
FACTORY_CALENDAR_NOT_FOUND       = 1
HOLIDAY_CALENDAR_NOT_FOUND       = 2
MONTH_NOT_FOUND                  = 3
OTHERS                           = 4  .

14、获取周的信息

DATA WEEKDAY LIKE T246 OCCURS 0.
CALL FUNCTION ‘WEEKDAY_GET’
* EXPORTING
*   LANGUAGE                = SY-LANGU
* IMPORTING
*   RETURN_CODE             =
TABLES
WEEKDAY                 = WEEKDAY
* EXCEPTIONS
*   WEEKDAY_NOT_FOUND       = 1
*   OTHERS                  = 2

*———————————————————————————————–
计算两个日期间的工作天数,就是剔除了双休日后的天数.( 待考证)
DATE_CONVERT_TO_FACTORYDATE
HR_HK_DIFF_BT_2_DATES

根据当前时间如何找到上月的第一天和最后一天?
CALL FUNCTION ‘FIMA_DATE_CREATE’
EXPORTING
I_DATE                  = SY-DATUM
I_MONTHS                = ‘-1’
I_SET_LAST_DAY_OF_MONTH = ‘X’
IMPORTING
E_DATE                  = LASTDATE.
LASTDATE是上个月最后一天。
FIRSTDAY是上月第一天
CONCATENATE LASTDATE+(6) ’01’ INTO FIRSTDAY.。
当天是当年的第几周
DATE_GET_WEEK
得到该周第一天
WEEK_GET_FIRST_DAY
查找当前月份以前的月份(比如现在是4月份,如果我需要知道6个月之前是哪个月)
CCM_GO_BACK_MONTHS
RP_CALC_DATE_IN_INTERVAL
获取两日期之间天数函数:
FIMA_DAYS_AND_MONTHS_AND_YEARS
取得当月的第一天和最后一天
CONCATENATE sy-datum(6) ’01’ INTO so_date-low.
CALL FUNCTION ‘BKK_GET_MONTH_LASTDAY’
EXPORTING
i_date = sy-datum
IMPORTING
e_date = so_date-high.
so_date-sign = ‘I’. so_date-option = ‘BT’. APPEND so_date.
RP_CALC_DATE_IN_INTERVAL 年月日加减
DATE_CHECK_PLAUSIBILITY 日期有效性检查
SD_DATETIME_DIFFERENCE 两日期作差
DATE_CONVERT_TO_FACTORYDATE 把输入日期转为工厂日历日期
MONTH_NAMES_GET 获得所有的月和名字
F4_DATE     弹出一个窗口显示一个日历允许用户选择一个日期。
RP_LAST_DAY_OF_MONTHS 获得一个月的最后一天
FIRST_DAY_IN_PERIOD_GET 获得期间首日
LAST_DAY_IN_PERIOD_GET 获得期间末日
DATE_GET_WEEK      返回一个日期所在的周数。
CALL FUNCTION ‘HR_99S_INTERVAL_BETWEEN_DATES'”获得两个日期的年数
EXPORTING
begda   = gdat
endda   = sy-datum
IMPORTING
c_years = l_age.
关于星期(周)的函数
FM:GET_WEEK_INFO_BASED_ON_DATE输入参数                        值
DATE                            2008.01.09输出参数                        值
WEEK                            200802      <—-2008年第二周
MONDAY                          2008.01.07 <—-这个周周一的日期
SUNDAY                          2008.01.13 <—-周日的日期
FM:DAY_IN_WEEK(输入日期是星期几)

输入参数                        值
DATUM                           2008.01.09输出参数                        值
WOTNR                           3           <—-2008-1-9为周三
*更多关于Week的函数请看Function Group:CADA
*弹出选择周的对话框
AT SELECTION-SCREEN ON VALUE-REQUEST FOR s_week-low.
PERFORM getweek CHANGING s_week-low.FORM getweek CHANGING p_week .
DATA: begin_date TYPE d .
CALL FUNCTION ‘POPUP_CALENDAR_SDB’
EXPORTING
sel_week   = ‘X’
focus_day = sy-datum
IMPORTING
begin_date = begin_date.
CALL FUNCTION ‘GET_WEEK_INFO_BASED_ON_DATE’
EXPORTING
date = begin_date
IMPORTING
week = p_week.
ENDFORM.F4_CLOCK 选择时间*需求:只有显示年月,但要有日期的search helpPARAMETERS:p1(6) TYPE c.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p1.
DATA:l_date TYPE sy-datum.
CALL FUNCTION ‘F4_DATE’
EXPORTING
date_for_first_month          = sy-datum
IMPORTING
select_date                   = l_date
EXCEPTIONS
calendar_buffer_not_loadable = 1
date_after_range              = 2
date_before_range             = 3
date_invalid                  = 4
factory_calendar_not_found    = 5
holiday_calendar_not_found    = 6
parameter_conflict            = 7
OTHERS                        = 8.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
p1 = l_date+0(6).* check plausibilty of dates
CALL FUNCTION ‘DATE_CHECK_PLAUSIBILITY’
EXPORTING
DATE = bkdf-dbbdt.TIME_CHECK_PLAUSIBILITY   判断是不是时间GET_CURRENT_YEAR
得到当前的财政年(fiscal year)
察看某日期的属性,包括该日期是星期几,第几天(周2=2),是不是公共假期等,需要输入国家日历。

DAY_ATTRIBUTES_GET判断某天是否是假日
HOLIDAY_CHECK_AND_GET_INFOPOPUP_TO_SELECT_MONTH 月份选择窗口比较日期和时间TYPE-POOLS : TRFF .
DATA : X_LOG_OP        TYPE TRFF_TYPE_C_2 .
CALL FUNCTION ‘FIMA_DATE_COMPARE’
EXPORTING
I_FLG_INTRADAY = ‘X’
I_DATE         = SY-DATUM
I_TIME         = SY-UZEIT
I_COMP_DATE    = L_MODIFY-MODDATE
I_COMP_TIME    = L_MODIFY-MODTIME
IMPORTING
E_LOG_OP       = X_LOG_OP.
p_months = -4.”前4月,如果为正,则是后面的日期

CALL FUNCTION ‘MONTH_PLUS_DETERMINE’
EXPORTING
MONTHS        = p_months
OLDDATE       = p_date
IMPORTING
NEWDATE       = p_date.获得某个日期所在的周,获得某周的第一天。
DATE_GET_WEEK 和 WEEK_GET_FIRST_DAY
function date_get_week.
*”———————————————————————-
*”*”Lokale Schnittstelle:
*”       IMPORTING
*”             VALUE(DATE) LIKE SCAL-DATE
*”       EXPORTING
*”             VALUE(WEEK) LIKE SCAL-WEEK
*”       EXCEPTIONS
*”              DATE_INVALID
*”———————————————————————-

函数模块作用:
获得某个日期所在的周。
=============================================
function week_get_first_day.
*”———————————————————————-
*”*”Lokale Schnittstelle:
*” IMPORTING
*”     VALUE(WEEK) LIKE SCAL-WEEK
*” EXPORTING
*”     VALUE(DATE) LIKE SCAL-DATE
*” EXCEPTIONS
*”      WEEK_INVALID
*”———————————————————————-

函数模块作用:
获得某周的第一天。
============================================
上述两个函数的功能已经包含在 HR_GBSSP_GET_WEEK_DATES 中了。从数据表中获得指定语言每周七天的名称,例如中文就是星期一、星期二……星期日,英文就是Sunday、Monday……Saturday。WEEKDAY_GETFUNCTION WEEKDAY_GET.
*”———————————————————————-
*”*”Lokale Schnittstelle:
*”       IMPORTING
*”             VALUE(LANGUAGE) LIKE SY-LANGU DEFAULT SY-LANGU
*”       EXPORTING
*”             VALUE(RETURN_CODE) LIKE SY-SUBRC
*”       TABLES
*”              WEEKDAY STRUCTURE T246
*”       EXCEPTIONS
*”              WEEKDAY_NOT_FOUND
*”———————————————————————-

函数模块作用:
从数据表中获得指定语言每周七天的名称,例如中文就是星期一、星期二……星期日,英文就是Sunday、Monday……Saturday。

输入参数:
LANGUAGE:指定语言代码,可以省略,如果不填就是当前登录语言。注意,在调用时如果指定某种特定语言,必须用一个字节的语言代码,例如中文是 1、英文是 E……,而不能用 ZH、EN,语言代码参见表 T002。

输出参数:
RETURN_CODE:返回码,查询数据库获得的返回码。但是由于这个函数会抛出异常,因此返回码的作用不大。

表:
WEEKDAY:结构与透明表 T246 相同,用来存储返回给用户的周日名称。

异常:
WEEKDAY_NOT_FOUND:没有找到周日的描述。 (作者:Helena)
转载于SAP学习门户网,原文链接:http://www.sap6.com/learn/abap/073502232016/4118.html

[敗家] 小米智慧生活 part 2

[敗家] 小米智慧生活

上次去東莞小米之家買了一些基本的智慧家庭的配件 (感應器、網關、溫濕度、插座 等等…)

一直缺一段智慧燈泡的部分

這次去大陸常州出差,少不了又跑了好幾次小米之家 XD

買了不少東西 ~ 有些是幫朋友代買。

基本上買台灣買不到的就好。

(幫朋友買的 小愛音箱 小米手環3 小米無線充電版 )

自己買的有小米驅蚊器、藍芽滑鼠、

 

以上都是廢話,這次的重頭戲就是 小米智慧燈炮

一顆 49元人民幣,可以WIFI控制。 換算台幣約不到兩百。

用來取代家中客廳的無線 無段調光燈泡 。

簡介 :

飞利浦智睿球泡灯

自由调节亮度及色温 / 传统白炽灯外形 / Wi-Fi随时随地操控 / 多个灯泡和吸顶灯组网控制

加上之前就已經有人體感應以及一些雲台版攝影機,整個就可以搭配來使用

 

閱讀全文〈[敗家] 小米智慧生活 part 2〉

[DB] Oracle view

取得VIEW 內容

SELECT TEXT FROM USER_VIEWS WHERE VIEW_NAME =’WLKN1_VIEW2′

 

更新VIEW

CREATE OR REPLACE VIEW WLKN1_VIEW2 as
select …

寵物友善 毛寶搖搖寵物休閒農場

 

因為姆姆最近一直想出門,特別找了這間有戶外空間的寵物莊園?
現場可以清洗寵物,有吹風機和寵物沐浴乳,
還有寵物泳池,寵物可以隨意走動,有免費提供寵物碗和水,

不過由於環境很適合愛奔跑的狗狗,因此客人狗狗居多,有些比較白目過嗨的狗狗,還是讓姆姆害怕生氣,

但能帶她出去乾淨的草地上聞聞走走真的很棒,雖然緊張但連游泳也難不倒姆姆呢,一整天玩完,回家時剛到門口姆姆就衝進家裡??

就是要出門才會想家,一直在家裡就以為外面比較好齁~

另外建議有興趣下水的寵物胸背要準備兩件,濕了洗完澡可以換上乾的

第一次帶姆姆去玩水,誰說貓咪不玩水阿 XD
牠可是玩得很開心呢 ~

 

毛寶搖搖寵物休閒農場 

地址:屏東縣內埔鄉信義路1068號

電話:08-7622708

Facebook粉絲專頁:毛寶搖搖寵物休閒農場

營業時間:星期一,二,五(10:00~18:00),星期六,日(10:00~20:00)含連續假日 (假日請先電話預約)  每週三,四休園

入園票價:大人100元,小孩50元(可折抵餐費);小型犬250元、中型犬300元、大型犬350元、特大型犬400元、貓咪 250元(可折抵50元餐費)。

*貓咪入園需放置提籠內或放置園區提供的貓房。
*泳池區有提供寵物洗吹的地方,有提供洗毛精,吹風機,吹水機。備有主人沖澡室,均有提供熱水。
*毛巾需自備或可向園方購買。
*園區提供狗狗救生衣租借。

閱讀全文〈寵物友善 毛寶搖搖寵物休閒農場〉

[單車] 三登武嶺

今天是第三次騎武嶺,(第二次全程去年偷懶從清境開始騎)。

目前打算維持著一年一武嶺,因為有家庭之後比較難有兩日以上的行程。
高雄這邊發展出一日武嶺輕鬆體驗團。

基本上都是凌晨一點出發,四點到中心碑。準備好就開始騎。
騎到山頂吃泡麵等到十二點收人下山,回到高雄大概晚上六點前。
跟家人還交代得過去,也可以享受一下騎大山的樂趣。

這次難得沒淋雨順順騎完全沒抽筋跟疼痛。
或許是路線較熟了知道還有多遠, 該保留多少體力跟在那邊補給與休息。

難得沒淋雨順順騎完全沒抽筋跟疼痛。

或許是路線熟了知道還有多遠,

該保留多少體力跟在那邊補給與休息。

  • 52.96公里
    距離 (?)
  • 4:57:35
     移動時間
  • 3,209公尺
    海拔 (?)
  • 187
    估計平均功率
  • 3,333千焦耳
    能量輸出
平均 最大
速度 10.7公里/小時 51.8公里/小時
經過時間 5:26:47
Bryton Rider 330
自行車: 黑豆

分享一下補給跟騎乘的經驗

閱讀全文〈[單車] 三登武嶺〉

[食記] 旅行養分 寵物友善 高雄

★ 旅行養分-餐飲.活動.概念空間 ★

-頁末店有家資訊-

6/4 到高雄國際會議中心看寵物展,看完之後想找個地方清閒的吃飯,又因為帶著姆姆出門就查了個寵物友善餐廳,
找的時候方向感突然混亂了, 等開到的時候才知道就是在北斗街郭家肉粽對面而已。

轉角開到底,沿著愛河旁蠻好停車的

裡面座位不多很寬敞舒適,蠻多人都是來坐很久休息的感覺。

剛到的時候客滿,稍微等了一下~ 馬上就有位置了。

姆姆也迅速地找了個角落好好窩著

閱讀全文〈[食記] 旅行養分 寵物友善 高雄〉