获取上月第一天

最新推荐文章于 2024-07-28 19:01:10 发布

orcd

最新推荐文章于 2024-07-28 19:01:10 发布

阅读量799

点赞数

CC 4.0 BY-SA版权

分类专栏： sqlserver数据库技术 pb技术文章文章标签： date integer string

本文链接：https://blog.youkuaiyun.com/friendwaters/article/details/1639488

pb技术文章同时被 2 个专栏收录

21 篇文章

订阅专栏

sqlserver数据库技术

3 篇文章

订阅专栏

获取上月第一天

//====================================================================
// 函数: f_last_month
//--------------------------------------------------------------------
// 描述: 获取上月第一天
//--------------------------------------------------------------------
// 参数:
// datetime ad_date
//--------------------------------------------------------------------
// 返回值: datetime
//--------------------------------------------------------------------
// 作者: xx 日期: 2006.07.25
//--------------------------------------------------------------------
// 修改历史:
//
//====================================================================

Int li_year,li_month
DateTime ld_date
li_year = Integer(String(ad_date,'yyyy'))
li_month = Integer(String(ad_date,'mm'))

If li_month = 1 Then
li_year = li_year -1
li_month = 12
Else
li_month = li_month -1
End If
ld_date = DateTime(Date(String(li_year,'0000')+'/'+String(li_month,'00')+'/01'),Time('00:00:00'))
Return ld_date