Chinaunix首页 | 论坛 | 博客
  • 博客访问: 717319
  • 博文数量: 158
  • 博客积分: 6010
  • 博客等级: 准将
  • 技术积分: 1643
  • 用 户 组: 普通用户
  • 注册时间: 2007-10-11 14:37
个人简介

人法地,地法天,天法道,道法自然

文章分类

全部博文(158)

文章存档

2022年(1)

2020年(3)

2016年(1)

2014年(7)

2013年(4)

2010年(5)

2009年(86)

2008年(25)

2007年(26)

我的朋友

分类:

2007-10-15 12:53:54

在ABAP语言中要检查输入日期是否合法可以调用以下封装过程:
 
FORM CHECK_SELECTION_SCREEN.
  IF S_BUDAT-HIGH < S_BUDAT-LOW
     OR S_BUDAT-HIGH > SY-DATUM
     OR S_BUDAT-HIGH = SY-DATUM.
*     MESSAGE E999 WITH '输入非法日期'.
    S_BUDAT-HIGH = SY-DATUM.
    MODIFY S_BUDAT INDEX 1.
  ENDIF.
ENDFORM.                    "check_selection_screen
阅读(3042) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~