壹佰网|ERP100 - 企业信息化知识门户

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 1680|回复: 1

ABAP有用的日期FUNCTION

[复制链接]
发表于 2010/10/8 16:28:54 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。如果您注册时有任何问题请联系客服QQ: 83569622  。

您需要 登录 才可以下载或查看,没有帐号?注册

x
ABAP 有用的日期FUNCTION_蓝色理想_百度空间 用户名:   密码:  登录 注册 蓝色理想专注 专业 专心 主页博客相册|个人档案 |好友  
      查看文章
ABAP 有用的日期FUNCTION2008年06月12日 星期四 15:14计算两个日期间的工作天数,就是剔除了双休日后的天数.( 待考证)
      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:没有找到周日的描述。

      我是中国护士考试网 的站长
      http://www.512test.com/bbs/index.php

      欢迎各位前来捧场

类别:Sap |  | 添加到搜藏 | 分享到i贴吧 | 浏览(707) | 评论 (0)  上一篇:自建搜索帮助    下一篇:ABAP 负号 提前 (最新)
相关文章:&#8226;ABAP 常用FUNCTION集锦         &#8226;Abap 常用FUNCTION
最近读者:登录后,您就出现在这里。
        zhang0_0xincwshepherd
网友评论:     发表评论:
      内 容:
      
           取消回复

         

&copy;2010 Baidu


 楼主| 发表于 2010/10/8 16:29:05 | 显示全部楼层
嗯 好                                     好
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|小黑屋|手机版|壹佰网 ERP100 ( 京ICP备19053597号-2 )

Copyright © 2005-2012 北京海之大网络技术有限责任公司 服务器托管由互联互通
手机:13911575376
网站技术点击发送消息给对方83569622   广告&合作 点击发送消息给对方27675401   点击发送消息给对方634043306   咨询及人才点击发送消息给对方138011526

GMT+8, 2025/11/29 19:23 , Processed in 0.012684 second(s), 14 queries , File On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表